블럭 리습 추가 기능 부탁드립니다.

(DEFUN C:BC (/ P S R)
  (SETQ OS_M (GETVAR “OSMODE”)
        P (GETPOINT “n 복사할 기준점 선택:”)
        S (SSGET)
        R (GETPOINT P “n 붙여넣을 기준점 선택:”)
  )
  (COMMAND “OSMODE” 0)
  (COMMAND “COPYBASE” P S “”)
  (COMMAND “ERASE” S “”)
  (COMMAND “PASTEBLOCK” R)
  (COMMAND “OSMODE” OS_M)
  (PRINC)
)


—————
위에는 제가 쓰고 있는 리습인데(블럭만드는 리습)

블럭 선택해서 편집으로 들어 가서

블럭 외의 선을 추가하거나, 블럭의 선들 중 하나를 제외 시키려면

어떻게 해야 되죠?

리습 수정 좀 부탁드립니다.