리습 고수님 헬프미!!

다음은 표면처리기호 및 공차 삽입에 관련된 리습인데 실행이 안돼요…뭐가 잘못된것인지 도와주세요….

(defun c:G1() (setvar “cmdecho” 0)(command “osnap” “nea” “ortho” “on”)
(setq siz (getvar “dimscale”))
(setq dist (* 1.5 siz))
(setq bas (getpoint “n Pick base point :”))
(setq num 1 )
(command “osnap” “off” “layer” “on” “0” “s” “0” “”)
(setq p1 (polar bas (dtr 60) dist))
(setq p2 (polar bas (dtr 120) dist))
(command “pline” bas p1 p2 “c”)(setq e1 (entlast))
(prompt “n /Reference :”)
(command “rotate” e1 “” bas pause) (princ))

# 공차 기입
(defun c:+20,+10() (setvar “cmdecho” 0)(command “osnap” “nea”)
(setq tol_u “+0.2”
tol_d “+0.1”
dm_txt (getvar “dimtxt”)
dm_siz (getvar “dimscale”)
txt_hi (* dm_txt dm_siz 0.75) ;tolerance height
bas (getpoint “nPick base point :”)
p1 (polar bas (dtr 90) (* txt_hi 2.5))
p2 (polar bas (dtr 90) (* txt_hi 1.2)))
(command “layer” “on” “0” “s” “0” “” “osnap” “off” “text” “j” “ml” p1 txt_hi 0 tol_u )
(setq e1 (entlast))
(command “text” “j” “ml” p2 txt_hi 0 tol_d ) (setq e2 (entlast))
(command “rotate” e1 e2 “” bas pause) (princ))

꼭 답변 부탁드립니다……..