NEMA-0183 串口.docVIP

GPGSV 　　可视卫星状态输出语句($GPGSV) 例2：$GPGSV,2,1,08,06,33,240,45,10,36,074,47,16,21,078,44,17,36,313,42*78$GPGSV，2，1，08，06，33，240，45，10，36，074，47，16，21，078，44，17，36，313，42*78 　　标准格式： $GPGSV，(1)，(2)，(3)，(4)，(5)，(6)，(7)，…(4),(5)，(6)，(7)*hh(CR)(LF) 　　各部分含义为： 　　(1)总的GSV语句电文数；2; 　　(2)当前GSV语句号:1; 　　(3)可视卫星总数:08; 　　(4)卫星号:06; 　　(5)仰角(00～90度):33度; 　　(6)方位角(000～359度):240度; 　　(7)信噪比(00～99dB):45dB(后面依次为第10，16，17号卫星的信息); 　　*总和校验域；　 　　hh 总和校验数:78; 　　(CR)(LF)回车，换行。 　　注：每条语句最多包括四颗卫星的信息，每颗卫星的信息有四个数据项，即：　 　　(4)－卫星号，(5)－仰角，(6)－方位角，(7)－信噪比。 $GPRMC,161022,A,3212.875,N,11893.578,E,0.0, 110.4,140406,2.3,W,A*302。在此列中各数据段通过逗号分开,其中:$GPRMC为帧头,标识后续帧内数据组成结构;161022为UTC标准时间,格式为“hh/mm/ss”;A表示数据有效,如为V则表示可跟踪卫星小于3颗;3212.875为纬度值,格式为“ddmm.mmmm”;N表示北纬,如为S则表示南纬;11893.578为经度值,格式为“dddmm.mmmm”;E表示东经,如为W则表示西经;0.0表示速度;110.4表示方位角,从000.0°~359.9°;140406为UTC标准日期,格式为“mm/dd/yy”;2.3表示地磁变化,从000.0°~180.0°;W表示地磁变化方向,包括W或E; 在这些数据中,本文主要关心的是地理坐标和时间,即纬度、经度和UTC日期、时间。 3　定位信息的传输和提取定位信息的传输,即GPS接收机与PC机之间的通信,通常采用串口来实现。本文中采用VB提供的MSComm控件来编写串口程序达到通信的目的。 MSComm控件被广泛用来实现串口通信,对于他的介绍这里不再赘述。在本文中实现具体的串口通信时,必须对MSComm控件的相关属性进行设置。在默认设置基础上需要进行更改的设置包括下面3个部分: (1)考虑到GPS串口通信采用固定的参数,因此要将MSComm控件中的Settings属性设置为“4800,N,8,1”,即波特率为4 800 b/s,无奇偶校验位,数据位为8,停止位 为1。 (2)根据所采用的接收机的不同,还需对MSComm控件中的inputMode属性进行设置,本文中采用“comIn-putModeText”方式。 (3)根据所选择的串口将MSComm控件中的Com-mport属性设置为相应的串口号,本文中为“1”。 定位信息的提取,包括2个部分: (1)从“$GPRMC”数据列中提取经纬度等信息; (2)将这些信息在文本框内显示。这一工作可以在 MSComm控件中的OnComm事件中通过编程具体实现。 部分代码如下: Private Sub MSComm1 OnComm() ---------------- Dim GPRMC As String, GPSlat As String, GPSLon As String, GPSVel As String, GPSTime As String, GPSData As String ′定义相应的变量 If MSComm1.InBufferCount 0 Then GPRMC = MSComm1.Input End If MSComm1.InBufferCount = 0 ′采集GPS定位信息 GPSlat = Mid(GPRMC,21,2) + ′ + Mid(GPRMC,23,7) + ′′ + Mid(GPRMC,31,1) GPSLon = Mid(GPRMC,33,3) + ′ + Mid(GPRMC,36,7) + ′′ + Mid(GPRMC,44,1) GPSVel = Mid(GPRMC,46,4) GPSTime = Str((Val(Mid(GPRMC,8,2)) + 8) Mod 24) + : + Mid(GPRMC,10,2) + : + Mid(GPRMC,12,2) GPSData = Mid(GPRMC,52,2) + / + Mid(GPRMC,54