안녕하십니까
아래리습은 제가 ltype별로 이동하기 위한리습인데요
선종류가 bylayer에서는 작동이 안됩니다..ㅠㅠㅠ
선종류가 bylayer도 같이작동할려면 어떻게 해야 되나요?
답변부탁드립니다
=================================================
(defun C:ltm(/ gent sel)
(setvar “cmdecho” 0)
(prompt “n===>이동할 Linetype Entity하나를 선택해 주세요 “)
(setq gent (cdr (assoc 6 (entget (car (entsel))))))
(princ “n⇒이동할 Linetype의 Entity 전체를 선택해 주세요”)
(setq sel (ssget (list (cons 6 gent))))
(setvar “cmdecho” 1)
(command “move” sel “” pause pause)
(princ)
)