欢迎来到天天文库
浏览记录
ID:58890454
大小:145.00 KB
页数:49页
时间:2020-09-30
《CAD课件 第14章 AutoLISP语言初步.ppt》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、第14章AutoLISP语言初步AutoLISP是由Autodesk公司开发的一种LISP程序语言(LISP是ListProcessor的缩写),并且已经成为人工智能(AI)的首选程序语言。现在,已经有数以百计的第三方软件开发人员使用AutoLISP语言编制各种应用程序软件包。14.1VisualLISP编辑器调用:执行“工具/AutoLISP/VisualLISP编辑器”,弹出VisualLISP编辑器对话框:文本编辑窗口跟踪窗口VisualLISP控制台(在窗口中直接输入某个AutoLISP变量名,再按回车键,可查看该变量的值。)调试:工具/检查编辑器中的文字工具/加
2、载编辑器中的文字14.2加载和运行AutoLISP程序执行“工具/AutoLISP/加载”,或在命令行键入Appload(AP),弹出[加载/卸载应用程序]对话框;或在命令行键入(Load”文件名”),即利用AutoLISP函数加载程序。14.3.1数学运算功能函数1.(十数值数值…)返回:累计实数或整数数值2.(一数值数值…)返回:差值3.(*数值数值…)返回:所有数值乘积4.(/数值数值…)返回:第一个数值除以第二个以后数值的商5.(1+数值)返回:数值+16.(1-数值)返回:数值-17.(abs数值)返回:数值的绝对值8.(atan数值)返回:反正切值9.(cos
3、角度)返回:角度的余弦值,角度值为弧度14.3AutoLISP函数10.(exp数值)返回:数值的指数11.(log数值)返回:数值的自然对数值12.(max数值数值…)返回:数值中的最大值13.(min数值数值…)返回:数值中的最小值14.pi常数∏,其值约为3.141592615.(sin角度)返回:角度的正弦值,角度值为弧度16.(sqrt数值)返回:数值的平方根14.3.2函数处理、定义功能函数1.(eval表达式)返回:表达式的执行结果2.(exit)强制退出目前的应用程序3.(quit)强制退出目前的应用程序4.(defun名称自变量列表表达式.)自定函数或子
4、程序例:(defun ADNUM(/ab)定义了一个含有两个局部变量a和b的函数ADNUM。局部变量在程序的执行期间保留其值,而且只能在它所在的程序中使用。(defun C:ADNUM()在函数名前加上C:后,此函数就可以通过在AutoCAD的Command:提示符后输入其函数名直接执行。如果没有使用C:,函数名则必须置于圆括号中。14.3.3检验与逻辑运算功能函数1.(=表达式1表达式2)比较表达式1是否等于式2,适用数值及字符串2.(/=表达式1表达式2)比较表达式1是否不等于表达式23.(<表达式1表达式2)比较表达式1是否小于表达式24.(<=表达式1表达式2)比
5、较表达式1是否小于等于表达式25.(>表达式1表达式2)比较表达式1是否大于表达式26.(>=表达式1表达式2)比较表达式1是否大于等于表达式214.3.4判断式、循环相关功能函数1.(If<比较式><表达式1><表达式2>)检算比较式结果,如果为真,执行<表达式1>,否则执行<表达式2>2.(Repeat次数[<表达式><表达式>…])根据函数中指定的次数n反复求解表达式,变量n必须为整数。3.(While<比较式><表达式>…)求解一个测试条件,若该条件为真(表达式不返回nil),while语句后边的操作将反复执行,直到该测试条件返回nil。4.(Cond<比较式1>
6、<表达式1><比较式2><表达式2><比较式3><表达式3>)多条件式的if整合功能5.(Progn<表达式1><表达式2>…)连接其中的表达式为一组,常用于配合if、cond等函数示例1:(Repeatn(Command"circle"cr)(setqr(+rd)))示例2:(if(>yl0.0);绘制封头与槽本体间的预留值(progn(command"line"p1py1"")(command"line"p2py2"")(command"line"p3py3"")(command"line"p4py4"")))示例3:(setqinc(/(*2pi)n));根据法兰孔
7、数计算各法兰孔间角度(setqang0);设定角度变量初始值为0(setqr(/dh2));计算法兰孔内径;建立循环绘制各法兰孔(While(
此文档下载收益归作者所有