请指点标注数组-ENTMAKE

wgq2808

下面的数据表怎么不能生成啊，是数据不合法还是不够全面，entmake 无效。

(setq h1 (getvar "dimgap") h2 (getvar "dimtxt")) ;h1 =0.8 ,h2 =4

(setq  data (list
       (cons 0 "Dimension")
       (cons 100 "AcDbEntity")
       (cons 67 0)
       (cons 410 "Model")
       (cons 8 "0")
       (cons 100 "AcDbDimension")
       ;(cons 2 "*D1")
       '(10 100 50 0);标注定义点
       '(11 50 52.8 0);标注文字的中点
       '(12 0 0 0)
       (cons 70 32)
        (cons 1 "")
       (cons 71 5)
       (cons 54 0)
        (cons 3 "standard");str_dim
        (cons 100 "AcDbAlignedDimension")
       '(13 0 0 0)
         '(14 100 0 0)
       '(15 0 0 0)
       '(16 0 0 0)
       (cons 40 0)
       (cons 50 0)
       (cons 100 "AcDbRotatedDimension")
       ))

(entmake data)

 

wgq2808

没有扩展数据就不行吗