获取lisp命令字符串的语句

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

我希望一个语句能够获取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

账号		自动登录	找回密码
密码			注册

[提问] 获取lisp命令字符串的语句