캐드 분류
캐드 리습 관련 질문있습니다.
컨텐츠 정보
- 938 조회
- 1 댓글
- 0 추천
- 0 비추천
-
목록
본문
제가 현재 캐드 리습을 만들고 있는데요.
좌표(x,y)를 찍어서 선을 만드는 리습을 하고 있습니다.(진행완료)
근데 좌표를 하나하나 캐드 커멘트 창에서 손으로 찍는거 말고 텍스트 파일에 입력해 놓고 그걸 자동으로 불러서 저절로 찍어지게 할수 있나요??
혹시 가능하신분 개략적으로 알려주시거나 코딩해주시면 감사하겠습니다.
=============좌표 찍는 리습=====================
(defun draw_L_C (a1 a2 a3 a4 a5 a6 a7 a8)
(command "line" a1 a2 a3 a4 a5 a6 a7 a8 "")
(princ)
)
(defun c:cs()
(setvar "cmdecho" 1)
(setq p1 (getpoint "n>> 첫번째 점 입력 …: "))
(setq p2 (getpoint p1 "n>> 두번째점 입력…:"))
(setq p3 (getpoint p2 "n>> 세번째점 입력…:"))
(setq p4 (getpoint p3 "n>> 네번째점 입력…:"))
(setq p5 (getpoint p4 "n>> 다섯번째점 입력…:"))
(setq p6 (getpoint p5 "n>> 여섯번째점 입력…:"))
(setq p7 (getpoint p6 "n>> 일곱번째점 입력…:"))
(setq p8 (getpoint p7 "n>> 여덜째점 입력…:"))
(draw_L_C p1 p2 p3 p4 p5 p6 p7 p8)
(princ)
)
관련자료
댓글 1
/ 1 페이지
수야12님의 댓글
거의 모든 답은 구글에 있습니다
