한파일에서 출력할 때 ‘print->window->pick->코너 찍고->확인’
이라는 동작을 반복해야 하거든요. 그래서 단축명령을 만들어 봤습니다.
계속 코너만 찍어대면 됩니다.
단, 용지설정등을 위해 최초 한 장은 원래 방식으로 출력을 해야합니다.
; ———————- pp 연속출력 ——————————
; 대화창을 띄우지 않고 연속출력 (코너만 찍어대기) / R14용
; 2003.8.30. 별따개
; 건일엔지니어링
; —————————————————————-
(defun c:pp(/ first other)
(while (/= (setq first(getpoint “first corner:” )) nil)
(setq other(getcorner first “other corner:”))
(command “plot” “w” first other “0”)
)
)
위의 내용을 Tip & tech 에서 보고 2002버젼은 안되서 실망.
저런식의 도면 출력이 많아서 필요 했거든요.
2002버젼에서도 위와 같이 쓸수 있는 리습을 좀 어떻게?
제가 리습을 할줄몰라서 가능하신분께 부탁을 ….