AutoCAD 2004平台下农村宅基地宗地图批量生产软件的研发

胡绍辉,陈海英,魏叶敏

(1. 四川省煤田地质局一三七队，四川 达州 635000； 2. 西南交通大学，四川 成都 610000； 3. 四川省第一测绘工程院，四川 成都 610100)

AutoCAD2004平台下农村宅基地宗地图批量生产软件的研发

胡绍辉1,2,陈海英3,魏叶敏1

(1. 四川省煤田地质局一三七队，四川 达州 635000； 2. 西南交通大学，四川 成都 610000； 3. 四川省第一测绘工程院，四川 成都 610100)

针对常用的地籍成图软件在个性定制方面的不足，提出了在AutoCAD 2004平台上实现农村宅基地宗地图批量裁切和整饰等功能的软件研发。生产实践表明，该软件界面友好、操作方便、成图高效快捷，能够较好地满足农村宅基宗地图批量生产的相关技术要求。

AutoCAD 2004；农村宅基地；宗地图；批量生产

农村宅基地确权是农村产权制度改革的一项重要工作内容，它的工作目标是实现权属清晰、界址明确和面积准确，而宅基地宗地图是其重要的成果图件之一，主要用于粘贴在土地证书上和存放于宗地档案中。

由于技术和历史的原因，我国以往普遍未开展能够满足信息化管理要求下的农村宅基地地籍调查工作。为了落实物权法和党中央的有关文件指示精神，全国各地陆续按照地籍调查规程的有关技术要求在县级土地主管部门的领导下对县域范围内农村宅基地开展地籍调查工作。该项工作具有工作量大、时间紧、技术政策性强等特点，给作业单位和技术人员带来了一定的挑战。

一、农村宅基地宗地图

1. 主要特点介绍

农村宅基地宗地图相对传统的城镇地籍调查宗地图有其独特之处，主要区别如下：

1) 数量巨大且需要在短期内完成。以遂宁市安居区为例，该区有20.5万宗宅基地使用权，需在两年半内完成全部地籍调查工作，按照工序划分，留给海量宗地图制作的时间仅半年左右。

2) 宗地图需要反映的内容远比规范上标准宗地图要丰富。同样以遂宁市安居区为例，该区宗地图不仅要反映宗地面积，而且要反映建筑占地面积，在土地证书上共反映4个面积信息，除以上两个外还包括使用权面积(发证面积)和其他集体建设用地面积，其逻辑关系是：宗地面积包含建筑占地面积，建筑占地面积包含使用权面积，宗地面积减使用权面积等于其他集体建设用地面积。之所以会产生宗地面积与发证面积不一致的情况是由该区宅基地确权范围规定决定的，本着尊重农民实际宅基地占有的普遍情况，该区规定宅基地确权范围含房屋(包括房屋附属建筑及设施)和院坝，建筑占地面积以房屋滴水线来计算，使用权最大不得超过建筑占地面积，也即院坝面积不参与发证面积的分配。为了计算建筑占地面积，在地籍图上专门以地类图斑线对院坝单独构面。

3) 宗地图制作与数据库建库是由不同作业单位用不同的软件完成的，且其数据要能够与后续建库精准对接。

2. 常用的宗地图编制软件局限性分析

基于AutoCAD 2004平台软件而开发的CASS 8.0软件是目前用于地籍调查中最广泛的软件之一，也是测量技术人员最熟悉的软件之一。

该软件具有操作简单、界面友好和功能强大等诸多优点，能够实现地籍调查制图和简单的报表输出等功能，基本上能够完成除数据库建设外的所有工作。但针对农村宅基地宗地图的快速高效制作，它有一定的局限性，因为其内置的模板并不适应农村宅基地宗地图的独特要求，要得到合格的成果，在经过自动裁切输出后还需要花费相当多的时间对自动裁切的图件进行编辑和处理。

相对专门的GIS软件，CASS在图形逻辑关系检查能力和数据导出能力方面较弱，如对于影响界址点数目和宗地面积的共点悬挂错误，该软件无相关检查工具，虽然可以通过导出权属线信息的方式导出权利人、宗地面积和图幅号等信息，但对界址点个数却无法办到。

基于以上分析，该软件应具备如下功能：照顾作业员的习惯，最好在AutoCAD 2004平台上开发；能够补充CASS对图形逻辑错误检查的不足，如共点悬挂错误；在较少人工的干预下实现在合格地籍图上自动裁切整饰宗地图和批量打印输出；批量导出农村宅基地确权需要的宗地信息。

二、软件架构设计

1. 宅基地宗地图样图设计

宗地图样图如图1所示，具体如下：

图1 宗地图样图

1) 图纸规格：A4竖向幅面，打印比例尺为1∶1，绘图比例尺决定裁切图的缩放尺度，注记文字高度和大小不随图形缩放而缩放。

2) 权属线宽度和界址点圆圈大小主宗和邻宗相同，均为0.3 mm宽，直径1.2 mm。为了突出显示主宗，主宗权属线和界址点及注记颜色均为黑色，邻宗为默认的红色，权利人和宗地号大小主宗和邻宗相差0.25， 字形均为中等线体， 主宗权利人字高为

1.75，宗地号字高为1.25。

3) 界址点注记：字形为隶书，字高为1.0，宽高比为0.8。

4) 房屋、公路、院坝等地理要素文字注记统一规定：字形为HZ，字高为1.25，注记遇到宗地号、权利人需要移位。

5) 用于辅助四至填写的村组等行政地名注记统一规定：字形为中等线体，字高为1.25。

6) 宗地代码、土地权利人、所在图幅号、宗地面积、制图日期、审核日期、制图者、审核者本身字体为HZ，字高为1.75，对应所填内容的字形为中等线体，字高为1.5。

7) 比例尺字形为中等线体，字高为1.75。

8) 图框注记规格：宗地图字形中等线体，字高3.0；单位为中等线体，字高1.75；单位名称为中等线体，字高2.0。

2. 输入输出文件结构设计

(1) 输入文件“宗地图整饰”设计

在“C:NCZD”目录下有一个“文件宗地图整饰.txt”，农村宅基地宗地图批量整饰时从该文件中读取信息，根据村名、制图者、审核者的不同而修改存盘即可。其设计结构如图2所示。

(2) 输出文件“宗地面积汇总”设计

批量宗地图整饰完后，在“C:NCZD”目录下自动创建“宗地面积汇总.xls”文件，其设计结构如图3所示。

图3

3. 软件界面设计

在CASS软件界面里增加一个下拉式菜单“农村宗地编辑”，如图4所示。

图4

三、功能模块实现

1. 数据合法性检查

此模块是利用Visual LISP编程，在AutoCAD 2004下对农村宅基地图形的图层编码进行合法性检查，不符合CASS 9.0标准图层的编码要求的全部改到错误层WC中，便于对图形修改、编辑。

2. 剔除多边形重叠

此模块是利用Visual LISP编程，在AutoCAD 2004下对农村宅基地图形的多边形封闭面进行重叠排错，自动删除图形中重叠的多边形。

3. 数据拓扑检查

此模块是利用Visual LISP编程，在AutoCAD 2004下对农村宅基地图形中权属界线和房屋进行拓扑错误检查和定位，查出图上的共点错误、悬挂错误、残点残线等，并在有疑问处画一个在WC层的圆圈，便于对图形修改、编辑。

4. 线面重点处理

此模块是利用Visual LISP编程，在AutoCAD 2004下对农村宅基地图形进行悬挂处理，自动清除线和面重叠及重点。

5. 宗地草图裁剪

此模块是利用Visual LISP编程，在AutoCAD 2004下对农村宅基地图形中宗地根据图上数据的编号(013007JC01001)自动裁剪宗地草图，存放在C:NCZD目录下，并加CT+编号，生成CAD图。其裁剪图形核心编码如下：

(command′zoom′w′(list minx miny)(list maxx maxy))

(command′zoom′′0.5x′)

(setq h9(-maxx minx)s9(-maxy miny)h91(/(+maxx minx)2)s91(/(+maxy miny)2))

(setq hbsl(/120 h9)sbsl(/140 h9))

(if(

(setq hbsl(atoi(rtos hbsl 2 0)))

(if(>hbsl 11)(setq b122 10))

(if(and(>hbsl 6)(<=hbsl 11))(setq b122 5))

(if(and(>=hbsl(/10 3))(<=hbsl 6))(setq b122(/10 3)))

(if(and(>=hbsl(/10 4))(

(if(and(>=hbsl(/10 5))(

(if(and(>=hbsl(/10 6))(

(if(and(>=hbsl(/10 7))(

(if(and(>=hbsl(/10 8))(

(if(and(>=hbsl(/10 9))(

(if(and(>=hbsl 1)(

(if(

(setq ss6(ssget′C′)(list(-h91(*12(/10 BL22)))(-s91(*12(/10 BL22))))

(list(+h91(*12(/10 BL22)))(+s91(*12(/10 BL22))))))

(if(AND(/=ss6 nil)(/=zdh nil))

(progn

(command′copy′ss6′′(0 0)′(0 0))

(setq zdh1(strcat′c:\nczd\ct′zdh))

(if(findfile(strcat zdh1′.dwg′))

(command′wblock′zdh1′y′′′’(0 0)ss6′′)

(command′wblock′zdh1′′’(0 0)ss6′′)

)

))

6. 宗地图整饰

此模块是利用Visual LISP和Visual Basic 6.0编程，在AutoCAD 2004下调用程序，根据“C:NCZD宗地图整饰.txt”和C:NCZD目录宗地裁剪生成的草图DWG文件自动生产农村宗地权属图，并自动标注各种信息，根据图形大小分在C:NCZDDT目录下。修改“C:NCZD宗地图整饰.txt”中村名“七里店村”等信息，自动与图中组名组合注记在农村宗地图里,以及自动注记对应的其他注记，自动生成“宗地面积汇总.xls”，把图形中各宗地的宗地代码、户主名、界址点个数、宗地面积、院坝面积等信息写入文件里。其Visual Basic 6.0编程把信息写入“宗地面积汇总.xls”的核心编码如下：

ChDir′C:NCZD′

Workbooks.Open FileName:=′C:Progran FilesAutoCAD 2004Support宗地面积汇总.xls′

Do While i

If jzd(i,2)<>′′Then

Range(′A′+Format(ymsl,′0′)).Select

ActiveCell.FormulaR1C1=jzd(i,1)

Range(′B′+Format(ymsl,′0′)).Select

ActiveCell.FormulaR1C1=jzd(i,2)

Range(′C′+Format(ymsl,′0′)).Select

ActiveCell.FormulaR1C1=jzd(i,3)

Range(′D′+Format(ymsl,′0′)).Select

ActiveCell.FormulaR1C1=jzd(i,4)

Range(′E′+Format(ymsl,′0′)).Select

ActiveCell.FormulaR1C1=jzd(i,5)

Range(′F′+Format(ymsl,′0′)).Select

ActiveCell.FormuaR1C1=′1:′+jzd(i,6)

Range(′G′+Format(ymsl,′0′)).Select

ActiveCell.FormulaR1C1=jzd(i,7)

ymsl=ymsl+1

End If

i=i+1

Loop

If Len(Dir(′C:NCZD宗地面积汇总.xls′))>0 Then Kill(′c: czd宗地面积汇总.xls′)

ActiveWorkbook.SaveAs FileName:=′C:NCZD宗地面积汇总.xls′，FileFormat:=xlNormal_

,Password:=′′,WriteResPassword:=′′,ReadOnlyRecommended:False,_

CreateBackup:=False

7. 批量打印宗地图

此模块是利用Visual LISP编程，在AutoCAD 2004下选中的CAD图形自动打印，不需要人工干预，通过设置好的打印机一宗一宗地自动打印宗地图，节约了大量的人力、物力。其中部分核心编码如下：

(foreach n fnb

(setq acdwg(vla-open(vla-get-documents app)n))

(vla-ZoomExtents app)

(vla-PurgeAll acdwg)

(if(wcmatch(getvar′acadver′)′16.#*′)(vla-save acdwg))；不然始终保存为2008版

(setq fx′P′);(setq fx′纵向P′)(setq fx′横向L′) (setq blc′1∶1′)

(vla-sendcommand acdwg′-plot n模型 上一次打印 n y n ′)

(if(wcmatch(getvar′acadver′)′16.#*′)

(vla-sendcommand acdwg(strcat′-plot y模型 ′′A4′′ m ′fx′ n e ′blc′ 居中打印(C) y y a n y y ′))

(vla-sendcommand acdwg(strcat′-plot y模型 ′′A4′′ m ′fx′ n e ′blc′ C y y a n y y ′))

)

(vla-close acdwg:vlax-false)

)

8. 目录打印宗地图

此模块是利用Visual LISP编程，在AutoCAD 2004下选中目录的CAD图形自动打印，不需要人工干预。

9. 批量宗地转图片

此模块是利用Visual LISP编程，在AutoCAD 2004下选中的CAD图形自动转换为JPG图片，不过每宗宗地图转换时需人工干预一下，点击保存即可。

四、应用情况

在正式使用前，该软件经过了严格的测评，测评在使用者和开发者互动中进行，使用者在使用中发现问题并反馈，开发者不断改进。在经过了长达3个月的开发和互动后该软件正式投入生产，其中测评互动占软件总开发时间的2/3。现在将测评和生产情况详细介绍如下：

1. 测评和改进

测评主要考查软件普适性和效率。在试用中陆续发现了如下主要问题：①裁图后相邻的房屋注记吸附在一起；②少量宗地无法整饰；③少量宗地院坝面积统计有误；④部分共点和悬挂无法查出来；⑤部分注记整饰后缩放有误；⑥图幅号未保留到小数点后两位；⑦遇到故障宗地后整饰操作过程无法中断。

以上问题除④外均得到了较好的解决和完善。考虑该软件的主要功能是宗地图的自动裁切整饰，并且共点和悬挂错误还要经过GIS软件的检查，因此仅仅是初步筛查，故未对其进行深入研究和改进。

2. 生产情况报告

该软件已用于遂宁市安居区农村集体建设用地测绘建库及确权登记项目的生产，能够较好地完成宗地图的自动裁切整饰和批量打印输出，能够对宗地图的源数据地籍图进行初步数据入库预处理检查，能够实现宗地属性数据的Excel报表输出等功能。

该软件生产效率较高，可以在笔记本电脑和台式电脑上运行，运行时间与硬件配置有关。表1是遂宁市安居区聚贤乡木莲寺村430宗地自动裁切整饰用时测试情况。

表1 用时测试统计表 min

五、结束语

基于AutoCAD 2004平台实现农村宅基地宗地图批量裁切和整饰等功能的软件研发较好地解决了农村宅基地确权生产中的技术问题，减轻了作业人员的工作强度，提高了产品的生产效率和质量，取得了一定的社会和经济效益。

[1] 刘炳文.精通Visual Basic 6.0中文版[M].北京： 电子工业出版社，1999.

[2] 陈伯雄，冯伟.Visual LISP程序设计—技巧与范例[M].北京：人民邮电出版社，2002.

[3] 中华人民共和国国土资源部.地籍调查规程：TD/T1001—2012[S].北京: 中国标准出版社, 2012.

[4] 遂宁市国土资源局.遂宁市人民政府办公室《关于印发遂宁市进一步规范农村集体土地确权登记发证工作方案》的通知[EB/OL].2012-11-16.http:∥gtzyj.scsn.gov.cn/Item/45478.aspx.

[5] 陈重奎，李乃良.基于AutoCAD的多边形间的间隙核查[J].测绘通报，2009(8):44-46.

[6] 肖剑平，刘美春.基于地形图的宗地图自动生成方案的设计与实现[J].测绘通报，2003(10)：43-45.

[7] 苏韬，方鹏，陈胜林，等.基于MicroStation的宗地图动态标注研究[J].测绘通报，2012(4)：83-85.

[8] 张钦伟.基于ArcEngine的宗地图注记批量编辑研究[J].现代测绘，2013(2)：56-58.

TheSoftwareDevelopmentofBatchProductionofParcelMapBasedonAutoCAD2004

HU Shaohui,CHEN Haiying,WEI Yemin

胡绍辉,陈海英,魏叶敏.AutoCAD 2004平台下农村宅基地宗地图批量生产软件的研发[J].测绘通报，2016(9)：83-86.

10.13474/j.cnki.11-2246.2016.0300.

P258

B

0494-0911(2016)09-0083-04

2015-12-04

胡绍辉(1980—)，男，硕士生，工程师，主要从事测绘生产和技术管理工作。E-mail：38115462@qq.com