(DEFUN C:123 (/ ss te)()
(and
(setq ss (ssget (list (cons 0 “text,mtext”)(cons 1 “@!3”))))
(setq te (getstring “nMATERIAL : “))
(not (= te “”))
(foreach ent (vl-remove-if ‘listp (mapcar ‘cadr (ssnamex ss)))
(entmod (subst (cons 1 te)(assoc 1 (entget ent))(entget ent)))
)
)(princ)
)
위에는 제가 어지저찌 퍼다와서 붙혀넣고 하다보니 틀만 갖춰진 리습인데…
해당 리습 사용시 불필요한 행정이 너무많습니다 행정을 줄이고 싶습니다
현제 프로세스가 캐드 명령행에 123명령어 입력후
-> 객체선택 (도면내 @!3의 내용이 들어간 모든 text,mtext 만 필터링) ->
스페이스바 -> (nMATERIAL : 문구가 뜨면서) 명령행에 입력 ->
SUS304 -> 스페이스바 -> 끝 (도면내 @!3의 내용이 들어간 모든 text,mtext 내용을 SUS304로 변경)
스페이스바 -> (nMATERIAL : 문구가 뜨면서) 명령행에 입력 ->
SUS304 -> 스페이스바 -> 끝 (도면내 @!3의 내용이 들어간 모든 text,mtext 내용을 SUS304로 변경)
입니다.. 제가 원하는 프로세스는 캐드 명령행에 123명령어 입력후
-> 도면내 @!3의 내용이 들어간 모든 text,mtext 를 SUS304로 변경
같이 하나의 행정으로 줄이고싶습니다.
-> 도면내 @!3의 내용이 들어간 모든 text,mtext 를 SUS304로 변경
같이 하나의 행정으로 줄이고싶습니다.
지금 저 리습에서 어디를 어떻게 수정해야 할지 모르겠습니다..ㅠㅠ
문제점과 개선사항을 알려주시면 감사하겠습니다.
와… 감사합니다.. ㅠㅠㅠ