利用VB程序快速制作MAPGIS格式航点航迹图.docVIP

利用VB程序快速制作MAPGIS格式航点航迹图 　　[摘要]介绍利用VB程序快速制作MAPGIS格式航点航迹图的方法，先将航点、航迹数据转换批量为MAPGIS点、线明码文件，再将明码文件批量转换为MAPGIS图形文件，从而实现快速制作航点航迹图。相比传统制作方法化繁就简，极大地提高了工作效率，对物化探野外工作质量监控起到了积极作用。 　　[关键词]VB MAPGIS 航点航迹图 　　[中图分类号] P5 [文献码] B [文章编号] 1000-405X（2014）-3-192-2 　　1引言 　　基于MAPGIS平台上的GPS航点航迹监控技术原理是利用MAPGIS的投影变换功能将GPS下载的航点、航迹文件转换为*.wt和*.wl格式文件，将其添加到矢量化的采样点位设计图中，便于直观地检查采样者真实的采样路线、采样时间、采样点号和采样点位与设计点位的套合性。技术优点在于采样点位的坐标信息可以直接从图中提取，能及时把握工作质量和进展情况，更好地反映物化探异常的真实性[1]。 　　全球定位系统（GPS）和地理信息系统（GIS）等技术的普及应用，从2001年起，国内物化探工作者相继将 GPS定位、GPS航迹跟踪、Mapsource软件中的数据下载、Excel程序中文件格式转换、MAPGIS软件中投影变换等技术用于物化探野外工作中，对物化探基础工作产生了推动作用[2，3]。 　　作者在前人技术基础上，利用VB程序改进了航点航迹图的制作方法。提高了工作效率，达到了满意的效果。 　　2传统制作方法简介 　　2.1应用MAPGIS投影变换功能制作 　　（1）格式转换 　　将GPS导出的航点、航迹数据（航点.txt，航迹.txt）在excel中整理后另存为“航点.csv”和“航迹.csv”。 　　（2）MAPGIS投影变换 　　具体步骤：①在投影变换中的用户文件投影转换打开“航点.csv”和“航迹.csv”文件，设置用户投影参数（坐标类型为投影平面直角，椭球参数为北京54或西安80，投影类型为高斯-克吕格，比例尺分母为：1，坐标单位为：米。）②投影带类型和投影带代号根据图幅位置不同相应做出变化。结果投影参数和用户投影参数设置一样，比例尺分母根据项目比例相应变化，例如1：50000比例尺，坐标单位为：毫米。③按指定分隔符打对勾后才能设置分隔符，对空格（Tab）和逗号项打对勾，指定X，Y位于的列号然后进行投影变换，保存线、保存点即可，最后添加到相应的矢量化图中。对于班组较少的情况，用此方法方便、快捷，准确性也高。但对于多于10个班组的情况，用此方法工作效率大大降低，此种方法的弊端在于对每个班组的航点、航迹数据需要进行一次投影，所有参数需重新设置，不能达到预期的工作效率。 　　2.2应用基于MAPGIS平台二次开发的section软件制作 　　（1）格式转换 　　将GPS导出的航点、航迹数据（航点.txt，航迹.txt）在excel中整理后另存为“航点.xls”和“航迹.xls”。 　　（2）投影变换 　　①分别打开“航点.xls”和“航迹.xls”（注：在section工作期间不能关闭表格） 　　②在section软件中首先新建工程，依次进入辅助工具-表格数据投影―全部数据投影菜单，在弹出的窗口中进行设置，excel数据中“X：Y：”必选，“注释：”是否标注可根据要求而定。 　　③填写比例尺，按常规制图需求只需对“不需要投影、绘制点、绘制线”选项打对勾。 　　④对“子图图元参数和线图元参数”进行参数设置，最后确定。另存点和线文件，文件转换完毕。最终将“航点.wt”和“航迹.wl”添加其相应矢量化图中。 　　基于MAPGIS二次开发的section软件制作航点航迹图方法是在MAPGIS投影变换基础上的改进，较为方便。其中“用户投影参数和结果投影参数”不需要设置，只需对其子图参数和线参数进行设置，另外在不关闭软件情况下，子图参数和线参数可不必重复设置。此方法的弊端同MAPGIS投影变换，工作效率同样很低。 　　3程序算法 　　程序设计主要按两步实现： 　　第一步：将GPS导出的航点、航迹数据转换成MAPGIS明码文件。 　　第二步：将MAPGIS明码文件转换成图形文件。 　　程序流程图见图1。 　　MAPGIS的明码文件是MAPGIS的图形与文本文件之间的交换文件。 　　其结构清晰，内容可见，但不能携带属性，现将文件结构说明如下： 　　①点文件结构 　　逻辑结构： 　　文件头 点数 1号点 2号点 …… 　　具体为： 　　A、文件头，8个字节WMAP9022 （老的文件为WMAP6022或WMAP7022和WMAP8022） 　　B、点数 n 　　C、1号点 　　x1 y1 ID