资源描述：
《autocad的二次开发技术》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、第19卷第1期郑州工业大学学报Vol19No11998年3月JournalofZhengzhouUniversityofTechnologyMar1998AutoCAD的二次开发技术翟震张涛(郑州工业大学橡塑模具研究所)(河南省电子工业学校,郑州,450002)摘要介绍了对AutoCADR12.0绘图软件进行二次开发的一些方法。包括如何实现参数化绘图、数据检索,以及对图形数据库的操作,对于工程CAD系统的实现有一定的帮助。关键词AutoCAD;AutoLISP中图分类号TP311.50引言AutoCAD是美国Aut
2、odesk公司开发的通用型绘图软件,具有强大的图形编辑和处理功能、开放性结构以及良好的性能价格比,其版本从早期的1.0版到目前的R14版,在国内外都已得到广泛的应用。AutoLISP语言是一种嵌在AutoCAD内部的LISP编程语言,既具有一般高级语言的基本结构和功能,又具备AutoCAD所特有的图形处理功能。利用Au-toLISP可以直接增加,修改和调用AutoCAD命令,并能结合各类标准建立大量的参数图形库,还能够对当前图形数据库直接访问和修改等。1设计实例尽管AutoCAD的功能十分强大,但是并不是完全符合我国各领域的实际情况,比如图幅设置、尺寸公
3、差标注、图形编辑等,这就需要运用其内部编程语言AutoLISP进行二次开发。下面以通用绘图系统为例列举了一些典型的AutoLISP程序,在AutoCADR12.0环境下运行,用户可以此为参考开发出适合自己情况的CAD软件。1.1AutoCAD命令的扩充众所周知,AutoCAD本身提供的各种命令都是最基本的,对一些复杂的具有特殊要求的操作,如果用手工操作将十分麻烦,类似于图幅设置、局部放大、无边界延伸等等,都需要编制新的函数,作为AutoCAD命令调用。下面列举了一个在工程制图时经常要进行的局部放大函数,其设计思想是:以圆心的外切正方形为目标区域,c方
4、式选择目标,拷贝后选择收稿日期:1997-08-29第一作者男1968年9月生硕士学位助教第1期翟震等AutoCAD的二次开发技术75该圆为剪切边界,以1.2倍半径进行剪切目标360环形搜索,再按比例放大,该程序如下:(defunfd()(initget7);禁止输入零值、负值及空输入(setppl(getpoint输入放大区域圆心坐标:))(commandcirclepl);画圆心(setqprl(getpoint输入半径位置:))(setqk2r(distanceplprl)
5、;计算半径p2(getpoint输入放大图形位置))(setqp3(list(-(carpl)r)(-(cadrpl)r));选中图形左下角p4(list(+(carpl)r)(+(cadrpl)r));选中图形右下角p5(list(-(carp2)r)(-(cadrp2)r));放大图形左下角p6(list(+(carp2)r)(+(cadrp2)r));选中图形右下角r1(*1.35r);剪切搜索半径k2);放大比例为2(commandr)(commandera
6、sel;删除该圆copycp3p4p1p2;将选中目标拷贝至p2点circlep2r);画圆(setqss(ssgetl))(commandtrimss)(setqn360n11dt(/3.141590.5n);设置搜索次数(repeatn(setqpp(polarp2(*n1dt)r1))(commandpp);剪切目标(setqn1(+1n1)))(commandscalecp5p6p2kredraw);放大操作)1.2参数化绘图根
7、据调查,在我国使用AutoCAD的用户中,绝大多数都仅仅采用交互式绘图方式,这样,AutoCAD系统只是将设计师的工作环境从图板上移到计算机上,并没有真正减少设计工作中的重复劳动。因此就需要引入参数化设计,其目的是对所设计的产品进行定制,设计者只需按要求输入若干参数,系统就能自动生成各种图纸,从而实现快速绘图,将设计者从繁杂的绘图工作解脱出来,将大部分时间和精力集中于富有创造性的设计活动中。下面列举了绘制如图1所示的键槽的轴剖面图的程序。图1键槽的轴剖面图(defunakey(/dhwbpangp1p2)(setqd(/getdist
8、d=?)2.0)76郑州工业大学学报
