AutoCAD辅助设计基础与应用 教学课件 彭超 王杰鹏 第11章 AutoCAD二次开发技术.docVIP

AutoCAD二次开发技术 一、教学目的 本讲主要学习AutoCAD二次开发技术。 二、知识要点 1. Visual LISP的界面。 2. LISP/VLISP程序的编译。 3. LISP/VLISP程序的调试方法。 三、教学重点、难点及其解决方法 1. 熟悉各功能区的作用。 解决方法：教师课堂演示+学生上机实际操作 2. Command函数中的一些说明。 解决方法：line对应line；0,0对应0,0；空双引号 代表按回车键。 3. 逻辑错误。 解决方法：应详细掌握计算机语言，平常多看多练。 四、教学过程 11.1 Visual LISP的界面初步 AutoLISP是AutoCAD所支持的一种内嵌式高级编程语言。使用AutoLISP可以直接调用几乎所有的AutoCAD命令，使用户能够充分地对AutoCAD进行二次开发。 1. 功能 使用AutoLISP语言可以对AutoCAD进行二次开发。 2. 执行命令方式 命令行：VLISP 菜 单：选择【工具】→【AutoLISP】→【Visual LISP编辑器】命令 3. 操作步骤 选择【工具】→【AutoLISP】→【Visual LISP编辑器】菜单命令，弹出【Visual LISP】对话框，如图11.1所示。 图11. Visual LISP对话框 4. 参数说明 菜单区：由此执行VLISP编辑命令。 常用工具按钮区：可快速地执行常用的VLISP编辑命令。 程序编辑窗口区：在此编辑LISP、VLISP、DCLVLISP语法命令。 状态栏区：用于显示目前环境的状态。 11.2 撰写LISP/VLISP程序初步 AutoLISP允许用户把每一条AutoLISP语句有机地组合起来，以文件的形式来执行其功能，这类文件称为AutoLISP程序。 11.2.1 AutoCAD程序部分 可以按以下步骤来进行整个AutoLISP程序的编写与执行。 ? 启动AutoCAD 2008，然后选择【工具】(【AutoLISP】(【Visual LISP编辑器】命令。 ? 在程序编辑窗口中输入以下文本（注意：以下每一条语句前面的数字例如（1）、（2）等是为了方便稍后的语法说明，并非程序的正文文本）。 (1) ;;;Hello World AutoLISP Program-------firstlisp.lsp (2) ;;;function:draw a circle and print Hello World (3) (4) (defun c:firstlisp(/ centerpt radius) (5) (setvar cmdecho 0) (6) (setq centerpt (list 100 100 0 )) (7) (setq radius 50) (8) (command circle centerpt radius) (9) (prompt Hello World! ) (10) (princ) (11) ) 分析：程序的第（1）、（2）行是批注，以分号“；”开头的表示此行为批注。批注行是不执行的，用来提醒或者说明该程序的设计重点或者设计内容。第（4）行是命令的定义语法，后面括号内斜线后面的变量名称表示该变量是暂时性的变量。第（5）行用来设定cmdecho系统变量为0，cmdecho系统变量用来控制当AutoLISP的Command函数执行时，AutoCAD是否显示提示与输入。 第（6）、（7）行表示将圆的圆心与半径的值分别指派给变量centerpt与radius。第（8）行则是调用AutoCAD的circle命令，并根据centerpt与radius的值来执行画圆操作。第（9）行表示要在程序编辑窗口区中打印出“Hello World!”的字样。第（10）行是第（9）行的动作执行命令。第（11）行是第（4）行的对称括号。 11.2.2 VLISP程序部分 可以按照以下的步骤进行整个VLISP程序的编写与执行。 ? 启动AutoCAD 2008，然后选择【工具】(【AutoLISP】(【Visual LISP编辑器】命令。 ? 在程序编辑窗口中输入以下的程序文本（注意：以下每一条语句前面的数字例如（1）、（2）等是为了方便稍后的语法说明，并非程序的正文文本）。 (1) ;;;Hello World Visual LISP Program------firstvlisp.lsp (2) ;;;function:draw a circle and print Hello World (3) (4)(defun c:firstlisp(/ centerpt radius) (5) (setvar cmdecho 0) (6) (vl-load-com) (7) (setq