[LISP]怎样编写尺寸标注程序？

asdfasdf

小弟看到不少尺寸标注工具，大多加密，我想知道怎样用LISP编写尺寸标注程序，自己也尝试编写一下！

zjfcumt

这一点我也很困惑，希望得到高手的指点！

cjrun

加我一个，搞了很久没弄出一个方便的标注程序，希望高手点拔!

CADghost

怎么个标注法，说说看，标注的类型很多，是什么类型的


大家才好帮你们

asdfasdf

怎样加注和修改公差？

cjrun

怎样用entmake直接生成一个尺寸标注样式，然后再用entmake生成该标注样式的尺寸实体，至今弄不明白?谢了先！

meflying

(entmake '((0 . "DIMSTYLE") (100 . "AcDbSymbolTableRecord") (100 .
"AcDbDimStyleTableRecord") (2 . "abc") (70 . 0) (41 . 2.5) (42 . 0.625) (43
. 3.75) (44 . 1.25) (73 . 0) (74 . 0) (77 . 1) (78 . 8) (140 . 2.5) (141 . 2.5)
(143 . 0.0393701) (147 . 0.625) (171 . 3) (172 . 1) (271 . 2) (272 . 2) (274 .
3) (278 . 44) (283 . 0) (284 . 8))) (entmake '((0 . "DIMENSION") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0")
(100 . "AcDbDimension") (2 . "*D1") (10 514.008 527.178 0.0) (11 504.066
529.262 0.0) (12 0.0 0.0 0.0) (70 . 32) (1 . "") (71 . 5) (72 . 1) (41 . 1.0)
(42 . 19.8829) (52 . 0.0) (53 . 0.0) (54 . 0.0) (51 . 0.0) (210 0.0 0.0 1.0) (3
. "abc") (100 . "AcDbAlignedDimension") (13 494.125 519.404 0.0) (14 514.008
519.404 0.0) (15 0.0 0.0 0.0) (16 0.0 0.0 0.0) (40 . 0.0) (50 . 0.0) (100 .
"AcDbRotatedDimension")))

zjfcumt

不明白楼上的意思！请给个说明，谢谢！！

cjrun

请教飞哥，我怎样才能获得尺寸式样的DXF,用entget，好像不行！

meflying

zjfcumt发表于2004-8-18 8:29:00不明白楼上的意思！请给个说明，谢谢！！

你会用entmake,上面的代码会看不懂? TO cjrunentget (tblobjname "dimstyle" "iso-25"))