숫자로 구성된 a,b,c,d값 모두 조건이 만족할 때 다음명령어 실행하려고 하는데 조건문에 어려움이 있어 자문을 구합니다
(defun c:test()
(setq a 5 b 2)
(setq c 3 b 3)
(if (and (>= a b)(= c d));;;;; 조건문 a가 b보다 크거나 같을때 만족하고, c 와 d가 같을때 다음 명령을 실행함
(prompt ” ; 오류: no function definition”))
(setq pt1 (getpoint ” 1st Pick Point: “))
(setq pt2 (getpoint pt1 ” 2nd Pick Point: “))
(Command “Line” P1 P2 “”)
(princ “n <<< ok >>>”)
(princ)
) ; end of defun
공유
오타났네요
오타을 수정하였고 조건식에 대입한 숫자을 오류가 나야 되는데 정상 실행 합니다
어떠게 해야 하나요???? 도와 주세요….
(defun c:test()
(setq a 1 b 2)
(setq c 1 d 3)
(if (and (>= a b)(= c d));;;;; 조건문 a가 b보다 크거나 같을때 만족하고, c 와 d가 같을때 다음 명령을 실행함
(prompt ” ; 오류: no function definition”))
(setq pt1 (getpoint ” 1st Pick Point: “))
(setq pt2 (getpoint pt1 ” 2nd Pick Point: “))
(Command “Line” Pt1 Pt2 “”)
(princ “n <<< ok >>>”)
(princ)
)
감사합니다 집에 가서 해봐야 겠습니다……즐거운 하루 되세요…
(progn
…..
)
을 쓰지 안고 상기 조건식을 만족하여 프로그램이 시작되는 첫줄에서
실행이 되어 만족하면 다음명령어을 실행하고
만족하지 못하면 프로르램을 빠져나가는
방식으로 되는 리습에 자문을 구합니다 감사합니다