레이어 on,off 리습 수정가능한가요??
컨텐츠 정보
- 1,020 조회
- 4 댓글
- 0 추천
- 0 비추천
- 목록
본문
빠른 도면 작업을 하기 위해서는 레이어 온,오프 기능이 꼭 필요한데요~
1번은 선텍한 레이어만 숨기기
2번은 선텍한 레이어만 남기고 나머지 숨기기
3번은 전체 켜기
입니다.
잘사용을 하고 있다가 갑자기 1번이 안되네요..ㅜㅜ
검토해 주시면 감사히 잘 쓰겠습니다.~^^;
관련자료
엔씨벤딩님의 댓글
제경우에는 기본명령어보다 리습을 쓰는게 훨씬 작업속도가 빠르니까 기본명령어가 있어도 리습을 만들어 쓰고 있습니다.
이거는 제가 사용중인 레이어관련 리습
; 선택한 레이어 OFF ;;;;;;;;;;;;;;;;;; (defun c:af(/ a2 b2 l2) (setvar "cmdecho" 0) (prompt "nSelect target layer") (setq a2 (entsel)) (while (/= (cadr a2) nil) (setq b2 (entget (car a2))) (setq l1 (assoc 8 b2)) (setq l2 (cdr l1)) (command "layer" "off" l2 "") (prompt "nSlect target layer") (setq a2 (entsel)) );while (PROMPT "선택객체의 레어어 OFF") (PRINC) )
; 모든 레이어 보기 언락 동결해제;;;;;;;;;;;;;;;;;;;; (defun c:aaa() (command "layer" "on" "*" "") (command "layer" "thaw" "*" "") (command "layer" "unlock" "*" "") (PROMPT "모든레어어의 언락 언플리징 보기활성화됨") (PRINC) )
;선택한 레이어만 ON;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;(defun *error* (msg) ;(princ "nError ! ") ;(princ msg) ;(terpri) ????
(defun c:aa(/ OS var8 nn1 n11 nn2) (defun *error* (msg)(princ "error: ")(princ msg) (setvar "osmode" os) (command "clayer" "0″) (princ) ) (setq os (getvar "osmode"))
(setq var8 (getvar "clayer")) (setq nn1 (entsel "n표시할 레이어에 속한 객체를 선택하세요. "))
(if (/= nn1 nil) (progn (setq n11 "") (while nn1 (setq nn2 (car nn1)) (setq n1 (cdr (assoc 8 (cdr (entget nn2))))) (setq n11 (strcat n11 "," n1)) (setq nn1 (entsel "n표시할 레이어에 속한 객체를 선택하세요. ")) ) (command "layer" "off" "*" "y" "") (command "layer" "on" n11 "") ) (progn (command "layer" "on" "*" "")) ) (PROMPT "선택객체의 레이어만 보기") (PRINC) )







