레이어1번을 사용자 편의대로 바꿔서 사용하라고 하는데요, error no function difitnition -DTR 이런 오류 뜨면서 실행이 안되네요
담은 리습 파일입니다. 해결 부탁드려요.
(defun c:ss(/ p1 p2 p3 p4 p5)
(setvar “osmode” 4)
(setq p1 (getpoint “n center line point:” ))
(setvar “osmode” 0)
(setq dis (getdist “n line length;”))
(setq di1 (/ dis 2))
(setq p2 (polar p1 (dtr 90) di1))
(setq p3 (polar p1 (dtr 270) di1))
(setq p4 (polar p1 (dtr 0) di1))
(setq p5 (polar p1 (dtr 180) di1))
(command “line” p2 p3 “”)
(command “change” “l” “” “p” “la” “1” “”)
(command “line” p4 p5 “”)
(command “change” “l” “” “p” “la” “1” “”)
);defun end