[求助]：这个小程序怎样加载到CAD2004中去使用（LXH.LSP)?

zl-sir

我在书本上看到一个小程序,试着按书上操作总得不到要领,能加载但不会使用,还请各位大师赐教.谢谢!!!
; ; ; This is USER’s AutoLISP program for drawing annotation number。
; ; ; Copyright reserved, not modification without permission by USER。
(defun  c: LXH ()
(setq  p1 (getpoint “ \ n 请指定标注线的起点：” )
    p2 (getpoint “ \ n请指定标注线的第二点：” )
）
（command “ line” p1 p2 “ @5﹤0 ” “ ” ）
(setq p3 (osnap p2 “ midp ” ) )
(command “ Text ” “ j ” “ bc ” p3 5 0 )
(princ )
)
*-*6 *-*a

cdhua001

将这段话复制到记事本里面保存后，将扩展名改为lsp，例如：“小程序.lsp”。
打开CAD，菜单栏——工具——AutoLISP——加载，找到“小程序.lsp”，加载即可。

要运行这个程序，就在命令行输入 LXH，回车即可。

ll_j

保存为.lsp（如lxh.lsp），在Acad中加载（使用appload或者直接脱文件到绘图屏幕），然后输入命令“lxh”使用（其实是外部函数“(c:LXH)”，使用时在命令行输入“c:”以后的部分）。

zl-sir

感谢楼上的两位大师，在您们的指导下我终于懂了。

阿土

不在命令行输入，把它作成工具按钮可以吗？

cdhua001

最初由 阿土 发布
[B]不在命令行输入，把它作成工具按钮可以吗？ [/B]

可以制作为按钮。
以前有很多帖子说明怎样制作了，我就不再说明。

你还可以用wkai版主编制的《LSP程序智能管理器》用绘图区菜单执行命令。
详见：http://www.xdcad.net/forum/showthread.php?s=&threadid=209724