批量打断

zhgcjl · 发表于 2018-7-29 19:00:07

逐点打断的代码

(defun c:dd()
(setvar "cmdecho" 1)
(princ "\n请选择需要打断的线段: ")
(setq ss (ssget '()))
(setq p1 (getpoint "\n请选择断点位置:"))
(setq i 0)
(repeat (sslength ss)
   (setq ename (ssname ss i))
   (if (/= ename nil)
      (progn
         (command "break" ename p1 p1)
      )
   )
   (setq i (+ i 1))
   )
(exit)
)

以上为逐点打断的代码

想请大师帮忙修改成批量交点打断

zhgcjl · 发表于 2018-7-29 19:15:59

需打断的CAD图多段线交点

Lisphk · 发表于 2018-7-29 20:32:55

你选择2个点，如果批量，这两个点怎么对应到所有选择的要打断的对象呢？

zhgcjl · 发表于 2018-7-29 20:47:09

Lisphk 发表于 2018-7-29 20:32
你选择2个点，如果批量，这两个点怎么对应到所有选择的要打断的对象呢？

本次上传的CAD图中是部分截图

newer · 发表于 2018-7-30 12:08:34

zhgcjl 发表于 2018-7-29 20:47
本次上传的CAD图中是部分截图

把图片截图贴到论坛来。
另外，你是想把你那个代码，循环起来？还是选多个，一次打断？

zhgcjl · 发表于 2018-7-30 12:38:19

newer 发表于 2018-7-30 12:08
把图片截图贴到论坛来。
另外，你是想把你那个代码，循环起来？还是选多个，一次打断？

框选范围一次性全部打断交叉点

newer · 发表于 2018-7-30 12:43:29

zhgcjl 发表于 2018-7-30 12:38
框选范围一次性全部打断交叉点

框选一次，你找不到要打断哪个，信息不够。

你还要取点要打断的。你点的这些，和框选的里面求交点。

zhgcjl · 发表于 2018-7-30 14:13:35

newer 发表于 2018-7-30 12:43
框选一次，你找不到要打断哪个，信息不够。

你还要取点要打断的。你点的这些，和框选的里面求交点。

框选一次，只能是打断一个交点，工作效率太慢，想要框选一次全部就能打断，谢谢大师！能否帮忙修改一下插件，或框选一次连续点击交叉点打断都行，谢谢！！

shqvc · 发表于 2018-10-26 09:53:13

能不能选长打断或是说自己填数打段呀

1784290342 · 发表于 2018-10-26 13:54:34

用objectarx应该可以

账号		自动登录	找回密码
密码			立即注册

[编程申请] 批量打断

点评

点评

点评

点评

点评