如何将一个整体分割成多个个体

世人皆醉

问题如图所示，求各位大佬解决，如何用LISP表示
点一：分割线会与要分割的图形有交点，分割线为直线
点二：分割线可以为两到三个
如果我还有哪说的不明白的，请大佬可以提出我说的不明白的地方

mituzhe

http://bbs.mjtd.com/thread-173390-1-1.html
另外可以参考这个帖子学习。完全符合你的要求。善用搜索，自我学习。
[求助]如何生成闭合边界？ - AutoLISP/Visual LISP 编程技术 - AutoCAD论坛 - 明经CAD社区 - Powered by Discuz! (mjtd.com)
搜索 闭合边界

lee50310

這裡有現成的,可參考看看 是不是這效果
<<<*** 雙線切割+切割字型功能 ***>>
http://bbs.mjtd.com/thread-184626-1-1.html

執行指令:pcut
            1.是否切割文字 是/否?   否
            2.輸入切割的寬度: 1
            3.選取物體切割
           
            停止切割按 Enter鍵

如動態圖所示

世人皆醉

lee50310 发表于 2022-8-6 12:18
這裡有現成的,可參考看看 是不是這效果

大佬，你这程序有几个问题

1、切割完后原有的长度会改变，中间那条线还在，怪怪的

2、只使用闭合连接体，比如直接用矩形命令画的矩形和直线画的矩形，直线画的是不能用的，会生成一个没有用的矩形

3、选择第一点和第二点不如直接选择直线实用，如果原本图上有标注，会识别错误，不能用

lee50310

世人皆醉 发表于 2022-8-6 13:13
大佬，你这程序有几个问题

1、切割完后原有的长度会改变，中间那条线还在，怪怪的

這個程式本來就不是為這個而寫,
所以有些不符合的地方也是正常的
程式源碼已釋出,你只要稍做修改就可解決

世人皆醉

lee50310 发表于 2022-8-6 15:29
這個程式本來就不是為這個而寫,
所以有些不符合的地方也是正常的
程式源碼已釋出,你只要稍做修改就可解 ...

大佬，能帮忙改下吗，新手小白一个，不太了解

lee50310

世人皆醉 发表于 2022-8-6 15:41
大佬，能帮忙改下吗，新手小白一个，不太了解

很抱歉! 那個程式是裁剪 須要輸入裁剪寬度
所以物體會被裁掉一個寬度
後來發現並不適用於你的問題也無法從這個程式去做修改

要讓畫分後的尺寸不變
建議可用CAD 提供的指令 bpoly  來手動完成

guosheyang

这些东西本身没多大难度，自己稍微学习下， 就可以解决

mituzhe

lee50310 发表于 2022-8-7 07:39
很抱歉! 那個程式是裁剪 須要輸入裁剪寬度
所以物體會被裁掉一個寬度
後來發現並不適用於你的問 ...

正解