안녕하십니까
아래는 제가 사용하는리습인데요. prompt를 하나 넣고 싶은데 잘 안되네요
——————————————————————
리습실행시 나타나는 오토캐드 문자 윈도우 내용
Wait loading LAYERCH…C:MIR
명령:
MIRROR할 Cololr의 Entity하나를 선택해 주세요
객체 선택:
객체 선택: 반대 구석 지정: 17개를 찾음, 2개의 그룹
객체 선택:
mirror
객체 선택: 19개를 찾음, 1개의 그룹
객체 선택: 대칭선의 첫 번째 점 지정: 대칭선의 두 번째 점 지정:
원본 객체를 지우시겠습니까? [예(Y)/아니오(N)]
——————————————————————
!!질문….!!
명령:
MIRROR할 Cololr의 Entity하나를 선택해 주세요
객체 선택: 동일한 Cololr의 Entity하나를 선택해 주세요..!!<====요런 prompt를 넣고 싶거든요..
근데 ssget할때는 어떻게 적요해야 할지 모르겟습니다
——————————————————————
——————————————————————
(defun C:MIR(/ gent sel)
(setvar “cmdecho” 0)
(prompt “n MIRROR할 Cololr의 Entity하나를 선택해 주세요 “)
(setq gent (cdr (assoc 62 (entget (car (entsel))))))
(setq sel (ssget (list (cons 62 gent))))
(setvar “cmdecho” 1)
(command “mirror” sel “” pause pause “”)
(princ)
)