[LISP程序]：请教各位老师在编lisp中遇到的问题：如何利用别人（已编译）的lisp程序?

tywsc

我刚刚学lisp,想请教各位老师：
    我有一个别人的（编译过的）a.lisp程序，在a.lsp中原作者没给出形式参数，其加载，
运行后，autocad屏幕文字栏中先后有三行提示，要我分别输入三个值。在提示下我用键盘
一步一步输入，完成了程序所要输入的数据，然后程序自动执行出一个满意的结果。
    我想自编一个输入文件，来自动回答程序中的三个提示，您看这能实现吗？

    我作了各种努力，都不能实现，我想我只能反编译后，再修改原程序才行吧？这多不方便
啊，程序不能通用吗。
    我在各种参考书中都没有查到答案，请教各位老师，您怎么考虑这个问题的。
   
    实际上，a.lisp程序是这样工作的：执行后，每次有三行提示，我分别输入三个提示后，其
自动在autocad屏幕上画出几条线，然后，接着重复三行提示，直到我最后回车，决定退出程序为
止。我想自编一个输入文件，改变其人机交互回答的工作方式，来自动完成一个复杂的画图过程，
因为，原程序设计的不够理想，一旦有一次回答出错，就要全部重新输入。


例如：
(command "line"  '(0 0) '(800 800)  '(1000 1000)  " ")
可以运行。
假如,  a.lsp 中定义一个内部函数:defun c:aa()..........
那么，加载a.lsp后：
(command "aa"  '(0 0) '(800 800)   '(1000 1000)  " ")
(c:aa          '(0 0) '(800 800)   '(1000 1000)  " ")
(aa            '(0 0) '(800 800)   '(1000 1000)  " ")
等均不能运行；
这不是太不方便了，别人的程序就会没有几个能移植利用的。

zhynt

你最好将程序传上来让大家看看，这样才能解决问题。

ll_j

R2000以上版本使用VLisp的Vlax-add-cmd函数可以实现。

wkai

我我试了LL_J长老的方法是可以的,如下
(VLAX-ADD-CMD "AA" "C:AA")
(COMMAND "AA" '(0 0) '(800 800) '(1000 1000) " ")

urljit

对于一个初学者，(VLAX-ADD-CMD "AA" "C:AA")，能理解吗？反正我不能。希望给出合适的方法，期待中……

Temp

最初由 zhynt 发布
[B]你最好将程序传上来让大家看看，这样才能解决问题。 [/B]

是的，最好让大家看看

lei6699

把c:aa（）烤出来用不就好了？