社区 › Auto Lisp › Entmake LWPOLINE公司

satishrajdev 发表于 2022-7-6 02:20:08

Entmake LWPOLINE公司

大家好，
 
以下代码有问题，请提供解决方案：-
(setq PNTA (list 0 0 0)
   PNTB (list 5 0 0)
   PNTC (list 5 10 0)
   PNTD (list 2.5 12 0)
   PNTE (list 0 10 0)
)

(entmake '((0 . "LWPOLYLINE")
   (100 . "AcDbEntity")
   (67 . 0)
   (8 . "0")
   (100 . "AcDbPolyline")
   (90 . 5)
   (70 . 1)
   (cons 10 PNTA)
   (cons 10 PNTB)
   (cons 10 PNTC)
   (cons 10 PNTD)
   (cons 10 PNTE)
   (43 . 1)
   (210 0 0 0)
   (62 . 1)
)
)
 
它给出了错误
; error: bad DXF group: (CONS 10 PNTA)
 
&DXF代码210代表什么？
(210 0 0 0)

GP_ 发表于 2022-7-6 02:36:02

(entmake
   (list
       '(0 . "LWPOLYLINE")
       '(100 . "AcDbEntity")
       '(67 . 0)
       '(8 . "0")
       '(100 . "AcDbPolyline")
       '(90 . 5)
       '(70 . 1)
       (cons 10 PNTA)
       (cons 10 PNTB)
       (cons 10 PNTC)
       (cons 10 PNTD)
       (cons 10 PNTE)
       '(43 . 1)
       '(210 0 0 1)
       '(62 . 1)
   )
)
 
 
DXF 210->拉伸方向（可选；默认值=0，0，1）

Tharwat 发表于 2022-7-6 02:40:09

你需要了解报价函数

MSasu 发表于 2022-7-6 02:47:52

通过使用引号来声明列表，可以防止对其内容进行评估-这是必需的，因为这些点是作为变量名提供的。
(entmake '((0 . "LWPOLYLINE")...

satishrajdev 发表于 2022-7-6 03:03:04

谢谢大家的回复。。。
 
@GP_u。。。。这很好用
 
@塔尔瓦特。。。正确的先生，我必须学习一个关于引用和如何利用它，我完全不知道GP_uuu做了什么。
 
@MSasu。。。是的，先生，我完全理解我的错误，我必须多学一点才能做到完美

gS7 发表于 2022-7-6 03:10:17

 
 
@萨提斯
你误会提到我的名字，
我认为以上功劳归于Gp先生

satishrajdev 发表于 2022-7-6 03:17:54

哦。。。。大错。。。。。。谢谢ganesh
 
后期编辑。。。

gS7 发表于 2022-7-6 03:24:25

欢迎萨提斯，

查看完整版本: Entmake LWPOLINE公司