[求助]：请教大家如何用lisp实现这样的设想？

gjt1244

实现目标：
       框选图1的两条多线，确定后，使两条多线自动闭合成新的多线3（如图2），

ll_j

这是Acad自带的功能：Mledit，菜单：修改－对象－多线。

zhoufupeng

倒0角就OK了

狂刀

多线组码

组码
说明

100
子类标记 (AcDbMline)

2
最大长度为 32 个字符的字符串。该多线使用的样式名。MLINESTYLE 词典中必须存在此样式的条目。
如果不同时更新 MLINESTYLE 词典中的相关条目，则不要修改该字段。

340
MLINESTYLE 对象的指针句柄/ID

40
缩放比例

70
对正：0 = 顶端对正；1 = 零点对正；2 = 底端对正

71
标志（按位编码值）：
1 = 至少有一个顶点（代码 72 大于 0）
2 = 关闭
4 = 禁止起点封口
8 = 禁止端点封口

72
顶点数

73
MLINESTYLE 定义中的元素数

10
起点（在 WCS 中）
DXF：X 值；APP：三维点

20, 30
DXF：起点的 Y 值和 Z 值（在 WCS 中）

210
拉伸方向（可选；默认值 = 0, 0, 1）
DXF：X 值；APP：三维矢量

220, 230
DXF：拉伸方向的 Y 值和 Z 值（可选）

11
顶点坐标（多个条目；每个顶点一个条目）DXF：X 值；APP：三维点

21, 31
DXF：顶点坐标的 Y 值和 Z 值

12
从该顶点开始的线段的方向矢量（多个条目；每个顶点一个条目）
DXF：X 值；APP：三维矢量

22, 32
DXF：从该顶点开始的线段的方向矢量的 Y 值和 Z 值

13
该顶点的斜接的方向矢量（多个条目；每个顶点一个条目）
DXF：X 值；APP：三维矢量

23, 33
DXF：斜接的方向矢量的 Y 值和 Z 值

74
该元素的参数数目（对线段中的每个元素重复）

41
元素参数（根据上一个代码 74 重复）

75
该元素的区域填充参数的数目（对线段中的每个元素重复）

42
区域填充参数（根据前一个代码 75 重复）



参数化组码 41 是一个实数值列表，其中的每个组码 41 对应一个实数值。该列表可能包含零个或更多项目。第一个组码 41 值是沿斜接矢量从线段顶点到直线元素的路径与斜接矢量相交处的距离。下一个组码 41 值是沿直线元素路径从第一个组码 41 定义的点到直线元素的实际起点的距离。第三个组码 41 值是从直线元素的起点到直线元素中第一个打断（或剪切）的距离。连续组码 41 值继续列出该多线段中的直线元素的起点和端点。线型不影响组 41 列表。

参数化组码 42 也是一个实数值列表。它与参数化组码 41 类似，说明了该多线段填充区域的参数化。这些值的含义与 41 参数相同，将其作为一个整体来表示多线段中的所有直线元素时，可定义多线段填充区域的边界。

组码 42 机制的一个典型用法是：当未填充多线与填充多线交叉时，使用编辑多线使填充多线在交叉区域显示为未填充。这将导致受影响的多线段的每个直线元素有两个组 42：一个表示填充停止，一个表示填充开始。

MLINE 图元和 MLINESTYLE 对象中的 2 组码是冗余字段。虽然可以安全地读取这些组并使用它们的值，但是在任何情况下都不应修改这些组码。要修改的正确字段是：

Mline

同一对象中的 340 组，表示正确的 MLINESTYLE 对象。

Mlinestyle

MLINESTYLE 词典中的 3 组值，位于 350 组之前，具有当前多线样式的句柄或图元名。

gjt1244

楼上所说的多线的组码我很多都看不懂，不要见笑；
我的基本思路是这样的：
首先炸开两条多线，然后利用倒0角闭合各条线；最后重新组合成新的多线；
前面两步都可以实现，但如何把炸开的多线重新组合就不知道怎样做了？
（用多线的编辑工具修改后所得到的多线也是两条独立的多线；我想要的结果是一条完整的多线）

mmmm

(command "-mledit" "CJ" ...)
然后点取两个多线就行了。

gjt1244

最初由 mmmm 发布
[B](command "-mledit" "CJ" ...)
然后点取两个多线就行了。 [/B]

虽然可以结合，但结合后是两条独立的多线，我是要变成一条多线，（一个对象）

ploplo001

谢谢，又多了点知识

gjt1244

不知道是不是大家不明白我的意思，其实我是想通过选择多线1和多线2后，两条多线自动在相交处闭合，成为多线3（多线3是完整的一条多线，即是用mline一次过画出来的）

ljpnb

我先提供一个笨的思路,框选后,可以先求出两多线的两个远端的端点及交点,然后删除两条多线,再重新画一条新的完整的多线,这个可以做到楼主的要求