2013.04.15 13:07
수고많으십니다. 늘 언제나 감사한 마음으로 사용하고 있는 유저입니다.^^
제가 쓰는 리습에 대해 여쭙겠습니다.
layer.lsp라는 리습파일이 있어서 특정레이어를 키고 끄고 얼리는 기능을 주로 사용합니다.
af : 선택한 레이어만 키기
at : 전체 레이어 키기
ff : 선택한 레이어만 얼리기
이런식인데요...
드림에도 더 많은 레이어 관련 명령어가 있으나 이게 손에 익어서 이 리습으로 사용했었습니다.
근데 2013프로그램을 추가 설치후, 2008에서는 여전히 잘 되고, 2013에선 다른 명령어는 실행되는데
레이어 전체 키는 명령어인 at를 치면 레이어 대화상자가 나옵니다.
2008에선 되고 2013에선 안되는 이유와 한리습파일에 있는 명령인데 어떤건 되고 어떤건 왜 안되는지....
2013에서도 나오게 하는 방법 없을까요?^^
파일 올리고 싶은데 파일올리기가 안보이네요~
글서, 리습파일 복사해서 내용 올려보겠습니다. 번거롭게 해드려 죄송합니다.^^
다른명령어는 다 실행되고, 맨밑에 at만 레이어대화상자만 뜨면서 안됩니다.
;=======================<< #25 FREEZE1 >>=====================================
(DEFUN C:AF (/ es eg as)
(setvar "cmdecho" 0)
(SETQ ES (CAR (ENTSEL ">>Pick no freeze..?"))
EG (ENTGET ES)
AS (CDR (ASSOC 8 EG))
);SETQ
(COMMAND "LAYER" "s" AS "off" "*" "" "")
)
;========================<< #26 FREEZE2 >>====================================
(DEFUN C:FF ()
(SETQ ES (CAR (ENTSEL ">>PICK FREEZE..?"))
EG (ENTGET ES)
AS (CDR (ASSOC 8 EG))
);SETQ
(COMMAND "LAYER" "off" AS "")
)
;========================<< #27 FREEZE3 >>====================================
(DEFUN C:FFF ()
(SETQ ES (CAR (ENTSEL ">>PICK FREEZE..?"))
EG (ENTGET ES)
AS (CDR (ASSOC 8 EG))
);SETQ
(COMMAND "LAYER" "freeze" AS "")
)
;======================<< #28 ALL THAW >>=====================================
(Defun C:AT ()
(setvar "cmdecho" 0)
(command "LAYER" "on" "*" ""))
2013.04.15 19:04
2013.04.16 18:18
2013.04.17 12:57
2013.04.18 13:01
제가 기본적으로 리습은 잘몰라서 답변은 어렵습니다.
(제가 그나마 아는것은 드림을 만든 VBA, 와 .NET 입니다)
잘은 모르지만 안된다면 "LAYER" 이것을 "-LAYER" 이렇게 변경하고 저장해서
사용해보세요.