T Length Lisp Autocad