块之间的距离

yajis_narif · 发表于 2022-7-6 09:33:15

你好！！
我需要帮助plz，很抱歉我的英语很差，所以
我有一个相同块的4个图形（我使用插入）
例如，这是我的插页：

((-1 . ) （0.“插入”）（330.名称：7ef05cf8>）（5.“22F”）（100.“AcDbEntity”）（67.0）（410.“Model”）（8。
“LE420”）（62.4）（100。“AcDbBlockReference”）（2。“drawing1”）（10 21643.4
8501.78 0.0) (41 . 1.0) (42 . 1.0) (43 . 1.0) (50 . 0.0) (70 . 0) (71 . 0) (44
. 0.0) (45 . 0.0) (210 0.0 0.0 1.0))

因此，为了获得bloc“drawing1”的DXF代码，我使用tblsearch：

（setq y（entget（cdr（assoc-2（tblsearch“block”“drawing1”））））））

它返回4个块之一的XDF代码：

((-1 . ) （0.“LWPOLYLINE”）（330.7ef074f0>）（5.255”）（100.“AcDbEntity”）（67.0）（8.“drwing1”）（62.4）
（100.“AcDbPolyline”）（90.4）（70.1）（43.0.0）（38.0.0）（39.0.0）（10
210.0 210.0) (40 . 0.0) (41 . 0.0) (42 . 0.0) (91 . 0) (10 3101.0 210.0) (40 .
0.0) (41 . 0.0) (42 . 0.0) (91 . 0) (10 3101.0 3089.0) (40 . 0.0) (41 . 0.0)
(42 . 0.0) (91 . 0) (10 210.0 3089.0) (40 . 0.0) (41 . 0.0) (42 . 0.0) (91 . 0)
(210 0.0 0.0 1.0))

问题是我想计算块1和块2之间的距离，所以我需要蚀刻块的LWPOLYLINE的坐标

Plzz你能帮我吗？？
非常感谢。