1 | #include "nmea0183.h"
|
---|
2 | #pragma hdrstop
|
---|
3 |
|
---|
4 | /*
|
---|
5 | ** Author: Samuel R. Blackburn
|
---|
6 | ** Internet: sam_blackburn@pobox.com
|
---|
7 | **
|
---|
8 | ** You can use it any way you like as long as you don't try to sell it.
|
---|
9 | **
|
---|
10 | ** Copyright, 1996, Samuel R. Blackburn
|
---|
11 | **
|
---|
12 | ** $Workfile: dcn.cpp $
|
---|
13 | ** $Revision: 5 $
|
---|
14 | ** $Modtime: 10/10/98 2:46p $
|
---|
15 | */
|
---|
16 |
|
---|
17 |
|
---|
18 | DCN::DCN()
|
---|
19 | {
|
---|
20 | Mnemonic = "DCN";
|
---|
21 | Empty();
|
---|
22 | }
|
---|
23 |
|
---|
24 | DCN::~DCN()
|
---|
25 | {
|
---|
26 | //Mnemonic.Empty();
|
---|
27 | Empty();
|
---|
28 | }
|
---|
29 |
|
---|
30 | void DCN::Empty( void )
|
---|
31 | {
|
---|
32 | DeccaChainID = 0;
|
---|
33 | Red.Empty();
|
---|
34 | Green.Empty();
|
---|
35 | Purple.Empty();
|
---|
36 | RedLineNavigationUse = NMEA_Unknown;
|
---|
37 | GreenLineNavigationUse = NMEA_Unknown;
|
---|
38 | PurpleLineNavigationUse = NMEA_Unknown;
|
---|
39 | PositionUncertaintyNauticalMiles = 0.0;
|
---|
40 | Basis = BasisUnknown;
|
---|
41 | }
|
---|
42 |
|
---|
43 | BOOL DCN::Parse( const SENTENCE& sentence )
|
---|
44 | {
|
---|
45 | /*
|
---|
46 | ** DCN - Decca Position
|
---|
47 | ** 11 13 16
|
---|
48 | ** 1 2 3 4 5 6 7 8 9 10| 12| 14 15| 17
|
---|
49 | ** | | | | | | | | | | | | | | | | |
|
---|
50 | ** $--DCN,xx,cc,x.x,A,cc,x.x,A,cc,x.x,A,A,A,A,x.x,N,x*hh<CR><LF>
|
---|
51 | **
|
---|
52 | ** 1) Decca chain identifier
|
---|
53 | ** 2) Red Zone Identifier
|
---|
54 | ** 3) Red Line Of Position
|
---|
55 | ** 4) Red Master Line Status
|
---|
56 | ** 5) Green Zone Identifier
|
---|
57 | ** 6) Green Line Of Position
|
---|
58 | ** 7) Green Master Line Status
|
---|
59 | ** 8) Purple Zone Identifier
|
---|
60 | ** 9) Purple Line Of Position
|
---|
61 | ** 10) Purple Master Line Status
|
---|
62 | ** 11) Red Line Navigation Use
|
---|
63 | ** 12) Green Line Navigation Use
|
---|
64 | ** 13) Purple Line Navigation Use
|
---|
65 | ** 14) Position Uncertainity
|
---|
66 | ** 15) N = Nautical Miles
|
---|
67 | ** 16) Fix Data Basis
|
---|
68 | ** 1 = Normal Pattern
|
---|
69 | ** 2 = Lane Identification Pattern
|
---|
70 | ** 3 = Lane Identification Transmissions
|
---|
71 | ** 17) Checksum
|
---|
72 | */
|
---|
73 |
|
---|
74 | /*
|
---|
75 | ** First we check the checksum...
|
---|
76 | */
|
---|
77 |
|
---|
78 | if ( sentence.IsChecksumBad( 17 ) == True )
|
---|
79 | {
|
---|
80 | SetErrorMessage( "Invalid Checksum" );
|
---|
81 | return( FALSE );
|
---|
82 | }
|
---|
83 |
|
---|
84 | DeccaChainID = sentence.Integer( 1 );
|
---|
85 | Red.Parse( 2, sentence );
|
---|
86 | Green.Parse( 5, sentence );
|
---|
87 | Purple.Parse( 8, sentence );
|
---|
88 | RedLineNavigationUse = sentence.Boolean( 11 );
|
---|
89 | GreenLineNavigationUse = sentence.Boolean( 12 );
|
---|
90 | PurpleLineNavigationUse = sentence.Boolean( 13 );
|
---|
91 | PositionUncertaintyNauticalMiles = sentence.Double( 14 );
|
---|
92 |
|
---|
93 | int temp_integer = sentence.Integer( 16 );
|
---|
94 |
|
---|
95 | switch( temp_integer )
|
---|
96 | {
|
---|
97 | case 1:
|
---|
98 |
|
---|
99 | Basis = NormalPatternBasis;
|
---|
100 | break;
|
---|
101 |
|
---|
102 | case 2:
|
---|
103 |
|
---|
104 | Basis = LaneIdentificationPatternBasis;
|
---|
105 | break;
|
---|
106 |
|
---|
107 | case 3:
|
---|
108 |
|
---|
109 | Basis = LaneIdentificationTransmissionsBasis;
|
---|
110 | break;
|
---|
111 |
|
---|
112 | default:
|
---|
113 |
|
---|
114 | Basis = BasisUnknown;
|
---|
115 | break;
|
---|
116 | }
|
---|
117 |
|
---|
118 | return( TRUE );
|
---|
119 | }
|
---|
120 |
|
---|
121 | BOOL DCN::Write( SENTENCE& sentence )
|
---|
122 | {
|
---|
123 | /*
|
---|
124 | ** Let the parent do its thing
|
---|
125 | */
|
---|
126 |
|
---|
127 | RESPONSE::Write( sentence );
|
---|
128 |
|
---|
129 | sentence += DeccaChainID;
|
---|
130 | Red.Write( sentence );
|
---|
131 | Green.Write( sentence );
|
---|
132 | Purple.Write( sentence );
|
---|
133 | sentence += RedLineNavigationUse;
|
---|
134 | sentence += GreenLineNavigationUse;
|
---|
135 | sentence += PurpleLineNavigationUse;
|
---|
136 | sentence += PositionUncertaintyNauticalMiles;
|
---|
137 | sentence += "N";
|
---|
138 |
|
---|
139 | switch( Basis )
|
---|
140 | {
|
---|
141 | case NormalPatternBasis:
|
---|
142 |
|
---|
143 | sentence += 1;
|
---|
144 | break;
|
---|
145 |
|
---|
146 | case LaneIdentificationPatternBasis:
|
---|
147 |
|
---|
148 | sentence += 2;
|
---|
149 | break;
|
---|
150 |
|
---|
151 | case LaneIdentificationTransmissionsBasis:
|
---|
152 |
|
---|
153 | sentence += 3;
|
---|
154 | break;
|
---|
155 |
|
---|
156 | default:
|
---|
157 |
|
---|
158 | sentence += "";
|
---|
159 | break;
|
---|
160 | }
|
---|
161 |
|
---|
162 | sentence.Finish();
|
---|
163 |
|
---|
164 | return( TRUE );
|
---|
165 | }
|
---|
166 |
|
---|
167 | const DCN& DCN::operator = ( const DCN& source )
|
---|
168 | {
|
---|
169 | DeccaChainID = source.DeccaChainID;
|
---|
170 | Red = source.Red;
|
---|
171 | Green = source.Green;
|
---|
172 | Purple = source.Purple;
|
---|
173 | RedLineNavigationUse = source.RedLineNavigationUse;
|
---|
174 | GreenLineNavigationUse = source.GreenLineNavigationUse;
|
---|
175 | PurpleLineNavigationUse = source.PurpleLineNavigationUse;
|
---|
176 | PositionUncertaintyNauticalMiles = source.PositionUncertaintyNauticalMiles;
|
---|
177 | Basis = source.Basis;
|
---|
178 |
|
---|
179 | return( *this );
|
---|
180 | }
|
---|