[LISP] lisp程序中调用另一个lisp命令如何输入参数？

abc213

我用autolisp定义了一个命令c:jgz, 在R14命令行执行，会要求输入一个整数来响应。


现在我需要在另一个lisp函数中调用c:jgz,我想同时输入整数20来响应。该怎么办呢？我一运行（c:jgz "20") 就立刻退出cad了。command 函数没办法调用lisp命令呀。请高手解惑。

meflying

用带参数的方法定义,不过这样就不能当命令来使用了


(defun c:jgz( xxx / )


         .........


)

abc213

谢谢meflying，你说的确是问题所在。可是以后每次调用这样的lisp命令，都要提前重新定义，显得很烦琐啊！我一直在尝试总想不出别的办法，请教！多谢！！

meflying

什么意思?


你到底想做些什么事情?能不能把你的程序都传上来?

wdb

会不会是变量用错了？


将（c:jgz "20") 改为（c:jgz 20)试试。

Taoyimaier

如果你需要你的lisp中得函数可以作为命令使用，又要能够再lisp被别的函数所调用，你就把这个函数注册成函数把，看看vlax-addcmd(vlax-addcmd "cmdname" 'c:jgz)这个函数得相关说明把，然后再lisp用(command "cmdname" "20")可以想对待cad常用命令一样对对待cmdname（这个命令实际上是函数c:jgz）

abc213

多谢各位，我会好好看看vlax-addcmd使用方法的。我们一直用的是R14，总觉得visual lisp不支持，就没有去学习。固步自封无益于进步，应该努力向前看。