请教高手，用entmake创建TEXT文字，按langjs的帖子说明，无法成功执行

rdhhb

(entmake '((0 . "TEXT") (100 . "AcDbEntity") (100 . "AcDbText")(8 . "0")(62 . 0) (10 0.0 0.0 0.0) (40 . 5) (72 . 0) (11 0.0 0.0 0.0)(1 . "okok") (50 . 0.0) (100 . "AcDbText" )))
这上面这句能执行，但是像关键属性，比如文字内容、座标，我无法用变量来代替，像下面这句，画线的程序，我可以用变量来代替。

(entmake (list '(0 . "LINE") (cons 10 INSERTDXQDPT) (cons 11 INSERTDXZDPT)))


这下面的怎么改也不能执行
(entmake (list'(0 . "TEXT") (cons 1 50) (cons 72 1) (cons 10 wenzizhuobiao) (cons 11 0.0 0.0 0.0) (cons 40 2.5)))

麻烦高手帮我看看怎么改才能用变量来执行，谢谢

rdhhb

(entmake (list '(0 . "TEXT") (cons 1 shijidandanjuli_str) (cons 72 1) (cons 50 ptang) (cons 10 wenzizhuobiao) (cons 11 wenzizhuobiao)  (cons 40 2.5)))

顺序搞错了也不能执行，刚把顺序调了一下，就行了。谢谢各位