谢谢李,
另请注意
如果要使用文件自动加载lisp,我不建议使用ACAD。lsp文件!
无论何时升级ACAD或重新安装ACAD,它都可能被重写。
使用ACADDOC。lsp如下:
首先,通过在命令行中键入此命令来查看它是否存在
(findfile“acaddoc.lsp”)
如果它返回路径,则应使用编辑器向其添加一行。
(加载“AlansAutoLoad.lsp”)
为您的系统创建一个文件名,如(加载“MyAutoLoad.lsp”)
如果文件不存在,则使用编辑器创建一个文件。
添加此
- (load "MyAutoLoad.lsp")
- (princ)
然后另存为阿卡多克。LSP确保将其保存在ACAD搜索路径中。
现在用编辑器创建另一个名为MyAutoLoad的文件。lsp
将其添加到文件中:
- ;;; ===============================================
- ;;; Lisp Routine Loader
- ;;; AUTOLOAD only loads the routine when needed
- ;;; ===============================================
- ;;;------ Lisp name -- Function name(s) ------- Discription -----------------------
- (AUTOLOAD "MyLispFileName" '("FunctionName")) ; comment what it does
- (princ)
- ;; End of file
同时将其保存到ACAD搜索路径。
现在,每次打开DWG时,如果输入“MyLispFileName”,就会加载“MyLispFileName”例程
命令行中的FunctionName。 |