magicheno
发表于 2023-11-6 10:51:49
感谢大佬分享
lzspain
发表于 2023-11-6 11:50:28
感谢分享,偶尔会用到
lee50310
发表于 2023-11-8 05:45:06
本帖最后由 lee50310 于 2023-11-9 16:23 编辑
muai2010 发表于 2023-11-5 22:13
程序很好,认真测试发现有些地方不该段的地方断了,附图附断开后的文件
最新 break3b 版 (已改善此問題)
請用另一款( 功能更強大) 交點打斷 程式break3b-chs.lsp
執行指令:brkall
muai2010
发表于 2023-11-8 08:02:06
lee50310 发表于 2023-11-8 05:45
最新版 (已改善此問題)
請用另一款 交點打斷 程式break2b-chs.lsp
这一版基本没问题了,只看到一个小问题,四个圆中唯独右下角的圆“L”是一条多段线,上面的圆“L”是单独两条多段线
y854271613
发表于 2023-11-8 16:04:44
感谢分享,很强大的功能
依然小小鸟
发表于 2023-11-8 22:29:42
感谢分享:handshake
qianzj
发表于 2023-11-9 14:32:53
lee50310 发表于 2023-11-8 05:45
最新 break3 版 (已改善此問題)
請用另一款( 功能更強大) 交點打斷 程式break3-chs.lsp
这个会把块炸开啊?能不炸开吗?
lee50310
发表于 2023-11-9 16:33:17
本帖最后由 lee50310 于 2023-11-9 16:56 编辑
qianzj 发表于 2023-11-9 14:32
这个会把块炸开啊?能不炸开吗?
請重新下載最新版 break3b-chs.lsp
自行用文字編輯器編輯 break3b-chs.lsp
在程式下方找到此行
;<-- 優先處理 圖塊(炸開) -->
(if (setq ssn(ssget "_C" Pt1 Pt2 (list (cons 0 "INSERT")) ))(exbx ssn) ) ;炸開圈選範圍內所有圖元
將此行前用 ";" 註解掉無作用 , 然後存檔即可
此行修改後如下:
;<-- 優先處理 圖塊(炸開) -->
;(if (setq ssn(ssget "_C" Pt1 Pt2 (list (cons 0 "INSERT")) ))(exbx ssn) ) ;炸開圈選範圍內所有圖元
gwar
发表于 2023-11-9 19:52:50
感谢楼主分享很好的工具
zxc710370969
发表于 2023-11-12 09:20:15
感谢楼主分享很好的工具