[求助]如何用lisp调用另一个lisp中定义的命令？

lujoo

我想在lisp中载入另一封个.lsp文件，然后运行载入的lisp文件中定义的命令，这个怎么实现啊。
用
(defun C:A()  
    (command "appload")；选择lisp文件
    (C:MYDXF)；MYDXF是选择载入的lisp文件中定义的函数C:MYDXF
)
在命令行敲A，不成功，但是用
(defun C:A()  
    (command "appload")；选择lisp文件
）
(defun C:B()  
     (C:MYDXF)；MYDXF是选择载入的lisp文件中定义的函数C:MYDXF
)
在命令行敲A选择文件，然后再敲B就可以，怎么才能用一个命令实现啊

Andyhon

(load "MYDXF") ; 假定Lisp文件名是MYDXF
(C:MYDXF)；

phoenixdjq

appload是对话框命令

你用command是无法调用的

楼上的方法才是真正的办法

lujoo

    谢谢楼上。不过问题是我需要打开对话框选择定义C:MYDXF的LISP文件，这个LSP是软件生成的，对应不同的项目有不同的LISP文件，但是里面都由C:MYDXF函数，我要通过选择文件确定要执行哪个文件里的C:MYDXF，所以用load函数在这里不合适。
    通过实验，这个问题我已经解决了，呵呵
(defun A()  

    (command "appload")；选择lisp文件
)
(defun B()  

     (C:MYDXF)；MYDXF是选择载入的lisp文件中定义的函数C:MYDXF

)
(defun C()
     (A)
     (B)
)
在命令行敲C选择文件就可以执行选取的lsp文件中的C:MYDXF函数了

zfsaaa

我也想弄明白,如何合并多个lsp文件为一个,加载一个文件后,随便打哪个命令,就调出哪个lsp程序,谁有办法?教教我.

aytxq

把所有的程序全都拷到一個LSP文件裡面加載就行了