




已阅读5页,还剩2页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
AutoCAD开发与应用作者:王有良 唐跃刚摘要:针对通用软件中存在的不足,运用AutoCAD内部嵌套的AutoLISP语言,对测量与地质中常用的形文件、特殊线型及参数化设计中的问题加以研究,同时详细阐述了程序的调试方法及菜单的设计思想。 关键词:形文件;AutoLiSP;特殊线型 1引言 随着科学技术的不断发展和社会的不断进步,计算机技术越来越普遍地在各个行业中得到推广和应用。AutoCAD技术是企业争夺市场份额和生存发展不可缺少的手段。现在国际国内的重要工程都实行招标方式,如果没有利用AutoCAD系统绘制的工程总体设计方案和相应的投标文档,连投标资格都没有。可以说AutoCAD技术已成为企业进入世界市场的“入场券”1。在运用AutoCAD进行建筑设计、测绘与勘察以及机械设计中,有时不可避免的需要进行一些AutoCAD下没有或较为复杂的操作,如改变线型样式,改变充填样式,变参数图块等2,因此,要求设计人员具有一定的开能力,运用AutoCAD下的嵌套语言AutoLISP进行编程来实现自己的目的就很有必要。 2AutoCAD开发应用程序设计 21AutoLISP应用AutoCAD的形文件 在AutoCAD中,利用插入形的方法代替块操作,块操作虽然操作简单易行,不用编制任何程序,但由于AutoCAD中,图块是图形文件格式保存的,一个简单的图块要占用上百字节的内存,绘图过程中多次进行插入图块操作,必然使得图形尺寸过大。形具有体积小,整体性强,占用内存少的特点。 形是AutoCAD中的一种特殊的对象,通常是由直线和圆弧组成的简单符号。形只占有很小的内存空间且显示的速度非常快,非常适于作符号或复杂线型的组成图案。可用 AutoCAD快捷工具提供的命令MKSHAPE,可以根据直线图形来创建形文件3。快捷方式定义形文件的基本步骤为:画图;启动MakeShape命令,出现MKSHAPE对话框;在enter resolution提示下,输入矩阵的分辨率。通过定义一个方形的矩阵来定义形,所有线、圆弧的端点必须落在矩阵内的点上,分辨率越大外形越美观。输入所定义的形文件名。如d:wcada1shx 22复杂线型的定义 简单线型格式每一种线型定义在线型文件中占两行。第一行必须以星号开头,其后是线型名;第二行是描述实际图案代码,且以“A”开头4。如定制一个符合工程要求的点画线: *景区边界 A,7,-1.5,.5,-1.5 复杂线型指用符号和文字点缀的简单线型,并在定义行中增加了说明添加形文件的大小,位置等特殊参数,用以告诉AutoCAD如何嵌入文本或形文件。参阅图2中的斜坡线型和陡坎线型。如: *MTBJ A,80,-3.8,“电力”,standard,S=2.2,X=-1.2,Y=-0.8,-3.8,80 *lg,cross A,80,-10,cross,“d:wcada1shx”,s=5,-10 *JTBJ,slope_|_|_|_|_|_|_|_|_|_|_|_|_|_|_| A,80,-4,4,slope,“d:wcada1shx”,s=6,y=-1,-4, *TDXLZ,Tracks A,8,switch,“d:wcada1shx”,y=-1,4,switch,“d:wcada1shx”,y=-1,8,-6,8 下面对以上定义的线型文件的第二行中方括号内的内容加以说明。嵌入文本字串的定义语法为:“rstring”,style,R=n,A=n,S=n,X=n,Y=n,string表示所需文本字符,style表示文本的样式,R表示相对前一段的转角,A表示相对X轴的转角,两者只能有一个选项,S表示缩放比例,X,Y表示相对于线型位置的偏移量。嵌入形文件的定义语法为:shapename,shxfilename,R=n,A=n,S=n,X=n,Y=n,shapename是所定义的形名,shxfilename为编译后的形定义文件(SHX)的名称,在此文件中可以包括路径。 23参数化AutoCAD 参数化AutoCAD应用软件主要用于标准化、系列化和通用化程度比较高的定型产品5。输入设计的主要参数,通过计算机量规的数据库中的数据,进行必要的计算,将查询或计算行到的数据,在标准图样上进行变量代换,实现参数化绘图,最后生成符合设计要求的图样。可见,这类软件使用时效率较高,它适用于企业技术人员自行进行开发。 参数化绘图实例:下列程序用于绘制下图所示的设计钻孔,如图1所示(zuankong为用户自定义函数)。 图1用Autolisp绘钻孔(defun c:zuankong() (setq a(getstring “孔号:”) (setq b(getstring “井口高程:”) (setq c(getstring “孔深:”) (setq01(getpoint“坐标:”) (command“circle”o1 35) (setq02(polar01pi4) (command“line”,02“20180”) (setq03(polar01 2065) (command“text”,03 450a) (setq04(polar01 31 22) (command“text”,04450b) (setq05(polar01 3427) (command“text”,0545 0c) ) 参数化绘图一般包括主要内容有3部分。调用输入函数,获得绘图参数;调用数学函数计算绘图数据;调用绘图命令进行图元绘制。其程序简捷明了,比较易于掌握。 3AutoLISP程序加载与运行 AutoLISP程序编辑完成后,需要进行加载,生成自己独特的二次开发软件。程序加载方式一般可采用以下几种方法。 31利用AutoLISP函数的加载程序进行加载 可AutoCAD可的命令提示符“command:”下输入以下语句,实现加载(文件扩展名可不给出):load“AutoLISP文件名” 如对cross1sp文件,加载语句为:(Load“d:wlcross”)。 加载后,cross命令可与AutoCAD下的其他命令一样使用。 32定制菜单进行加载 图2常用的绘图符号每次启动AutoCAD时,系统会自动装入菜单acadmnu,若自己制作菜单,那么在使用菜单时,就可对自己编制的AutoLISP程序文件进行加载。 把AutoCAD中support下的acadmnu复制为wol.mnu,并对其进行修改,就可达到自己的目的。 例如,在复制的文件wolmnu中的“popll”帮助菜单后面加入如下语句: 设计的具体菜单如下: *POPl2 *USER ID_MnUSER绘制曲线 ID_UPline电视管线(&P)CCP(1oad“d:wcad1ispxx5”);xx5;P IDULisp3绘围墙CCP(1oad“d:woad1ispxx4”);xx4:P ID_ULisp4绘栏栅CCP(1oad“d:wcadlispxx3”);xx3;P ID_ULisp5绘陡坎CCP(1oad“d:wcad“spxxl”);xxl;P ID ULisp6绘斜坡CCP(1oad“d:wcad1ispxx2”);xx2;P *POPl3 *USERl ID_MnUSER1常用地物 ID_ULisp11导线点CCP(1oad“d:wcad1isppointl”);pointl;P ID_ULisp12钻孔CCP(1oad“d:wcad1ispholl”);holl;P ID_ULisp23针叶树CCP(1oad“d:wcad1isptreel”);treel;P ID_ULispl3指北针CCP(1oad“d:wcad1ispzhibei”);zhibei;P ID_ULispl5路灯CCP(1oad“d:wcad1isp1amp”);lamp;P 其中,popl2为定义第十二个下拉菜单,user为下拉菜单的主菜单名,“&+字母”的字母是快捷键,ID_MnUSER是菜单项的标识符,CC指连续两次ESC键,P为控制菜单的回显状态。 (1oad“d:wcad1ispxxl”)加载xxl1sp程序文件。 利用上面菜单的定制方法,可对已有的菜单进行添加与删除操作,达到用户操作方便实用的目的。生成自己的特色软件。 4程序的测试 函数定义的规模大小极大地影响到程序的可读性和测试的难度,所定义的函数一般不应超过100行。可利用trace和untrace函数为每个特定的函数设置一个标记,来表明已进入或退出该函数。Trace函数根据函数调用的层次缩进显示函数的调用信息,同时显示传递给函数的参数的值和函数的返回值。另外,还须深入分析函数的内部运行情况。一种方法是在函数的关键部位设置getstring函数,该函数可以设置在进入一个循环之前,在循环内部,在一次插入调用之前等。getstring函数给测试者方便中断程序运行的机会,当程序停止运行后,就可以检查程序变量的值。另一种方式是设计一个debug函数,调用该函数可以在程序运行中显示变量的值,该函数提供一个用于显示变量名的值的表,也能处理数据类型为表的变量,并把表的每一个元素按行显示以增强可读性。 5结语 AutoCAD技术一直处于不断发展与探索之中。应用AutoCAD技术起到了提高企业设计效率、优化设计方案、减轻技术人员的劳动强度,缩短设计周期,加强设计标准化等作用。越来越多的人认识到AutoCAD是一种巨大的生产力,特别是它的开放性结构优越性,使AutoCAD技术必将广泛地应用于机械、电子、航天、化工、建筑、测量与勘察等行业。使设计与生产向数字化和无纸化方向发展。 参考文献 1 杨晓红,唐中燕浅议企业CAD技术发展动向J管理与经营,2002,2(1):83-84 2 高青军基于绘图过程的参数化设计方法J机械科学与技术,2000,6(3):38
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 录音专业面试题及答案
- 风险管理专业试题及答案
- 专业认知试题及答案
- 护理专业实务试题及答案
- 运筹专业试题及答案
- 甘肃省金太阳2026届高三9月开学联考(26-1002C)生物(含答案)
- 配电运行专业试题及答案
- 贵州省惠水民族中学2025-2026学年高二上学期开学检测化学试卷(含答案)
- 美国农场施工方案
- 女性穿搭活动方案策划
- 初步验收证书
- 快递工程系列(技术员、助理工程师)职称考试-快递设施设
- 城市轨道交通调度指挥高职PPT完整全套教学课件
- 高职《高等数学》说课稿
- 预防青少年犯罪课件
- TSZUAVIA 009.1-2019 多旋翼无人机系统实验室环境试验方法 第1部分:通用要求
- GB/T 13993.2-2002通信光缆系列第2部分:核心网用室外光缆
- 综合布线系统-第2版第3章-接续设备
- 五年级上册英语课件-Unit 4《Hobbies》|译林版
- 国际商务文化与礼仪课件
- 人工智能导论课件
评论
0/150
提交评论