求大神帮忙写一个cad的lisp程序

资源ID：

比如我输入命令ZB，然后选择一些文字，回车后这些文字自动都变成100高、红色的字，也就是说程序的功能就是使文字变成100高、红色的字。多谢大虾！

还要什么程序哦。。。。。简单的很，只要有样品文字或者样式，你就按MA就行了，希望能帮到你，

编了一个lisp
输入命令ZB再选择文字

(defun c:ZB()
(setq ss (ssget))
(command "change" "p" "" "p"链森 "c" "red" "")
(command "scaletext" "p"棚中亩 "" "e" "100")
)

接下来的培扰你自己弄吧

完全可以使用cad基础命令完成。