关于等高线检查程序的研究

ID:23510577

大小:57.00 KB

页数:5页

时间:2018-11-08

关于等高线检查程序的研究_第1页
关于等高线检查程序的研究_第2页
关于等高线检查程序的研究_第3页
关于等高线检查程序的研究_第4页
关于等高线检查程序的研究_第5页
资源描述:

《关于等高线检查程序的研究》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库

1、关于等高线检查程序的研究在地形图数据结构检查的过程中,利用程序来实现检查,可以大幅度降低生产成本,提高效率,本文主要是利用AUTOLISP语言编写程序来完成等高线所在图层及其属性值的检查,涉及到的软件平台为AutoCAD.关键词:AutoCAD,等高线,检查程序,研究在地形图数据结构检查的过程中,应用程序来实现检查,可以大幅度降低生产成本,提高效率,现在以AutoCAD平台下利用AUTOLISP语言编写的等高线检查程序为例,来谈谈自己的体会。  一等高线数据结构检查主要包括:  (一)线条设计规范检查等高线线条设计规范检查主要是检查线条是否符合规范和设计要求,主要包括:线宽检查线型结构

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

3、r(atoms-family1'(""vl-load-"")))(vl-load-))(setqdgj(getreal""n输入等高距:""))(setqsqx(getstring""n输入等高线首曲线层:""))(setqsqxk(getreal""n输入首曲线宽度:""))(setqjqx(getstring""n输入等高线计曲线层:""))(setqjqxk(getreal""n输入计曲线宽度:""))(setqss(xzjsqxjqx))(setqn(sslengthss)i0x0)(repeatn(setqstm(ssnamessi))(setqobject(vlax-ena

4、me->vla-objectstm))(setqgcz(vla-get-Elevationobject))(setql_(remgczdgj))        ;;为零对(setqys(rem(/gczdgj)4.0)));;为零计曲线(PROGN(setqkm(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)(=tc

5、jqx))(progn(vla-put-Colorobject2)(setqx1)))(setqi(+1i)))(vlax-release-objectobject)(if(=x0)(alert""等高线层、值都相符""))(setqkk(ssget""x""(list'(-4.""            '(-4.""OR>"")(cons622)'(-4.""AND>""))))(ifkk(alert(strcat""图内共有""(itoa(sslengthkk))""根曲线层、值不符,注意查改!"")))(setqstmnildgjnilkmnilysnilkknilxxnilx

6、xxnil)(setvar""cmdecho""1))(defunxzj(lay1lay2)(ssget""x""(list'(-4."""")'(-4."""")'(-4.""AND>""))))  以上代码经运行后,能够很好的检查地形图等高线的图层、高程值和线宽是否与设计相符,并用不同的颜色值体现在窗口界面上。  四、结束语  国内很多的地形图编辑和入库软件都是建立在AutoCAD平台下的,因而利用AUTOLISP语言可以根据不同的需求进行二次开发,提高软件的编辑和检查功能,使我们在实际工作中大幅度降低生产成本,提高效率。

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
正文描述:

《关于等高线检查程序的研究》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库

1、关于等高线检查程序的研究在地形图数据结构检查的过程中,利用程序来实现检查,可以大幅度降低生产成本,提高效率,本文主要是利用AUTOLISP语言编写程序来完成等高线所在图层及其属性值的检查,涉及到的软件平台为AutoCAD.关键词:AutoCAD,等高线,检查程序,研究在地形图数据结构检查的过程中,应用程序来实现检查,可以大幅度降低生产成本,提高效率,现在以AutoCAD平台下利用AUTOLISP语言编写的等高线检查程序为例,来谈谈自己的体会。  一等高线数据结构检查主要包括:  (一)线条设计规范检查等高线线条设计规范检查主要是检查线条是否符合规范和设计要求,主要包括:线宽检查线型结构

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

3、r(atoms-family1'(""vl-load-"")))(vl-load-))(setqdgj(getreal""n输入等高距:""))(setqsqx(getstring""n输入等高线首曲线层:""))(setqsqxk(getreal""n输入首曲线宽度:""))(setqjqx(getstring""n输入等高线计曲线层:""))(setqjqxk(getreal""n输入计曲线宽度:""))(setqss(xzjsqxjqx))(setqn(sslengthss)i0x0)(repeatn(setqstm(ssnamessi))(setqobject(vlax-ena

4、me->vla-objectstm))(setqgcz(vla-get-Elevationobject))(setql_(remgczdgj))        ;;为零对(setqys(rem(/gczdgj)4.0)));;为零计曲线(PROGN(setqkm(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)(=tc

5、jqx))(progn(vla-put-Colorobject2)(setqx1)))(setqi(+1i)))(vlax-release-objectobject)(if(=x0)(alert""等高线层、值都相符""))(setqkk(ssget""x""(list'(-4.""            '(-4.""OR>"")(cons622)'(-4.""AND>""))))(ifkk(alert(strcat""图内共有""(itoa(sslengthkk))""根曲线层、值不符,注意查改!"")))(setqstmnildgjnilkmnilysnilkknilxxnilx

6、xxnil)(setvar""cmdecho""1))(defunxzj(lay1lay2)(ssget""x""(list'(-4."""")'(-4."""")'(-4.""AND>""))))  以上代码经运行后,能够很好的检查地形图等高线的图层、高程值和线宽是否与设计相符,并用不同的颜色值体现在窗口界面上。  四、结束语  国内很多的地形图编辑和入库软件都是建立在AutoCAD平台下的,因而利用AUTOLISP语言可以根据不同的需求进行二次开发,提高软件的编辑和检查功能,使我们在实际工作中大幅度降低生产成本,提高效率。

显示全部收起
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。
关闭