mline 线条怎么分析其表中的数据?

挚友01 · 发表于 2014-11-29 17:27:23

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

mline 当先 (command "mline" "J" "T" 上侧为基准点时返回的表为

(11 0.0 0.0 0.0) (12 1.0 0.0 0.0) (13 2.22045e-016 1.0 0.0) (74 . 2) (41 . 0.0) (41 . 0.0) (75 . 0) (74 . 2) (41 . -6.0) (41 . 0.0) (75 . 0)
(11 20.0 0.0 0.0) (12 0.0 1.0 0.0) (13 -0.707107 0.707107 0.0) (74 . 2) (41 . 0.0) (41 . 0.0) (75 . 0) (74 . 2) (41 . -8.48528) (41 . 0.0) (75 . 0)
(11 20.0 20.0 0.0) (12 -1.0 0.0 0.0) (13 -0.707107 -0.707107 0.0) (74 . 2) (41 . 0.0) (41 . 0.0) (75 . 0) (74 . 2) (41 . -8.48528) (41 . 0.0) (75 . 0)
(11 0.0 20.0 0.0) (12 0.0 -1.0 0.0) (13 0.707107 -0.707107 0.0) (74 . 2) (41 . 0.0) (41 . 0.0) (75 . 0) (74 . 2) (41 . -8.48528) (41 . 0.0) (75 . 0)
(11 0.0 0.0 0.0) (12 0.0 -1.0 0.0) (13 1.0 0.0 0.0) (74 . 2) (41 . 0.0) (41 . 0.0) (75 . 0) (74 . 2) (41 . -6.0) (41 . 0.0) (75 . 0))

起始点为0,0 下一点为20,0 ....这是一条边的坐标，另一条边怎的坐标怎么求得...
(11 0.0 0.0 0.0) 为坐标点 (13 0.707107 -0.707107 0.0)估计是角度，有可能是余弦之类的， (41 . -8.48528)应为长度

请大家帮着分析一下...

XDSoft · 发表于 2014-11-29 17:33:44

查询DXF帮助文件，MLINE实体数据定义。

挚友01 · 发表于 2014-11-29 17:41:19

手头没有帮助文件，论坛找不到，给个链接吧，主要还是想求另一条边的坐标...

st788796 · 发表于 2014-11-29 18:05:16

一条是主边，另外一条用矢量表示的

st788796 · 发表于 2014-11-29 21:22:27

本帖最后由 st788796 于 2014-11-29 21:24 编辑

矢量和 justification 有关，先知道 justification 就确定了矢量方向

Free-Lancer · 发表于 2014-11-29 22:06:29

以下组码适用于多线图元。除此处所述的组码以外，另请参见常用图元组码。关于此表中使用的缩写和格式方面的信息，请参见本参考的格式惯例。

多线组码
组码	说明
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 组码是冗余字段。虽然可以安全地读取这些组并使用它们的值，但是在任何情况下都不应修改这些组码。要修改的正确字段是：
多线同一个对象中的 340 组，表示正确的 MLINESTYLE 对象。

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

挚友01 · 发表于 2014-11-29 22:49:07

楼上的我收藏了,可怎么计算另一条边的坐标啊,,,

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

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

Free-Lancer · 发表于 2014-11-29 23:01:36

挚友01 发表于 2014-11-29 22:49
楼上的我收藏了,可怎么计算另一条边的坐标啊,,,

12从该顶点开始的线段的方向矢量（多个条目；每个顶点 ...

mapcar '+ 11 12
mapcar '+ 11 13

挚友01 · 发表于 2014-11-29 23:53:35

能通过上面的例子编一段小程序吗，真搞不太明白...

Free-Lancer · 发表于 2014-11-30 00:56:38

挚友01 发表于 2014-11-29 23:53
能通过上面的例子编一段小程序吗，真搞不太明白...

用这个程序画一下 11 12 13 的点就知道意思了，剩下的需要根据 scale just 进行矢量运算

(defun c:tt (/ e el lst nl)
(if (setq e (car (entsel)))
(progn
(setq el (entget e))
(setq lst (mapcar 'cdr
(vl-remove-if-not
'(lambda (x) (member (car x) '(11 12 13)))
el
)
)
)
(while lst
(setq nl (cons (list (car lst) (cadr lst) (caddr lst)) nl)
lst (cdddr lst)
)
)
(mapcar '(lambda (x)
(entmake (list '(0 . "POINT") (cons 10 (car x))))
(entmake (list '(0 . "POINT")
(cons 10 (mapcar '+ (car x) (cadr x)))
)
)
(entmake (list '(0 . "POINT")
(cons 10 (mapcar '+ (car x) (caddr x)))
)
)
)
nl
)
)
)
(princ)
)

(defun c:tt (/ e el lst nl) 
  (if (setq e (car (entsel))) 
    (progn 
      (setq el (entget e)) 
      (setq lst        (mapcar        'cdr 
                        (vl-remove-if-not 
                          '(lambda (x) (member (car x) '(11 12 13))) 
                          el 
                        ) 
                ) 
      ) 
      (while lst 
        (setq nl  (cons (list (car lst) (cadr lst) (caddr lst)) nl) 
              lst (cdddr lst) 
        ) 
      ) 
      (mapcar '(lambda (x) 
                 (entmake (list '(0 . "POINT") (cons 10 (car x)))) 
                 (entmake (list        '(0 . "POINT") 
                                (cons 10 (mapcar '+ (car x) (cadr x))) 
                          ) 
                 ) 
                 (entmake (list        '(0 . "POINT") 
                                (cons 10 (mapcar '+ (car x) (caddr x))) 
                          ) 
                 ) 
               ) 
              nl 
      ) 
    ) 
  ) 
  (princ) 
)

挚友01 · 发表于 2014-11-30 11:32:43

求出的还是个失量,另一条边的坐标还是不好求啊...有没有完善的程序，都搞懵了...

XDSoft · 发表于 2014-11-30 11:53:38

挚友01 发表于 2014-11-30 11:32
求出的还是个失量,另一条边的坐标还是不好求啊...有没有完善的程序，都搞懵了...

(mapcar '+ 点矢量) ==>结果就是点

挚友01 · 发表于 2014-11-30 20:25:23

非也,水平垂直是这样,有角度就不是这样了,是个斜边....

st788796 · 发表于 2014-11-30 21:36:55

本帖最后由 st788796 于 2014-11-30 21:40 编辑

挚友01 发表于 2014-11-30 20:25
非也,水平垂直是这样,有角度就不是这样了,是个斜边....

所以 13 12 向量夹角不一定是90度！
12向量是mline前进方向，13就是拐点处mline所有线拐点连线方向

kmliro_2017 · 发表于 2024-2-23 08:53:08

谢谢分享！！！！！

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

mline 线条怎么分析其表中的数据?

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

点评

点评

点评

点评