레이어를 변환하는 리습을 쓰고 있는데요.
(defun c:ls1()
(setq aa (getstring “n Enter layer name : ” ))
(command “layer” “set” aa “”)
);;end of ls1
(defun c:CX()
(setq aa (cdr(assoc 8 (entget(car
(entsel “n Select an object to : ” )
))))
)
(command “layer” “set” aa “”)
);;end of xc
위에 것이 제가 쓰고 있는 리습입니다.
이 리습은 단축키를 누르고 제가 선택한 객체의 레이어가 현재 레이어로 바뀌는 리습인데요.
저는 여기에 bylayer로 말고 선택한 객체의 선타입, 색상, 선가중치까지 모두 적용할 수 있는 리습을 만들 수 있을까요?
리습은 아직 초보라 어떻게 손을 대야 할지 몰라 이렇게 도움을 청합니다~~