지금 가지고 있는것은
선택한 레이어 끄기 하면
레이어를 1개 밖에 선택할 수 없는데요.
여러개의 레이어를 선택할 수 있는 리습은 업나요?
캐드파워에서는 그렇게 써서 편했는데..
;Select layer off
(defun c:slo (/ cla a2 b2 L1 L2)
(princ “CIMCAD by Korea CIM, LTD.”)
(princ “n선택된 레이어만 보이게 됩니다. 레이어를 선택 하십시오:”)
(setvar “cmdecho” 1)
(while (= a2 nil)
(setq a2 (entsel))
)
(setq b2 (entget (car a2)))
(setq L1 (assoc 8 b2))
(setq L2 (cdr L1))
(setvar “cmdecho” 0)
(command “-layer” “_set” L2 “_off” “*” “” “_on” “0” “”)
(setvar “cmdecho” 1)
(princ l2)
(princ)
(setvar “cmdecho” 0)
)
공유