AutoCAD二次开发实用教程 作者 郭秀娟 第5章 AutoLISP文件.pptVIP

第5章 AutoLISP文件 1. 了解Auto LISP文件操作的概念； 2. 掌握Auto LISP文件打开、关闭、读写相关函数的使用； 3.能够用AutoLISP文件操作函数编写程序，实现程序设计； ☆☆ 第5章 AutoLISP文件 * 本章要求： AutoLISP语言和其它高级语言一样具有文件处理功能，提供了文件操作函数。 在AutoLISP语言中，程序和数据二者都具有相同的结构，所以程序文件和数据文件二者无严格区别。AutoLISP提供的文件操作函数能处理数据文件，也能处理程序文件。另外，AutoLISP只支持ASCⅡ码的顺序文件。 AutoLISP提供了一个Load函数，可以将程序文件装入内存，并对其求值。 第5章 AutoLISP文件 在线教务辅导网： 教材其余课件及动画素材请查阅在线教务辅导网 QQ:349134187 或者直接输入下面地址： 5.1 AutoLISP文件的特点 AutoLISP文件的扩展名为.lsp，是由若干个AutoLISP表达式构成的。 一个LISP文件可定义多个函数或AutoCAD命令。 以下是一个表达式分写在若干行上的实例： (defun plus(x y) (+ (* x y) x) ) 以下是一行写若干个表达式的实例： (setq a 2.0) (setq b 4.0) (+ a b) 第5章 AutoLISP文件 5.1 AutoLISP文件的特点 由于在AutoLISP程序中含有大量的括号，使得程序代码不易阅读。解决这个问题的方法就是缩排对齐格式。 (defun fun (x) (cond (( x 0) 1) ((= x 0) 2) (( x 0) 0))) 采用缩进格式书写，形式如下： (defun fun (x) (cond(( x 0) 1) ((= x 0) 2) (( x 0) 0) ) ) 第5章 AutoLISP文件 5.2 程序中的注释 注释能够增加程序的可读性，不仅便于对程序的阅读和调试，也便于对程序的维护、移植和扩充。 注释的形式可以是整行、整段或行间注释。 整行或后半行注释以分号“；”开头，至行尾为注释部分 第5章 AutoLISP文件 5.2 程序中的注释 【例1】定义打印ASCII码为33 ～90的字符的命令。 ；该程序打印ASCII码为33～90的字符 ；在Command:提示下，键入pras (defun c:pras(/ as )；定义pras为AutoCAD命令，as为局部变元 (setq as 33) ；设置as为第一个ASCII码33 (while(= as 90) ；while循环开始 (princ(chr as)) ；打印ASCII码的为as的字符 (terpri) ；换新行 (setq as (1+ as)) ；设置as为as 的下一个ASCII码 ) ；while循环结束 ) ；命令定义结束 第5章 AutoLISP文件 5.3 在AutoCAD环境下加载AutoLISP文件 1．命令行方式 加载AutoLISP文件用load函数，调用load函数的格式如下： Command：(load 驱动器:\\路径\\文件名 [出错信息]) 例如： 文件fi1e1.lsp最后一个表达式是定义函数func1，它的路径是d:\user1。加载该文件的表达式如下： Command：(load d:\\ user1\\ fi1e1 没有找到这个文件！ ) 若加载成功，返回函数名func1，否则返回没有找到这个文件！ 这个信息。 第5章 AutoLISP文件 5.3 在AutoCAD环境下加载AutoLISP文件 2．对话框方式 选择下拉菜单Tools?Load Application 项,或者选择下拉菜单Tools?AutoLISP?Load项,或者在“Command：”提示下键入appload，通过随后弹出的“Load/Unload Applications”对话框加载AutoLISP文件。 3．自动加载 AutoCAD在启动时，可以自动加载acad.lsp、