第6章AutoCAD二次开发.pptVIP

AutoCAD对话框设计 四.实例 (defun c:ring() (setq dcl_id(load_dialog ring.dcl)) (if (not (new_dialog ringdcl_id)) (exit)) (setq x (dimx_tile ring_image)) (setq y (dimy_tile ring_image)) (start_image ring_image) (slide_image 0 0 x y ring) (end_image) (action_tile a1 (setq r1 $value)) (action_tile a2 (setq r2 $value)) (action_tile a3 (setq r3 $value)) (action_tile a (setq r $value)) (action_tile accept (done_dialog)) (start_dialog) (unload_dialog dcl_id) (setq pc (getpoint\n输入圆心)) (command circle pc (atoi r1) circle pc (atoi r2) circle pc (atoi r3)) (command circle (polar pc 0 (atoi r2))(atoi r)) (command array L p pc 8 360 N) ) AutoCAD菜单开发 一.菜单文件 MNU 原始菜单文件，文本格式。 MNS 加载.MNU后产生，文本格式。 MNC 将.MNS编译为二进制格式。 MNR 二进制文件，包含由菜单使用的位图。 AutoCAD的菜单文件：acad.mnu 菜单类型: 下拉菜单、图像菜单、工具栏、快捷菜单、屏幕菜单 AutoCAD菜单开发 ***POPn 下拉菜单(n:0--499)/快捷菜单(n:0,500--999) ***TOOLBARS 工具栏 ***IMAGE 图像菜单 ***SCREEN 屏幕菜单 ***MENUGROUP 可用于定义菜单组名 二.菜单文件结构 1. 段标题（声明菜单类型） 常用段标题 菜单类型 2. 子菜单标记 **+子菜单名 （只起标记说明菜单名用，有时可以省略） * AutoCAD 二次开发技术基础 AutoLISP参数化绘图 AutoCAD对话框设计 AutoCAD菜单开发 一.AutoLISP的程序结构 (函数 参数 ……) AutoLISP参数化绘图 表 AutoLISP程序由一个或一系列按顺序排列的标准表组成。 如：( + (* x y) x ) (setq x 25.0) (setq y 12.2) 1.程序结构 2.AutoLISP书写格式的特点： （1）左右括号匹配； （2）从左到右读程序； （3）函数名放在第一个元素的位置； （4）一表可占多行，一行可写多表； （5）用分号“；”作注释； 1.整形常量Int 整数由数字组成，不包含小数点。AutoLISP 的整数是 32 位带符号的 数，取值范围从 +2,147,483,647 到 -2,147,483,648 2.实数常量Real 实数是带有小数点的数。以双精度浮点格式存储的，可以提供至少 14 位精度。可以用科学记数法表示。如数字 3.1、0.23、-56.123 和 21,000,000.0 都是有效的 AutoLISP 实数。 3.字符串常量 Str 字符串是在双引号中的一组字符。如“string 1”和“\nEnter first point:”都是有效的字符串。 二.AutoLISP的变量与类型 AutoLISP参数化绘图 4.表 List AutoLISP 的表是在括号中以空格分隔的一组相关值。表提供了一种存储大量相关值的有效方法。AutoCAD 将三维点表示为三个实数组成的表。 (1.0 1.0 0.0)、(“this” “that” “the other”) 和 (1 “ONE”) 都是有效的表 5.其它 Sym（符号和变量），Select（选择集），Entity（实体名），filepointer(文件描述符) 等。 二.AutoLISP的变量与类型 AutoLISP参数化绘图 三.数值函数 1.计算函数 （1）+、-、*、/ AutoLISP 中，