[求助]：请问怎么样将lisp语言编写的函数加到菜单文件中

luckzay · 发表于 2003-6-17 23:36:04

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

如下：他们高手给编写的画折线功能的函数
(defun c:bx ()
(command "ORTHO" "on")
(setq p1 (getpoint "Input First Point:")
p3 (getpoint "Input Second Point:")
p2 (list (car p3)(cadr p1)))
(command "pline" p1 p2 p3 "")
)
我想在菜单文件中实现布线功能，就是调用此lisp函数，如图点击“布线”后自动调用此函数，完成画折线的功能，我也知道就是修改ACAD.MNU文件，但不知怎么添加，望高手们给予解答，急！

luckzay · 发表于 2003-6-17 23:37:21

这是实现后的情况，我现在是在命令行里输入函数名才得到的下图！

lsjjm · 发表于 2003-6-18 04:18:07

加一行
Id_zx [&ZheXian]^C^C(load (findfile "mycode.lsp"));zx
到你的菜单文件中.
其中zx-上述画折线程序.
mycode.lsp- zx所在的lisp程序文件.

luckzay · 发表于 2003-6-18 09:59:22

谢谢楼上的了！

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

[求助]：请问怎么样将lisp语言编写的函数加到菜单文件中

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子