[求助]：SSGET 如何WP选择特定内容的文字

走过小桥

(setq na(car(entsel "\n选择闭合多段线"))
         lst2 nil)
(setq ptlist (ACET-GEOM-PLINE-POINT-LIST na 1))
(mapcar '(lambda(x)(if (member x lst2) nil (setq lst2 (cons x lst2)))) ptlist )
(reverse lst2)
(setq ssblk (ssget "wp"
                           ptlist
                           (list '(0 . "TEXT") (1 . "daee"))
                    )
        )
;此代码调试出错，提示ssget过滤表有误,怎么改呢
另一个问题是我要统一把选定的 文字选择集 SSTEXT中的所有文字的高度改成一个值
用CHANGE命令不能实现，除了REPEAT外该用什么方法呢?

舟自横

(LIST '(0 . "TEXT") '(1 . "DAEE"))........你的少'
如果想过滤更多建议用
'((-4  . "<AND") (0  . "TEXT") (1 . "DAEE") (-4 . "AND>"))
过滤
可以用程序先画一个你所需要字高的字然后对选择集
调用格式刷指令将他们都刷成相同高度再将你以前画的
辅助字删除既可!但这样有一缺点会改变字的原有图层,
所以我想如果你对VLISP比较熟悉的话可以用VLAX-FOR
遍历选择集调用更改函数会比较快!!

走过小桥

谢谢楼上的舟自横
我对vlax-for不是很熟