[求助]如果用LISP组合坐标标注？

YDPLDL

如题，如何用LISP的数组来创建一个坐标标注，而不用通用调用命令的方式如：

(SETQ ent (CONS '0 "CIRCLE"))
     (SETQ ent (LIST ent))
     (SETQ ent (APPEND ent (LIST (CONS '10 pa3))))
     (SETQ ent (APPEND ent (LIST (CONS '40 0.5))))
     (SETQ ent (APPEND ent (LIST (CONS '62 3))))
     (ENTMAKE ent)

但坐标标注我就不知咋搞了？请求高人指点！多谢！

hhc

先用(entget (car (entsel)))查看需要的图元，提取需要的数据，至于哪些是需要的数据，可通过试验及查看图元的组码定义。

YDPLDL

多谢！