求助：如何将所有实体线(Line,*Line,Arc,circle)相交点之间的部分在交点处全部打断
求助：如何将所有实体线(Line,*Line,Arc,circle)相交点之间的部分在交点处全部打断成以交点为端点的小段。 (load "xyp_lib.vlx") ;版本 V.20051204;|下载和加载通用函数(可在签名栏直接下载后放到搜索路径下)
利用以下任何一种方式（首选第一种）即可加载和运行通用函数内的所有子程序：
★1·在acad.lsp中增加(load"xyp_lib")
■2·在每个程序内增加(load"xyp_lib")
■3·在command下，输入(load"xyp_lib")
■4·在菜单.mnl中增加(load"xyp_lib")
■5·将xyp_lib.vlx文件直接拽到cad屏幕
★通用函数下载地址：
http://www.xdcad.net/forum/attachment.php?s=&postid=1606661
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=37554
|;
;;;超级BREAK（要注意单选和多选的区别）
(defun c:test ()
(CMDLA0)
(setq ss (ssget '((0 . "CIRCLE,ELLIPSE,*LINE,ARC"))))
(xyp-Break ss)
(CMDLA1)
) <P>非常感谢版主的回复！</P>
<P> 本帖实际上是某一结构软件由CAD向程序建模的一个前处理过程。版主短小精悍的程序(xyp-Break ss)的确管用，但几处没打断能否再劳大驾完善一下。先谢了。</P> 呵呵这个我不会好像没有用能不能等完善后发个LISP程式 本帖最后由 作者 于 2008-11-3 11:23:37 编辑 <br /><br /> <p>效果很好。但是如果有椭圆，它会出现</p><p></p><p>无法仅在一点打断闭合的周期性曲线。</p><p>虽然我用两条直线穿过椭圆了，但是无法打断椭圆。</p> 能不能提供lisp源码？
页:
[1]