AutoLISP语言的基本函数

第5章 AutoLISP基本函数函数是AutoLISP语言处理数据的基本工具，学习AutoLISP编程最主要的是要掌握AutoLISP语言系统内部函数和符号的基本用法。

如：函数的调用格式，即函数名、参数的个数及类型；函数的功能、求值情况及返回值类型等。

AutoLISP基本函数主要包括：数值函数、赋值与求值函数、表处理函数、字符串处理函数、逻辑运算函数和控制结构函数等。

5.1 数值函数数值函数用于处理整型数和实型数，数值函数包括：基本算术函数、三角函数、数据类型转换函数。

数值函数的返回值类型取决于参数表中参数的数据类型。

AutoLISP中数值计算要遵循整实原则，具体运算规则为：A.整整得整；B.实实得实；C.整实得实。

例：command: (/ 18 4 2) 返回： 2command: (* 4.5 2.0) 返回：9.0command: (+ 6 4.2) 返回：10.25.1.1 基本算数函数这类函数包括：+、-、*、/、1-、1+、abs、sqrt、min、max、expt、exp、log、gcd、rem 1) (+ 〈数〉〈数〉… )功能: 求表中所有整数或实数的和。

例如:Command:(+ 1.2 3.1 3.8)返回：8.12) (- 〈数〉〈数〉… )功能: 求表中第 1 个数减去后面所有数的差, 当表中只有一个数时, 返回这个数的相反数。

例如:Command:(- 8. 1 5)返回：3.1Command:(- 0.25)返回：-0.253) ( *〈数〉〈数〉… )功能: 求表中所有数的积, 例如:Command:( * 0.0174533 30)返回：0.5235994) (/ 〈数〉〈数〉… )功能: 求表中第1 个数除以后面所有数的商。

例如:cmnmand:(/ 10 5 2.0)返回：1.05) (1+ 〈数〉)功能: 求一个整数或实数加 1 的和。

例如:Command:(1+ 2.7)返回：3.76) (1- 〈数〉)功能: 求一个整数或实数减 1 的差。

AutoCADLISP基本知识及函数1.lisp数据类型INT 整型REAL 实数型（最多有6位小数）STR 字符串型2.预定义符号nil 尚无定义或者falseT 常量PAUSE 暂停PI 常量π3.赋值函数(setq x 1.5 y 20 p "center");给x、y、p赋值，返回值center。

4.查询变量的值和数据类型command：!a或者直接输入a;返回a的值command：(type a)或者直接输入(type a);返回a的数据类型5.quote函数(quote(10 20 ...))(quote(10 20))或者'(10 20);表示禁止对表求值，返回(10 20) 定义二维点(setq p '(10 20))6.定义函数(defun 函数名(变元.../局部变量...) 表达式... )7.调用函数（函数名变量）8.调用CAD命令(command "autocad命令" "所需数据" ...)如绘制圆心（2,4），半径为5的圆(command "circle" "2,4" 5)或者(command "circle" '(2 4) 5)9.画矩形(defun c:rect1(/ p1 p2 p3 p4)(setq p1 (getpoint "\n输入矩形的一个角点"))(setq p3 (getcorner p1 "\n输入矩形的另一个角点:"))(setq p2 (list(car p3) (cadr p1)))(setq p4 (list(car p1) (cadr p3)))(command "pline" p1 p2 p3 p4 "c"))10.cond函数多条件判断(cond(测试表达式1 结果表达式1）(测试表达式2 结果表达式2) ...);从第一个子表起，测试每个子表的测试表达式直至有一个子表测试表达式成立，计算该子表的结果表达式并返回这个结果表达式的值。

函数大全一、数学运算功能函数1．l（十数值数值…）返回：累计实数或整数数值1．2（一数值数值…）返回：差值1．3（* 数值数值…）返回：所有数值乘积1．4（/ 数值数值…）返回：第一个数值除以第二个以后数值的商1．5（l十数值）返回：数值十ll. 6（1—数值）返回：数值一ll．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．14159261．19（rem 数值 1数值 2）返回：M数值的相除的余数l．20（sin 角度）返回：角度的正旋值，角度值为弧度1．21（sqrt 数值）返回：数值的平方根二、检验与逻辑运算功能函数2．l（= 表达式1 表达式2）比较表达式1是否等于式2，适用数值及字符串 2．2 （／= 表达式1 表达式2）比较表达式1是否大于等于表达式22．3（＜表达式1 表达式2) 比较表达式1是否＜小于表达式22．4（＜= 表达式1 表达式2）比较表达式1是否＜一小于等于表达式22．5（＞表达式1 表达式2）比较表达式1是否＞大于表达式22．6（＞= 表达式1 表达式2）比较表达式1是否大于等于表达式22．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．l（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．l（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字符写到文件或屏幕15．14（write－line字符串［文件代码］）返回：将字符串写到文件或屏幕上六、等待输入功能函数6．l （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．l（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．l（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．l（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．l（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．l（*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．l（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．l（atom元素）如果元素不是列表，响应T，否则为nil14．2（atoms－family格式闲号列表］）返回：一组己定义函数的符号列表14．3（boundp表达式）返回：T或 nil，响应表达式是否有值存在14．4（minusp元素）返回：T或n儿元素是否为负值14．5（not元素）返回：T或n儿判定元素是否为ni114．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．l（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．l（alloc数值）以节点数值设定区段大小16．2（expand数值）以区段数值配置节点空间16．3（gc）强制收回废内存16．4（mem）显示目前的内存使用状态16．5（xdroom对象名称）返回对象扩展信息允许使用的内存空间16．6（xdsize列表）返回对象扩展信息所占用的内存空间十七、其它重要的功能函数17．l（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命令并产生一定域Polyline17．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．l（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程序。

第5章 AutoLISP基本函数函数是AutoLISP语言处理数据的基本工具，学习AutoLISP编程最主要的是要掌握AutoLISP语言系统内部函数和符号的基本用法。

如：函数的调用格式，即函数名、参数的个数及类型；函数的功能、求值情况及返回值类型等。

AutoLISP基本函数主要包括：数值函数、赋值与求值函数、表处理函数、字符串处理函数、逻辑运算函数和控制结构函数等。

5.1 数值函数数值函数用于处理整型数和实型数，数值函数包括：基本算术函数、三角函数、数据类型转换函数。

数值函数的返回值类型取决于参数表中参数的数据类型。

AutoLISP中数值计算要遵循整实原则，具体运算规则为：A.整整得整；B.实实得实；C.整实得实。

例：command: (/ 18 4 2) 返回： 2command: (* 4.5 2.0) 返回：9.0command: (+ 6 4.2) 返回：10.25.1.1 基本算数函数这类函数包括：+、-、*、/、1-、1+、abs、sqrt、min、max、expt、exp、log、gcd、rem 1) (+ 〈数〉〈数〉… )功能: 求表中所有整数或实数的和。

例如:Command:(+ 1.2 3.1 3.8)返回：8.12) (- 〈数〉〈数〉… )功能: 求表中第 1 个数减去后面所有数的差, 当表中只有一个数时, 返回这个数的相反数。

例如:Command:(- 8. 1 5)返回：3.1Command:(- 0.25)返回：-0.253) ( *〈数〉〈数〉… )功能: 求表中所有数的积, 例如:Command:( * 0.0174533 30)返回：0.5235994) (/ 〈数〉〈数〉… )功能: 求表中第1 个数除以后面所有数的商。

例如:cmnmand:(/ 10 5 2.0)返回：1.05) (1+ 〈数〉)功能: 求一个整数或实数加 1 的和。

例如:Command:(1+ 2.7)返回：3.76) (1- 〈数〉)功能: 求一个整数或实数减 1 的差。

a u t o l i s p函数大全(总8页)--本页仅作为文档封面，使用时请直接删除即可----内页可以根据需求调整合适字体及大小--函数大全一、数学运算功能函数1．l（十数值数值…）返回：累计实数或整数数值1．2（一数值数值…）返回：差值1．3（* 数值数值…）返回：所有数值乘积1．4（/ 数值数值…）返回：第一个数值除以第二个以后数值的商1．5（l十数值）返回：数值十ll. 6（1—数值）返回：数值一ll．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．14159261．19（rem 数值 1数值 2）返回：M数值的相除的余数l．20（sin 角度）返回：角度的正旋值，角度值为弧度1．21（sqrt 数值）返回：数值的平方根二、检验与逻辑运算功能函数2．l（= 表达式1 表达式2）比较表达式1是否等于式2，适用数值及字符串 2．2 （／= 表达式1 表达式2）比较表达式1是否大于等于表达式22．3（＜表达式1 表达式2) 比较表达式1是否＜小于表达式22．4（＜= 表达式1 表达式2）比较表达式1是否＜一小于等于表达式22．5（＞表达式1 表达式2）比较表达式1是否＞大于表达式22．6（＞= 表达式1 表达式2）比较表达式1是否大于等于表达式22．7 (～数值）返回：数值的位 not值，（1的补码）2．8 （and 表达式1 表达式2…）返回：逻辑and的结果2．9（boole 函数整数整数…）返回：位式布尔运算22．10(eq 表达式1 表达式2）比较表达式1与表达式2是否相同，适用列表比较（实际相同）2．11（equal 表达式 1表达式 2［差量］）比较表达式 1与表达式 2是否相同，差量可省略（内容相同）三、转换运算功能函数3．l（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 新项旧项列表）返回：替换新旧列表后的列表3五、字符串、字符、文件处理函数5．l（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字符写到文件或屏幕15．14（write－line字符串［文件代码］）返回：将字符串写到文件或屏幕上六、等待输入功能函数6．l （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．l（angle 点1 点2）取得两点的角度弧度值7．2（distance 点1 点2）取得两点的距离7．3（inters 点1 点2 点3 点 4［模式］）取得两条线的交点47．4（osnap 点模式字符串）按照捕捉模式取得另一坐标点7．5（polar 基点弧度距离）按照极坐标法取得另一坐标点（textbox 对象列表）取得文字字符串的两个对角点坐标八、对象处理功能函数8．l（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．l（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．l（command ”AutoCAD命令”…）超重量级函数，调用执行 AutoCAD命令10．2（findfile 文件名）返回：该文件名的路径及文件名10．3（getfiled 标题内定档名扩展名旗号）通过标准 AutoCAD文件对话 DCL对5话框获得文件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．l（*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．l（gfaphscr）作图环境切换到图形画面613．2（grclear）暂时清除模前的屏幕画面13．3（grdraw起点终点颜色[亮显］）暂时性的画出一条线13．4（grread［追踪］）由输入设备读取追踪值13．5（grtext位置字符串［亮显］）将字符串显示在状态列或屏幕菜单上13．6（grvecs向量列表［转置矩阵］）暂时性的画出多条线13．7（menucmd字符串）；提供在 AlltOLISP中调用各菜单13．8（Prinl［表达式［文件代码］］将表达式打印于命令区或已打开的文件句柄字符则以“\”为前缀展开13．9（pinc［表达式［文件代码］］除句柄字符则不以”＼”为前缀展外开其余同Prinl13．10（print［表达式［文件代码］］除表达式会往下一新行列出，及空一格外其余同prinl13．11（prompt信息）将信息显示于屏幕的命令区，并随后响应一个nil信息13．12（redraw［对象名称［模式］］）重绘整张图或根据对象名称重绘该图形13．13（terpri）在屏幕上显示新列13．14（textscr）作图环境切换到文字画面13．15（textpage）清除文字画面文字类似 DOS的cls命令13．16（vports）返回：窗口组态列表十四、符号、元素、表达式处理功能函数14．l（atom元素）如果元素不是列表，响应T，否则为nil14．2（atoms－family格式闲号列表］）返回：一组己定义函数的符号列表14．3（boundp表达式）返回：T或 nil，响应表达式是否有值存在14．4（minusp元素）返回：T或n儿元素是否为负值14．5（not元素）返回：T或n儿判定元素是否为ni114．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．l（ads）返回：目前加载ADS程序列表15．2（arx）返回：目前加载 ARX程序列表715．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．l（alloc数值）以节点数值设定区段大小16．2（expand数值）以区段数值配置节点空间16．3（gc）强制收回废内存16．4（mem）显示目前的内存使用状态16．5（xdroom对象名称）返回对象扩展信息允许使用的内存空间16．6（xdsize列表）返回对象扩展信息所占用的内存空间十七、其它重要的功能函数17．l（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命令并产生一定域Polyline17．7（cal计算式字符串）执行如 CAL计算功能十八、ADS、ARX外部定义的3D函数（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】设定渲染的景物控制818．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．l（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程序9。

第八讲：AutoLISP的基本函数AutoLISP程序可看作是一个一个函数的调用。

函数的调用格式：（函数名[<参数1>] [<参数2>] ⋯[<参数n>]）2.1 赋值函数与求值函数1 赋值函数格式：(setq <sym1> <expr1> [<sym2> <expr2>] ⋯)依次将每个表达式<expr>的值赋给符号<sym>，要求参数必须成对出现，返回最后一个表达式的值。

例如：command: (setq a 5.0)5.0000command: !a5.0000command : (setq x12 2.5 y12 (+ x12 2.0))4.5000相当于(setq x12 2.5)(setq y12 (+ x12 2.0))2 禁止求值函数格式：（quote <expr>）阻止求值器对其参数<expr>求值，返回没被求值的表达式。

’(+ 6 5) 简写形式，等效的表达形式是( quote (+ 6 5))作用：可以“保护”一些表达式作为数据使用，而不是作为AutoLISP函数调用被求值。

例如：command : (car ‘(1 2 3)) 等效于(car (list 1 2 3))取表中第一个元素1返回结果2.2 数值函数数的运算遵循以下规则：（1）若参数表中的所有参数都为整型数，则AutoLISP求值器对参数表做整型运算，返回整型数值。

（2）若参数表中有一个实型数，则对表中的参数进行浮点数学运算，返回实型数。

2.2.1 算术运算函数1（+ <number> <number> ⋯）返回所有<number>的和(+ 20 5 13) 返回38（+ -20 5.5）返回-14.5000(+ (setq x 2) (+ x 3.0) 6.5) 返回13.5000注意：多个整数相加时，要防止总和超出范围而出错。