AutoCAD二次开发所用的autolisp函数

不得不爱

AutoCAD二次开发所用的autolisp函数 本文介绍了AutoCAD二次开发所用的autolisp函数。
2 o/ \+ e3 D5 n" F' k2 }　　一、数学运算功能函数
　　1.l(十 数值 数值…)返回：累计实数或整数数值
8 S0 s9 M  s2 L# O+ c　　1.2(一 数值 数值…)返回：差值
, D% G: w- c/ g, {　　1.3(* 数值 数值…)返回：所有数值乘积
8 E  r4 s, t1 h! q# @　　1.4(/ 数值 数值…)返回：第一个数值除以第二个以后数值的商
% N' U( e7 ~' P: M' @  R　　1.5(l十 数值)返回：数值十l
　　l. 6(1— 数值)返回：数值一l
　　l.7(abs 数值)返回：数值的绝对值
$ H8 U9 B  Q$ f6 v5 a/ r　　1.8(atan 数值)返回：反正切值
$ j( [9 @7 M9 U3 o5 H5 d　　1.9(cos 角度)返回：角度的余弦值，角度值为弧度
  D! p# g6 x4 t( j# m$ {　　1.10(exp 数值)返回：数值的指数
( c: `: f2 |6 _2 d1 C- R9 O　　1.11(expt 底数指数)返回：底数的指数值
　　1.12(fix 数值)返回：将数值转换为整数值
　　1.14(gcd 数值1 数值2)返回：两数值的最大公因数
　　1.15(log 数值)返回：数值的自然对数值
3 V3 l! r8 z8 o! h: u2 ?6 R! n　　1.16(max 数值 数值…)返回：数值中的最大值
　　1.17(min 数值 数值…)返回：数值中的最小值
( ]  ^0 [6 j( m0 i' C" b　　1.18 pi 常数∏，其值约为3.1415926
　　1.19(rem 数值 1数值 2)返回：M数值的相除的余数
3 W8 H. d( O0 ]/ S- d# q　　l.20(sin 角度)返回：角度的正旋值，角度值为弧度
　　1.21(sqrt 数值)返回：数值的平方根
　　二、检验与逻辑运算功能函数
8 t1 E5 \: T% H& \$ o5 R　　2.l(= 表达式1 表达式2)比较表达式1是否等于式2，适用数值及字符串
8 L/ A7 y. v: L4 Y/ }　　2.2 (/= 表达式1 表达式2)比较表达式1是否大于等于表达式2
　　2.3(< 表达式1 表达式2) 比较表达式1是否<小于表达式2
　　2.4(<= 表达式1 表达式2)比较表达式1是否<一小于等于表达式2
　　2.5(> 表达式1 表达式2) 比较表达式1是否>大于表达式2
* q: _. ?* M! |" m, t( _" p　　2.6(>= 表达式1 表达式2) 比较表达式1是否大于等于表达式2
　　2.7 (～ 数值)返回：数值的位 not值，(1的补码)
$ E  U: }; N9 V6 a; F" Y0 @1 K9 Y　　2.8 (and 表达式1 表达式2…)返回：逻辑and的结果
* c* J  Q! ?/ I　　2.9(boole 函数 整数 整数…)返回：位式布尔运算
5 A* w) v, n5 K  b2 Y$ E- ], J　　2.10(eq 表达式1 表达式2)比较表达式1与表达式2是否相同，适用列表比较(实际相同)
* G7 |3 y0 C& f, q, Z; C/ N0 Q　　2.11(equal 表达式 1表达式 2[差量])比较表达式 1与表达式 2是否相同，差量可省略(内容相同)
6 K7 W2 B1 k, O0 d　　三、转换运算功能函数
　　3.l(angtof 字符串[模式])返回：角度值的字符串转成实数
　　3.2(angtos 角度[模式[精度]])返回：角度转成的字符串值
$ c5 N7 G. e2 E* q( B  f2 Q　　3.3(atof 字符串)返回：字符串转成实数值
　　3.4 (atoi 字符串)返回：字符串转成整数值
5 A. |2 s  w5 C　　3.5 (cvunit 数值 原始单位 转换单位)返回：数值转换单位后的值转换根据acad.nut文件
0 P  O8 @8 \1 h/ z9 n" ]　　3.6(distof 字符串 [模式])返回：根据模式将字符串转成实数值
　　3.7(itoa 整数)返回：整数转成字符串
　　3.8(rtos 数值 模式[精度])返回：实数转成字符串
　　3.9 (trans 点 原位置 新位置[位移]) 返回：转换坐标系统值
+ m- k1 j1 b3 ^# P- ?% g　　四、列表处理功能函数
　　4.1 (append 列表 列表……) 结合所有列表成一个列表
　　4.2(assoc 关键元素 联合列表)根据关键元素找寻联合列表中关系信息
　　4.3 (car 列表)返回列表中的第一个元素，通常用来求X坐标
; O$ n& ^) U) k  \　　4.4(cadr 列表)返回列表中的第二个元素，通常用来求y坐标
1 t4 Z% P# v8 e# t2 X　　4.5(caddr 列表)返回列表中的第三个元素，通常用来求Z坐标
; Y, X% m& ]. r; p　　4.6(cdr 列表)返回：除去第一个元素后的列表
! p) O; ?% Z; x$ W- v0 ]　　4.7(cons 新元素 列表)返回：将新元素添加到列表
　　4.8(foreach 名称 列表 表达式)返回：将列表的每一元素对应至名称再根据表达式执行响应
2 B* M* |' F& ~* O6 T" p% ?4 j　　4.9(length 列表)返回：列表内的元素数量
: M, G, Q& M6 k$ `: l; N1 A　　4.10(list 元素 元素…)返回：将所有元素合并为一列表
+ o+ u6 C9 {- @  H# E% v　　4.11(listp 元素)返回：判断元素是否为一串
　　4.12(mapcar函数 列表1列表2…)返回：将列表1、列表2列表的元素配合函数，求得新列表
　　4.13(member 关键元素列表)返回：根据关键元素(含似后的列表
　　4.14(nth n 列表)返回：列表的第n个元素
& f% w+ E! I7 V: s( D3 R' |9 I  F/ W　　4.15(reverse 列表)返回：将列表元素根据顺序颠倒过来的列表
　　4.16(subst 新项旧项列表)返回：替换新旧列表后的列表
4 Z, c$ a; A  ]3 L　　五、字符串、字符、文件处理函数
　　5.l(ascii 字符串)返回：字符串第一个字符的“ASCII”码
1 R0 ]; s9 Q! M9 `　　5.2 (chr 整数)返回：整数所对应的ASCII单一字符串
; C* ~' L1 X' X2 r* O# u7 g　　5.3(close 文件 名称)关闭文件
9 D+ e9 p: r+ @  U: F3 z　　5.4(open 文件名 模式)返回：打开文件代码，准备读取或写入信息
　　5.5(read 字符串)返回：列表中的字符串的第一组元素
　　5.6(read-char[文件代码])返回：通过键盘或文件中读取单一字符
　　5.7(read-line [文件代码])返回：经由键盘或文件中读取一行字符串
　　5.8(strcase 字符串[字样])返回：转换字符串大小写
　　5.9(strcat 字符串1字符串2…)返回：将各字符串合并为一个字符串
5 A% b# H* k8 a+ `2 R, ]3 F　　5.10(strlen 字符串)返回：字符串构成的字符数(即字符串长度)
　　5.11(substr 字符串 起始 长度)返回：取出于字符串‘
　　5.12(wcmatch 字符串 格式)返回：T或 nil，将字符串与通用字符进行比较
　　5.13(write-char数值[文件代码])返回：将一ASCII字符写到文件或屏幕
! b3 T& l- h8 I% ~7 ]0 f& X# x9 u/ D　　15.14(write-line字符串[文件代码])返回：将字符串写到文件或屏幕上
1 A% E: U7 P: c& [9 m　　六、等待输入功能函数
# D5 u# `0 O: j1 Y8 t0 |　　6.l (getangle [基点] [提示])请求输入十进制角度数值，响应一个弧度值提示及参考点可有可无
6 ~; V: P1 H) d2 w4 W　　6.2(getcorner 基点[提示])请求输入另一矩形框对角点坐标
　　6.3(getdist [基点][提示])请求输入一段距离
" m. s9 F4 o' o8 V- N* t: I　　6.4(getint [提示])请求输入一个整数值
　　6.5(getkword [提示]请求输入“关键词”
6 I* X# D: ^* D, `　　6.6(getorient [基点][提示])请求输入十进制角度，响应一弧度值不受angbase、angdir影响
　　6.7(getPoint [基点][提示])请求输入一个点的坐标
" N: B, o* ?4 l9 A/ p% b( g　　6.8(getreal [提示]请求输入一个实数
　　6.9(getstring [提示])请求输入一个字符串
　　6.10(initget [位]字符串)设定下次getxxx函数的有效输入
　　七、几何运算功能函数
2 ]* [2 }6 b# g　　7.l(angle 点1 点2)取得两点的角度弧度值
　　7.2(distance 点1 点2)取得两点的距离
# V9 m( V/ h; W& [- p　　7.3(inters 点1 点2 点3 点 4[模式])取得两条线的交点
　　7.4(osnap 点 模式字符串)按照捕捉模式取得另一坐标点
+ j8 g  N7 y! d+ y4 f9 y6 D$ Y' m　　7.5(polar 基点 弧度 距离)按照极坐标法取得另一坐标点
　　7.6(textbox 对象列表)取得文字字符串的两个对角点坐标
$ ^8 q! L- L  ]" q3 q0 |　　八、对象处理功能函数
. r' K5 k/ t' _9 s　　8.l(entdel 对象名称)删除或取消删除对象
8 E1 A/ k3 i/ d$ E5 r1 n　　8.2(entget 对象名称[应用程序列表])取出对象名称的信息列表
! a  _$ Q% u0 t　　8.3 (entlast) 取出图形信息中的最后一个对象
( H8 E7 N4 b1 B　　8.4(entmake 对象列表)建立一个新的对象列表
: {5 S9 b7 Q/ Q2 ^2 S　　8.5(entmod 对象列表)根据更新的信息列表更新屏幕上元体
　　8.6(entnext [对象名称])找寻图面中的下一个对象
! T4 B  r& ]  W0 x　　8.7(entsel [提示])请求选取一个对象，响应包含对象名称及选点坐标的列表;
　　8.8(entupd 对象名称)更新屏幕上复元体图形
　　8.9(handent 图码)返回：图码的元体名称
: P( x, J/ z/ w6 t  ^5 }　　8.10(nentsel[提示])返回：BLOCK所含副元体对象信息列表
3 U$ k/ S, B8 B5 i+ F4 V　　8.11(nentselp [提示][点])返回：BLOCK所含副元体对象信息似4*4矩形表示)
' j5 C& D" C: e; k4 h3 j' e　　九、选择集、符号表处理函数
& Z9 p3 R0 z' O; L　　9.l(ssadd [对象名称][选择集])将对象加入选择集或建立一新选择集
　　9.2(ssdel 对象名称选择集)将对象自选择集中移出
9 |6 P5 k' o- l+ i  F' K/ a　　9.3(ssget [模式][点 1][点 2]取得一个选择集
8 A9 }/ k1 g- J9 @" A& E　　9.4(ssget ”X” [过滤列表])取得根据过滤列表所指定范围的选择集
3 K% ?. B8 D$ e5 c6 U　　9.5(sslenth 选择集)计算选择集的对象个数
　　9.6(ssmemb 对象名称选择集)响应对象名称是否包含于选择集内
4 L/ P4 M2 C$ Y' `　　9.7(ssname 选择集索引值)根据索引值取出选择集中的对象名称
+ K' d0 B9 d$ K% {5 {* F4 u　　9.8(tblnext 符号表名称[T])检视符号表，有效的符号表：”LAYER”、”LTYPE”、”VIEW”、
　　”STYLE”、”BLOCK”
　　9.9(tblsearch 符号表名称 符号)在符号表中搜寻符号
, W6 X9 C; D& W: k! N6 K& n0 m　　十 、AutoCAD相关查询、控制功能函数
　　10.l(command ”AutoCAD命令”…)超重量级函数，调用执行 AutoCAD命令
　　10.2(findfile 文件名)返回：该文件名的路径及文件名
' _  y  a# f% V: `! v　　10.3(getfiled 标题 内定档名 扩展名 旗号)通过标准 AutoCAD文件对话 DCL对话框获得文件
) e0 ^+ h. t1 T' e: R' K　　10.4(getenv ”环境变量”)取得该环境变量的设定值，以字符串表示
　　10.5(getvar ”系统变量”)取得该系统变量的设定值，以字符串表示
　　10.6(setvar ”系统变量”值)设定该系统变量的值
　　10.7(regapp 应用类项)将目前的AutoCAD图形登记为一个应用程序名称
　　十一、判断式、循环相关功能函数
　　11.1(If <比较式> <表达式1> [表达式2] 检算比较式结果，如果为真，执行<表达式1>，否则执行<表达式2>
* V' q2 h( A6 e) }- s2 z2 ]　　11.2( repeat 次数 [< 表达式> <表达式>…])重复执行 N次表达式
　　11.3(While <比较式> <表达式>…) 当条件成立则执行表达式内容
  G7 C2 h# x+ X# m$ v　　11.4(cond <比较式 1> <表达式 1> 多条件式的 if整合功能
& S! y( g  T2 t' N, [* |: e　　<比较式2> <表达式2>
　　<比较式3> <表达式3>)
　　11.5 ( prong 表达式1 表达式2…) 连接其中的表达式为一组，常用于配合if、cond等函数
' I9 R  e, R1 U　　十二、函数处理、定义、追踪与错误处理功能函数
　　12.l(*error* 字符串)程序错误时的警示信息
　　12.2(alert 字符串)以对话框式显示出警告字符串
, W2 h4 s! K8 \# J! ]　　12.3(apply 功能函数列表)将功能函数与列表结合后执行
　　12.4(defun 名称 自变量列表表达式_.)自定函数或子程序
3 U: e) ?; p* X/ n  H1 u& k; e6 I　　12.5(eval 表达式)返回：表达式的执行结果
/ y9 b6 q* o5 f* B. X1 [7 r　　12.6(exit)强制退出目前的应用程序
) o( K' h+ D: N$ k, G; t　　12.7(lambda 自变量表达式)定义未命名的函数
　　12.8(progn 表达式1 表达式2…)连接其内的表达式为一组，常用于配合if、cond等函数
　　12.9(quit)强制退出目前的应用程序
0 v' s) h8 P7 E; T( N" N　　12.10(tablet 代码 [列1列2列3方向])取用或建立对数字板的校调
" {* e4 G) p$ E9 c5 d- P　　12.11(trace 函数…)对函数设定追踪标记，辅助检错
1 j9 n" i7 X$ J9 e& J2 M% U　　12.12(untrace 函数…)对函数设定解除追踪标记
　　十三、显示、打印控制功能函数
$ \% u: M, z& g# N4 J9 K/ Q3 Q　　13.l(gfaphscr)作图环境切换到图形画面
6 Z& O) B6 R0 m- }　　13.2(grclear)暂时清除模前的屏幕画面
　　13.3(grdraw起点终点颜色[亮显])暂时性的画出一条线
% ^- g& G5 K/ @0 a) \9 y8 S　　13.4(grread[追踪])由输入设备读取追踪值
/ W/ {0 j8 q4 f; v　　13.5(grtext位置字符串[亮显])将字符串显示在状态列或屏幕菜单上
　　13.6(grvecs向量列表[转置矩阵])暂时性的画出多条线
) p1 j- I( C, q4 \　　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) 在屏幕上显示新列
; l+ T; f1 A/ T, J! e( G! ]( D3 G　　13.14(textscr) 作图环境切换到文字画面
　　13.15(textpage)清除文字画面文字类似 DOS的cls命令
% ]/ c" F8 N1 V1 g1 a/ x　　13.16(vports)返回：窗口组态列表
　　十四、符号、元素、表达式处理功能函数
) K% n4 h% k& |* q% C- [; |　　14.l(atom元素)如果元素不是列表，响应T，否则为nil
; d9 b! H* ~, h- ?( K　　14.2(atoms-family格式闲号列表])返回：一组己定义函数的符号列表
　　14.3(boundp表达式)返回：T或 nil，响应表达式是否有值存在
　　14.4(minusp元素)返回：T或n儿 元素是否为负值
　　14.5(not元素)返回：T或n儿 判定元素是否为ni1
　　14.6(null元素)返回：T或nil判定元素是否被赋予nil值
. W* H) |% @+ l　　14.7(numberp元素)返回：T或nil，元素是否为整数或实数
　　14.8(quote表达式)响应表达式未检算前状态，同“‘”功能
　　14.9(set符号 表达式)将表达式结果设定给带单引号’符号
+ P4 p4 E- B" V  F/ g- G$ L　　14.10(setq符号1 表达式1[符号2表达式2]…)设定表达式结果给各符号
) K! {" H+ H* J2 _1 Q) V　　14.11(type元素)返回：元素的信息型态
- V( @! @) `1 C. G# c　　14.12(zerop元素)返回：T或nil，元素是否为0值
　　十五、ADS、ARX、AutoLISP加载与卸载函数
7 a; r6 i* B+ h7 I( |　　15.l(ads)返回：目前加载ADS程序列表
8 q. o6 n" c% }. K; t' _　　15.2(arx)返回：目前加载 ARX程序列表
　　15.3(arxload应用程序[出错处理]))返回：加载 ARX程序
' v# h" b- H' u& k+ G　　15.4(arxunload应用程序[出错处理]))返回：卸载 ARX程序
　　15.5(ver) 返回：目前 AutoLISP版本字符串
/ }6 ~2 p/ p) O5 L1 l　　15.6(load LSP文件名[加载失败])加载 AutoLISP文件(*.lsp)
% k& x( L- O4 l$ A) R. {　　15.7 (xload应用程序[错处理])加载ADS应用程序
　　15.8 (xunloa应用程序[出错处理])卸载 ADS应用程序
　　十六、内存空间管理函数
! S2 v# S" _% K; k5 a, Q　　16.l(alloc数值)以节点数值设定区段大小
　　16.2(expand数值)以区段数值配置节点空间
8 A) S! k& s. ~　　16.3(gc)强制收回废内存
　　16.4(mem)显示目前的内存使用状态
5 h! g; w' l; Q1 V7 z. f　　16.5(xdroom对象名称)返回对象扩展信息允许使用的内存空间
3 k( z& v; Q- O3 L: j　　16.6(xdsize列表)返回对象扩展信息所占用的内存空间
　　十七、其它重要的功能函数
　　17.l(acad _colordlg 颜色码 旗号)显示出标准 AutoCAD颜色选择对话框
) _4 S/ ~: \5 a1 {　　17.2(acad_helpdlg 求助文件名 主题)显示出标准 AutoCAD求助对话框
　　17.3(acad_strlsort字符串列表)作字符串列表排序
　　17.4(bherrs) 取得 bhatch与 bpcly失败所产生的错误信息
　　17.5(bhatch点[选择集[向量]])根据 Pick point选点方式调用 bhatch命令，绘制选集区域的剖面线
　　17.6(bpoly点[选择集[向量]])根据Pick point选点方式调用bpoly命令并产生一定域Polyline
　　17.7(cal计算式字符串)执行如 CAL计算功能
1 C' r# f! L, Q　　十八、ADS、ARX外部定义的3D函数
　　18.1(align自变量 1 自变量 2....)执行如 ALIGN命令各选项顺序
' m. t' X& X- [; l　　18.2(c：3dsin模式3DS文件名)导入3DS文件
" \' A8 h0 ^. p& t5 {' ~- H　　18.3(C：3dsout模式3DS文件名)输出3DS文件
2 Q# P  @. ~* X1 @8 x' p　　18.4(c：background模式[选项])设定渲染背景
　　18.5(C：fog模式[选项])设定渲染的雾效果
0 K  G  Q3 Z' c$ v3 `　　18.6(C：light模式[选项])设定渲染的灯光控制
  P3 A3 K  r/ m& h　　18.7(c：lsedit模式【选项1】设定渲染的景物控制
* @5 f  B0 D4 p, G' L/ q　　18.8(C：lslib模式[选项])管理景物图库
: U0 ]0 M8 E/ u$ [1 o0 b. T　　18.9(c：matilb模式 材质 材质库名)管理材质数据库
( k) r  O2 U4 R) }1 B　　18.10(c：mirror3d 自变量1 自变量2……)执行如MIRROR3D命令
3 j: J  O! u& A$ W( p3 L　　18.11(C：psdrap模式)根据模式设定值(0或1)，传唤psdrap命令
: t/ X, }! a" H6 e0 n! l% e　　18.12(C：psfill对象名称 图案名称[自变量1[自变量2]])以POStSCript图案填满
# l9 L/ V5 r: K4 j/ d  `$ J　　18.13(c：psin文件名 位置 比例)插入一个Postscript(*.eps)文件
% S4 i* c0 z7 S, I$ _5 R　　18.14(c：render[渲染文件])执行渲染效果
) T0 v1 D7 U! v+ k( S4 k, d　　18.15(C：rfileopt格式 自变量1 自变量2 自变量3…)设定执行渲染选项
　　18.16(c：replay影像文件名 影像类别[选项])展示影像文件TGA、BMP、TIF
3 Q& ?  t& `( M- u　　18.17(C：rmat模式 选项)控管材质建立、贴附、编辑、分离
3 n: J1 I0 Q2 a1 a. \8 j　　18.18(c：rotate3d自变量 1 自变量2…)执行如 ROTATE3D命令各选项顺序
+ s- x, q* V# C! Q　　18.19(C：rpref模式 选项[设定])渲染环境设定
　　18.20(c：saveimg影像文件名影像类别[选项])储存图像文件TGA、BMP、TIF
1 J$ e: e& l2 g　　18.21 (c：scene模式 [选项]) SCENE场景管理
　　18.22(C：setuv模式 选集 自变量1 自变量2…)SETUV贴图模式管理
　　18.23(C：showmat自变量1)显示对象的材质贴附信息
6 F- Z6 R5 I- f　　18.24(C：solprof自变量 1 自变量工..)建立 3D实体的轮廓影像
% J9 L1 ^1 @; W! B( X　　18.25(C：StatS[渲染信息文件])显示渲染信息统计信息
　　十九、ADS、ARX外部定义的数据库相关函数
9 }2 r, }  r" U: J# G9 t- S( R! S　　19.l(c：aseadmin自变量1 自变量2…)管理外部数据库
3 E! z: t( }) ~% l/ ]* @- `　　19.2(c：aseexportt自变量1 自变量2…)输出信息
3 F. d9 u9 u! S. {. O* I　　19.3 (c：aselinks自变量1 自变量2…)连接对象与信息
3 n, p+ O  I0 K: z) d2 v　　19.4(c：aserow自变量1 自变量2…)管理外部信息表格
　　19.5(c：aseselect自变量1 自变量2…)建立外部信息与对象选集
　　19.6 (c：asesqled自变量 1 自变量2…) 执行SQL程序