autolisp多段线处理函数集
autolisp函数大全.doc
函数大全一、数学运算功能函数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 能否大于等于表达式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． 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 10． 2（ findfile 10． 3（ getfiled ”AutoCAD命令” ）超重量级函数，调用履行AutoCAD 命令文件名）返回：该文件名的路径及文件名标题内定档名扩展名旗帜）经过标准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程序。
autolisp函数大全
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-函数大全资料
一、数学运算功能函数l(+ 数值数值…) 返回：累计实数或整数数值2(- 数值数值…) 返回：差值3(* 数值数值…) 返回：所有数值乘积4(/ 数值数值…) 返回：第一个数值除以第二个以后数值的商5(l+ 数值) 返回：数值+l6(1- 数值) 返回：数值-l7(abs 数值) 返回：数值的绝对值8(atan 数值) 返回：反正切值9(cos 角度) 返回：角度的余弦值，角度值为弧度10(exp 数值) 返回：数值的指数11(expt 底数指数) 返回：底数的指数值12(fix 数值) 返回：将数值转换为整数值13(float数值) 返回：将数值转换为实数值14(gcd 数值1 数值2) 返回：两数值的最大公因数15(log 数值) 返回：数值的自然对数值16(max 数值数值…) 返回：数值中的最大值17(min 数值数值…) 返回：数值中的最小值18 pi 常数∏，其值约为3.141592619(rem数值1数值2) 返回：M数值的相除的余数20(sin角度) 返回：角度的正旋值，角度值为弧度21(sqrt数值) 返回：数值的平方根二、检验与逻辑运算功能函数l(=表达式1表达式2) 比较表达式1是否等于式2，适用数值及字符串2(／=表达式1表达式2) 比较表达式1是否大于等于表达式23(＜表达式1表达式2) 比较表达式1是否＜小于表达式24(＜=表达式1表达式2) 比较表达式1是否＜一小于等于表达式25(＞表达式1表达式2) 比较表达式1是否＞大于表达式26(＞=表达式1表达式2) 比较表达式1是否大于等于表达式27(～数值) 返回：数值的位not值，(1的补码)8(and表达式1表达式2…) 返回：逻辑and的结果9(boole函数整数整数…) 返回：位式布尔运算10(eq表达式1表达式2) 比较表达式1与表达式2是否相同，适用列表比较(实际相同)11(equal表达式1表达式2［差量］)比较表达式1与表达式2是否相同，差量可省略(内容相同)三、转换运算功能函数l(angtof字符串［模式］)返回：角度值的字符串转成实数2(angtos角度［模式［精度］］)返回：角度转成的字符串值3(atof字符串)返回：字符串转成实数值4(atoi字符串)返回：字符串转成整数值5(cvunit数值原始单位转换单位)返回：数值转换单位后的值转换根据acad．nut文件6(distof字符串［模式］)返回：根据模式将字符串转成实数值7(itoa整数)返回：整数转成字符串8(rtos数值模式［精度］)返回：实数转成字符串9(trans点原位置新位置[位移])返回：转换坐标系统值四、列表处理功能函数1(append列表列表……)结合所有列表成一个列表2(assoc关键元素联合列表)根据关键元素找寻联合列表中关系信息3(car列表)返回列表中的第一个元素，通常用来求X坐标4(cadr列表)返回列表中的第二个元素，通常用来求y坐标5(caddr列表)返回列表中的第三个元素，通常用来求Z坐标6(cdr列表)返回：除去第一个元素后的列表7(cons新元素列表)返回：将新元素添加到列表8(foreach名称列表表达式)返回：将列表的每一元素对应至名称再根据表达式执行响应9(length列表)返回：列表内的元素数量10(list元素元素…)返回：将所有元素合并为一列表11(listp元素)返回：判断元素是否为一串12(mapcar函数列表1列表2…)返回：将列表1、列表2列表的元素配合函数，求得新列表13(member关键元素列表)返回：根据关键元素(含似后的列表14(nthn列表)返回：列表的第n个元素15(reverse列表)返回：将列表元素根据顺序颠倒过来的列表16(subst新项旧项列表)返回：替换新旧列表后的列表五、字符串、字符、文件处理函数l(ascii字符串)返回：字符串第一个字符的“ASCII”码2(chr整数)返回：整数所对应的ASCII单一字符串3(close文件名称)关闭文件4(open文件名模式)返回：打开文件代码，准备读取或写入信息5(read字符串)返回：列表中的字符串的第一组元素6(read－char［文件代码］)返回：通过键盘或文件中读取单一字符7(read－line［文件代码］)返回：经由键盘或文件中读取一行字符串8(strcase字符串［字样］)返回：转换字符串大小写9(strcat字符串1字符串2…)返回：将各字符串合并为一个字符串10(strlen字符串)返回：字符串构成的字符数(即字符串长度)11(substr字符串起始长度)返回：取出于字符串‘12(wcmatch字符串格式)返回：T或nil，将字符串与通用字符进行比较13(write－char数值［文件代码］)返回：将一ASCII字符写到文件或屏幕14(write－line字符串［文件代码］)返回：将字符串写到文件或屏幕上六、等待输入功能函数l(getangle［基点］[提示］)请求输入十进制角度数值，响应一个弧度值提示及参考点可有可无2(getcorner基点［提示］)请求输入另一矩形框对角点坐标3(getdist［基点］［提示］)请求输入一段距离4(getint［提示］)请求输入一个整数值5(getkword［提示］请求输入“关键词”6(getorient［基点］［提示］)请求输入十进制角度，响应一弧度值不受angbase、angdir影响7(getPoint［基点］［提示］)请求输入一个点的坐标8(getreal［提示］请求输入一个实数9(getstring[提示］)请求输入一个字符串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函数…)对函数设定解除追踪标记十三、显示、打印控制功能函数l(gfaphscr)作图环境切换到图形画面2(grclear)暂时清除模前的屏幕画面3(grdraw起点终点颜色[亮显］)暂时性的画出一条线4(grread［追踪］)由输入设备读取追踪值5(grtext位置字符串［亮显］)将字符串显示在状态列或屏幕菜单上6(grvecs向量列表［转置矩阵］)暂时性的画出多条线7(menucmd字符串)；提供在AlltOLISP中调用各菜单8(Prinl［表达式［文件代码］］将表达式打印于命令区或已打开的文件句柄字符则以“\”为前缀展开9(pinc［表达式［文件代码］］除句柄字符则不以”＼”为前缀展外开其余同Prinl10(print［表达式［文件代码］］除表达式会往下一新行列出，及空一格外其余同prinl11(prompt信息)将信息显示于屏幕的命令区，并随后响应一个nil信息12(redraw［对象名称［模式］］)重绘整张图或根据对象名称重绘该图形13(terpri)在屏幕上显示新列14(textscr)作图环境切换到文字画面15(textpage)清除文字画面文字类似DOS的cls命令16(vports)返回：窗口组态列表十四、符号、元素、表达式处理功能函数l(atom元素)如果元素不是列表，响应T，否则为nil2(atoms－family格式闲号列表］)返回：一组己定义函数的符号列表3(boundp表达式)返回：T或nil，响应表达式是否有值存在4(minusp元素)返回：T或n儿元素是否为负值5(not元素)返回：T或n儿判定元素是否为ni16(null元素)返回：T或nil判定元素是否被赋予nil值7(numberp元素)返回：T或nil，元素是否为整数或实数8(quote表达式)响应表达式未检算前状态，同“‘”功能9(set符号表达式)将表达式结果设定给带单引号’符号10(setq符号1表达式1［符号2表达式2］…)设定表达式结果给各符号11(type元素)返回：元素的信息型态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(loadLSP文件名［加载失败］)加载AutoLISP文件(*．lsp) 15．7(xload应用程序[错处理])加载ADS应用程序15．8(xunloa应用程序［出错处理］)卸载ADS应用程序十六、内存空间管理函数l(alloc数值)以节点数值设定区段大小2(expand数值)以区段数值配置节点空间3(gc)强制收回废内存4(mem)显示目前的内存使用状态5(xdroom对象名称)返回对象扩展信息允许使用的内存空间6(xdsize列表)返回对象扩展信息所占用的内存空间十七、其它重要的功能函数l(acad_colordlg颜色码旗号)显示出标准AutoCAD颜色选择对话框2(acad_helpdlg求助文件名主题)显示出标准AutoCAD求助对话框3(acad_strlsort字符串列表)作字符串列表排序4(bherrs)取得bhatch与bpcly失败所产生的错误信息5(bhatch点［选择集[向量］］)根据Pickpoint选点方式调用bhatch命令，绘制选集区域的剖面线6(bpoly点［选择集[向量]］)根据Pickpoint选点方式调用bpoly命令并产生一定域Polyline7(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、TIF18．17(C：rmat模式选项)控管材质建立、贴附、编辑、分离18．18(c：rotate3d自变量1自变量2…)执行如ROTATE3D命令各选项顺序18．19(C：rpref模式选项［设定］)渲染环境设定18．20(c：saveimg影像文件名影像类别［选项］)储存图像文件TGA、BMP、TIF18．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程序。
Autolisp 电力线
Autolisp 选择多段线，并将其变为电力线;============================================================================== =========================================================; 函数名：kwy; 功能：选择多段线，并将其变为电力线; 编程策略：; 1、选中要变换的多段线，获取多段线每一顶点的坐标; 2、删除选中的多段线; 3、求出箭头以及直线的顶点; 4、绘制直线、圆以及箭头; 5、以每两点为循环单元，循环3、4步骤，直到绘出整条线;============================================================================== =========================================================(defun c:kwy (/)(setq os (getvar "osmode"))(setvar "osmode" 0) ;;关闭对象捕捉;-----------------------------------------------------------------------------------------------------------------------------(setq pline (entsel"\n请选择要注释的多段线："))(if (= pline nil)(exit))(setq name_of_pline (car pline)) ;;获取多段线的图元名(setq list_of_pline (entget name_of_pline))(setq list_of_pline_points nil)(setq counter 0)(setq length_list_of_pline (1- (length list_of_pline)))(while (< counter length_list_of_pline)(setq item (nth counter list_of_pline)) ;;提取表中第n+1项(setq flag (car item))(if (= flag 10) ;;判断其是否是多段线顶点(progn(setq list_of_pline_point (cdr item)) ;;取该点的坐标(setq list_of_pline_points (cons list_of_pline_point list_of_pline_points));;将该点放入表中))(setq counter (1+ counter)))(command "erase" name_of_pline "") ;;删掉原有多段线(setq point0 (nth 0 list_of_pline_points))(command "circle" point0 20) ;;以p0为圆心，画圆(command )(setq new_counter 0)(setq length_list_of_pline_points (1- (length list_of_pline_points)))(while (< new_counter length_list_of_pline_points) ;;遍历多段线的每一段，以两个点为端点(setq point1 (nth new_counter list_of_pline_points))(setq new_counter (1+ new_counter)) ;;累加(setq point2 (nth new_counter list_of_pline_points))(command "circle" point2 20)(setq angle_point1_point2 (angle point1 point2)) ;;求P1,P2点与X轴的角度并将其赋给angle_point1_point2(setq angle_point2_point1 (angle point2 point1))(setq point_1 (polar point1 angle_point1_point2 20)) ;;计算直线与圆的交点(setq point_2 (polar point2 angle_point2_point1 20))(command "line" point_1 point_2 "") ;;绘制直线(setq arrow1_point1 (polar point_1 angle_point1_point2 20)) ;;计算箭头的顶点(setq arrow1_point2 (polar arrow1_point1 (+ angle_point2_point1 (/ pi 4)) 20)) ;;计算箭头的另外两个端点(setq arrow1_point3 (polar arrow1_point1 (- angle_point2_point1 (/ pi 4)) 20))(command "pline" arrow1_point2 arrow1_point1 arrow1_point3 "") ;;绘制箭头(setq arrow2_point1 (polar point_1 angle_point1_point2 40)) ;;绘制同侧另一个箭头(setq arrow2_point2 (polar arrow2_point1 (+ angle_point2_point1 (/ pi 4)) 20))(setq arrow2_point3 (polar arrow2_point1 (- angle_point2_point1 (/ pi 4)) 20))(command "pline" arrow2_point2 arrow2_point1 arrow2_point3 "")(setq arrow3_point1 (polar point_2 angle_point2_point1 20)) ;;绘制对侧第一个箭头(setq arrow3_point2 (polar arrow3_point1 (+ angle_point1_point2 (/ pi 4)) 20))(setq arrow3_point3 (polar arrow3_point1 (- angle_point1_point2 (/ pi 4)) 20))(command "pline" arrow3_point2 arrow3_point1 arrow3_point3 "")(setq arrow4_point1 (polar point_2 angle_point2_point1 40)) ;;绘制对侧第二个箭头(setq arrow4_point2 (polar arrow4_point1 (+ angle_point1_point2 (/ pi 4)) 20))(setq arrow4_point3 (polar arrow4_point1 (- angle_point1_point2 (/ pi 4)) 20))(command "pline" arrow4_point2 arrow4_point1 arrow4_point3 ""))(setvar "osmode" os) ;;恢复捕捉设置(princ) ;;静默退出)效果图。
autolisp函数大全.doc
函数大全一、数学运算功能函数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程序。
最新AutoLISP-函数大全资料
一、数学运算功能函数l(+ 数值数值…) 返回：累计实数或整数数值2(- 数值数值…) 返回：差值3(* 数值数值…) 返回：所有数值乘积4(/ 数值数值…) 返回：第一个数值除以第二个以后数值的商5(l+ 数值) 返回：数值+l6(1- 数值) 返回：数值-l7(abs 数值) 返回：数值的绝对值8(atan 数值) 返回：反正切值9(cos 角度) 返回：角度的余弦值，角度值为弧度10(exp 数值) 返回：数值的指数11(expt 底数指数) 返回：底数的指数值12(fix 数值) 返回：将数值转换为整数值13(float数值) 返回：将数值转换为实数值14(gcd 数值1 数值2) 返回：两数值的最大公因数15(log 数值) 返回：数值的自然对数值16(max 数值数值…) 返回：数值中的最大值17(min 数值数值…) 返回：数值中的最小值18 pi 常数∏，其值约为3.141592619(rem数值1数值2) 返回：M数值的相除的余数20(sin角度) 返回：角度的正旋值，角度值为弧度21(sqrt数值) 返回：数值的平方根二、检验与逻辑运算功能函数l(=表达式1表达式2) 比较表达式1是否等于式2，适用数值及字符串2(／=表达式1表达式2) 比较表达式1是否大于等于表达式23(＜表达式1表达式2) 比较表达式1是否＜小于表达式24(＜=表达式1表达式2) 比较表达式1是否＜一小于等于表达式25(＞表达式1表达式2) 比较表达式1是否＞大于表达式26(＞=表达式1表达式2) 比较表达式1是否大于等于表达式27(～数值) 返回：数值的位not值，(1的补码)8(and表达式1表达式2…) 返回：逻辑and的结果9(boole函数整数整数…) 返回：位式布尔运算10(eq表达式1表达式2) 比较表达式1与表达式2是否相同，适用列表比较(实际相同)11(equal表达式1表达式2［差量］)比较表达式1与表达式2是否相同，差量可省略(内容相同)三、转换运算功能函数l(angtof字符串［模式］)返回：角度值的字符串转成实数2(angtos角度［模式［精度］］)返回：角度转成的字符串值3(atof字符串)返回：字符串转成实数值4(atoi字符串)返回：字符串转成整数值5(cvunit数值原始单位转换单位)返回：数值转换单位后的值转换根据acad．nut文件6(distof字符串［模式］)返回：根据模式将字符串转成实数值7(itoa整数)返回：整数转成字符串8(rtos数值模式［精度］)返回：实数转成字符串9(trans点原位置新位置[位移])返回：转换坐标系统值四、列表处理功能函数1(append列表列表……)结合所有列表成一个列表2(assoc关键元素联合列表)根据关键元素找寻联合列表中关系信息3(car列表)返回列表中的第一个元素，通常用来求X坐标4(cadr列表)返回列表中的第二个元素，通常用来求y坐标5(caddr列表)返回列表中的第三个元素，通常用来求Z坐标6(cdr列表)返回：除去第一个元素后的列表7(cons新元素列表)返回：将新元素添加到列表8(foreach名称列表表达式)返回：将列表的每一元素对应至名称再根据表达式执行响应9(length列表)返回：列表内的元素数量10(list元素元素…)返回：将所有元素合并为一列表11(listp元素)返回：判断元素是否为一串12(mapcar函数列表1列表2…)返回：将列表1、列表2列表的元素配合函数，求得新列表13(member关键元素列表)返回：根据关键元素(含似后的列表14(nthn列表)返回：列表的第n个元素15(reverse列表)返回：将列表元素根据顺序颠倒过来的列表16(subst新项旧项列表)返回：替换新旧列表后的列表五、字符串、字符、文件处理函数l(ascii字符串)返回：字符串第一个字符的“ASCII”码2(chr整数)返回：整数所对应的ASCII单一字符串3(close文件名称)关闭文件4(open文件名模式)返回：打开文件代码，准备读取或写入信息5(read字符串)返回：列表中的字符串的第一组元素6(read－char［文件代码］)返回：通过键盘或文件中读取单一字符7(read－line［文件代码］)返回：经由键盘或文件中读取一行字符串8(strcase字符串［字样］)返回：转换字符串大小写9(strcat字符串1字符串2…)返回：将各字符串合并为一个字符串10(strlen字符串)返回：字符串构成的字符数(即字符串长度)11(substr字符串起始长度)返回：取出于字符串‘12(wcmatch字符串格式)返回：T或nil，将字符串与通用字符进行比较13(write－char数值［文件代码］)返回：将一ASCII字符写到文件或屏幕14(write－line字符串［文件代码］)返回：将字符串写到文件或屏幕上六、等待输入功能函数l(getangle［基点］[提示］)请求输入十进制角度数值，响应一个弧度值提示及参考点可有可无2(getcorner基点［提示］)请求输入另一矩形框对角点坐标3(getdist［基点］［提示］)请求输入一段距离4(getint［提示］)请求输入一个整数值5(getkword［提示］请求输入“关键词”6(getorient［基点］［提示］)请求输入十进制角度，响应一弧度值不受angbase、angdir影响7(getPoint［基点］［提示］)请求输入一个点的坐标8(getreal［提示］请求输入一个实数9(getstring[提示］)请求输入一个字符串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函数…)对函数设定解除追踪标记十三、显示、打印控制功能函数l(gfaphscr)作图环境切换到图形画面2(grclear)暂时清除模前的屏幕画面3(grdraw起点终点颜色[亮显］)暂时性的画出一条线4(grread［追踪］)由输入设备读取追踪值5(grtext位置字符串［亮显］)将字符串显示在状态列或屏幕菜单上6(grvecs向量列表［转置矩阵］)暂时性的画出多条线7(menucmd字符串)；提供在AlltOLISP中调用各菜单8(Prinl［表达式［文件代码］］将表达式打印于命令区或已打开的文件句柄字符则以“\”为前缀展开9(pinc［表达式［文件代码］］除句柄字符则不以”＼”为前缀展外开其余同Prinl10(print［表达式［文件代码］］除表达式会往下一新行列出，及空一格外其余同prinl11(prompt信息)将信息显示于屏幕的命令区，并随后响应一个nil信息12(redraw［对象名称［模式］］)重绘整张图或根据对象名称重绘该图形13(terpri)在屏幕上显示新列14(textscr)作图环境切换到文字画面15(textpage)清除文字画面文字类似DOS的cls命令16(vports)返回：窗口组态列表十四、符号、元素、表达式处理功能函数l(atom元素)如果元素不是列表，响应T，否则为nil2(atoms－family格式闲号列表］)返回：一组己定义函数的符号列表3(boundp表达式)返回：T或nil，响应表达式是否有值存在4(minusp元素)返回：T或n儿元素是否为负值5(not元素)返回：T或n儿判定元素是否为ni16(null元素)返回：T或nil判定元素是否被赋予nil值7(numberp元素)返回：T或nil，元素是否为整数或实数8(quote表达式)响应表达式未检算前状态，同“‘”功能9(set符号表达式)将表达式结果设定给带单引号’符号10(setq符号1表达式1［符号2表达式2］…)设定表达式结果给各符号11(type元素)返回：元素的信息型态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(loadLSP文件名［加载失败］)加载AutoLISP文件(*．lsp) 15．7(xload应用程序[错处理])加载ADS应用程序15．8(xunloa应用程序［出错处理］)卸载ADS应用程序十六、内存空间管理函数l(alloc数值)以节点数值设定区段大小2(expand数值)以区段数值配置节点空间3(gc)强制收回废内存4(mem)显示目前的内存使用状态5(xdroom对象名称)返回对象扩展信息允许使用的内存空间6(xdsize列表)返回对象扩展信息所占用的内存空间十七、其它重要的功能函数l(acad_colordlg颜色码旗号)显示出标准AutoCAD颜色选择对话框2(acad_helpdlg求助文件名主题)显示出标准AutoCAD求助对话框3(acad_strlsort字符串列表)作字符串列表排序4(bherrs)取得bhatch与bpcly失败所产生的错误信息5(bhatch点［选择集[向量］］)根据Pickpoint选点方式调用bhatch命令，绘制选集区域的剖面线6(bpoly点［选择集[向量]］)根据Pickpoint选点方式调用bpoly命令并产生一定域Polyline7(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、TIF18．17(C：rmat模式选项)控管材质建立、贴附、编辑、分离18．18(c：rotate3d自变量1自变量2…)执行如ROTATE3D命令各选项顺序18．19(C：rpref模式选项［设定］)渲染环境设定18．20(c：saveimg影像文件名影像类别［选项］)储存图像文件TGA、BMP、TIF18．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程序。
【文件】autolisp函数大全
【关键字】文件函数大全一、数学运算功能函数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程序此文档是由网络收集并进行重新排版整理.word可编辑版本！。
【免费下载】autolisp函数大全
函数大全一、数学运算功能函数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［表达式［文件代码］］除表达式会往下一新行列出，及空一格外其余同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程序列表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程序。
autolisp函数大全.doc
函数大全一、数学运算功能函数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程序。
autolisp函数大全
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函数大全AutoLisp函数一、数学运算功能函数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（数值数值…）返回：数值中的最大值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是否＜小于表达式2 2．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〔表达式〔文件代码〕〕除句柄字符则不以”＼”为前缀展外开其余同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程序列表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、TIF18．17（C：rmat模式选项）控管材质建立、贴附、编辑、分离18．18（c：rotate3d自变量 1 自变量2…）执行如 ROTATE3D命令各选项顺序18．19（C：rpref模式选项〔设定〕）渲染环境设定18．20（c：saveimg影像文件名影像类别〔选项〕）储存图像文件TGA、BMP、TIF18．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程序1111AutoLisp函数19。
autolisp函数大全
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函数大全
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源码）——好用的AutoCAD点坐标导入导出工具
多段线点导出和导入点坐标成多段线（AutoLISP源码）——好用的AutoCAD点坐标导入导出工具;----------------------------------------------------------------------------------------------------------------------;依据点坐标文件生成多段线（封闭多段线）。
;----------------------------------------------------------------------------------------------------------------------(defun c:ddr()(setvar "cmdecho" 1)(setvar "osmode" 0)(setvar "modemacro" " YuCheng ")(setq zb_file (getfiled "选择点坐标文件" "" "txt" 0))(setq x (open zb_file "r"))(prompt"\n.\n.\nwait...")(princ)(while (setq pt (read-line x))(command "_.pline" pt)(while (and (/= (setq pt (read-line x)) "END") (/= pt "end") (/= pt nil) (/= pt ""))(command pt))(command "c")(command)(command)(setq ent (entlast))(redraw ent 3))(close x)(setvar "cecolor" oldcolor)(princ));----------------------------------------------------------------------------------------------------------------------;错误处理，按处理--程序静静取消。
autolisp多段线处理函数集
autolisp多段线处理函数集;;164.1 [功能] 曲线是否封闭;;164.2 [功能]使多段线封闭;;164.3 [功能] 多段线端点列表;;164.4 [功能] 矩形中点坐标;;164.5 [功能] 参数param处的切线方向的角度;;164.6 [功能] 参数param处的法线方向的角度;;164.7 [功能] 曲线一点的切线方向的角度;;164.8 [功能] 曲线一点的法线方向的角度;;164.9 [功能] 去除多段线重点;;164.10 [功能] 判断点是否在曲线上;;164.11 [功能] 曲线长度;;164.12 [功能] 多段线子段数量;;164.13 [功能] 曲线中点;;164.14 [功能] 曲线一点的参数param;;164.15 [功能] 参数param处的坐标;;164.16 [功能] 多段线第n子段的起点坐标;;164.17 [功能] 多段线第n子段的终点坐标;;164.18 [功能] 多段线所点击子段的两端点列表;;164.19 [功能] 多段线所点击点最近的一个顶点;;164.20 [功能] 多段线所点击子段param(索引) ;;164.21 [功能] 多段线所点击子段的起点坐标;;164.22 [功能] 多段线所点击子段的终点坐标;;164.23 [功能] 多段线所击点离起点近;;164.24 [功能] 多段线所点击子段否是直线(返回nil是弧);;164.25 [功能] 求多段线上的弧段(圆或圆弧也有效)的圆心by caoyin ;;164.26 [功能] 求多段线上的弧段(圆或圆弧也有效)的圆心;;164.27 [功能] 判断多段线是否有圆弧(凸度/=0)的子段;;164.28 [功能] 判断多段线是否有圆弧(凸度/=0)的子段;;164.29 [功能] 连接线、弧成多段线;;164.30 [功能] 构造矩形by highflybird;;164.31 [功能] 点表生成多段线;;164.32 [功能] 3D多段线;;164.33 [功能] 多段线反向(起点反成终点) byzml84;;164.34 [功能] 多段线删除顶点;;164.35 [功能] 多段线增加顶点;;164.36 [功能] 多段线修改顶点;;164.37 [功能] 多段线拷贝子段;;164.38 [功能] 修改多段线子段;;164.39 [功能] 修改多段线子段为直线;;164.40 [功能] 点在封闭多段线内返回T，其余nil By 狂刀;;164.41 [功能] 点在封闭多段线内返回T，其余nil By SmcT ools ;;164.42 [功能] 判断点在封闭曲线内外，自交曲线不适用By Gu_xl ;;164.43 [功能] 点在封闭多段线内返回T;线上0;外nil ;;164.44 [功能] 多段线弧段全改为直线段;;164.45 [功能] 沿多段线取点，弧处按角度加密取点;;164.46 [功能] 多段线自相交by st788796[code="lisp];;164.1 [功能] 曲线是否封闭By 自贡黄明儒;;示例(HH:isClosed (car (entsel)))(defun HH:isClosed (obj)(vlax-curve-isClosed obj));;164.2 [功能]使多段线封闭(defun HH:MakeClosed (en / OBJ)(cond ((equal (type en) 'ENAME) (setq obj (vlax-ename->vla-object en)))((equal (type en) 'ENAME) (setq obj en))(T (exit)));;(if (equal (vlax-get obj 'Closed) 0) (vlax-put obj 'Closed -1)) (if (not (vlax-curve-isclosed obj)) ;(equal (vlax-get-property obj 'closed) :vlax-false) (vla-put-closed obj :vlax-true)));;164.3 [功能] 多段线端点列表By 自贡黄明儒;;示例(HH:PtLists (car (entsel)))(defun HH:PtLists (en)(mapcar 'cdr(vl-remove-if-not '(lambda (x) (= (car x) 10)) (entget en))));;164.4 [功能] 矩形中点坐标By 自贡黄明儒;;示例(HH:RectangCen (car (entsel)))(defun HH:RectangCen (en / PL X Y)(setq pl (vl-remove-if-not '(lambda (x) (= (car x) 10)) (entget en)))(setq pl (mapcar 'cdr pl))(mapcar '(lambda (X Y) (/ (+ X Y) 2.0)) (car pl) (caddr pl)));;示例(HH:RectangCen1 (car (entsel)))(defun HH:RectangCen1 (en / OBJ PL PL1 X Y)(setq obj (vlax-ename->vla-object en))(setq pl (vlax-safearray->list (vlax-variant-value (vla-get-coordinates obj))))(setq pl1 (cddddr pl))(mapcar '(lambda (X Y) (/ (+ X Y) 2.0))(list (car pl) (cadr pl))(list (car pl1) (cadr pl1))));;164.5 [功能] 参数param处的切线方向的角度;;示例(HH:ParamFirstAngle (car (entsel)) 1);;注1 (vlax-curve-getFirstDeriv obj param) 函数计算的值是曲线上在参数值为param点处的切线方向;;注2 param起始值为0 (defun HH:ParamFirstAngle (obj param)(setq pt (vlax-curve-getpointatparam obj param))(angle pt (mapcar '+ pt (vlax-curve-getFirstDeriv obj param))) );;164.6 [功能] 参数param处的法线方向的角度;;示例(HH:ParamSecondAngle (car (entsel)) 1);;注:param处是直线，则返回0.0(defun HH:ParamSecondAngle (obj param)(setq pt (vlax-curve-getpointatparam obj param))(angle pt (mapcar '+ pt (vlax-curve-getSecondDeriv obj param))) );;164.7 [功能] 曲线一点的切线方向的角度;;示例(HH:PtFirstAngle (car (entsel)) (getpoint))(defun HH:PtFirstAngle (obj pt)(setq param (vlax-curve-getParamAtPoint obj pt))(angle pt (mapcar '+ pt (vlax-curve-getFirstDeriv obj param))) );;164.8 [功能] 曲线一点的法线方向的角度;;示例(HH:PtSecondAngle (car (entsel)) (getpoint))(defun HH:PtSecondAngle (obj pt)(setq param (vlax-curve-getParamAtPoint obj pt))(angle pt (mapcar '+ pt (vlax-curve-getSecondDeriv obj param))) );;164.9 [功能] 去除多段线重点 By 自贡黄明儒;;示例(HH:Remove (car (entsel)))(defun HH:Remove (en / NEWDATA)(foreach e (entget en)(if (and (member e newdata) (= 10 (car e)))nil(setq newdata (cons e newdata))))(entmod (reverse newdata)));;164.10 [功能] 判断点是否在曲线上;;示例(HH:PtOnCurve (getpoint) (car (entsel)))(defun HH:PtOnCurve (pt curve)(equal pt (vlax-curve-getClosestPointTo curve pt) 0.00001) );;164.11 [功能] 曲线长度;;直线、圆弧、圆、多段线、优化多段线、样条曲线等图元;;示例(HH:GetCurveLength (car (entsel)))(defun HH:GetCurveLength (curve)(vlax-curve-getDistAtParam curve (vlax-curve-getEndParam curve)) );;164.12 [功能] 多段线子段数量;;相当于组码90;;示例(HH:GetCurveNum (car (entsel)))(defun HH:GetCurveNum (obj)(if (vlax-curve-isClosed obj)(fix (1- (vlax-curve-getendParam obj)))(fix (vlax-curve-getendParam obj))));;164.13 [功能] 曲线中点;;示例(HH:GetMidpointCurve (car (entsel)))(defun HH:GetMidpointCurve (curve / d)(setq d (/ (vlax-curve-getDistAtParam curve (vlax-curve-getEndParam curve)) 2)) (vlax-curve-getPointAtDist curve d) );;164.14 [功能] 曲线一点的参数param;;(HH:PtToParam (car (entsel)) (getpoint))(defun HH:PtToParam (obj pt)(vlax-curve-getParamAtPoint obj pt));;164.15 [功能] 参数param处的坐标;;(HH:ParamTopt (car (entsel)) 0)(defun HH:ParamT opt (obj param)(vlax-curve-getPointAtParam obj param));;164.16 [功能] 多段线第n子段的起点坐标;;示例(HH:GetSegStratPt (car (entsel)) 0)(defun HH:GetSegStratPt (curve n)(vlax-curve-getPointAtParam curve (fix n)));;164.17 [功能] 多段线第n子段的终点坐标;;示例(HH:GetSegEndPt (car (entsel)) 0)(defun HH:GetSegEndPt (curve n)(vlax-curve-getPointAtParam curve (1+ (fix n))));;164.18 [功能] 多段线所点击子段的两端点列表;;示例(HH:PickSegEndPt (car(setq en(entsel))) (cadr en)) (defun HH:PickSegEndPt (obj p / pp n)(setq pp (vlax-curve-getclosestpointto obj (trans p 1 0)) n (fix (vlax-curve-getparamatpoint obj pp)))(list (vlax-curve-getPointAtParam obj n)(vlax-curve-getPointAtParam obj (1+ n))));;164.19 [功能] 多段线所点击点最近的一个顶点 By 自贡黄明儒;;示例(HH:PickClosePt (car(setq en(entsel))) (cadr en)) (defun HH:PickClosePt (obj p / N P1 P2 PP)(setq pp (vlax-curve-getclosestpointto obj (trans p 1 0)) n (fix (vlax-curve-getparamatpoint obj pp)))(setq p1 (vlax-curve-getPointAtParam obj n))(setq p2 (vlax-curve-getPointAtParam obj (1+ n)))(if (< (distance pp p1) (distance pp p2))p1p2));;164.20 [功能] 多段线所点击子段param(索引) By 自贡黄明儒;;示例(HH:PickSegIndex (car(setq en(entsel))) (cadr en)) (defun HH:PickSegIndex (obj p / PP)(setq pp (vlax-curve-getclosestpointto obj (trans p 1 0)))(fix (vlax-curve-getparamatpoint obj pp)));;164.21 [功能] 多段线所点击子段的起点坐标By 自贡黄明儒;;示例(HH:PickSegStratPt (car(setq en(entsel))) (cadr en)) (defun HH:PickSegStratPt (obj p / pp n)(setq pp (vlax-curve-getclosestpointto obj (trans p 1 0)) n (fix (vlax-curve-getparamatpoint obj pp)))(vlax-curve-getPointAtParam obj n));;164.22 [功能] 多段线所点击子段的终点坐标By 自贡黄明儒;;示例(HH:PickSegEndPt (car(setq en(entsel))) (cadr en))(defun HH:PickSegEndPt (obj p / pp n)(setq pp (vlax-curve-getclosestpointto obj (trans p 1 0)) n (fix (vlax-curve-getparamatpoint obj pp)))(vlax-curve-getPointAtParam obj (1+ n)));;164.23 [功能] 多段线所击点离起点近By 自贡黄明儒;;示例(HH:PickToStart (car(setq en(entsel))) (cadr en))(defun HH:PickT oStart (curve p / L1 L2 PP)(setq pp (vlax-curve-getclosestpointto curve (trans p 1 0))) (setq L2 (vlax-curve-getDistAtParam curve (vlax-curve-getEndParam curve))) (setq L1 (vlax-curve-getDistAtPoint curve pp))(> (- L2 L1) L1));;164.24 [功能] 多段线所击子段是否是直线(返回nil是弧) By 自贡黄明儒;;示例(HH:PickArc (car(setq en(entsel))) (cadr en))(defun HH:PickArc (curve p / PP)(setq pp (vlax-curve-getclosestpointto curve (trans p 1 0))) (setq pp (vlax-curve-getSecondDerivcurve(fix (vlax-curve-getparamatpoint curve pp))))(equal pp '(0.0 0.0 0.0)));;164.25 [功能] 求多段线上的弧段(圆或圆弧也有效)的圆心by caoyin ;;(HH:GetCenter1 (entsel "\n选择多段线弧段: "))(defun HH:GetCenter1 (EP / E P)(mapcar 'set '(E P) EP)(setq P (apply 'vlax-curve-getClosestPointT o EP))(mapcar '+P(vlax-curve-getsecondderivE(vlax-curve-getParamAtPoint E P))));;164.26 [功能] 求多段线上的弧段(圆或圆弧也有效)的圆心;;(HH:GetCenter2 (car(setq en(entsel))) (cadr en))(defun HH:GetCenter2 (curve p / PP)(setq pp (vlax-curve-getclosestpointto curve (trans p 1 0))) (mapcar '+pp(vlax-curve-getsecondderivcurve(vlax-curve-getParamAtPoint curve pp))));;164.27 [功能] 判断多段线是否有圆弧(凸度/=0)的子段;;(HH:checkarc1 (car (entsel)))(defun HH:checkarc1 (en / BU N OBJ PLIST)(setq obj (vlax-ename->vla-object en))(setq plist (vlax-safearray->list (vlax-variant-value (vla-get-coordinates obj))))(setq n 0)(repeat (/ (length plist) 2)(if (/= (vla-getbulge obj n) 0)(setq bu T))(setq n (+ n 1)))bu);;164.28 [功能] 判断多段线是否有圆弧(凸度/=0)的子段;;(HH:checkarc2 (car (entsel)))(defun HH:checkarc2 (en / G)(setq G (vl-remove-if-not '(lambda (x) (= (car x) 42)) (entget en)))(not (vl-every 'zerop (mapcar 'cdr G))) ;(vl-remove 0.0 (mapcar 'cdr G)) );;164.29 [功能] 连接线、弧成多段线;;(HH:JionToPolyline)(defun HH:JionT oPolyline (/ PET SS)(setq pet (getvar "PEDITACCEPT"))(setvar "PEDITACCEPT" 1)(while (setq ss (ssget '((0 . "ARC,*LINE"))))(command "_.pedit" (ssname ss 0) "j" ss "" ""))(setvar "PEDITACCEPT" pet)(princ));;164.30 [功能] 构造矩形by highflybird(defun Make-Rectange (pt1 pt2)(entmake(list'(0 . "LWPOLYLINE") ;轻多段线 '(100 . "AcDbEntity")'(100 . "AcDbPolyline")'(90 . 4) ;四个顶点 '(70 . 1) ;闭合(cons 38 (caddr pt1)) ;高程(cons 10 (list (car pt1) (cadr pt1))) ;左下角(cons 10 (list (car pt2) (cadr pt1))) ;右下角(cons 10 (list (car pt2) (cadr pt2))) ;右上角(cons 10 (list (car pt1) (cadr pt2))) ;左上角(cons 210 '(0 0 1)) ;法线方向)));;164.31 [功能] 点表生成多段线(defun Make-LWPOLYLINE (lst / PT)(entmake (append (list '(0 . "LWPOLYLINE")'(100 . "AcDbEntity")'(100 . "AcDbPolyline")(cons 90 (length lst)))(mapcar '(lambda (pt) (cons 10 pt)) lst) )));;164.32 [功能] 多段线反向(起点反成终点) byzml84;;(HH:LWPOLYLINEFX (car (entsel)))(defun HH:LWPOLYLINEFX (EN / A B C D ENT LST LST1 TMP) (setq ENT (entget EN))(setq tmp ent)(while (setq tmp (member (assoc 10 tmp) tmp))(setq a (assoc 10 tmp)b (cons 40 (cdr (assoc 41 tmp)))c (cons 41 (cdr (assoc 40 tmp)))d (cons 42 (- (cdr (assoc 42 tmp))))LST (append (list b c d a) LST))(setq tmp (cddddr tmp)))(repeat 3 (setq LST (append (cdr lst) (list (car lst)))))(setq lst1 (reverse (cdr (member (assoc 10 ent) (reverse ent))))) (entmod (append lst1 lst '((210 0 0 1)))))[/code];;164.33 [功能] 多段线删除顶点By 自贡黄明儒(defun HH:delLwpolyPt (/ EN ENT L1 L2 P P1 P2 P90 SS X Y) (setq p1 (getpoint))(setq p2 (getcorner p1))(if (setq ss (ssget "C" p1 p2 '((0 . "LWPOLYLINE")))) (progn(setq en (ssname ss 0))(setq ENT (entget EN))(if (> (setq P90 (cdr (assoc 90 ent))) 2)(progn(setq p (mapcar '(lambda (X Y) (/ (+ X Y) 2.0)) p1 p2))(setq p (vlax-curve-getclosestpointto en (trans p 1 0)))(setq p1 (HH:PickClosePt en p))(setq p1 (list 10 (car p1) (cadr p1)))(setq L2 (cddddr (member p1 ent))) ;后段(setq L1 (reverse (cdr (member p1 (reverse ent))))) ;前段(setq ent (append L1 L2))(entmod (subst (cons 90 (1- P90)) (assoc 90 ent) ent)) )))));;示例(HH:delLwpolyPt1 (car(setq en(entsel))) (cadr en)) By 自贡黄明儒(defun HH:delLwpolyPt1 (en p / ENT L1 L2 P1) (setq ENT (entget en))(setq p (vlax-curve-getclosestpointto en (trans p 1 0)))(setq p1 (HH:PickClosePt en p)) ;离p最近的顶点 (setq p1 (list 10 (car p1) (cadr p1)))(setq L2 (cdr (member p1 ent))) ;后段(setq L1 (reverse (cdr (member p1 (reverse ent))))) ;前段(entmod (append L1 L2)));;164.34 [功能] 多段线增加顶点By 自贡黄明儒;;示例(HH:LwAddVertex (car(setq en(entsel))) (cadr en))(defun HH:LwAddVertex (en pt / EN GR N PP);;增加一个顶点(defun LwAddVertex (obj index pt bugle sw ew)(vlax-invoke obj 'addvertex index pt)(vla-setbulge obj index bugle)(vla-setwidth obj index sw ew))(setq pp (vlax-curve-getClosestPointT o en (trans pt 1 0)))(setq n (fix (vlax-curve-getParamAtPoint en pp)))(setq obj (vlax-ename->vla-object en))(vla-GetWidth obj n 'sw 'ew)(setq pp (getpoint "\n 新增点"))(setq pp (mapcar '+ '(0 0) pp))(vl-catch-all-apply 'LwAddVertex (list obj (1+ n) pp 0 sw sw)) );;164.35 [功能] 多段线修改顶点By 自贡黄明儒;;示例(HH:ModifyVertex (car(setq en(entsel))) (cadr en)(getpoint)) (defun HH:ModifyVertex (en pt newPt / ENT L1 L2 NPT P P10)(setq p (HH:PickClosePt en pt))(setq p10 (list 10 (car p) (cadr p)))(setq ent (entget en))(setq L2 (cdr (member p10 ent)))(setq L1 (reverse (cdr (member p10 (reverse ent)))))(setq Npt (list (list 10 (car newPt) (cadr newPt))))(entmod (append L1 Npt L2)));;(HH:ModifyVertex1 (car(setq en(entsel))) (cadr en)) By 自贡黄明儒(defun HH:ModifyVertex1 (en p / ENT GR L1 L2 NPT P10) (setq ent (entget en))(setq pt (HH:PickClosePt en p))(setq p10 (list 10 (car pt) (cadr pt)))(setq L2 (cdr (member p10 ent)))(setq L1 (reverse (cdr (member p10 (reverse ent)))))(while (and (setq gr (grread 5)) (= (car gr) 5))(setq Npt (list (list 10 (car (cadr gr)) (cadr (cadr gr)))))(entmod (append L1 Npt L2))));;164.36 [功能] 多段线拷贝子段By 自贡黄明儒;;(HH:CopyLwSeg (car(setq en(entsel))) (cadr en))(defun HH:CopyLwSeg (en p / ENT L0 L1 L2 LASTENT N P1 PP TEM) (setq pp (vlax-curve-getClosestPointT o en p)) (setq n (fix (vlax-curve-getParamAtPoint en pp)))(setq p1 (vlax-curve-getPointAtParam en n))(setq p1 (list 10 (car p1) (cadr p1)))(setq ent (entget en))(setq tem (member p1 ent))(repeat 8 (setq L0 (cons (car tem) L0)) (setq tem (cdr tem))) (setq L0 (reverse L0))(setq L2 (list (last tem)))(setq L1 (list'(0 . "LWPOLYLINE")'(100 . "AcDbEntity")'(100 . "AcDbPolyline")'(90 . 2)))(entmake (append L1 l0 L2))(setq Lastent (entlast))(command "_.move" Lastent "" pp pause));;164.37 [功能] 修改多段线子段By 自贡黄明儒;;示例(HH:ModifySeg (car(setq en(entsel))) (cadr en))(defun HH:ModifySeg (en p / ENT GR I L1 L2 N P1 P2 P42 PP X Y);;133.1 [功能] 旋转一个点(见113);;Rotate 'pnt'点from a base point of 'p1' and through an angle of 'ang' (in radians) (defun MJ:rotate_pnt (pnt p1 ang) (polar p1 (+ (angle p1 pnt) ang) (distance p1 pnt)));;两点之中点(defun mid (p1 p2 / X Y)(mapcar '(lambda (X Y) (/ (+ X Y) 2.0)) p1 p2));;已知三点p1 p2 p，求组码42(defun my42 (p1 p2 pt / CEN D H P1P2 P1T P2P1 PT1 R)(setq d (/ (distance p1 p2) 2.0))(setq p1p2 (mid p1 p2))(setq p2p1 (MJ:rotate_pnt p1 p1p2 (/ pi 2))) (setq pt1 (mid p1 pt))(setq p1t (MJ:rotate_pnt p1 pt1 (/ pi 2)))。
autolisp函数大全.doc
函数大全一、数学运算功能函数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程序。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
;;示例(HH:ParamSecondAngle (car (entsel)) 1)
;;注:param处是直线，则返回0.0 (defun HH:ParamSecondAngle (obj param)
(setq pt (vlax-curve-getpointatparam obj param)) (angle pt (mapcar '+ pt (vlax-curve-getSecondDeriv obj param))) )
;;示例 (HH:GetSegEndPt (car (entsel)) 0) (defun HH:GetSegEndPt (curve n)
(vlax-curve-getPointAtParam curve (1+ (fix n))) )
;;164.18 [功能] 多段线所点击子段的两端点列表
;;164.8 [功能] 曲线一点的法线方向的角度
;;示例(HH:PtSecondAngle (car (entsel)) (getpoint))
(defun HH:PtSecondAngle
(obj pt)
(setq param (vlax-curve-getParamAtPoint obj p点坐标 By 自贡黄明儒
;;示例(HH:RectangCen (car (entsel)))
(defun HH:RectangCen (en / PL X Y) (setq pl (vl-remove-if-not '(lambda (x) (= (car x) 10)) (entget en))) (setq pl (mapcar 'cdr pl)) (mapcar '(lambda (X Y) (/ (+ X Y) 2.0)) (car pl) (caddr pl))
((equal (type en) 'ENAME) (setq obj en))
(T (exit))
)
;;(if (equal (vlax-get obj 'Closed) 0) (vlax-put obj 'Closed -1))
(if (not (vlax-curve-isclosed obj)) (vla-put-closed obj :vlax-true)
(setq pl1 (cddddr pl)) (mapcar '(lambda (X Y) (/ (+ X Y) 2.0))
(list (car pl) (cadr pl)) (list (car pl1) (cadr pl1)) ) )
;;164.5 [功能] 参数param处的切线方向的角度
;;示例(HH:ParamFirstAngle (car (entsel)) 1)
;;示例(HH:isClosed (car (entsel)))
(defun HH:isClosed (obj) (vlax-curve-isClosed obj)
)
;;164.2 [功能]使多段线封闭
(defun HH:MakeClosed (en / OBJ)
(cond
((equal (type en) 'ENAME) (setq obj (vlax-ename->vla-object en)))
)
;;示例(HH:RectangCen1 (car (entsel)))
(defun HH:RectangCen1 (en / OBJ PL PL1 X Y) (setq obj (vlax-ename->vla-object en)) (setq pl (vlax-safearray->list (vlax-variant-value (vla-get-coordinates obj))))
(vlax-curve-getParamAtPoint obj pt) )
;;164.15 [功能] 参数param处的坐标
;;(HH:ParamTopt (car (entsel)) 0) (defun HH:ParamTopt (obj param)
(vlax-curve-getPointAtParam obj param) )
(if (vlax-curve-isClosed obj) (fix (1- (vlax-curve-getendParam obj))) (fix (vlax-curve-getendParam obj))
) )
;;164.13 [功能] 曲线中点
;;示例 (HH:GetMidpointCurve (car (entsel))) (defun HH:GetMidpointCurve (curve / d)
;(equal (vlax-get-property obj 'closed) :vlax-false)
) )
;;164.3 [功能] 多段线端点列表 By 自贡黄明儒
;;示例(HH:PtLists (car (entsel)))
(defun HH:PtLists (en) (mapcar 'cdr (vl-remove-if-not '(lambda (x) (= (car x) 10)) (entget en)) )
(angle pt (mapcar '+ pt (vlax-curve-getSecondDeriv obj param)))
)
;;164.9 [功能] 去除多段线重点 By 自贡黄明儒
;;示例(HH:Remove (car (entsel)))
(defun HH:Remove (en / NEWDATA)
;;164.19 [功能] 多段线所点击点最近的一个顶点 ;;164.20 [功能] 多段线所点击子段param(索引) ;;164.21 [功能] 多段线所点击子段的起点坐标 ;;164.22 [功能] 多段线所点击子段的终点坐标 ;;164.23 [功能] 多段线所击点离起点近 ;;164.24 [功能] 多段线所点击子段否是直线(返回nil是弧) ;;164.25 [功能] 求多段线上的弧段(圆或圆弧也有效)的圆心 by caoyin ;;164.26 [功能] 求多段线上的弧段(圆或圆弧也有效)的圆心 ;;164.27 [功能] 判断多段线是否有圆弧(凸度/=0)的子段 ;;164.28 [功能] 判断多段线是否有圆弧(凸度/=0)的子段 ;;164.29 [功能] 连接线、弧成多段线 ;;164.30 [功能] 构造矩形 by highflybird ;;164.31 [功能] 点表生成多段线 ;;164.32 [功能] 3D多段线 ;;164.33 [功能] 多段线反向(起点反成终点) byzml84 ;;164.34 [功能] 多段线删除顶点 ;;164.35 [功能] 多段线增加顶点 ;;164.36 [功能] 多段线修改顶点
(setq d (/ (vlax-curve-getDistAtParam curve (vlax-curve-getEndParam curve)) 2)) (vlax-curve-getPointAtDist curve d) )
;;164.14 [功能] 曲线一点的参数param
;;(HH:PtToParam (car (entsel)) (getpoint)) (defun HH:PtToParam (obj pt)
(foreach e (entget en)
(if
(and (member e newdata) (= 10 (car e)))
nil
(setq newdata (cons e newdata))
)
)
(entmod (reverse newdata)) )
;;164.10 [功能] 判断点是否在曲线上 ;;示例(HH:PtOnCurve (getpoint) (car (entsel))) (defun HH:PtOnCurve (pt curve)
;;164.1 [功能] 曲线是否封闭 ;;164.2 [功能]使多段线封闭 ;;164.3 [功能] 多段线端点列表 ;;164.4 [功能] 矩形中点坐标 ;;164.5 [功能] 参数param处的切线方向的角度 ;;164.6 [功能] 参数param处的法线方向的角度 ;;164.7 [功能] 曲线一点的切线方向的角度 ;;164.8 [功能] 曲线一点的法线方向的角度 ;;164.9 [功能] 去除多段线重点 ;;164.10 [功能] 判断点是否在曲线上 ;;164.11 [功能] 曲线长度 ;;164.12 [功能] 多段线子段数量 ;;164.13 [功能] 曲线中点 ;;164.14 [功能] 曲线一点的参数param ;;164.15 [功能] 参数param处的坐标 ;;164.16 [功能] 多段线第n子段的起点坐标 ;;164.17 [功能] 多段线第n子段的终点坐标 ;;164.18 [功能] 多段线所点击子段的两端点列表
;;164.37 [功能] 多段线拷贝子段
;;164.38 [功能] 修改多段线子段
;;164.39 [功能] 修改多段线子段为直线
;;164.40 [功能] 点在封闭多段线内返回T，其余nil By 狂刀
;;164.41 [功能] 点在封闭多段线内返回T，其余nil By SmcTools
;;164.42 [功能] 判断点在封闭曲线内外，自交曲线不适用 By Gu_xl
;;164.43 [功能] 点在封闭多段线内返回T;线上0;外nil
;;164.44 [功能] 多段线弧段全改为直线段
;;164.45 [功能] 沿多段线取点，弧处按角度加密取点
;;164.46 [功能] 多段线自相交 by st788796[code="lisp]