请帮助构建一些lisp

whf · 发表于 2022-7-6 07:32:37

亲爱的朋友们：，
我是这个论坛的新手，也是lisp编码的新手。我需要你的帮助来建立一些lisp例程。

我的第一个问题是改善杂草。由Jerry Workman编写的lsp。我的任务是简化城市的道路中心线（每个城市有数百条线）。杂草。然而，杰里·沃克曼（Jerry Workman）写的lsp每次只处理一个普林。顶点缩减例程（如pvd）有了一些新的发展。lsp和pldiet。lsp，两者都可以同时处理多个PLIN。但我还是喜欢原来的杂草。lsp因为其算法。它使用（外部）垂直的偏移距离来控制简化，而不是段的偏离角度。这对我的工作有更好的效果。

因此，我需要的是允许杂草。lsp（请从附件中找到原始lisp）通过跨窗口选择处理多个PLINE。

2.第二个问题是合并直线的闭合交点（请参见附件dwg文件了解处理前后的效果）。我需要的是通过跨窗口选择并找到模糊距离内的线交点来选择所有线，然后将最长线上的交点作为锚定点（在jpg图像上用红色圆圈标记），最后将距离内的所有其他点拉伸到该锚定点。

非常感谢您的任何帮助或建议！顺便说一句，我正在使用autocad 2008。
合并相邻交点。图纸
杂草lsp

BIGAL · 发表于 2022-7-6 08:10:25

这是关键线（entsel“\n选择多段线或直线：”），您需要将其更改为直线、pline的ssget和过滤器。然后你会做一个循环单步通过这个选择使用原始的杂草代码，抱歉有另一个任务在目前无法帮助。

第二个任务是连接附近的线，考虑这一点，可能是生成一些三角形网络的方式，找到一个中心并螺旋出比较线端点。

Atwist · 发表于 2022-7-6 08:20:59

同样的问题

http://www.theswamp.org/index.php?topic=42725.0;topicseen公司

BIGAL · 发表于 2022-7-6 08:33:15

和我的答案相似。

[编程交流] 请帮助构建一些lisp

发表回复

精选推荐