AutoLISP在土地整治规划设计中的应用.pdf

《AutoLISP在土地整治规划设计中的应用.pdf》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、江西煤炭科技2013年第4期JIANGXICOALSCIENCE&TECHNOLOGYN0．42O13AutoLISP在土地整治规划设计中的应用郑辉，毛志芳(江西省煤田地质局测绘大队，江西南昌330001)摘要：以土地整治规划设计平面图为研究对象，阐述了AutoLISP在制图过程中工程分类编号、工程量统计等工作的应用，并给出了具体的实现方法及AutoLISP代码。关键词：AutoLISP；AutoCAD；土地整治；规划设计中腰分类号：TD391文献标识码：B文章编号：1006～2572(2013)04一O177一O2ApplicationofAutoLI

2、SPinPlanningandDesignofLandConsolidationZhangHui，MaoZhifang(SurveyingandMappingTeamofJiangxiCoalfieldGeologBureau，Nanchang，Jiangxi330001)Abstract：Studyingonplanargraphoflandconsolidationplanninganddesign，theauthorsexpoundedtheapplica—tionofAutoLISPintheworkofengineeringclassifyse

3、rialnumberandengineeringstatisticsinthemappingprocess，andputforwardthespecificimplementationmethodandAutoLISPcode．Keyword：AutoLISPAutoCAD；landconsolidation；planninganddesign1概述首先在项目区测量图的基础上依据制图规范，定义图层名称及线型，根据项目区土地利用现状图地类图斑范围土地整治是对低效利用、不合理利用、未利用的土地线进行填充作为底图，淡化地形地物，制作图例，利用多线进行整理，对生

4、产建设活动破坏和自然灾害损毁的土地进段绘制命令绘制沟、路、渠，利用块插入及复制布置水工建行恢复利用，提高土地利用率的活动。包括农用地整理、筑物。土地开发、土地复垦、建设用地整治等内容。通过科学合在各工程绘制完成后，需进行工程量的统计，需用引理规划，整治道路沟渠，平整归并零散地块，不仅可以增加有效耕地面积，而且可以优化耕地质量，促进粮食综合生线标注命令进行分类编号，如“新建斗渠lL=1001．12m”产能力的提高，对实现耕地占补平衡，确保耕地总量，提高、“新建生产路1L一501．34m”等，且各标注分类分层农民收益，具有不可替代的重要作用，具有很好的社会、

5、经放置，并同时在Excel表格中记录该线性地物的长度以便济效益。汇总。土地整治规划设计工作的主要内容有布置各项工程3分类编号及工程量统计中存在的问题平面位置、绘制各工程的施工图、编制投资预算，投资预算1)工程量编号漏项：各项工程量布置完成后，需进行的基础数据来源于规划图上工程量的统计，所以规划图的编号，工程量的编号是联系整个项目的文本、预算、施工图绘制及工程量的统计是整个工作的核心内容。在工作过的关键，编号错误或漏项会造成文本描述与图纸不一致，程中，单纯的利用AutoCAD工程分类编号及工程量统计，会给项目施工带来不便等诸多问题。效率较低且容易出错，本文

6、结合具体问题，阐述通过Au—2)工程量长度等属性统计错漏：一个项目的工程量统toLISP编程准确、高效的解决方法。计是做预算最基本的依据，工程量统计的准确与否直接导2AutoCAD在土地整治规划设计中的应用致项目预算是否正确，人为查看各多线段的长度，统计各AutoCAD是由美国欧特克公司(Autodesk)为计算机水工建筑物个数，会增加大量的工作量，且容易出错，影响上应用计算机辅助设计(ComputerAidedDesign，CAD)技结果的准确性。术而开发的绘图程序软件包，现已经成为国际上广为流行4如何用AutoLISP编程解决问题的绘图工具。在土地整

7、治项目规划设计工作中按工作步骤划分，AutoLISP是由Autodesk公司开发的一种LISP程序AutoCAD的功能可分为各工程量在规划图上的布置、各语言，在AutoCAD使用中，将源代码保存为“lsp”后缀名的工程工程量的编号及统计。在各项工程量的布置工作中文件，在AutoCAD命令行中输入“appload”选择LSP文件主要用到图层的定义、块的制作、多线段的绘制、区域填充加载，在命令行输入程序内定义的程序名即可。等功能，在工程量编号及统计工作中主要用到文本输入、工程量快速编号程序通过以下流程执行：选择需编号引线标注、属性查看等功能。的对象一输入编号

8、的前缀一设定编号方式一循环所选择·177·的对象并生成标注一输出至Excel表格