2024年5月20日发(作者：虢痴旋)
维普资讯
１ＯＯ 交通与计算机 ２００６年第５期 第２４卷 总１３２期
基于ＧＰＳ的船舶航行数据记录软件开发
吴建华 王平利
（武汉理工大学
摘要
武汉４３００６３）
介绍了基于ＧＰＳ的船舶航行数据记录应用软件的主要功能及作用，给出了从ＧＰＳ中
获取船舶航行数据，对数据进行保存、读取，在电子海图上实现数据重放及删除的主要程序，并对
其进行了分析。经测试．表明程序操作简单、运行稳定、实用性强。
关键词 ＧＰＳ；ＶＤＲ；电子海图
中图法分类号：Ｕ６６６．１３４ 文献标识码：Ａ
０ 引 言
现代船舶大多装有ＧＰＳ接收机，可以全天
０１８３协议输出的数据采集到计算机。在实验室进
行开发时，无法获得实际航向和航速值，使用了
ＧＰＳ接收机上的Ｓｉｍｕｌａｔｅ模式，将航向设为０３０。，
航速设为２Ｏ ｋｎ，初始位置３１。１４ Ｎ，１２１。２９ Ｅ。
在Ｓｉｍｕｌａｔｅ模式下，船舶以所设航向、航速从
初始位置开始航行，每隔一定时间采集这些数据
候、实时地为船舶提供高精度船位来保障船舶航
行安全，另外，现代ＧＰＳ接收机除了提供位置数
据外，还可提供日期、时间、航向和航速等参数，如
果能开发一个软件将其航行中的一些参数采集、
记录保存起来，并能在电子海图平台上实现重放，
该软件就具备一个简单的船舶航行数据记录仪
（ｖｏｙａｇｅ ｄａｔａ ｒｅｃｏｒｄｅｒ，ＶＤＲ）的功能。尽管其功
并保存在指定文件中，通过重放功能可在电子海
图平台上显示船位，并将上述数据显示在文本框
中实现数据再现。
利用ＤＢ一９串口线把ＧＰＳ和ＰＣ机连接起来，
在ＧＰＳ手册中可以找到１根接地线（Ｂｌａｃｋ）、２根
数据输入输出线（ＮＭＥＡ ｏｕｔｐｕｔ Ｗｈｉｔｅ，ＮＭＥＡ
ｉｎｐｕｔ Ｂｌｕｅ），并将这３根线连接到ＰＣ机的串口，
连接方法如图１所示。
能没有真实的ＶＤＲ齐全，但却具有无需大量投
资、操作简单和实用性强等优点。
基于此，笔者使用Ｎａｖｍａｎ Ｔｒａｃｋｅｒ ５６００
ＧＰＳ接收机和ＰＣ机，利用Ｖｉｓｕａｌ Ｂａｓｉｃ ６．０和
Ｍａｐｉｎｆｏ ＭａｐＸ软件开发了船舶航行数据记录应
从ＧＰＳ中读取数据并显示在文本框上的主
要程序如下。
ＭＳＣｏｍｍ１．ＣｏｍｍＰｏｒｔ＝１ 选择ＣＯＭ１串行口
ＭＳＣｏｍｍ１．Ｓｅｔｔｉｎｇｓ＝”４８００。ｎ，８，１
用软件。
１ 数据采集
利用ＶＢ附带的为应用程序提供串行通讯功
４８００波特率，无奇偶校验，８个数据位，１个停止位
ＭＳＣｏｍｍ１．ＩｎｐｕｔＬｅｎ＝０
能的ＭＳｃｏｍｍ控件 ，采用ＧＰＳ的异步串行传送
方式，将ＮＡＶＭＡＮ ＴＲＡＣＫＥＲ ５６００按ＮＭＥＡ一
使用Ｉｎｐｕｔ属性时，读取接收缓冲区的全部内容
ＭＳＣｏｍｍ１．ＰｏｒｔＯｐｅｎ—Ｔｒｕｅ 打开串行口
ＤＢ一９
Ｓｅｒｉａ１ ＣＯｎｎ￣ｃｔｏｒ＊
（Ｎｏｔ ｕｓｅｄ
图１ ＧＰＳ和ＰＣ机连接图
收稿日期：２００６—０６—２０
维普资讯
基于ＧＰＳ的船舶航行数据记录软件开发——吴建华 王平利 １０１
依据航海仪器中的ＮＭＥＡ一０１８３命令，在缓
冲区所获得的字符中找到位置、日期时间、航向航
速参数的具体位置嘲，程序如下。
Ｄｏ Ｕｎｔｉｌ ＩｎＳｔｒ（Ｉｎｓｔｒｉｎｇ，”ＧＰＧＬＬ”）
接收来自串行口的数据，直到接收到字符一ＧＰＧＬＬ”
ＤｏＥｖｅｎｔｓ
Ｉｎｓｔｒｉｎｇ＝Ｉｎｓｔｒｉｎｇ＆ＭＳＣｏｍｍ １．Ｉｎｐｕｔ
将接收到的数据存入字符串Ｉｎｓｔｒｉｎｇ变量
ａａａ Ｉｎｓｔｒｉｎｇ
ａ＝ＩｎＳｔｒ（ａａａ，”ＧＰＧＧＡ”）
确定经纬度在字符串中的开始位置为ａ
ｂ＝ＩｎＳｔｒ（ａａａ，”ＧＰＶＴＧ”）
确定航向、航速在字符串中的开始位置为ｂ
Ｃ＝ＩｎＳｔｒ（ａａａ， ＧＰＺＤＡ”）
确定日期、时间在字符串中的位置开始位置为Ｃ
借助字符串处理函数，以ａ，ｂ，Ｃ为线索读出
日期、时间、纬度、经度、航向、航速数据，并在６个
文本框中分别显示出带格式的值。具体程序如下。
Ｔｅｘｔ１．Ｔｅｘｔ＝Ｍｉｄ（ａａａ，Ｃ＋１６，２）＆ ／ ＆Ｍｉｄ
（ａａａ，Ｃ＋１９，２）＆”／”＆Ｍｉｄ（ａａａ，Ｃ＋２２，４） 显示日
期值
ｍｙｔｉｍｅ：Ｖａｌ（Ｍｉｄ（ａａａ，ｃ＋６，２））＋８ 时区转换后将世
界时转换为中国时间
Ｔｅｘｔ２．Ｔｅｘｔ＝ｍｙｔｌｍｅ＆”： ＆Ｍｉｄ（ａａａ，ｃ＋８，２）＆
”
：
”＆Ｍｉｄ（ａａａ，Ｃ＋１０，２） 显示时间值
Ｔｅｘｔ３．Ｔｅｘｔ＝Ｍｉｄ（ａａａ，ａ＋１６，２） ＆Ｍｉｄ（ａａａ，
ａ＋１８，６）＆ ＆Ｍｉｄ（ａａａ，ａ十２５，１） 显示纬度值
Ｔｅｘｔ４．Ｔｅｘｔ＝Ｍｉｄ（ａａａ，ａ＋２７，３）＆ ”＆Ｍｉｄ
（ａａａ，ａ＋３０，６）＆ ”＆Ｍｉｄ（ａａａ，ａ＋３７，１） 显示经
度值
Ｔｅｘｔ５．Ｔｅｘｔ：Ｍｉｄ（ａａａ．ｂ＋１４，３）＆ 显示航向值
Ｔｅｘｔ６．Ｔｅｘｔ：Ｍｉｄ（ａａａ，ｂ＋２２，３） 显示航速值
Ｌｏｏｐ
２数据记录
使用Ｔｉｍｅｒ控件自动循环执行上述程序以获
得更新后的船舶航行数据，从上述６个文本控件
中定时取得数据并保存在硬盘的文件中，就可动
态地记录整个航程期间的船舶航行数据。
将Ｔｉｍｅｒ的Ｉｎｔｅｒｖａｌ属性设为６０ ０００，可每隔
１ ｍｉｎ取１次数据，也可根据具体情况调整数据更
新的时间间隔。
如将数据更新的时间间隔设为１０ ｒａｉｎ，可以
用下面的语言来完成：
Ｐｒｉｖａｔｅ Ｓｕｂ Ｔｉｍｅｒｌ—Ｔｉｍｅｒ（）
Ｓｔａｔｉｃ ｎ Ａｓ Ｉｎｔｅｇｅｒ
ｎ ｎ＋】
Ｉｆ ｎ＝１０ Ｔｈｅｎ
ｎ＝０
Ｅｎｄ Ｉｆ
Ｅｎｄ Ｓｕｂ
时间间隔越短，获得的数据量越大，以最短时
间间隔１ ｒａｉｎ为例，１ ｈ采取６０次数据，需占用内
存２ ｋｂ，１ ｄ为４８ ｋｂ数据量，所以硬盘容量完全可
以容纳。
使用Ｔｉｍｅｒ控件的Ｅｎａｂｌｅｄ属性来控制数据
记录的开关，设开始记录数据为Ｔｒｕｅ，设停止记
录数据为Ｆａｌｓｅ。
由于对记录数据只需存储和调用，无需对数
据进行查询、修改、删减等操作，所以本应用程序
未用数据库保存数据，而是采用简单实用的操作
文本文件的方式存储和读取数据。
周期性地将航行数据保存在文本文件的主要
程序如下。
Ｐｒｉｖａｔｅ Ｓｕｂ Ｔｉｍｅｒｌ—Ｔｉｍｅｒ Ｏ
ｆｉｌｅ１＝一Ｅ：＼ｖｄｒ＼ｈＨａ．ｄａｔ” 确定保存文件的路径和名
称
Ｏｐｅｎ ｆｉｌｅｌ Ｆｏｒ Ａｐｐｅｎｄ Ａｓ＃１
以Ａｐｐｅｎｄ的模式打开文件并写入，Ａｐｐｅｎｄ为增加模
式，即在原来数据的基础上增加数据，而不覆盖原数据，
符合周期性采集数据的需要。
Ｗｒｉｔｅ＃１，Ｔｅｘｔ１．Ｙｅｘｔ，Ｔｅｘｔ２．Ｔｅｘｔ，Ｔｅｘｔ３．Ｔｅｘｔ，
Ｔｅｘｔ４．Ｔｅｘｔ，Ｔｅｘｔ５．Ｔｅｘｔ，Ｔｅｘｔ６．Ｔｅｘｔ 从文本框中将日
期、时间、纬度、经度、航向、航速数据写入ｈｕａ．ｄａｔ文件。
Ｃｌｏｓｅ＃１
Ｅｎｄ Ｓｕｂ
３ 数据重放
与数据记录相反，从ｈｕａ．ｄａｔ文件中逐行读
出采集的日期、时间、纬度、经度、航向和航速数据
到６个文本框，并以纬度、经度、航向为依据将船
舶位置在电子海图上以符号显示，循环进行直至
读完全部数据，这样将在文本框中显示文字信息，
在电子海图上留下船舶的轨迹，如图２所示。
具体实现的主要程序如下：
ｆｉｌｅ２＝”Ｅ：＼ｖｄｒ＼ｈＨａ．ｄａｔ”
Ｏｐｅｎ ｆｉｌｅ２ Ｆｏｒ Ｉｎｐｕｔ Ａｓ＃２ 以Ｉｎｐｕｔ模式打开文件
Ｄｏ Ｕｎｔｉｌ ＥＯＦ（２） 读取数据直至读完
Ｉｎｐｕｔ＃２，ｄａｙ，ｔｉｍｅ，ｌａｔ，ｌｏｇ，ｃｏｔｌｒｓｅ，ｓｐｅｅｄ
将日期、时间、纬度、经度、航向、航速依次赋值给ｄａｙ，
ｔｉｍｅ，ｌａｔ，ｌｏｇ，ｃｏｔｌｒｓｅ，ｓｐｅｅｄ ６个变量，并在文本框中显
示。
维普资讯
１Ｏ２
Ｔｅｘｔ１．Ｔｅｘｔ＝ｄａｙ
Ｔｅｘｔ２．Ｔｅｘｔ—ｔｉｍｅ
Ｔｅｘｔ３．Ｔｅｘｔ＝ｌａｔ
Ｔｅｘｔ４．Ｔｅｘｔ＝ｌｏｇ
Ｔｅｘｔ５．Ｔｅｘｔ ｃｏｕｒｓｅ
Ｔｅｘｔ６．Ｔｅｘｔ＝ｓｐｅｅｄ
图２船舶航行数据记录应用软件界面图
电子海图系统已发展成为一种新型的船舶导
航系统和辅助决策系统，它不仅能连续给出船位，
还能提供与航海有关的各种信息，所以将前述航
行数据中的船位数据应用于电子海图中，可对船
舶位置进行可视化显示嘲。
电子海图上船位的显示功能程序为
Ｄｉｍ ｗｐｔ—ｐｏｉｎｔｓ Ａｓ Ｎｅｗ Ｐｏｉｎｔ 定义点元素
ｗｐｔ—Ｙ＝ｌａｔ 将纬度数据赋值给ｗｐｔ—Ｙ
ｗｐｔ—Ｘ＝ｌｏｇ 将经度数据赋值给ｗｐｔ—Ｘ
ｗｐｔ—ｐｏｉｎｔｓ．Ｓｅｔ ｗｐｔ—Ｘ，ｗｐｔ—Ｙ 将位置数据赋值Ｉ１
ｗｐｔ—ｐｏｉｎｔｓ
由于要将船位在相应的位置点用符号显示出
来，使用了ＦｅａｔｕｒｅＦａｃｔｏｒｙ．ＣｒｅａｔｅＳｙｍｂｏｌＭａｐＸ
中产生符号的函数，使用前先选定符号的样式，包
括Ｆｏｎｔ、Ｃｈａｒａｃｔｅｒ、Ｓｉｚｅ、Ｃｏｌｏｒ、Ｒｏｔａｔｉｏｎ等。值得
一
提的是Ｒｏｔａｔｉｏｎ的使用，可以将船舶航向数据
与符号的旋转方向结合起来，这样使船舶的显示
更形象。
Ｍａｐ １．ＤｅｆａｕｌｔＳｔｙｌｅ．ＳｙｍｂｏｌＦｏｎｔ一 ｓｙｍｂｏｌ
Ｍａｐ１．ＤｅｆａｕｈＳｔｙｌｅ．ＳｙｍｂｏｌＣｈａｒａｃｔｅｒ＝２０９ 将船舶
位置以△符号来替代
Ｍａｐ１．ＤｅｆａｕｈＳｔｙｌｅ．ＳｙｍｂｏｌＦｏｎｔ．Ｓｉｚｅ一１４
Ｍａｐ１．ＤｅｆａｕｈＳｔｙｌｅ．ＳｙｍｂｏｌＦｏｎｔＣｏｌｏｒ一＆ＨＦＦ＆ 选择
尺寸及颜色
Ｍａｐ１．ＤｅｆａｕｈＳｔｙｌｅ．ＳｙｍｂｏｌＦｏｎｔＲｏｔａｔｉｏｎ一１８０＋
ｃｏｕｒｓｅ 旋转△符号的方向表示航向
Ｄｉｍ ｎｅｗｏｂｊ Ａｓ Ｎｅｗ ＭａｐＸＬｉｂ．Ｆｅａｔｕｒｅ 定义ｎｅｗｏｂｊ
作为新的元素
Ｄｉｍ ｏｂｊ Ａｓ ＭａｐＸＬｉｂ．Ｆｅａｔｕｒｅ 定义ｏｂｊ为元素
Ｓｅｔ ｎｅｗｏｂｊ＝Ｍａｐ１．ＦｅａｔｕｒｅＦａｃｔｏｒｙ．ＣｒｅａｔｅＳｙｍｂｏｌ
（ｗｐｔ——ｐｏｉｎｔｓ，Ｍａｐ１．ＤｅｆａｕｌｔＳｔｙｌｅ）
利用产生符号函数在所给定的点位置ｗｐｔ—ｐｏｉｎｔｓ以
交通与计算机２ＯＯ６年第５期 第２４卷 总１３２期
所选定的样式在海图上显示符号（船舶），并将该符号作
为一个新产生的元素。
Ｓｅｔ ｏｂｊ＝Ｍａｐ１．Ｌａｙｅｒｓ．Ｉｔｅｍ（１）．ＡｄｄＦｅａｔｕｒｅ
（ｎｅｗｏｂｊ）
在海图上新产生的符号元素ｎｅｗｏｂｊ放入第１层符合
电子海图分层化管理。
Ｍａｐ１．Ｒｅｆｒｅｓｈ 产生符号后必须进行对海图更新
重放数据时，可将每一次采集的数据信息逐
条重放，这需对数据进行逐条操作；还可全部重
放，便于快速显示最后的航行数据结果。这两种重
放选择可以用下述语言来实现。
Ｉｆ ｐｌａｙｂａｃｋ＝６ Ｔｈｅｎ 设一个标志符ｐｌａｙｂａｃｋ
ｐｌａｙｂａｃｋ＝ＭｓｇＢｏｘ（”显示下一条按Ｙ全部显示
按Ｎ”，ｖｂＹｅｓＮｏ）
Ｅｎｄ Ｉｆ 按（Ｙ），ｐｌａｙｂａｃｋ一６执行上述条件句，
按（Ｎ），ｐｌａｙｂａｃｋｓ６跳过上述条件句
Ｌｏｏｐ
ｏｓｅ＃２
重放结束，或者需要重新重放，有必要清除电
子海图上的船舶轨迹点，可采用电子海图中的
ＤｅｌｅｔｅＦｅａｔｕｒｅ（）函数，删除层中元素实现上述效
果的程序为
Ｄｉｍ ｆ Ａｓ ＭａｐＸＬｉｂ．Ｆｅａｔｕｒｅ
定义ｆ作为元素为下面函数使用作准备
Ｄｏ Ｗｈｉｌｅ Ｍａｐ１．Ｌａｙｅｒｓ．Ｉｔｅｍ（１）．ＡｌｌＦｅａｔｕｒｅｓ．Ｃｏｕｎｔ
检查存放海图符号（船位）的第１层中的数量，只要
还有元素存在就循环，直到把元素全部删除，就可以清除
电子海图上的船舶轨迹点。
Ｓｅｔ ｆ＝Ｍａｐ１．Ｌａｙｅｒｓ．Ｉｔｅｍ（１）．ＧｅｔＦｅａｔｕｒｅＢｙＩＤ（Ｍａｐ１．
Ｌａｙｅｒｓ．Ｉｔｅｍ（１）．ＡｌｌＦｅａｔｕｒｅｓ．Ｉｔｅｍ（１）．ＦｅａｔｕｒｅＩＤ）
获得第１层中第１个元素的ＦｅａｔｕｒｅｌＤ，并且把该元
素命名为ｆ。
Ｍａｐ１．Ｌａｙｅｒｓ．Ｉｔｅｍ（１）．ＤｅｌｅｔｅＦｅａｔｕｒｅ（ｆ．ＦｅａｔｕｒｅＩＤ）
依据获得的ＦｅａｔｕｒｅＩＤ删除ｆ元素，该过程重复进行
下去，取下一个元素的ＦｅａｔｕｒｅｌＤ再次把该元素命名为ｆ，
使用ＤｅｌｅｔｅＦｅａｔｕｒｅ（ｆ．ＦｅａｔｕｒｅＩＤ）删除ｆ元素，直到全部删
除。
Ｍａｐ１．Ｒｅｆｒｅｓｈ
Ｌｏｏｐ
４结束语
应用软件利用ＭＳｃｏｍｍ控件成功地接收来
自ＧＰＳ的船舶航行数据，并予以保存，在电子海
图显示平台上实现重放。除了上述的应用外，若将
重放的时间改为即时，可在电子海图上近似实时
地实现船位的可视化显示，特别是在狭水道航行
（下转第１０６页）
Ｃｌ
维普资讯
１０６ 交通与计算机２００６年第５期 第２４卷 总１３２期
由于算法对初始值比较敏感，不同的初始值
达到最优解的迭代次数是不同的，笔者经过多次
实验，认为在（一１，１）范围内的初始值效果较好。
由于本文是基于地图上的几何坐标来规划旅
游路线的，可能与实际情况有一定出入；下一步的
Ｃｙｂｅｒｎｅｔｉｃｓ，１９８５（５２）：１４１－１５２
Ｅ２３ Ｈｏｐｆｉｅｌｄ Ｊ Ｊ．Ｎｅｕｒａｌ ｎｅｔｗｏｒｋｓ ａｎｄ ｐｈｙｓｉｃａｌ ｓｙｓｔｅｍｓ
ｗｉｔｈ ｅｍｅｒｇｅｎｔ ｃｏｌｌｅｃｔｉｖｅ ｃｏｍｐｕｔａｔｉｏｎａｌ ａｂｉｌｉｔｉｅｓ．
ＰＮＡＳ．ＵＳＡ，１９８２（７９）：２ ５５４—２ ５５８
Ｅ３－１姜国均．Ｈｏｐｆｉｅｌｄ网络解ＴＳＰ的改进算法．浙江大
学学报：理学版．２００１．２８（２）：１６０—１６３
研究问题是，把各景点间的公路里程、铁路里程数
据与相关的费用数据结合，使其有更大的实际意
义和应用价值。
参考文献
ｅｌｄ Ｊ Ｊ，Ｔａｎｋ Ｄ Ｗ．Ｎｅｕｒａｌ ｃｏｍｐｕｔａｔｉｏｎ ｏｆ
［１］
Ｈｏｐｆｉ
ｄｅｃｉｓｉｏｎｓ ｉｎ ｏｐｔｉｍｉｚａｔｉｏｎ ｐｒｏｂｌｅｍｓ．Ｂｉｏｌｏｇｉｃａｌ
Ｅ４］刘辉，胡大治．ＴＳＰ问题的最优化研究及求解实
例．中国科技信息，２００５（２４）：３８—３８
［５］ 王洪元，史国栋．人工神经网络技术及其应用．北
京：中国石化出版社，２００２：９９—１０７
［６］徐丽娜．神经网络控制．北京：电子工业出版社，
２００３：５５—５８
Ｎｅｕｒａｌ Ｎｅｔｗｏｒｋ Ｍｅｔｈｏｄ ｔｏ Ｓｅｌｅｃｔ ｔｈｅ Ｂｅｓｔ Ｔｏｕｒ Ｒｏｕｔｅ
ＬＩ Ｘｕｅｊｕａｎ ＣＵＩ Ｓｈａｎｇｓｅｎ ＺＨＡＮＧ Ｋｅ
（Ｃｈａｎｇ’ａｎ Ｕｎｉｖｅｒｓｉｔｙ，Ｘｉ’ａｎ ７１００６４，Ｃｈｉｎａ）
Ａｂｓｔｒａｃｔ：Ｆｏｒ ｔｈｅ ｐｒｏｂｌｅｍ ｏｆ ｓｅｌｅｃｔｉｎｇ ｔｈｅ ｂｅｓｔ ｔｏｕｒ ｒｏｕｔｅ，ｔｈｅ ｐａｐｅｒ ｐｕｔ ｆｏｒｗａｒｄ ａｎ ａｌｇｏｒｉｔｈｍ ａｎｄ ｏｐｔｉｍｉｚａｔｉｏｎ
ｍｏｄｅｌ ｏｆ ｕｓｉｎｇ Ｈｏｐｆｉｅｌｄ ｎｅｕｒａｌ ｎｅｔｗｏｒｋ．Ｂａｓｅｄ ｏｎ Ｘｉ’ａｎ ｔｏｕｒ ｍａｐ，ａ Ｈｏｐｆｉｅｌｄ ｎｅｕｒａｌ ｎｅｔｗｏｒｋ ｗａｓ ｓｅｔ ｕｐ．Ｔｈｅ
ｅｘｐｅｒｉｍｅｎｔ ｒｅｓｕｌｔ ｓｈｏｗｓ ｔｈａｔ ｔｈｉｓ ｍｅｔｈｏｄ ｉｓ ｖｅｒｙ ｖａｌｉｄ ｆｏｒ ｓｅｌｅｃｔｉｎｇ ｔｈｅ ｂｅｓｔ ｒｏｕｔｅ．
Ｋｅｙ ｗｏｒｄｓ：ｔｏｕｒ ｒｏｕｔｅ；ｏｐｔｉｍａｌ ｓｅｌｅｃｔｉｏｎ；Ｈｏｐｆｉｅｌｄ ｎｅｕｒａｌ ｎｅｔｗｏｒｋ；ｏｐｔｉｍｉｚａｔｉｏｎ Ｍｏｄｅｌ
（上接第１０２页）
及船舶靠离码头时监视船舶运动状态，为实现船
舶自动靠离码头软件的开发打下了基础。
参考文献
［１］康博创作室．Ｖ ｉｓｕａｌＢａｓｉｃ ６．０使用教程．北京：机
械工业出版社，１９９９：３４７—３４９
［２］李洪涛．许国昌，薛鸿印，等．ＧＰＳ应用程序设计．北
京：科学出版社，１９９９：１９—２０
［３］朱世立．电子海图应用系统设计．北京：国防工业
出版社，１９９７：８０—８９
Ｖｅｓｓｅｌｓ Ｖｏｙａｇｅ Ｄａｔａ Ｒｅｃｏｒｄｉｎｇ Ｓｏｆｔｗａｒｅ Ｄｅｖｅｌｏｐｍｅｎｔ Ｂａｓｅｄ ｏｎ ＧＰＳ
ＷＵ Ｊｉａｎｈｕａ ＷＡＮＧ Ｐｉｎｇｌｉ
（Ｗｕｈａｎ Ｕｎｉｖｅｒｓｉｔｙ ｏｆ Ｔｅｃｈｎｏｌｏｇｙ，Ｗｕｈａｎ ４３００６３，Ｃｈｉｎａ）
Ａｂｓｔｒａｃｔ：Ｔｈｉｓ ａｒｔｉｃｌｅ ｉｎｔｒｏｄｕｃｅｓ ｔｈｅ ｍａｉｎ ｆｕｎｃｔｉｏｎｓ ａｎｄ ｒｏｌｅｓ ｏｆ ａｎ ａｐｐｌｉｃａｔｉｏｎ ｓｏｆｔｗａｒｅ，ｗｈｉｃｈ ｉｓ ｕｓｅｄ ｔｏ ｒｅｃｏｒｄ
ｔｈｅ ｖｅｓｓｅｌｓ ｖｏｙａｇｅ ｄａｔａ ｂａｓｅｄ ｏｎ ＧＰＳ．Ｔｈｅ ａｒｔｉｃｌｅ ｐｒｏｖｉｄｅｓ ａｎｄ ａｎａｌｙｚｅｓ ｔｈｅ ｍａｉｎ ｐｒｏｇｒａｍｓ ｏｆ ｏｂｔａｉｎｉｎｇ ｖｅｓｓｅｌｓ ｖｏｙａｇｅ
ｄａｔａ ｆｒｏｍ ＧＰＳ，ｓａｖｉｎｇ ｄａｔａ，ｒｅａｄｉｎｇ ｄａｔａ，ａｎｄ ｒｅｌａｙｉｎｇ ａｎｄ ｄｅｌｅｔｉｎｇ ｄａｔａ ｏｎ ｅｌｅｃｔｒｏｎｉｃ ｃｈａｒｔ．Ａｆｔｅｒ ｔｅｓｔｉｎｇ，ｉｔ ｈａｓ
ｐｒｏｖｅｄ ｔｈａｔ ｔｈｉｓ ｐｒｏｇｒａｍ ｃａｎ ｂｅ ｓｉｍｐｌｅ，ｓｔａｂｌｅ，ａｎｄ ｆｅａｓｉｂｌｅ．
Ｋｅｙ ｗｏｒｄｓ：ＧＰＳ；ＶＤＲ；ｅｌｅｃｔｒｏｎｉｃ ｃｈａｒｔ
2024年5月20日发(作者：虢痴旋)
维普资讯
１ＯＯ 交通与计算机 ２００６年第５期 第２４卷 总１３２期
基于ＧＰＳ的船舶航行数据记录软件开发
吴建华 王平利
（武汉理工大学
摘要
武汉４３００６３）
介绍了基于ＧＰＳ的船舶航行数据记录应用软件的主要功能及作用，给出了从ＧＰＳ中
获取船舶航行数据，对数据进行保存、读取，在电子海图上实现数据重放及删除的主要程序，并对
其进行了分析。经测试．表明程序操作简单、运行稳定、实用性强。
关键词 ＧＰＳ；ＶＤＲ；电子海图
中图法分类号：Ｕ６６６．１３４ 文献标识码：Ａ
０ 引 言
现代船舶大多装有ＧＰＳ接收机，可以全天
０１８３协议输出的数据采集到计算机。在实验室进
行开发时，无法获得实际航向和航速值，使用了
ＧＰＳ接收机上的Ｓｉｍｕｌａｔｅ模式，将航向设为０３０。，
航速设为２Ｏ ｋｎ，初始位置３１。１４ Ｎ，１２１。２９ Ｅ。
在Ｓｉｍｕｌａｔｅ模式下，船舶以所设航向、航速从
初始位置开始航行，每隔一定时间采集这些数据
候、实时地为船舶提供高精度船位来保障船舶航
行安全，另外，现代ＧＰＳ接收机除了提供位置数
据外，还可提供日期、时间、航向和航速等参数，如
果能开发一个软件将其航行中的一些参数采集、
记录保存起来，并能在电子海图平台上实现重放，
该软件就具备一个简单的船舶航行数据记录仪
（ｖｏｙａｇｅ ｄａｔａ ｒｅｃｏｒｄｅｒ，ＶＤＲ）的功能。尽管其功
并保存在指定文件中，通过重放功能可在电子海
图平台上显示船位，并将上述数据显示在文本框
中实现数据再现。
利用ＤＢ一９串口线把ＧＰＳ和ＰＣ机连接起来，
在ＧＰＳ手册中可以找到１根接地线（Ｂｌａｃｋ）、２根
数据输入输出线（ＮＭＥＡ ｏｕｔｐｕｔ Ｗｈｉｔｅ，ＮＭＥＡ
ｉｎｐｕｔ Ｂｌｕｅ），并将这３根线连接到ＰＣ机的串口，
连接方法如图１所示。
能没有真实的ＶＤＲ齐全，但却具有无需大量投
资、操作简单和实用性强等优点。
基于此，笔者使用Ｎａｖｍａｎ Ｔｒａｃｋｅｒ ５６００
ＧＰＳ接收机和ＰＣ机，利用Ｖｉｓｕａｌ Ｂａｓｉｃ ６．０和
Ｍａｐｉｎｆｏ ＭａｐＸ软件开发了船舶航行数据记录应
从ＧＰＳ中读取数据并显示在文本框上的主
要程序如下。
ＭＳＣｏｍｍ１．ＣｏｍｍＰｏｒｔ＝１ 选择ＣＯＭ１串行口
ＭＳＣｏｍｍ１．Ｓｅｔｔｉｎｇｓ＝”４８００。ｎ，８，１
用软件。
１ 数据采集
利用ＶＢ附带的为应用程序提供串行通讯功
４８００波特率，无奇偶校验，８个数据位，１个停止位
ＭＳＣｏｍｍ１．ＩｎｐｕｔＬｅｎ＝０
能的ＭＳｃｏｍｍ控件 ，采用ＧＰＳ的异步串行传送
方式，将ＮＡＶＭＡＮ ＴＲＡＣＫＥＲ ５６００按ＮＭＥＡ一
使用Ｉｎｐｕｔ属性时，读取接收缓冲区的全部内容
ＭＳＣｏｍｍ１．ＰｏｒｔＯｐｅｎ—Ｔｒｕｅ 打开串行口
ＤＢ一９
Ｓｅｒｉａ１ ＣＯｎｎ￣ｃｔｏｒ＊
（Ｎｏｔ ｕｓｅｄ
图１ ＧＰＳ和ＰＣ机连接图
收稿日期：２００６—０６—２０
维普资讯
基于ＧＰＳ的船舶航行数据记录软件开发——吴建华 王平利 １０１
依据航海仪器中的ＮＭＥＡ一０１８３命令，在缓
冲区所获得的字符中找到位置、日期时间、航向航
速参数的具体位置嘲，程序如下。
Ｄｏ Ｕｎｔｉｌ ＩｎＳｔｒ（Ｉｎｓｔｒｉｎｇ，”ＧＰＧＬＬ”）
接收来自串行口的数据，直到接收到字符一ＧＰＧＬＬ”
ＤｏＥｖｅｎｔｓ
Ｉｎｓｔｒｉｎｇ＝Ｉｎｓｔｒｉｎｇ＆ＭＳＣｏｍｍ １．Ｉｎｐｕｔ
将接收到的数据存入字符串Ｉｎｓｔｒｉｎｇ变量
ａａａ Ｉｎｓｔｒｉｎｇ
ａ＝ＩｎＳｔｒ（ａａａ，”ＧＰＧＧＡ”）
确定经纬度在字符串中的开始位置为ａ
ｂ＝ＩｎＳｔｒ（ａａａ，”ＧＰＶＴＧ”）
确定航向、航速在字符串中的开始位置为ｂ
Ｃ＝ＩｎＳｔｒ（ａａａ， ＧＰＺＤＡ”）
确定日期、时间在字符串中的位置开始位置为Ｃ
借助字符串处理函数，以ａ，ｂ，Ｃ为线索读出
日期、时间、纬度、经度、航向、航速数据，并在６个
文本框中分别显示出带格式的值。具体程序如下。
Ｔｅｘｔ１．Ｔｅｘｔ＝Ｍｉｄ（ａａａ，Ｃ＋１６，２）＆ ／ ＆Ｍｉｄ
（ａａａ，Ｃ＋１９，２）＆”／”＆Ｍｉｄ（ａａａ，Ｃ＋２２，４） 显示日
期值
ｍｙｔｉｍｅ：Ｖａｌ（Ｍｉｄ（ａａａ，ｃ＋６，２））＋８ 时区转换后将世
界时转换为中国时间
Ｔｅｘｔ２．Ｔｅｘｔ＝ｍｙｔｌｍｅ＆”： ＆Ｍｉｄ（ａａａ，ｃ＋８，２）＆
”
：
”＆Ｍｉｄ（ａａａ，Ｃ＋１０，２） 显示时间值
Ｔｅｘｔ３．Ｔｅｘｔ＝Ｍｉｄ（ａａａ，ａ＋１６，２） ＆Ｍｉｄ（ａａａ，
ａ＋１８，６）＆ ＆Ｍｉｄ（ａａａ，ａ十２５，１） 显示纬度值
Ｔｅｘｔ４．Ｔｅｘｔ＝Ｍｉｄ（ａａａ，ａ＋２７，３）＆ ”＆Ｍｉｄ
（ａａａ，ａ＋３０，６）＆ ”＆Ｍｉｄ（ａａａ，ａ＋３７，１） 显示经
度值
Ｔｅｘｔ５．Ｔｅｘｔ：Ｍｉｄ（ａａａ．ｂ＋１４，３）＆ 显示航向值
Ｔｅｘｔ６．Ｔｅｘｔ：Ｍｉｄ（ａａａ，ｂ＋２２，３） 显示航速值
Ｌｏｏｐ
２数据记录
使用Ｔｉｍｅｒ控件自动循环执行上述程序以获
得更新后的船舶航行数据，从上述６个文本控件
中定时取得数据并保存在硬盘的文件中，就可动
态地记录整个航程期间的船舶航行数据。
将Ｔｉｍｅｒ的Ｉｎｔｅｒｖａｌ属性设为６０ ０００，可每隔
１ ｍｉｎ取１次数据，也可根据具体情况调整数据更
新的时间间隔。
如将数据更新的时间间隔设为１０ ｒａｉｎ，可以
用下面的语言来完成：
Ｐｒｉｖａｔｅ Ｓｕｂ Ｔｉｍｅｒｌ—Ｔｉｍｅｒ（）
Ｓｔａｔｉｃ ｎ Ａｓ Ｉｎｔｅｇｅｒ
ｎ ｎ＋】
Ｉｆ ｎ＝１０ Ｔｈｅｎ
ｎ＝０
Ｅｎｄ Ｉｆ
Ｅｎｄ Ｓｕｂ
时间间隔越短，获得的数据量越大，以最短时
间间隔１ ｒａｉｎ为例，１ ｈ采取６０次数据，需占用内
存２ ｋｂ，１ ｄ为４８ ｋｂ数据量，所以硬盘容量完全可
以容纳。
使用Ｔｉｍｅｒ控件的Ｅｎａｂｌｅｄ属性来控制数据
记录的开关，设开始记录数据为Ｔｒｕｅ，设停止记
录数据为Ｆａｌｓｅ。
由于对记录数据只需存储和调用，无需对数
据进行查询、修改、删减等操作，所以本应用程序
未用数据库保存数据，而是采用简单实用的操作
文本文件的方式存储和读取数据。
周期性地将航行数据保存在文本文件的主要
程序如下。
Ｐｒｉｖａｔｅ Ｓｕｂ Ｔｉｍｅｒｌ—Ｔｉｍｅｒ Ｏ
ｆｉｌｅ１＝一Ｅ：＼ｖｄｒ＼ｈＨａ．ｄａｔ” 确定保存文件的路径和名
称
Ｏｐｅｎ ｆｉｌｅｌ Ｆｏｒ Ａｐｐｅｎｄ Ａｓ＃１
以Ａｐｐｅｎｄ的模式打开文件并写入，Ａｐｐｅｎｄ为增加模
式，即在原来数据的基础上增加数据，而不覆盖原数据，
符合周期性采集数据的需要。
Ｗｒｉｔｅ＃１，Ｔｅｘｔ１．Ｙｅｘｔ，Ｔｅｘｔ２．Ｔｅｘｔ，Ｔｅｘｔ３．Ｔｅｘｔ，
Ｔｅｘｔ４．Ｔｅｘｔ，Ｔｅｘｔ５．Ｔｅｘｔ，Ｔｅｘｔ６．Ｔｅｘｔ 从文本框中将日
期、时间、纬度、经度、航向、航速数据写入ｈｕａ．ｄａｔ文件。
Ｃｌｏｓｅ＃１
Ｅｎｄ Ｓｕｂ
３ 数据重放
与数据记录相反，从ｈｕａ．ｄａｔ文件中逐行读
出采集的日期、时间、纬度、经度、航向和航速数据
到６个文本框，并以纬度、经度、航向为依据将船
舶位置在电子海图上以符号显示，循环进行直至
读完全部数据，这样将在文本框中显示文字信息，
在电子海图上留下船舶的轨迹，如图２所示。
具体实现的主要程序如下：
ｆｉｌｅ２＝”Ｅ：＼ｖｄｒ＼ｈＨａ．ｄａｔ”
Ｏｐｅｎ ｆｉｌｅ２ Ｆｏｒ Ｉｎｐｕｔ Ａｓ＃２ 以Ｉｎｐｕｔ模式打开文件
Ｄｏ Ｕｎｔｉｌ ＥＯＦ（２） 读取数据直至读完
Ｉｎｐｕｔ＃２，ｄａｙ，ｔｉｍｅ，ｌａｔ，ｌｏｇ，ｃｏｔｌｒｓｅ，ｓｐｅｅｄ
将日期、时间、纬度、经度、航向、航速依次赋值给ｄａｙ，
ｔｉｍｅ，ｌａｔ，ｌｏｇ，ｃｏｔｌｒｓｅ，ｓｐｅｅｄ ６个变量，并在文本框中显
示。
维普资讯
１Ｏ２
Ｔｅｘｔ１．Ｔｅｘｔ＝ｄａｙ
Ｔｅｘｔ２．Ｔｅｘｔ—ｔｉｍｅ
Ｔｅｘｔ３．Ｔｅｘｔ＝ｌａｔ
Ｔｅｘｔ４．Ｔｅｘｔ＝ｌｏｇ
Ｔｅｘｔ５．Ｔｅｘｔ ｃｏｕｒｓｅ
Ｔｅｘｔ６．Ｔｅｘｔ＝ｓｐｅｅｄ
图２船舶航行数据记录应用软件界面图
电子海图系统已发展成为一种新型的船舶导
航系统和辅助决策系统，它不仅能连续给出船位，
还能提供与航海有关的各种信息，所以将前述航
行数据中的船位数据应用于电子海图中，可对船
舶位置进行可视化显示嘲。
电子海图上船位的显示功能程序为
Ｄｉｍ ｗｐｔ—ｐｏｉｎｔｓ Ａｓ Ｎｅｗ Ｐｏｉｎｔ 定义点元素
ｗｐｔ—Ｙ＝ｌａｔ 将纬度数据赋值给ｗｐｔ—Ｙ
ｗｐｔ—Ｘ＝ｌｏｇ 将经度数据赋值给ｗｐｔ—Ｘ
ｗｐｔ—ｐｏｉｎｔｓ．Ｓｅｔ ｗｐｔ—Ｘ，ｗｐｔ—Ｙ 将位置数据赋值Ｉ１
ｗｐｔ—ｐｏｉｎｔｓ
由于要将船位在相应的位置点用符号显示出
来，使用了ＦｅａｔｕｒｅＦａｃｔｏｒｙ．ＣｒｅａｔｅＳｙｍｂｏｌＭａｐＸ
中产生符号的函数，使用前先选定符号的样式，包
括Ｆｏｎｔ、Ｃｈａｒａｃｔｅｒ、Ｓｉｚｅ、Ｃｏｌｏｒ、Ｒｏｔａｔｉｏｎ等。值得
一
提的是Ｒｏｔａｔｉｏｎ的使用，可以将船舶航向数据
与符号的旋转方向结合起来，这样使船舶的显示
更形象。
Ｍａｐ １．ＤｅｆａｕｌｔＳｔｙｌｅ．ＳｙｍｂｏｌＦｏｎｔ一 ｓｙｍｂｏｌ
Ｍａｐ１．ＤｅｆａｕｈＳｔｙｌｅ．ＳｙｍｂｏｌＣｈａｒａｃｔｅｒ＝２０９ 将船舶
位置以△符号来替代
Ｍａｐ１．ＤｅｆａｕｈＳｔｙｌｅ．ＳｙｍｂｏｌＦｏｎｔ．Ｓｉｚｅ一１４
Ｍａｐ１．ＤｅｆａｕｈＳｔｙｌｅ．ＳｙｍｂｏｌＦｏｎｔＣｏｌｏｒ一＆ＨＦＦ＆ 选择
尺寸及颜色
Ｍａｐ１．ＤｅｆａｕｈＳｔｙｌｅ．ＳｙｍｂｏｌＦｏｎｔＲｏｔａｔｉｏｎ一１８０＋
ｃｏｕｒｓｅ 旋转△符号的方向表示航向
Ｄｉｍ ｎｅｗｏｂｊ Ａｓ Ｎｅｗ ＭａｐＸＬｉｂ．Ｆｅａｔｕｒｅ 定义ｎｅｗｏｂｊ
作为新的元素
Ｄｉｍ ｏｂｊ Ａｓ ＭａｐＸＬｉｂ．Ｆｅａｔｕｒｅ 定义ｏｂｊ为元素
Ｓｅｔ ｎｅｗｏｂｊ＝Ｍａｐ１．ＦｅａｔｕｒｅＦａｃｔｏｒｙ．ＣｒｅａｔｅＳｙｍｂｏｌ
（ｗｐｔ——ｐｏｉｎｔｓ，Ｍａｐ１．ＤｅｆａｕｌｔＳｔｙｌｅ）
利用产生符号函数在所给定的点位置ｗｐｔ—ｐｏｉｎｔｓ以
交通与计算机２ＯＯ６年第５期 第２４卷 总１３２期
所选定的样式在海图上显示符号（船舶），并将该符号作
为一个新产生的元素。
Ｓｅｔ ｏｂｊ＝Ｍａｐ１．Ｌａｙｅｒｓ．Ｉｔｅｍ（１）．ＡｄｄＦｅａｔｕｒｅ
（ｎｅｗｏｂｊ）
在海图上新产生的符号元素ｎｅｗｏｂｊ放入第１层符合
电子海图分层化管理。
Ｍａｐ１．Ｒｅｆｒｅｓｈ 产生符号后必须进行对海图更新
重放数据时，可将每一次采集的数据信息逐
条重放，这需对数据进行逐条操作；还可全部重
放，便于快速显示最后的航行数据结果。这两种重
放选择可以用下述语言来实现。
Ｉｆ ｐｌａｙｂａｃｋ＝６ Ｔｈｅｎ 设一个标志符ｐｌａｙｂａｃｋ
ｐｌａｙｂａｃｋ＝ＭｓｇＢｏｘ（”显示下一条按Ｙ全部显示
按Ｎ”，ｖｂＹｅｓＮｏ）
Ｅｎｄ Ｉｆ 按（Ｙ），ｐｌａｙｂａｃｋ一６执行上述条件句，
按（Ｎ），ｐｌａｙｂａｃｋｓ６跳过上述条件句
Ｌｏｏｐ
ｏｓｅ＃２
重放结束，或者需要重新重放，有必要清除电
子海图上的船舶轨迹点，可采用电子海图中的
ＤｅｌｅｔｅＦｅａｔｕｒｅ（）函数，删除层中元素实现上述效
果的程序为
Ｄｉｍ ｆ Ａｓ ＭａｐＸＬｉｂ．Ｆｅａｔｕｒｅ
定义ｆ作为元素为下面函数使用作准备
Ｄｏ Ｗｈｉｌｅ Ｍａｐ１．Ｌａｙｅｒｓ．Ｉｔｅｍ（１）．ＡｌｌＦｅａｔｕｒｅｓ．Ｃｏｕｎｔ
检查存放海图符号（船位）的第１层中的数量，只要
还有元素存在就循环，直到把元素全部删除，就可以清除
电子海图上的船舶轨迹点。
Ｓｅｔ ｆ＝Ｍａｐ１．Ｌａｙｅｒｓ．Ｉｔｅｍ（１）．ＧｅｔＦｅａｔｕｒｅＢｙＩＤ（Ｍａｐ１．
Ｌａｙｅｒｓ．Ｉｔｅｍ（１）．ＡｌｌＦｅａｔｕｒｅｓ．Ｉｔｅｍ（１）．ＦｅａｔｕｒｅＩＤ）
获得第１层中第１个元素的ＦｅａｔｕｒｅｌＤ，并且把该元
素命名为ｆ。
Ｍａｐ１．Ｌａｙｅｒｓ．Ｉｔｅｍ（１）．ＤｅｌｅｔｅＦｅａｔｕｒｅ（ｆ．ＦｅａｔｕｒｅＩＤ）
依据获得的ＦｅａｔｕｒｅＩＤ删除ｆ元素，该过程重复进行
下去，取下一个元素的ＦｅａｔｕｒｅｌＤ再次把该元素命名为ｆ，
使用ＤｅｌｅｔｅＦｅａｔｕｒｅ（ｆ．ＦｅａｔｕｒｅＩＤ）删除ｆ元素，直到全部删
除。
Ｍａｐ１．Ｒｅｆｒｅｓｈ
Ｌｏｏｐ
４结束语
应用软件利用ＭＳｃｏｍｍ控件成功地接收来
自ＧＰＳ的船舶航行数据，并予以保存，在电子海
图显示平台上实现重放。除了上述的应用外，若将
重放的时间改为即时，可在电子海图上近似实时
地实现船位的可视化显示，特别是在狭水道航行
（下转第１０６页）
Ｃｌ
维普资讯
１０６ 交通与计算机２００６年第５期 第２４卷 总１３２期
由于算法对初始值比较敏感，不同的初始值
达到最优解的迭代次数是不同的，笔者经过多次
实验，认为在（一１，１）范围内的初始值效果较好。
由于本文是基于地图上的几何坐标来规划旅
游路线的，可能与实际情况有一定出入；下一步的
Ｃｙｂｅｒｎｅｔｉｃｓ，１９８５（５２）：１４１－１５２
Ｅ２３ Ｈｏｐｆｉｅｌｄ Ｊ Ｊ．Ｎｅｕｒａｌ ｎｅｔｗｏｒｋｓ ａｎｄ ｐｈｙｓｉｃａｌ ｓｙｓｔｅｍｓ
ｗｉｔｈ ｅｍｅｒｇｅｎｔ ｃｏｌｌｅｃｔｉｖｅ ｃｏｍｐｕｔａｔｉｏｎａｌ ａｂｉｌｉｔｉｅｓ．
ＰＮＡＳ．ＵＳＡ，１９８２（７９）：２ ５５４—２ ５５８
Ｅ３－１姜国均．Ｈｏｐｆｉｅｌｄ网络解ＴＳＰ的改进算法．浙江大
学学报：理学版．２００１．２８（２）：１６０—１６３
研究问题是，把各景点间的公路里程、铁路里程数
据与相关的费用数据结合，使其有更大的实际意
义和应用价值。
参考文献
ｅｌｄ Ｊ Ｊ，Ｔａｎｋ Ｄ Ｗ．Ｎｅｕｒａｌ ｃｏｍｐｕｔａｔｉｏｎ ｏｆ
［１］
Ｈｏｐｆｉ
ｄｅｃｉｓｉｏｎｓ ｉｎ ｏｐｔｉｍｉｚａｔｉｏｎ ｐｒｏｂｌｅｍｓ．Ｂｉｏｌｏｇｉｃａｌ
Ｅ４］刘辉，胡大治．ＴＳＰ问题的最优化研究及求解实
例．中国科技信息，２００５（２４）：３８—３８
［５］ 王洪元，史国栋．人工神经网络技术及其应用．北
京：中国石化出版社，２００２：９９—１０７
［６］徐丽娜．神经网络控制．北京：电子工业出版社，
２００３：５５—５８
Ｎｅｕｒａｌ Ｎｅｔｗｏｒｋ Ｍｅｔｈｏｄ ｔｏ Ｓｅｌｅｃｔ ｔｈｅ Ｂｅｓｔ Ｔｏｕｒ Ｒｏｕｔｅ
ＬＩ Ｘｕｅｊｕａｎ ＣＵＩ Ｓｈａｎｇｓｅｎ ＺＨＡＮＧ Ｋｅ
（Ｃｈａｎｇ’ａｎ Ｕｎｉｖｅｒｓｉｔｙ，Ｘｉ’ａｎ ７１００６４，Ｃｈｉｎａ）
Ａｂｓｔｒａｃｔ：Ｆｏｒ ｔｈｅ ｐｒｏｂｌｅｍ ｏｆ ｓｅｌｅｃｔｉｎｇ ｔｈｅ ｂｅｓｔ ｔｏｕｒ ｒｏｕｔｅ，ｔｈｅ ｐａｐｅｒ ｐｕｔ ｆｏｒｗａｒｄ ａｎ ａｌｇｏｒｉｔｈｍ ａｎｄ ｏｐｔｉｍｉｚａｔｉｏｎ
ｍｏｄｅｌ ｏｆ ｕｓｉｎｇ Ｈｏｐｆｉｅｌｄ ｎｅｕｒａｌ ｎｅｔｗｏｒｋ．Ｂａｓｅｄ ｏｎ Ｘｉ’ａｎ ｔｏｕｒ ｍａｐ，ａ Ｈｏｐｆｉｅｌｄ ｎｅｕｒａｌ ｎｅｔｗｏｒｋ ｗａｓ ｓｅｔ ｕｐ．Ｔｈｅ
ｅｘｐｅｒｉｍｅｎｔ ｒｅｓｕｌｔ ｓｈｏｗｓ ｔｈａｔ ｔｈｉｓ ｍｅｔｈｏｄ ｉｓ ｖｅｒｙ ｖａｌｉｄ ｆｏｒ ｓｅｌｅｃｔｉｎｇ ｔｈｅ ｂｅｓｔ ｒｏｕｔｅ．
Ｋｅｙ ｗｏｒｄｓ：ｔｏｕｒ ｒｏｕｔｅ；ｏｐｔｉｍａｌ ｓｅｌｅｃｔｉｏｎ；Ｈｏｐｆｉｅｌｄ ｎｅｕｒａｌ ｎｅｔｗｏｒｋ；ｏｐｔｉｍｉｚａｔｉｏｎ Ｍｏｄｅｌ
（上接第１０２页）
及船舶靠离码头时监视船舶运动状态，为实现船
舶自动靠离码头软件的开发打下了基础。
参考文献
［１］康博创作室．Ｖ ｉｓｕａｌＢａｓｉｃ ６．０使用教程．北京：机
械工业出版社，１９９９：３４７—３４９
［２］李洪涛．许国昌，薛鸿印，等．ＧＰＳ应用程序设计．北
京：科学出版社，１９９９：１９—２０
［３］朱世立．电子海图应用系统设计．北京：国防工业
出版社，１９９７：８０—８９
Ｖｅｓｓｅｌｓ Ｖｏｙａｇｅ Ｄａｔａ Ｒｅｃｏｒｄｉｎｇ Ｓｏｆｔｗａｒｅ Ｄｅｖｅｌｏｐｍｅｎｔ Ｂａｓｅｄ ｏｎ ＧＰＳ
ＷＵ Ｊｉａｎｈｕａ ＷＡＮＧ Ｐｉｎｇｌｉ
（Ｗｕｈａｎ Ｕｎｉｖｅｒｓｉｔｙ ｏｆ Ｔｅｃｈｎｏｌｏｇｙ，Ｗｕｈａｎ ４３００６３，Ｃｈｉｎａ）
Ａｂｓｔｒａｃｔ：Ｔｈｉｓ ａｒｔｉｃｌｅ ｉｎｔｒｏｄｕｃｅｓ ｔｈｅ ｍａｉｎ ｆｕｎｃｔｉｏｎｓ ａｎｄ ｒｏｌｅｓ ｏｆ ａｎ ａｐｐｌｉｃａｔｉｏｎ ｓｏｆｔｗａｒｅ，ｗｈｉｃｈ ｉｓ ｕｓｅｄ ｔｏ ｒｅｃｏｒｄ
ｔｈｅ ｖｅｓｓｅｌｓ ｖｏｙａｇｅ ｄａｔａ ｂａｓｅｄ ｏｎ ＧＰＳ．Ｔｈｅ ａｒｔｉｃｌｅ ｐｒｏｖｉｄｅｓ ａｎｄ ａｎａｌｙｚｅｓ ｔｈｅ ｍａｉｎ ｐｒｏｇｒａｍｓ ｏｆ ｏｂｔａｉｎｉｎｇ ｖｅｓｓｅｌｓ ｖｏｙａｇｅ
ｄａｔａ ｆｒｏｍ ＧＰＳ，ｓａｖｉｎｇ ｄａｔａ，ｒｅａｄｉｎｇ ｄａｔａ，ａｎｄ ｒｅｌａｙｉｎｇ ａｎｄ ｄｅｌｅｔｉｎｇ ｄａｔａ ｏｎ ｅｌｅｃｔｒｏｎｉｃ ｃｈａｒｔ．Ａｆｔｅｒ ｔｅｓｔｉｎｇ，ｉｔ ｈａｓ
ｐｒｏｖｅｄ ｔｈａｔ ｔｈｉｓ ｐｒｏｇｒａｍ ｃａｎ ｂｅ ｓｉｍｐｌｅ，ｓｔａｂｌｅ，ａｎｄ ｆｅａｓｉｂｌｅ．
Ｋｅｙ ｗｏｒｄｓ：ＧＰＳ；ＶＤＲ；ｅｌｅｃｔｒｏｎｉｃ ｃｈａｒｔ