武科大现代设计方法lisp.pptVIP

§4 Autolisp 程序语言设计 Autolisp语言是一种嵌人在AutoCAD内部的lisp编程语言。具有人工智能语言lisp的特性，又针对Autolisp强大的图形编辑功能的特点，增加了许多新的功能，是一种人工智能绘图语言。 一、Autolisp数据类型 △ 整数型、实型、符号、字符串、表、文件描述符、子程序、AutoCAD的选择集、AutoCAD的实体名、函数分页表、外部子程序（ADS函数）。当AutoCAD要求用户输入某个类型的数据时如点式比例函数，用户可以使用该类型的Autolisp表达式，由此所需的数值： △ 整数：0 1 2 ………，9 “+” “-” 不允许出现其他字符。“+”可有可无。如+256，103，-15，0 △ 实型数：双精度 浮点数 0·125 1·23 .4是错误的 符号原子： 简称符号 在AutoLIisp语言中，符号原子可以包含除以下字符以外的任何打印字符 （ ） 用作表的定义 . 用作点对 ， 用作Quote函数的简写 ” 字符串函数的定界符 ； 用作程序的注释标点 Autolisp中，符号的大小写是等效的。ABCD、Abcd、AbcD都表示一个符号原子，尽量不要用超过六个字符的符号名。如果一个符号的长度超过六个字符，符号就不能用节点存储，在节点中含有一个指向另一个包含实际符号的内存指针。占用大量额外内存。符号名越长，代码的执行速度越慢。 表达式： (setq X 25) X为整型 (setq X 25.0) X为实型 (setq X “25.0) X为字符 setq是一个赋值函数。 察看某一个符号的当前约束值，在AutoCAD的命令提示符下键入“！”，后面跟要查看的符号。Command:!X “25.0” Autolisp保存一个名为ATOMLIST的符号原子表，它初始化时包含系统定义的所有函数和符号的名称。当建立新的函数和变量时，其符号名称被加到ATOMLIST的尾部在AutoCAD的“Command:”提示符下查看其内容。 Command:!ATOMLIST △表：Autolisp广泛使用表。 二维点（X,Y） 如（setq a 6.0）为表，有三个元素，第一个元素setq为函数名，第二个元素为变量，第三个元素为实数。 △ 文件描述符 （setq f1(open“myfile.dat” “w”)） △ 实体名 （setq enl (entlast)） 将图形最后一个实体名赋予符号enl. △ 选择集 （set ssprev(Ssget”p”)） 将选择对象赋予符号Ssprev. △ 子程序和外部子程序 ADS定义的子程序。 Command:(load “c:\\dtor”). Command (dtor 90) (defun dtor(a) (setq a(*a_(/pi 180.0)))) 二、AutoCAD语言程序例： 参数化绘制深沟球轴承的Autolisp程序。 上机练习 在程序运行中，用户按提示输入外径d 孔径d 宽度b 输入标入点后，程序自动进行各坐标点计算，按深沟球轴承的绘图标准简化方法绘出图形。 上机内容：P49～P51及lisp语言绘图。