첨부파일에 있는 LISP이 AUTOCAD에서 사용이 가능한지 확인 부탁드립니다.

lisp load해서 사용하려고 하면 아래와 같은 오류가 뜨네요
” 오류: 잘못된 인수 유형: numberp: nil “
두가지 모두 이런 오류가 뜨는데 이유를 갈수가 없네요..
ㅠ.ㅠ


(defun c:VVV ()    
” (setvar “”ORTHOMODE”” 0)”    
 (graphscr)    
” (setq tl1 (getpoint “”Fist Point : “”))”    
” (setq t2 (getpoint tl1 “”Second Point : “”))”    
” (SETVAR “”ORTHOMODE”” 1)”    
” (setq tx (getpoint t2 “”End point : “”) ta1 (angle tl1 t2)”    
    en1 (* 150 sc$) en3 (* 300 sc$) en4 (* 150 sc$))   
 (setq t1 (polar tl1 (+ (dtr 180) ta1) en1) ta2 (angle t1 t2))    
 (setq t3 (polar tl1 (+ (dtr 0) ta2) en3) ta3 (angle t1 t3) ta5 (angle t2 tx))    
 (setq tx1 (polar tx (+ (dtr 90) ta5) en4)    
    tx2 (polar tx (+ (dtr 270) ta5) en4))   
” (command “”line”” tl1 t2 tx “”””)”    
” (command “”pline”” tl1 “”w”” 0.0 en1 t3 “”””)”    
” (command “”line”” tx1 tx2 “”””)”    
)    
    
    
(defun c:VV ()    
” (setvar “”ORTHOMODE”” 0)”    
” (setvar “”OSMODE”” 512)”    
 (graphscr)    
” (setq aa (getpoint “”Selet object : “”))”    
” (setq tl1 (osnap AA “”NEAR””))(terpri)”    
” (setvar “”OSMODE”” 0)”    
” (setq t2 (getpoint tl1 “”Second point : “”))”    
” (SETVAR “”ORTHOMODE”” 1)”    
” (setvar “”OSMODE”” 0)”    
” (setq tx (getpoint t2 “”End point : “”))”    
 (setq ta1 (angle tl1 t2) xx1 90 xx2 180 xx3 270     
    en0 (* 90 sc$) en1 (* 150 sc$) en2 (* 300 sc$) en4 (* 150 sc$))   
 (setq t1 (polar tl1 (+ (dtr xx2) ta1) en1) ta2 (angle t1 t2))    
 (if (and (< 1.5708 ta1) (> 4.71239 ta1)) (setq xx1 270 xx2 0 xx3 90))    
 (setq t3 (polar t1 (+ (dtr xx1) ta2) en0) ta3 (angle t1 t3))    
 (setq t4 (polar t3 (+ (dtr xx3) ta3) en2) ta4 (angle t3 t4))    
 (setq t5 (polar t4 (+ (dtr xx3) ta4) en0) ta5 (angle t2 tx))    
 (setq tx1 (polar tx (+ (dtr 90) ta5) en4)    
    tx2 (polar tx (+ (dtr 270) ta5) en4))   
” (command “”line”” t1 t2 tx “”””)”    
” (command “”line”” t1 t3 t4 t5 “”””)”    
” (command “”line”” tx1 tx2 “”””)”    
)