AutoLisp中常见的函数(3)

11. 判断式、循环相关函数

函数	返回值
(if <比较式> <表达式1> [表达式2])	比较式结果为真，执行<表达式1>，否则执行<表达式2>
(repeat 次数 <表达式> ...)	重复执行N次<表达式> ...
(while <比较式> <表达式> ...)	当条件成立则执行表达式内容
(cond <比较式1> <表达式1> <比较式2> <表达式2> ...)	多条件式的if
(progn <表达式1> ...)	连接其中的表达式为一组，常配合if、cond等函数

---

12. 函数处理、定义、追踪和错误处理函数

函数	返回值
(*error* 字符串)	程序错误时的警示信息
(alert 字符串)	以对话框式显示出警告字符串
(apply 功能函数 列表)	将功能函数与列表结合后执行
(defun 名称 自变量列表 表达式)	自定函数或子程序
(eval 表达式)	表达式的执行结果
(exit)	强制退出目前的应用程序
(lambda 自变量 表达式)	定义匿名的函数
(progn 表达式1 表达式2 …)	连接其内的表达式为一组，常用于配合if、cond等函数
(quit)	强制退出目前的应用程序
(tablet 代码 [列1 列2 列3 方向])	取用或建立对数字化仪的校调
(trace 函数 …)	对函数设定追踪标记，辅助检错
(untrace 函数 …)	对函数设定解除追踪标记

---

13. 显示、打印控制函数

函数	返回值
(gfaphscr)	作图环境切换到图形画面
(grclear)	暂时清除模前的屏幕画面
(grdraw 起点 终点 颜色 [亮显])	暂时性的画出一条线
(grread [追踪])	由输入设备读取追踪值
(grtext 位置 字符串 [亮显])	将字符串显示在状态列或屏幕菜单上
(grvecs 向量列表 [转置矩阵])	暂时性的画出多条线
(menucmd 字符串)	；提供在AlltOLISP中调用各菜单
(prin1 [表达式 [文件代码]])	将表达式打印于命令区或已打开的文件句柄字符则以“\”为前缀展开
(pinc [表达式 [文件代码]])	除句柄字符则不以”＼”为前缀展外开其余同Prinl
(print [表达式 [文件代码]])	除表达式会往下一新行列出，及空一格外其余同prinl
(prompt 信息)	将信息显示于屏幕的命令区，并随后响应一个nil信息
(redraw [对象名称 [模式]])	重绘整张图或根据对象名称重绘该图形
(terpri)	在屏幕上显示新列
(textscr)	作图环境切换到文字画面
(textpage)	清除文字画面文字类似DOS的cls命令
(vports)	窗口组态列表

---

14. 符号、元素、表达式处理函数

函数	返回值
(atom 元素)	如果元素不是列表，返回T，否则为nil
(atoms-family 格式 [符号号列表])	一组己定义函数的符号列表
(boundp 表达式)	T或nil，响应表达式是否有值存在
(minusp 元素)	判定元素是否为负值
(not 元素)	判定元素是否为nil
(null 元素)	判定元素是否被赋予nil值
(numberp 元素)	判定元素是否为整数或实数
(quote 表达式)	响应表达式未检算前状态，同'功能
(set 符号 表达式)	将表达式结果设定给带单引号’符号
(setq 符号1 表达式1 [符号2 表达式2] …)	设定表达式结果给各符号
(type 元素)	元素的信息型态
(zerop 元素)	判定元素是否为0值

---

15. ADS、ARX、AutoLISP加载与卸载函数

函数	返回值
(ads)	目前加载ADS程序列表
(arx)	目前加载ARX程序列表
(arxload 应用程序 [出错处理]))	加载ARX程序
(arxunload 应用程序 [出错处理]))	卸载ARX程序
(ver)	目前AutoLISP版本字符串
(load LSP文件名 [加载失败])	加载AutoLISP文件(*．lsp)
(xload 应用程序 [错处理])	加载ADS应用程序
(xunload 应用程序 [出错处理])	卸载ADS应用程序