本帖最后由 yjtdkj 于 2021-7-7 12:26 编辑

先上Lee-Mac李麦克大神的原版程序，和G版的函数
我的程序在2楼


网友答: 本帖最后由 yjtdkj 于 2021-7-7 10:10 编辑

我的改进是可以消除内部多余的轮廓，
不过现在还只做到了生成的边界是多段线的情况，如果生成的边界是面域，这种情况还没有考虑。
我有空试试把面域转成多段线。
---------------------------------------------------------
2021.06.28更新
面域也转成多段线了,大家再试试。
---------------------------------------------------------
2021.07.02更新
优化代码，加快速度，通用函数整合在一起了
---------------------------------------------------------
2021.07.07更新
修复了一bug，就是当内部轮廓与外部轮廓局部重合时，无法消除这个内部轮廓
增加了一个向外偏移的函数，向外偏移0.01，再wp窗选，再过滤掉本体，通过这个办法就可以消除BUG






网友答: 给力！谢谢分享

网友答: 好大一坨啊，几kb变成10几kb了。

网友答: 只保留外轮廓吗

网友答: Error: no function definition: YJ_UN-REPEAT-LIST
什么情况

网友答: Error: no function definition: YJ_UN-REPEAT-LIST
什么情况

网友答:
不好意思，通用函数少了一个函数，现在加上了，请重新下载“通用函数.lsp”

网友答:
是的，没错的

网友答: 怎么调用通用函数？

网友答:
因为我把李麦克和G版函数合并到一起了呀，再加上我自己的，你以为消除内部多余线条这么容易呢？
you can you up!