(defun RotateCood(ref_point target_point ang_deg
/ xi yi rot_point cos0 sin0
ang_rad)
(setq ang_rad (/ (* pi ang_deg) 180))
(setq cos0 (cos ang_rad))
(setq sin0 (sin ang_rad))
(setq xi (- (car target_point) (car ref_point)))
(setq yi (- (cadr target_point) (cadr ref_point)))
(setq rot_point (list (- (* xi cos0) (* yi sin0))
(+ (* xi sin0) (* yi cos0))))
(setq rot_point (list (+ (car rot_point) (car ref_point))
(+ (cadr rot_point) (cadr ref_point))))
rot_point
);(defun RotateCood())
==> 위 코드를 실행 시키면 ” 잘못된 인수 유형 lselsetp nil ” 이라고 나옵니다…
고수님들 한 번 봐주세요~~~~
서방Lv.0
잘못된 인수 유형 lselsetp nil 에러를 잡아 주세요…
공유