LISP简介

LISP是一种通用计算机程序语言，长期以来垄断人工智能领域的应用。LISP作为因应人工智能而设计的语言，是个声明式系内函数式程序设计语言，有别于命令式系内过程式的C、Fortran和面向对象的Java、C#等结构化程序设计语言。

和学习大多数其他语言一样，学习 Lisp 的方法就是实践。打开您的解释程序，和我一起编码。Lisp 基本上是一门编译好的语言，通过直接键入命令，就可以轻松地用它进行编程。

基本上，Lisp 是一门关于列表的语言。Lisp 中的一切内容（从数据到组成应用程序的代码）都是列表。每个列表都由一些原子 和列表组成，数字就是原子，键入一个数字仅仅会返回该数字作为结果。

LISP按功能分类

一、数学运算功能函数

1.1（十 数值 数值…）返回：累计实数或整数数值

1.2（一 数值 数值…）返回：差值

1.3（* 数值 数值…）返回：所有数值乘积

1.4（/ 数值 数值…）返回：个数值除以第二个以后数值的商

1.5（l十 数值）返回：数值十l

1. 6（1— 数值）返回：数值一l

1.7（abs 数值）返回：数值的

1.8（atan 数值）返回：反正切值

1.9（cos 角度）返回：角度的余弦值，角度值为弧度

1.10（exp 数值）返回：数值的指数

1.11（expt 底数指数）返回：底数的指数值

1.12（fix 数值）返回：将数值转换为整数值

1.14（gcd 数值1 数值2）返回：两数值的公因数

1.15（log 数值）返回：数值的自然对数值

1.16（max 数值 数值…）返回：数值中的值

1.17（min 数值 数值…）返回：数值中的值

1.18 pi 常数∏，其值约为3.1415926

1.19（rem 数值 1数值 2）返回：M数值的相除的余数

1.20（sin 角度）返回：角度的正旋值，角度值为弧度

1.21（sqrt 数值）返回：数值的平方根

二、检验与逻辑运算功能函数

2.1（= 表达式1 表达式2）比较表达式1是否等于式2，适用数值及字符串

2.2 （／= 表达式1 表达式2）比较表达式1是否大于等于表达式2 2.3（＜ 表达式1 表达式2）比较表达式1是否＜小于表达式2

2.4（＜= 表达式1 表达式2）比较表达式1是否＜一小于等于表达式2

2.5（＞ 表达式1 表达式2）比较表达式1是否＞大于表达式2

2.6（＞= 表达式1 表达式2） 比较表达式1是否大于等于表达式2

2.7 （～ 数值）返回：数值的位 not值，（1的补码）

2.8 （and 表达式1 表达式2…）返回：逻辑and的结果

2.9（boole 函数 整数 整数…）返回：位式布尔运算

2.10（eq 表达式1 表达式2）比较表达式1与表达式2是否相同，适用列表比较（实际相同）

2.11（equal 表达式 1表达式 2［差量］）比较表达式 1与表达式 2是否相同，差量可省略（内容相同）

三、转换运算功能函数

3.1（angtof 字符串［模式］）返回：角度值的字符串转成实数

3.2（angtos 角度［模式［］］）返回：角度转成的字符串值

3.3（atof 字符串）返回：字符串转成实数值

3.4 （atoi 字符串）返回：字符串转成整数值

3.5 （cvunit 数值 原始单位 转换单位）返回：数值转换单位后的值转换根据acad.nut文件

3.6（diSTof 字符串 ［模式］）返回：根据模式将字符串转成实数值

3.7（itoa 整数）返回：整数转成字符串

3.8（rtos 数值 模式［］）返回：实数转成字符串

3.9 （trans 点 原位置 新位置［位移］） 返回：转换坐标系统值

四、列表处理功能函数

4.1 （append 列表 列表……） 结合所有列表成一个列表

4.2（assoc 关键元素 联合列表）根据关键元素找寻联合列表中关系信息

4.3 （car 列表）返回列表中的个元素，通常用来求X坐标

4.4（cadr 列表）返回列表中的第二个元素，通常用来求y坐标

4.5（caddr 列表）返回列表中的第三个元素，通常用来求Z坐标

4.6（cdr 列表）返回：除去个元素后的列表

4.7（cons 新元素 列表）返回：将新元素添加到列表

4.8（foreach 名称 列表 表达式）返回：将列表的每一元素对应至名称再根据表达式执行响应

4.9（length 列表）返回：列表内的元素数量

4.10（list 元素 元素…）返回：将所有元素合并为一列表

4.11（listp 元素）返回：判断元素是否为一串

4.12（mapcar函数 列表1列表2…）返回：将列表1、列表2列表的元素配合函数，求得新列表

4.13（member 关键元素列表）返回：根据关键元素（含似后的列表

4.14（nth n 列表）返回：列表的第n个元素

4.15（reverse 列表）返回：将列表元素根据顺序颠倒过来的列表

4.16（subst 新项旧项列表）返回：替换新旧列表后的列表

五、字符串、字符、文件处理函数

5.1（ascii 字符串）返回：字符串个字符的“ASCII”码

5.2 （chr 整数）返回：整数所对应的ASCII单一字符串

5.3（close 文件 名称）关闭文件

5.4（open 文件名 模式）返回：打开文件代码，准备读取或写入信息

5.5（read 字符串）返回：列表中的字符串的组元素

5.6（read－char［文件代码］）返回：通过键盘或文件中读取单一字符

5.7（read－line ［文件代码］）返回：经由键盘或文件中读取一行字符串

5.8（strcase 字符串［字样］）返回：转换字符串大小写

5.9（strcat 字符串1字符串2…）返回：将各字符串合并为一个字符串

5.10（strlen 字符串）返回：字符串构成的字符数（即字符串长度）

5.11（substr 字符串 起始 长度）返回：取出于字符串‘

5.12（wcmatch 字符串 格式）返回：T或 nil，将字符串与通用字符进行比较

5.13（write－char数值［文件代码］）返回：将一ASCII字符写到文件或屏幕

5.14（write－line字符串［文件代码］）返回：将字符串写到文件或屏幕上
#e#

六、等待输入功能函数

6.1 （getangle ［基点］ ［提示］）请求输入十进制角度数值，响应一个弧度值提示及参考点可有可无

6.2（getcorner 基点［提示］）请求输入另一矩形框对角点坐标

6.3（getdist ［基点］［提示］）请求输入一段距离

6.4（geTInt ［提示］）请求输入一个整数值

6.5（getkword ［提示］请求输入“关键词”

6.6（getorient ［基点］［提示］）请求输入十进制角度，响应一弧度值不受angbase、angdIR影响

6.7（getPoint ［基点］［提示］）请求输入一个点的坐标

6.8（getreal ［提示］请求输入一个实数

6.9（getstring ［提示］）请求输入一个字符串

6.10（initget ［位］字符串）设定下次getxxx函数的有效输入

七、几何运算功能函数

7.1（angle 点1 点2）取得两点的角度弧度值

7.2（distance 点1 点2）取得两点的距离

7.3（inters 点1 点2 点3 点 4［模式］）取得两条线的交点

7.4（osnap 点 模式字符串）按照捕捉模式取得另一坐标点

7.5（polar 基点 弧度 距离）按照极坐标法取得另一坐标点

7.6（textbox 对象列表）取得文字字符串的两个对角点坐标

八、对象处理功能函数

8.1（entdel 对象名称）删除或取消删除对象

8.2（entget 对象名称［应用程序列表］）取出对象名称的信息列表

8.3 （entlast） 取出图形信息中的一个对象

8.4（entmake 对象列表）建立一个新的对象列表

8.5（entmod 对象列表）根据更新的信息列表更新屏幕上元体

8.6（entnext ［对象名称］）找寻图面中的下一个对象

8.7（entsel ［提示］）请求选取一个对象，响应包含对象名称及选点坐标的列表；

8.8（entupd 对象名称）更新屏幕上复元体图形

8.9（handent 图码）返回：图码的元体名称

8.10（nentsel［提示］）返回：BLOCK所含副元体对象信息列表

8.11（nentselp ［提示］［点］）返回：BLOCK所含副元体对象信息似4*4矩形表示）

九、选择集、符号表处理函数

9.1（ssadd ［对象名称］［选择集］）将对象加入选择集或建立一新选择集

9.2（ssdel 对象名称选择集）将对象自选择集中移出

9.3（ssget ［模式］［点 1］［点 2］取得一个选择集

9.4（ssget ”X” ［过滤列表］）取得根据过滤列表所指定范围的选择集

9.5（sslenth 选择集）计算选择集的对象个数

9.6（ssmemb 对象名称选择集）响应对象名称是否包含于选择集内

9.7（ssname 选择集索引值）根据索引值取出选择集中的对象名称

9.8（tblnext 符号表名称［T］）检视符号表，有效的符号表：”LAYER”、”LTYPE”、”VIEW”、

”STYLE”、”BLOCK”

9.9（tblsearch 符号表名称 符号）在符号表中搜寻符号

十 、AutoCAD相关查询、控制功能函数

10.1（command ”AutoCAD命令”…）超重量级函数，调用执行 AutoCAD命令

10.2（findfile 文件名）返回：该文件名的路径及文件名

10.3（getfiled 标题 内定档名 扩展名 旗号）通过标准 AutoCAD文件对话 DCL对话框获得文件

10.4（getenv ”环境变量”）取得该环境变量的设定值，以字符串表示

10.5（getvar ”系统变量”）取得该系统变量的设定值，以字符串表示

10.6（setvar ”系统变量”值）设定该系统变量的值

10.7（regapp 应用类项）将目前的AutoCAD图形登记为一个应用程序名称

十一、判断式、循环相关功能函数

11.1（If ＜比较式＞ ＜表达式1＞ ［表达式2］ 检算比较式结果，如果为真，执行＜表达式1＞，否则执行＜表达式2＞

11.2（ repeat 次数 ［《 表达式＞ ＜表达式＞…］）重复执行 N次表达式

11.3（While ＜比较式＞ ＜表达式＞…） 当条件成立则执行表达式内容

11.4（cond ＜比较式 1＞ ＜表达式 1＞多条件式的 if整合功能

＜比较式2＞ ＜表达式2＞

＜比较式3＞ ＜表达式3＞）

11.5 （ prong 表达式1 表达式2…） 连接其中的表达式为一组，常用于配合if、cond等函数

十二、函数处理、定义、追踪与错误处理功能函数

12.1（*error* 字符串）程序错误时的警示信息

12.2（alert 字符串）以对话框式显示出警告字符串

12.3（apply 功能函数列表）将功能函数与列表结合后执行

12.4（defun 名称 自变量列表表达式＿。）自定函数或子程序

12.5（eval 表达式）返回：表达式的执行结果

12.6（exit）强制退出目前的应用程序

12.7（lambda 自变量表达式）定义未命名的函数

12.8（progn 表达式1 表达式2…）连接其内的表达式为一组，常用于配合if、cond等函数

12.9（quit）强制退出目前的应用程序

12.10（tablet 代码 ［列1列2列3方向］）取用或建立对数字板的校调 12.11（trace 函数…）对函数设定追踪标记，辅助检错

12.12（untrace 函数…）对函数设定解除追踪标记

十三、显示、打印控制功能函数

13.1（gfaphscr）作图环境切换到图形画面

13.2（grclear）暂时清除模前的屏幕画面

13.3（grdraw起点终点颜色［亮显］）暂时性的画出一条线

13.4（grread［追踪］）由输入设备读取追踪值

13.5（grtext位置字符串［亮显］）将字符串显示在状态列或屏幕菜单上

13.6（grvecs向量列表［转置矩阵］）暂时性的画出多条线

13.7（menucmd字符串）；提供在 AlltOLISP中调用各菜单

13.8（Prinl［表达式［文件代码］］将表达式打印于命令区或已打开的文件句柄字符则以“\”为前缀展开

13.9（pinc［表达式［文件代码］］除句柄字符则不以”＼”为前缀展外开其余同Prinl

13.10（print［表达式［文件代码］］除表达式会往下一新行列出，及空一格外其余同prinl

13.11（prompt信息）将信息显示于屏幕的命令区，并随后响应一个nil信息

13.12（redraw［对象名称［模式］］）重绘整张图或根据对象名称重绘该图形

13.13（terpri） 在屏幕上显示新列

13.14（textscr） 作图环境切换到文字画面

13.15（textpage）清除文字画面文字类似 DOS的cls命令

13.16（vports）返回：窗口组态列表

十四、符号、元素、表达式处理功能函数

14.1（atom元素）如果元素不是列表，响应T，否则为nil

14.2（atoms－family格式闲号列表］）返回：一组己定义函数的符号列表

14.3（boundp表达式）返回：T或 nil，响应表达式是否有值存在

14.4（minusp元素）返回：T或n儿 元素是否为负值

14.5（not元素）返回：T或n儿 判定元素是否为ni1

14.6（null元素）返回：T或nil判定元素是否被赋予nil值

14.7（numberp元素）返回：T或nil，元素是否为整数或实数

14.8（quote表达式）响应表达式未检算前状态，同“‘”功能

14.9（set符号 表达式）将表达式结果设定给带单引号’符号

14.10（setq符号1 表达式1［符号2表达式2］…）设定表达式结果给各符号

14.11（type元素）返回：元素的信息型态

14.12（zerop元素）返回：T或nil，元素是否为0值

十五、ADS、ARX、AutoLISP加载与卸载函数

15.1（ads）返回：目前加载ADS程序列表

15.2（arx）返回：目前加载 ARX程序列表

15.3（arxload应用程序［出错处理］））返回：加载 ARX程序

15.4（arxunload应用程序［出错处理］））返回：卸载 ARX程序

15.5（ver） 返回：目前 AutoLISP版本字符串

15.6（load LSP文件名［加载失败］）加载 AutoLISP文件（*.lsp）

15.7 （xload应用程序［错处理］）加载ADS应用程序

15.8 （xunloa应用程序［出错处理］）卸载 ADS应用程序

十六、内存空间管理函数

16.1（alloc数值）以节点数值设定区段大小

16.2（expand数值）以区段数值配置节点空间

16.3（gc）强制收回废内存

16.4（mem）显示目前的内存使用状态

16.5（xdroom对象名称）返回对象扩展信息允许使用的内存空间

16.6（xdsize列表）返回对象扩展信息所占用的内存空间

十七、其它重要的功能函数

17.1（acad?_colordlg 颜色码 旗号）显示出标准 AutoCAD颜色选择对话框

17.2（acad_helpdlg 求助文件名 主题）显示出标准 AutoCAD求助对话框

17.3（acad_strlsort字符串列表）作字符串列表排序

17.4（bherrs） 取得 bhatch与 bpcly失败所产生的错误信息

17.5（bhatch点［选择集［向量］］）根据 Pick point选点方式调用 bhatch命令，绘制选集区域的剖面线

17.6（bpoly点［选择集［向量］］）根据Pick point选点方式调用bpoly命令并产生一定域Polyline

17.7（cal计算式字符串）执行如 CAL计算功能

十八、ADS、ARX外部定义的3D函数

18. 1（ALIgn自变量 1 自变量 2.。。.）执行如 ALIGN命令各选项顺序

18.2（c：3dsin模式3DS文件名）导入3DS文件

18.3（C：3dsout模式3DS文件名）输出3DS文件

18.4（c：background模式［选项］）设定渲染背景

18.5（C：fog模式［选项］）设定渲染的雾效果

18.6（C：light模式［选项］）设定渲染的灯光控制

18.7（c：lsedit模式【选项1】设定渲染的景物控制

18.8（C：lslib模式［选项］）管理景物图库

18.9（c：maTIlb模式 材质 材质库名）管理材质数据库

18.10（c：mirror3d 自变量1 自变量2……） 执行如MIRROR3D命令

18.11（C：psdrap模式）根据模式设定值（0或1），传唤psdrap命令

18.12（C：psfill对象名称 图案名称［自变量1［自变量2］］）以POStSCript图案填满

18.13（c：psin文件名 位置 比例）插入一个Postscript（*.eps）文件

18.14（c：render［渲染文件］）执行渲染效果

18.15（C：rfileopt格式 自变量1 自变量2 自变量3…）设定执行渲染选项

18.16（c：replay影像文件名 影像类别［选项］）展示影像文件TGA、BMP、TIF

18.17（C：rmat模式 选项）控管材质建立、贴附、编辑、分离

18.18（c：rotate3d自变量 1 自变量2…）执行如 ROTATE3D命令各选项顺序

18.19（C：rpref模式 选项［设定］）渲染环境设定

18.20（c：saveimg影像文件名影像类别［选项］）储存图像文件TGA、BMP、TIF

18.21 （c：scene模式 ［选项］）SCENE场景管理

18.22（C：setuv模式 选集 自变量1 自变量2…）SETUV贴图模式管理

18.23（C：showmat自变量1）显示对象的材质贴附信息

18.24（C：solprof自变量 1 自变量工。。）建立 3D实体的轮廓影像

18.25（C：StatS［渲染信息文件］）显示渲染信息统计信息

十九、ADS、ARX外部定义的数据库相关函数

19.1（c：aseadmin自变量1 自变量2…）管理外部数据库

19.2（c：aseexportt自变量1 自变量2…）输出信息

19.3 （c：aselinks自变量1 自变量2…）连接对象与信息

19.4（c：aserow自变量1 自变量2…）管理外部信息表格

19.5（c：aseselect自变量1 自变量2…）建立外部信息与对象选集

19.6 （c：asesqled自变量 1 自变量2…） 执行SQL程序