(defun C:lol (/ af)
(setvar “cmdecho” 0)
(princ ” = LAYER ALL OFF”)
(while
(setq af (entsel))
(setq af (car af))
(setq af (cdr (assoc 8 (entget af))))
(command “.LAYER” “s” af “”)
(command “.LAYER” “off” “*” “” “”)
); while
(setvar “cmdecho” 1)
(prin1)
)
반복이 안됩니다. 도와주세요
while 인터넷 보닌 반복이라 하는데 뭐가 잘못된걸가요?
감사합니다. 중노동이 줄었습니다.