EPS环境下制图自动综合的探讨

摘要：本文叙述了EPS2008软件的先进集成技术路线；以1：2000地形图为例重点介绍了EPS环境下制图自动综合的原则；文章具体分析了EPS缩编的总体流程图；详细阐述了EPS环境下各模块的实现方案；希望能给广大测绘行业同僚带来一定的借鉴意义。

关键词：EPS，缩编，制图综合

中图分类号：TP311.5文献标识码：A 文章编号：

1 EPS介绍

EPS2008地理信息工作站基础平台（简称EPS 平台，本软件）是北京清华山维新技术开发有限公司研发的一款专业面向测绘生产及基础地理信息行业的软件。EPS2008从测绘与地理信息角度构建数据模型，综合CAD（计算机辅助设计，图形绘制平台）技术与GIS（地理信息系统，空间数据管理）技术，以数据库为核心，将图形和属性融为一体，从数据生产源头支持测绘的信息化转变。

EPS2008 平台支持各种测量成果数据，在外业采集时，测绘成果可随手入库，需要编辑更新时可随时下载，不需要转换，只是迁移，用户可方便地实现测量外业、内业、入库一体化。平台系统采用全新架构，进而实现信息化测绘、管理与更新一体化，建库GIS 与出图一体化，用一个平台解决测绘各种问题。EPS2008所支持的测绘数据包括控制测量、地形测量、地籍测量、管线勘测、工程放样、沉降观测、航测调绘、图纸影像等多种类型。例如，航测调绘数据，共有内联模式、外联模式、离线调绘三种利用方式。内联模式是直接在EPS 平台上采集数据、编辑、监理入库，航测技术完全嵌入EPS2008平台，用户一步到位。外联模式是同JX4、VirtuoZo、MapMatrix 等数据双向衔接；可以采集后导入EPS2008编辑入库，也可双屏实时连接工作。离线调绘是在EPS2008平台上将（任何）矢量或影像，直接导入“航测调绘仪”即大PDA，外业调绘后仍可导入EPS2008 编辑入库。当然，EPS 平台中航测数据可直接更新GIS 库；或者随时从GIS 库中下载数据，进行更新采集编辑、监理检查后直接入库更新GIS 数据（包括SuperMap、ARCGIS、 SunwayGIS）。

2 自动综合原则

本文以1：2000地图为例阐述地形图自动综示（缩编）编绘规则。

（1）地形图编绘时，各要素的选取原则：由高级到底级，由主要到次要，由大到小。优先选取重要的、有经济、历史、人文和方位意义的，与城市规划建设关系紧密的要素，在不影响地图精度的情况下，尽量保持图面清晰、美观易读[1]。

（2）各种要素严格按底图位置编绘，不得整体移位。当两个要素因比例尺缩小，符号出现相互重叠或靠近时，重要地物准确表示，次要地物可移位0.3mm 表示。

（3）依比例尺表示的点状符号，当基座在图上面积小于15mm2时，容不下一个完整符号时，舍去轮廓线，改用不依比例尺的符号表示，符号绘在轮廓中心；地物密集区，点状符号间距小于5mm时，可以取舍[2]。

（4）呈线状分布的点状要素，综合取舍时应注意保持起始点位置及转折点的定位关系，直线部分视图面情况选取，保持图上间距为10mm；当长度小于10mm时，可舍去。

（5）呈面状分布的点状要素，综合取舍时，应注意保持轮廓及分布特征， 中间部分视图面情况可作较大的取舍，当图上面积小于15mm2时，轮廓线不表示，重要的直接用点状符号表示，次要的可不表示。

（6）线状要素在图上宽度小于1mm的改用单线表示(双线河流除外)；当图上长度小于10mm，且宽度小于1mm的可以取舍；相同线状要素在图上间距小于5mm可以取舍。

（7）植被等面状要素，轮廓可作较大的取舍、综合。

果园小于9mm2 花圃、稻田小于4mm2、荒草地面积小于25mm2、其它植被面积小于25mm2。

（8）小面积的面状地物删除后，相邻的等高线连接，线状地物应连接。

（9）名称注记尽量不压盖其它要素。居民地（或单位）名称注记一般以普通字隔正向排列，空旷地区的可适当增加，线状要素的注记用屈曲字列，字边垂直或平行于线状地物，且依线状地物的弯曲形状而排列，图上每隔200mm时重复注出[3]。

（9）图式要求按真方向表示的符号，编绘时，符号方向应保持与原图符号一致。

3 总体流程图

EPS环境下制图自动综合总体结构流程图如下所示：

图1 EPS环境下制图自动综合总体结构流程图

4 模块代码

EPS环境下制图自动综合分几个模块，本文列举以下几个模块代码，仅供读者参阅。

4.1 注记处理

注记处理包括：调整注记的定位点、注记的密度、注记压盖等。

（1）注记中心定位

（2）注记缩小

（3）注记自身压盖处理

（4）植被注记抽稀

（5）道路注记调整

（6）河流注记筛选

（7）注记相互压盖处理

（8）相同内容注记筛选

（9）注记压盖删除

（10）房屋注记，对层数大于1的房屋进行注记

注记处理的部分代码如下：

Sub OnClick()

SSProcess.PushUndoMark

SSProcess.ClearSelection

SSProcess.ClearSelectCondition

SSProcess.SetSelectCondition "SSObj_Type", "==", "NOTE"

SSProcess.SelectFilter

SSProcess.ChangeSelectionObjAttr "SSObj_FontWidth", "CallBackFunc_GetSize(SSObj_FontWidth)"

SSProcess.ChangeSelectionObjAttr "SSObj_FontHeight", "CallBackFunc_GetSize(SSObj_FontHeight)"

End Sub

4.2 不依比例尺斜坡处理

不依比例尺斜坡处理的部分代码如下：

Sub OnClick()

SSProcess.PushUndoMark

SSProcess.ClearSelection

SSProcess.ClearSelectCondition

SSProcess.SetSelectCondition "SSObj_Code", "==", "7601023"

SSProcess.SelectFilter

SSProcess.ChangeSelectionObjAttr "SSObj_Code", "7602022"

SSProcess.PushUndoMark

SSProcess.ClearSelection

SSProcess.ClearSelectCondition

SSProcess.SetSelectCondition "SSObj_Code", "==", "7601013"

SSProcess.SelectFilter

SSProcess.ChangeSelectionObjAttr "SSObj_Code", "7602012"

End Sub

4.3 房屋注记重新生成

房屋注记重新生成的部分代码如下：

SSProcess.SetSelectCondition "SSObj_LayerName", "==", "房屋面"