AutoCAD平台下等高线程序检查的实现

《AutoCAD平台下等高线程序检查的实现》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、AutoCAD平台下等高线程序检查的实现摘要：在地形图数据结构检查的过程屮，利用程序来实现检查，可以大幅度降低生产成木，提高效率，木文主要是利用AUT0LTSP语言编写程序来完成等高线所在图层及其属性值的检查，涉及到的软件平台为AutoCAD.关键词：AutoCAD等高线程序检查实现中图分类号：C37文献标识码：A文章编号：在地形图数据结构检查的过程中，应用程序来实现检查，可以大幅度降低生产成本，提高效率，现在以AUT0LISP语言编写的等高线检查程序为例，来谈谈自己的体会。一等高线数据结构检查主要包扌舌：（一）线条设计规范检查等高线线条设计规范检查主要是检查线

2、条是否符合规范和设计要求，主要包括：线宽检查线型结构检查回头线检查重复线检查交叉线检查（-）图层和属性值检查(三)扩展属性检查扩展属性检查主要指根据设计的要求，対特定的属性进行检查，主要包扌舌：属性码检查属性层检查属性值检查二等高线层、值相符检查程序代码的实现AUTOLISP语言是嵌套于AutoCAD内部的一•种计算机表处理语言，其可以扩人图形的编辑功能，建立图形数据库和对数据库的访问和修改，其强大的功能使建立在AutoCAD平台下的地形图软件更能很好的满足客户的要求。用AUTOLISP语言来编写等高线层、值相符检查程序，源码和说明如下：(defunC:DGXC

3、()(setvar"cmdecho"0)(if(car(aloms-family1'(〃vl-load-conT)))(vl-load-com))(setqdgj(getreal/z输入等高距：〃))(setqsqx(getstring〃输入等高线首曲线层:〃))(setqsqxk(getrealz，输入首曲线宽度：〃))(setqjqx(getstring〃输入等高线计曲线层:〃))(setqjqxk(getreal〃输入计曲线宽度:〃))(setqss(xzjsqxjqx))(setqn(sslengthss)i0x0)(repeatn(

4、setqstm(ssnamessi))(setqobject(vlax-ermnie-〉vla-objectstm))(setqgcz(vla-get-Elevationobject))(setql_with(vla-get-ConstantWidthobject))(if(二gcz0)(vla-put-Colorobject2))(setqtc(vla-got-LaycrObject))(if(二dgj2.5)(progn(setqkm(remgczdgj));;为零对(setqys(rem(/gczdgj)4.0)));;为零计曲线(PROGN(setqkm

5、(remgczdgj))(setqys(rem(/gczdgj)5.0))))(if(/=km0)(progn(vla-put-Colorobject2)(setqx1)))(if(and(=ys0)(=tcsqx))(progn(vla-put-Colorobject2)(setqx1)))(if(and(/=ys0)(=tcjqx))(progn(vla-put-Colorobject2)(setqx1)))(selqi(+1i)))(vlax-release-objectobject)(if(二x0)(alert等高线层、值都相符〃))(setqkk(ss

6、get〃x〃(1ist'(-4."'(-4.〃0R＞〃)(cons622)'(-4.〃AND＞〃))))(ifkk(alert(strcat图内共有〃(itoa(sslengthkk))〃根曲线层、值不符，注意查改!〃)))(setqstmnildgjnilkmnilysni1kknilxxnilxxxnil)(setvar"cmdecho"1))(defunxzj(layllay2)(ssget〃x〃(list'(一4・〃〃)'(—4•〃〃)'(—4・〃AND＞〃))))以上代码经运行后，能够很好的检查地形图等高线的图层、高程值和线宽是否与设计相符，并用不同的

7、颜色值体现在窗口界面上。四、结束语国内很多的地形图编辑和入库软件都是建立在AutoCAD平台下的，因而利用AUT0LISP语言可以根据不同的需求进行二次开发，提高软件的编辑和检查功能，使我们在实际工作中大幅度降低生产成本，提高效率。参考文献[1]陈伯雄等.VisualLISP程序设计一技巧与范例（笫三版）•北京：人民邮电出版社,2002[2]胡仁喜等.AUT0LISP机械设计高级应用实例•北京:机械工业出版社,2005[3]郭伦等•地理信息系统•北京：电子工业出版社,2002[4]黄杏元等•地理信息系统概论•北京:高等教育出版社,2001