Autocad2004自动加载 lisp文件

Autocad2004自动加载 lisp文件，本人研究了半天，将自己成功的方法帖给大家看看！欢迎使用：
（一）方法一
1) 把xxx.lsp等文件拷入C:\Program Files\AutoCAD 2004\Support
2）修改C:\Program Files\AutoCAD 2004\Support目录下的acad2004.lsp文件如下：（红色文字为增加的，黑色为原文）(具体各人安装目录不同，cad版本不同相应的改变)
(if (not (= (substr (ver) 1 11) "Visual LISP")) (load "acad2004doc.lsp"))
(load "bg0-自动标注标高.lsp")
(load "FW-标注方位角.lsp")
(load "Ca-计算钢筋表.lsp")
(load "BG-表格自动生成.lsp")
(load "ct-写带圆圈数字.lsp")
(load "jian1-求差.lsp")
(load "jia1-求和.lsp")
(load "nbs.fas")
(load "cc.lsp")
;; Silent load.
(princ)
（二）方法二
1、在F:\learn目录下有一lisp程序“Ca-计算钢筋表.lsp”，要让cad2004每次起动时，自动加载Ca-计算钢筋表.lsp文件；
2、在CAD2004“选项”的“支持文件搜索路径”增加“F:\learn”目录支持；
3、修改C:\Program Files\AutoCAD 2004\Support目录下的acad2004.lsp文件如下：（红色文字为增加的，黑色为原文）(具体各人安装目录不同，cad版本不同相应的改变)
(if (not (= (substr (ver) 1 11) "Visual LISP")) (load "acad2004doc.lsp"))
(load "Ca-计算钢筋表.lsp")
;; Silent load.
(princ)
4、重启cad2004，即可实现lisp自动加载。
5、可以加入多个lisp文件自动加载。
后记
1、 lisp可以让画图效率更高，更省事。
2、 lisp文件多了，每次加载很麻烦，因此要让cad自动加载。
3、 以上参考了1）网上资料，
2）《AutoLIP&DCL基础篇》吴永进 林美樱 P13 此书很好 谁用谁知道，但是有些程序实际运行还是不够完美！
4、本人QQ:121060338，欢迎朋友一起交流，联络。









（颜色看附件）

[ 本帖最后由 fanhaifan_18 于 2012-4-1 17:36 编辑 ]