flyfox1047 发表于 2013-11-11 17:09:20

不知论坛中有无可以框选后自动连接断开的线段的LISP?


如图所示，发现图形中的线段是断开的（放大N倍才能看见），这样想面域（REG)没不行的，有没有一个LISP插件可以框选后自动连接断开的线段？

风树 发表于 2013-11-11 18:12:41

在http://bbs.mjtd.com/forum.php?mod=viewthreadtid=107767fromuid=408117有一个命令应该可以满足要求

flyfox1047 发表于 2013-11-11 18:24:12

风树 发表于 2013-11-11 18:12 static/image/common/back.gif
在http://bbs.mjtd.com/forum.php?mod=viewthreadtid=107767fromuid=408117有一个命令应该可以满足要求

这个链接是BBS主页啊

风树 发表于 2013-11-11 18:26:22

flyfox1047 发表于 2013-11-11 18:24 static/image/common/back.gif
这个链接是BBS主页啊

搞错了 ：在明经一年来的逐步总结、整理、简述算法（10.21）
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=107767&fromuid=408117

flyfox1047 发表于 2013-11-11 18:34:57

风树 发表于 2013-11-11 18:26 static/image/common/back.gif
搞错了 ：在明经一年来的逐步总结、整理、简述算法（10.21）
http://bbs.mjtd.com/forum.php?mod=viewth ...

谢谢，整理的蛮多的，先看看

flyfox1047 发表于 2013-11-11 18:36:37

是不是这个？
2013.10.2：
         放假了，整理一下，添点内容，增加其它版本的支持，修正bug，欢迎指正。
命令17：线段临近端点按容差值合并
                     1、可以处理二维多段线、三维多段线等，但暂时不能对圆弧端点进行处理
                     2、只对端点起作用，曲线是闭合非闭合均可。
                     3、合并后的点位于合并前各点围成的近似形心处。
                     4、可同时选择所有曲线，能进行snap的位置均能处理。

风树 发表于 2013-11-11 19:02:07

flyfox1047 发表于 2013-11-11 18:36 static/image/common/back.gif
是不是这个？
2013.10.2：
         放假了，整理一下，添点内容，增加其它版本的支持，修正bug，欢迎指正 ...

是的                              

flyfox1047 发表于 2013-11-11 19:08:46

风树 发表于 2013-11-11 19:02 static/image/common/back.gif
是的

打包在一起，太多了，只想要这一个功能

flyfox1047 发表于 2013-11-11 19:16:59

下面这段代码可以了：
(defun c:pp()
   (setvar "cmdecho" 0);_关闭命令提示
   (setvar "peditaccept" 1);直接转化为多段线
   (setq ngc02 (getreal "请输入闭合的距离"))
   (setq ngc01 (ssget))
   (command "_pedit" "m" ngc01 "" "j" ngc02 "")
   (setvar "cmdecho" 1);_打开命令提示
   (prin1));_关闭程序返回值
   (prompt "\n 多项选择同时连线----执行命令pp")
   (prin1)
页: [1]
查看完整版本: 不知论坛中有无可以框选后自动连接断开的线段的LISP?