katamoto 发表于 2018-8-4 12:52:17

获取lisp命令字符串的语句

我希望一个语句能够获取lisp命令的字符串，怎么做？
比如：
(defun c:a30()
.....
.....
)
希望程序内部有个语句能获取“a30”字符串，怎么做 (setq str1 .....)，返回值是a30?

Andyhon 发表于 2018-8-4 19:25:28

...程序内部...

那个程序内部?

若是本身不是早已知晓!?

katamoto 发表于 2018-8-4 21:26:36

Andyhon 发表于 2018-8-4 19:25
...程序内部...

那个程序内部?


当前程序内部
我是想这样，输入命令a30就选点画一个30长度的直线，
(defun c:a30()
   (command "line" (getpoint) "@30,0" "");如果我希望这里的30不是我直接给的，而是根据命令a30获得，应该换成什么语句
)

Andyhon 发表于 2018-8-4 21:53:10

没能理解

转个概念
Try
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=177914&extra=page%3D2%26filter%3Dauthor%26orderby%3Ddateline
页: [1]
查看完整版本: 获取lisp命令字符串的语句