제가 레이어 리습을 쓰고 있는데 리습명령어를 먼저 실행하고 나서 객체를 선택 해야 적용이 됩니다.
객체를 먼저 선택하고 명령어를 써도 실행이 될수 있도록 추가할수 있을까요?
또는 하나에 레이어만 적용이 되는데 여러개의 레이어에도 적용할수 있을까요?
(defun c:aa(/ ent la)
(command “LAYER” “ON” “*” “”)
)
(DEFUN C:ee ()
(GRAPHSCR)
(SETVAR “CMDECHO” 0)
(SETQ ENAME (CAR (ENTSEL)))
(SETQ ELIST (ENTGET ENAME))
(SETQ OFFLAY (CDR (ASSOC 8 ELIST)))
(COMMAND “LAYER” “OFF” OFFLAY “” “”)
(PROMPT (STRCAT “N THE CURRENT LAYER IS ” OFFLAY))
(PRIN1)
)
(defun c:dd(/ ent la)
(setq ent (car (entsel “Select Entity : “)))
(setq ent (entget ent))
(setq la (cdr (assoc 8 ent)))
(command “LAYER” “S” la “OFF” “*” “N” “”)
)
수정 해주실수 있으시면 부탁드립니다. (제메일 주소입니다. pms3360@naver.com)