yjtdkj 发表于 2021-6-26 21:18:13

(07.07再更新)改进Lee-Mac李麦克大神的outline轮廓边界线程序

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

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

yjtdkj 发表于 2021-6-26 21:23:55

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

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




xiangganglv 发表于 2021-6-27 08:38:56

好大一坨啊，几kb变成10几kb了。

LIULISHENG 发表于 2021-6-26 21:50:35

只保留外轮廓吗

oistre 发表于 2021-6-26 22:08:14

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

oistre 发表于 2021-6-26 22:10:02

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

yjtdkj 发表于 2021-6-27 06:21:00

oistre 发表于 2021-6-26 22:08
Error: no function definition: YJ_UN-REPEAT-LIST
什么情况

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

yjtdkj 发表于 2021-6-27 06:22:48

LIULISHENG 发表于 2021-6-26 21:50
只保留外轮廓吗

是的，没错的{:1_1:}

xiangganglv 发表于 2021-6-27 08:48:02

怎么调用通用函数？

yjtdkj 发表于 2021-6-27 11:29:44

xiangganglv 发表于 2021-6-27 08:38
好大一坨啊，几kb变成10几kb了。

因为我把李麦克和G版函数合并到一起了呀，再加上我自己的，你以为消除内部多余线条这么容易呢？
you can you up!
页: [1] 2 3 4 5 6 7
查看完整版本: (07.07再更新)改进Lee-Mac李麦克大神的outline轮廓边界线程序