求一个特殊的“合并多段线”lisp

香田里浪人 · 发表于 2015-11-20 20:38:01

qetuop 发表于 2015-11-20 09:29
大哥的程序好像只是拉出轮廓的一部分啊

不会吧，我用得是好好的，怎么会是轮廓的一部分

xyp1964 · 发表于 2015-11-21 04:31:40

;;重合打断消重

qetuop · 发表于 2015-11-22 22:40:55

本帖最后由 qetuop 于 2015-11-22 22:56 编辑

xyp1964 发表于 2015-11-21 04:31
;;重合打断消重

院长，我的情况是没有重合的那条边的，只是相交而已。另外院长可以给出源代码吗？感激不尽！！！

999999 · 发表于 2022-3-31 10:33:39

xyp1964 发表于 2015-11-21 04:31
;;重合打断消重

经典经典，院长大人能否贴上码，厉害了

t18-13nil · 发表于 2022-3-31 22:49:59

其实也简单得爆，全部炸开，直线从短到长，排序。从头遍历，找到重合的就用长直线减短直线留下剩下的，短的就一并丢掉。至于重合，一个trans把直线搞成加减法就搞定了

weijiewen · 发表于 2023-3-27 12:27:38

描轮廓很好用，不错先记下来

账号		自动登录	找回密码
密码			注册

[提问] 求一个特殊的“合并多段线”lisp