선종류 변경 리습

현재 브릭스캐드를 사용하는 건축설계사원입니다.

리습을 공부하며 리습을 만들려고하고있는데 난관에 봉착하여 도움을 구하려 글을 씁니다.

리습을 만드는건 간단한수준에서 변형밖에 할줄 모르는 상황이고

만들려고하는 리습은 라인을 선택하여 선종류를 변경하는 리습을 만들려고하고있습니다.

현재까지 만든 리습 내용은

(defun c:vv (/ ss)
  (setvar "cmdecho" 0)
  (prompt "n>> 선종류를 변경할 객체를 선택하세요…")
  (setq ss (ssget))
  (setvar "cmdecho" 0)
  (command "change" "p" "" "p" "lt" "hidden"  "")
  (prompt (strcat "n>> 선종류가 변경되었습니다." ))
  (prin1)
)

(princ "nt 명령어 : vv")
(princ)

입니다.

제가 여기에서 변형을 하고 싶어하는 부분은 선에 대한 변경을 숫자로 다양하게 cen,das,dot 등

다양한 선으로 한번의 레이어에서 변경하고 싶어하는 부분입니다.

고수님들의 조언 부탁드립니다.

(현재 참고하고 있는 리습은 선의 색상을 변경하는 리습으로 내용은 아래 같습니다.)

 (defun c:cc ()
  (prompt "n>> 색상을 변경할 객체를 선택하세요… ")
  (setq se (ssget))
  (setq col (strcase (getstring "n>> 색상 번호를 입력하세요 : ")))
  (command "change" se "" "p" "c" col "")
  (prompt (strcat "n>> " col " 번 색상으로 변경되었습니다." ))
  (princ))
(princ "nt 선택객체 색상변경. Command: CG " )
(princ)