第14章 AutoLISP语言初步.pptVIP

第14章 AutoLISP语言初步 14.1 Visual LISP编辑器 调用：执行“工具/AutoLISP / Visual LISP编辑器”，弹出Visual LISP编辑器对话框 文本编辑窗口、跟踪窗口、 Visual LISP控制台（在窗口中直接输入某个AutoLISP变量名，再按回车键，可查看该变量的值。 ） 调试：工具/检查编辑器中的文字 工具/加载编辑器中的文字 14.2 加载和运行AutoLISP 程序 14.3 AutoLISP 函数 14.3.1 数学运算功能函数 1. （十 数值 数值…）返回：累计实数或整数数值 2.（一 数值 数值…）返回：差值 3.（* 数值 数值…）返回：所有数值乘积 4.（/ 数值 数值…）返回：第一个数值除以第二个以后数值的商 5.（1+ 数值）返回：数值+1 6.（1- 数值）返回：数值-1 7.（abs 数值）返回：数值的绝对值 8.（atan 数值）返回：反正切值 9.（cos 角度）返回：角度的余弦值，角度值为弧度 10. （exp 数值）返回：数值的指数 11. （log 数值）返回：数值的自然对数值 12. （max 数值 数值…）返回：数值中的最大值 13. （min 数值 数值…）返回：数值中的最小值 14. pi 常数∏，其值约为3.1415926 15. （sin 角度）返回：角度的正弦值，角度值为弧度 16. （sqrt 数值）返回：数值的平方根 14.3.2 函数处理、定义功能函数 1. （eval 表达式）返回：表达式的执行结果 2. （exit）强制退出目前的应用程序 3. （quit）强制退出目前的应用程序 4. （defun 名称 自变量列表表达式．）自定函数或子程序 例：(defun? ADNUM（/ａ ｂ） 定义了一个含有两个局部变量ａ和ｂ的函数ADNUM。局部变量在程序的执行期间保留其值，而且只能在它所在的程序中使用。 (defun? Ｃ：ADNUM（） 在函数名前加上Ｃ：后，此函数就可以通过在AutoCAD的Command：提示符后输入其函数名直接执行。如果没有使用Ｃ：，函数名则必须置于圆括号中。 14.3.3 检验与逻辑运算功能函数 1.（= 表达式1 表达式2）比较表达式1是否等于式2，适用数值及字符串 2. （／= 表达式1 表达式2）比较表达式1是否不等于表达式2 3.（＜ 表达式1 表达式2) 比较表达式1是否小于表达式2 4.（＜= 表达式1 表达式2）比较表达式1是否小于等于表达式2 5.（＞ 表达式1 表达式2）比较表达式1是否大于表达式2 6.（＞= 表达式1 表达式2）比较表达式1是否大于等于表达式2 14.3.4 判断式、循环相关功能函数 1.（If ＜比较式＞ ＜表达式1＞ ＜表达式2 ＞ ） 检算比较式结果，如果为真，执行＜表达式1＞，否则执行＜表达式2＞ 2.（Repeat 次数 [ 表达式＞ ＜表达式＞…］） 根据函数中指定的次数n反复求解表达式，变量n必须为整数。 3.（While ＜比较式＞ ＜表达式＞…） 求解一个测试条件，若该条件为真（表达式不返回nil），while语句后边的操作将反复执行，直到该测试条件返回nil。 14.3.5 列表处理功能函数 1. (car 列表) 返回列表中的第一个元素 格式为：（car List）通常用来求X坐标！ 2. (cdr 列表) 返回除去第一个元素后的列表 其格式为：(cdr List） 3.（cadr 列表）执行两个操作，cdr和car，返回列表中的第二个元素。通常用来求y坐标！（cdr函数移去了第一个元素。car函数返回新表中的第一个元素。） 4.（caddr 列表）返回列表中的第三个元素 通常用来求Z坐标 5.（list 元素 元素…）返回：将所有元素合并为一列表 可用于定义一个二维或三维点。 示例 （setq ｘ（List 2.5? 3.56）） （setq ｘ ’（2.5? 3.56））;两条语句作用相同 14.3.6 字符串、字符、文件处理函数 1. （strcase 字符串［字样］） 返回：转换字符串大小写 2. （substr 字符串 起始位置 截取长度） 返回：按指定长度取出字符串 14.3.7 符号、元素、表达式处理功能函数 1. （minusp元素）返回：T或nil 元素是否为负值 2.（not 元素）返回：T或n