캐드 분류
레이어 리습 수정해서 사용하려 합니다. 반복을어덯게 해야하나요?
컨텐츠 정보
- 866 조회
- 3 댓글
- 0 추천
- 0 비추천
-
목록
본문
(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 인터넷 보닌 반복이라 하는데 뭐가 잘못된걸가요?
관련자료
댓글 3
/ 1 페이지