Appendix B. CR9000(X) ProgramExample'NMEAGGA_Sio4_030805MGW1.CR9'This program acquires NMEA GGA data from a GPS receiver using the SDM-SIO4.'_____'Notes:'(1) Data is acquired from NMEA0183 $GPGGA string:' Sio4Fields: GGAFields: Definitions:' f1 GGA(Field1) GGA_UTC_Time of position' f2,f3 GGA(Field2) Lattitude' f4, GGA(Field3) North or South indication letter' f5,f6 GGA(Field4) Longitude' f7 GGA(Field5) East or West indication letter' f8 GGA(Field6) GPS quality,0=NoGPS,1=GPS,2DGPS' f9 GGA(Field7) Number of satellites in use' f10 GGA(Field8) HDOP, Horizontal Dilution Of Precision' f11 GGA(Field9) Antenna altitude in Meters' GGA(Field10)' GGA(Field11) Geoidal seperation in Meters' GGA(Field12)' GGA(Field13) Age of differential GPS data' GGA(Field14) Differential reference station'(2) SIO4 programming:' fltst 1 "t[$GPGGA,]xFt[,]Dt[.]Dt[,]b1t[,]Dt[.]Dt[,]b1t[,]Ft[,]Ft[,]Ft[,]FX"'_Const OneRep=1Const NoValues=0Const OneValue=1Const ElevenGGAValues=11'..Const UnityMultiplier=1.0Const NoOffset=0.0'..Const Sio4Address0=0Const Port2=2'..'SDM-Sio4 command codes:Const UnusedParameter = 0000Const PollForData0001 = 0001Const SendDataToLgr = 0004Const Sio4COMSetUpCmd = 2049Const StartRxFilter = 2054Const Port2ComCode = 9147 '9=NoHandshaking; 1=1StopBitNoParity; 4=8DataBits; 7=19200BaudConst RxFilt9001 = 9001 'Command parameter for user defined fltst #1.Dim DataPoll,NotUsed'..Public RawGGAData(ElevenGGAValues)Alias RawGGAData(1)=GGA_UTC_TimeAlias RawGGAData(2)=Latt_Int : Units Latt_Int=DegAlias RawGGAData(3)=Latt_Frac : Units Latt_Frac=DegAlias RawGGAData(4)=LattH_NSAlias RawGGAData(5)=Longit_Int : Units Longit_Int=DegB-1