为此干杯,有趣的是他们如何处理改变动态块。
我不确定我是否不清楚,我在代码后创建了一个动态块。
- (entmake (list (cons 0 "BLOCK")(cons 2 "ITEMBALLOON")(cons 70 1)(cons 10 (list 0 0 0))))
- (entmake (list (cons 0 "CIRCLE")(cons 100 "AcDbEntity")(cons 67 0)(cons 8 "dim")(cons 62 4)(cons 6 "ByBlock")(cons 370 15)(cons 100 "AcDbCircle")(cons 10 (list 0 0 0))(cons 40 4.5)))
- (entmake (list (cons 0 "ATTDEF")(cons 100 "AcDbEntity")(cons 67 0)(cons 8 "dim")(cons 62 2)(cons 100 "AcDbText")(cons 10 (list 0 0 0))(cons 40 3.5)(cons 1 "1")(cons 50 0)(cons 41 1)(cons 51 0)(cons 7 "Standard")(cons 71 0)(cons 72 0)(cons 11 (list 0 0 0))(cons 210 (list 0 0 1))(cons 100 "AcDbAttributeDefinition")(cons 280 0)(cons 3 "ITEM NUMBER")(cons 2 "item_num")(cons 70 0)(cons 73 0)(cons 74 0)(cons 280 0)(cons 39 0)(cons 6 "BYLAYER")))
- (entmake (list (cons 0 "ENDBLK")))
|