《剪切成虚线》v3.1版(支持框选)

a197712939

您这个子函数有问题，遇到多段线有重点的不能剪切，(defun hh:remove (en / newdata)      ; 去除多段线重点
    (foreach e (entget en)
      (if (and
            (member e newdata)
            (= 10 (car e))
          )
        nil
        (setq newdata (cons e newdata))
      )
    )

zhangrunze

适合装配中重叠零件的绘制~
辛苦了，感谢分享~

Noangler

lang大师出品，先赞了再说，谢谢分享