1 / 10
文档名称:

AutoLisp编程入门.doc

格式:doc   大小:79KB   页数:10页
下载后只包含 1 个 DOC 格式的文档,没有任何的图纸或源代码,查看文件列表

如果您已付费下载过本站文档,您可以点这里二次下载

分享

预览

AutoLisp编程入门.doc

上传人:wxc6688 2019/11/8 文件大小:79 KB

下载得到文件列表

AutoLisp编程入门.doc

文档介绍

文档介绍:AutoLisp编程基本指南:两数求和在命令行输入:(+23) (-23) (*23) (/23)如果直接输入(/23)则会显示0因为2和3是整型所以AutoLisp把这些数字译为整型(AutoLisp进行了四舍五入)所以输入(setqx(/)):!p则会显示p这个变量的值SETQ和变量Setq是来保存计算的结果的,相当于给一个变量赋值例:(setqx(/)) “设置相等”例如:() (min73511) 就是取73511这四个数的最小值(setqminbr(min73511))(sinminbr)数学函数功能+加-减*乘/除1+自增11-自减1FLX截取实数的整数部分FLOAT整数变为实数REM返回除法的余数EXPT指数SIN求弧度角的正弦COS求弧度角的余弦ATAN求两个数字的反正切  注意:AutoLISP的角是弧度值而不是角度值。例如:45度的角的正弦值(setqrad(*(/)pi))(setqp1'())‘表示指定2个(3个)的坐标值,这样AutoLISP就不会计算这些值了(setqp2'())(setqp3'(94))(setqp4'())(distancep1p2)(anglep1p2)(intersp1p2p3p4)(osnapp1"mid")TEXTBOX(查找一行文字的矩形外框)POLAR(指定距离和角度返回一个3D点)几何函数功能AngleX轴和由2个点定义的直线间的(弧度)夹角Distance2点之间的3D距离Polar在某一个(弧度)角度上的3D点Osnap对某一个点应用对象捕捉模式后的3D点Inters4个点定义的3D交叉点  :在一个绘制楼梯间的AutoLISP例程中,一部分程序检查层高是否大于8英寸:如果大于,就绘制出14级台阶,如果小于就绘制13级台阶。(if(>height96)(setqsteps14)(setqsteps13))条件函数注释=等于/=不等于<小于<=小于或等于>大于>=大于或等于If如果——那么——否则Cond查找真的表达式Repeat重复n次表达式While重复验证表达式直到假命题出现ForEach计算表达式中所有数值的表达式值  (strlen“UsingAutoCAD”)STRLEN函数将报告UsingAutoCAD为13个字符,计算空格。可以看到UsingAutoCAD被引号括起来表明它是字符串。如果输入(strlenUsingAutoCAD),AutoLISP会试图查询变量Using和AutoCAD所包含字符串的长度。(strlenautocad“Asoftwarepackage”)(strlenusing“Earth”)(strlenusingautocad)返回34STRCAT函数通过混合变量和文字将字符串连接在一起并创建返回信息。(strcatautocad“usedallover”using)返回“Earth”字符串函数功能StrCase把所有的文字转换成大写或小写StrCat连接所