다름르습을 실행시키면
; 오류: no function definition: REQEAT
라고 뜹니다.
repeat 에서 잘못된거 같은데 모르겠네요
뭐가 잘못된건가요?
(defun c:dccd()
(SETVAR “OSMODE” 4095)
(setq ea1 10)
(setq ea3 8)
(setq p0 (getpoint “기준점 :”))
(defun deg(a) (* pi (/ a 180.0))) ;—각도변화
(setq p1 (polar p0 (deg 180.0) 300))
(setq pp1 (polar p1 (deg 0.0) 10))
(setq s1 100.33)
(command “line” p0 p1 “”)
(if (> ea3 0)
(progn
(if (= ea3 (- ea1 2))
(progn ;——————행방향—STR 150초과일 경우
(setq stea10 (-(/ ea1 2)1))
(setq stea20 (- ea3 stea10))
(setq sts1 (+ s1 30.0))
(setq pp26 (polar p1 (deg 90.0) 10))
;;————————————행방향—str 밑부분복사
(setq stea2000 (fix(float stea20)))
(reqeat stea2000
(command “offset” sts1 p26 pp26 “”)
(setq sts100 (+ sts1 s1))
(setq sts1 sts100)
)
) ;— if문 참 끝
)
) ;;;;—–end progn
) ;;——-end if
(princ)
)
repeat 을 reqeat로 했네요.. 감사합니다.