AUTOCAD二次开发在城镇地籍调查中的应用

所属栏目:城市规划论文 发布日期:2010-10-29 08:31 热度:

  摘要:结合第二次全国土地调查中城镇土地调查的要求,论述了利用AUTOLISP语言编程生成数据产品的自动化程序,实现了宗地属性与图形的紧密关联。增强了AUTOCAD的属性管理功能,使地籍调查工作更加科学、便捷。
  关键字:地籍调查;宗地属性;AUTOCAD开发;AUTOLISP;
  
  
  1引言
  城镇地籍调查是第二次全国土地调查中的一项重要工作内容,既是一项政策性、法律性和社会性很强的工作,又是一项集科学性、技术性、实践性、统一性、严密性于一体的国土资源管理基础工作。其成果具有完整性、可靠性和精确性,通过查清城镇土地利用状况和权属状况,确定每宗土地位置、界线、面积、用途等,编绘地籍图和宗地图,形成数据、图件、表册等调查资料,建立地籍数据库及管理系统,以满足产权、地政、税收、统计、规划等管理工作的需要。
  结合这次尤溪县城镇地籍调查的实际应用,本文叙述了利用AUTOLISP编程实现宗地属性与图形的便捷关联,增强了AUTOCAD中的属性管理功能。
  2AUTOLISP简介
  AutoLISP是由Autodesk公司开发的一种LISP程序语言(LISP是ListProcessor的缩写)。LISP语言诞生以来,就已经成为人工智能(AI)的首选程序序言。AutoLISP解释程序位于AutoCAD软件包中,然而AutoCADR2.17及更低版本中并不包含AutoLISP解释程序,这样,只有通过AutoCADR2.18及更高版本才可以使用AutoLISP语言。
  AutoCAD软件包中包含大多数用于产生图形的命令,但仍有某些命令末被提供。例如,AutoCAD中没有在图形文本对象内绘制矩形及作全局改变的命令。通过AutoLISP,你可以使用AutoLISP程序语言编制能够在图形文本对象内绘制矩形或作全局选择性改变的程序。事实上,可以用AutoLISP编制任何程序,或把它嵌入到菜单中,这样定制你的系统会取得更高的效率。
  3第二次全国土地调查城镇土地调查的作业要求
  ⑴调查内容:主要是查清建制镇内部建设用地使用权及每宗地的界址、界线、面积、用途等,通过汇总分析,掌握工业用地、基础设施用地、金融商业服务用地、房地产用地、等土地利用状况。
  ⑵调查方法:对于尤溪县未开展初始城镇地籍调查的地区,城镇地籍调查采用全解析法,充分应用航空摄影测量、全球定位技术(GPS技术)、地理信息技术(GIS技术)等先进手段,进行全外业数字化测量,确定宗地位置、界址、权属等有关信息,按照标准数据格式建立城镇地籍信息系统。
  ⑶数据汇总:在城镇土地调查的基础上,对城镇土地利用现状、土地利用强度、土地使用权类型等数据进行统计汇总,重点对工业用地、基础设施用地、金融商业服务用地、房地产用地等进行汇总。
  ⑷建立县级地籍信息系统:按照《城镇地籍数据库标准》(TD/T1015-2007)要求建立城镇地籍调查数据库。
  由上述作业要求,我们可以看出此次城镇地籍调查跟以前相比较的主要特点是,地籍调查成果必须建立城镇地籍调查数据库管理系统,必须达到图形、属性、数据的一致性的要求,因此这就要求作业单位在作业过程中必须录入一系列宗地属性信息。此次地籍调查采用的软件是CASS7.1,由于CASS7.1在属性管理上的不足,这就需要我们再作业过程中进行二次开发,以满足数据正确性、严密性的要求。
  4宗地属性管理程序的开发
  在CASS7.1下需要录入的宗地属性如图1:
  
  图1:宗地属性录入图
  在作业过程中,我们需要对属性进行修改、更改、删除部分不正确的属性、把属性中的信息标注在图形中等操作。但AUTOCAD和CASS7.1在属性管理功能上比较薄弱,只能对每一宗地的属性进行修改、更改、删除等操作,不能够批量进行这些操作。这就需要我们进行对其进行二次开发。最常用的操作是把宗地属性信息中的门牌号信息标注在图形中,这是地籍图的基本要求。下面具体叙述一下如何批量把宗地属性中的门牌号信息标注在该宗地内。
  AUTOLISP程序设计的思路为:
  ⑴宗地的属性信息主要存放在界址线的扩展属性内,如图2为某宗地界址线的部分扩展属性。
  图2:某宗地界址线的部分扩展属性
  其中,“DWXZ”为“单位性质”、“MPH”为“门牌号”、“TUFU”为“图幅号”、“SYQLX”为宗地“使用权类型”等,每一个扩展属性与图1中的属性一一对应。
  ⑵提取门牌号属性。依据关键字“MPH”,可以找到关键字下面的扩展属性信息。
  ⑶标注门牌号。将门牌号标注在该宗地内某一固定位置。
  用AUTOLISP语言实现的程序如下:
  (defunc:MPH(/mptextnumlsltextnum_nametextnum_name_datampmnumzbx_zby_zbbz);定义函数及其变量
  (command"-layer""N""MPH""");建立图层“MPH”
  (command"-layer""S""MPH""");图层“MPH”值为当前图层
  (setqtextnum(ssget"x"'((0."LWPOLYLINE")(8."JZD"))));建立所有宗地的的选择集
  (setqnum(sslengthtextnum));获取选择集合的元素数
  (setqlsl
   (list"MPH") );建立查询关键字
  (while(>num0)
  (setqtextnum_name(ssnametextnum(-num1)));获取选择集合中的像素名
  (setqtextnum_name_data(entgettextnum_namelsl));获取像素名称的资料串行
  (setqtextnum_data(assoc-3textnum_name_data));依据关键元素“MPH”找寻扩展属性
  (setqzb(assoc10textnum_name_data))
  (setqx_zb(car(cdrzb)))
  (setqy_zb(cadr(cdrzb)));x_zb、y_zb为界址线的起点坐标
  (setqbz(list(+x_zb0.751)(-y_zb0.587)0.0));设置标注门牌号位置
  (setqmpm(cdr(car(cdr(car(cdrtextnum_data))))))
  (command"text""s""宋体"bz0.6""mpm);标注门牌号
  (setqnum(1-num));递减控制while循环
  ))
  (prompt"*******标注MPH*******")
  (prin1)
  将上述程序代码保存为扩展名为“MPH.lsp”的文件,在AUTOCAD中,用“APPLOAD”命令加载进去,直接运行“MPH”命令,即可将所有门牌号信息标注在该宗地的左上角位置。
  另外,只要对该程序稍作修改,即可实现宗地属性中其它属性的修改、编辑、标注等操作,非常方便,在这里做不做赘述。
  4总结
  在此次尤溪县城镇地籍调查中,我们作业单位使用AUTOCAD二次开发的程序极大地提高了工作效率和工作质量,是数据处理和数据建库工作更加方便、快捷。节省了大量的工作时间,且在后期建立城镇土地利用数据库阶段,我们也都得益于AUTOCAD二次开发的应用,达到了图形、属性的一致性。
  
  
  参考文献:
  [1]《城镇地籍调查规程》(国家土地管理局TD001-93)
  [2]《第二次全国土地调查技术规程》(TD/T21010-2007)
  [3]《地籍测量规范》(CH5002-94)
  [4]《城镇地籍数据库标准》(TD/T1015-2007)
  [5]《城镇地籍调查数据汇总实施方案》(国土资源部)。
  [6]《三明市城镇地籍调查数据汇总试点工作方案》;
  [7]《尤溪县城区城镇地籍调查技术设计书》
  [8]魏崇光等编.AUTOCAD及二次开发:化学工业出版社,2001
  [9]李学志等编.VisualLISP程序设计(AutoCAD2006):清华大学出版社,2006
  
  
  搜论文知识网致力于为需要刊登论文的人士提供相关服务,提供迅速快捷的论文发表、写作指导等服务。具体发表流程为:客户咨询→确定合作,客户支付定金→文章发送并发表→客户接收录用通知,支付余款→杂志出版并寄送客户→客户确认收到。鸣网系学术网站,对所投稿件无稿酬支付,谢绝非学术类稿件的投递!

文章标题:AUTOCAD二次开发在城镇地籍调查中的应用

转载请注明来自:http://www.sofabiao.com/fblw/ligong/chengshiguihua/4943.html

相关问题解答

SCI服务

搜论文知识网的海量职称论文范文仅供广大读者免费阅读使用! 冀ICP备15021333号-3