Rev 533 | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
1 | ingob | 1 | /*#######################################################################################*/ |
2 | /* !!! THIS IS NOT FREE SOFTWARE !!! */ |
||
3 | /*#######################################################################################*/ |
||
4 | // ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ |
||
5 | // + www.MikroKopter.com |
||
6 | // ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ |
||
360 | holgerb | 7 | // + Software Nutzungsbedingungen (english version: see below) |
8 | // + der Fa. HiSystems GmbH, Flachsmeerstrasse 2, 26802 Moormerland - nachfolgend Lizenzgeber genannt - |
||
9 | // + Der Lizenzgeber räumt dem Kunden ein nicht-ausschließliches, zeitlich und räumlich* unbeschränktes Recht ein, die im den |
||
489 | killagreg | 10 | // + Mikrocontroller verwendete Firmware für die Hardware Flight-Ctrl, Navi-Ctrl, BL-Ctrl, MK3Mag & PC-Programm MikroKopter-Tool |
360 | holgerb | 11 | // + - nachfolgend Software genannt - nur für private Zwecke zu nutzen. |
12 | // + Der Einsatz dieser Software ist nur auf oder mit Produkten des Lizenzgebers zulässig. |
||
1 | ingob | 13 | // ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ |
360 | holgerb | 14 | // + Die vom Lizenzgeber gelieferte Software ist urheberrechtlich geschützt. Alle Rechte an der Software sowie an sonstigen im |
15 | // + Rahmen der Vertragsanbahnung und Vertragsdurchführung überlassenen Unterlagen stehen im Verhältnis der Vertragspartner ausschließlich dem Lizenzgeber zu. |
||
16 | // + Die in der Software enthaltenen Copyright-Vermerke, Markenzeichen, andere Rechtsvorbehalte, Seriennummern sowie |
||
17 | // + sonstige der Programmidentifikation dienenden Merkmale dürfen vom Kunden nicht verändert oder unkenntlich gemacht werden. |
||
18 | // + Der Kunde trifft angemessene Vorkehrungen für den sicheren Einsatz der Software. Er wird die Software gründlich auf deren |
||
19 | // + Verwendbarkeit zu dem von ihm beabsichtigten Zweck testen, bevor er diese operativ einsetzt. |
||
20 | // + Die Haftung des Lizenzgebers wird - soweit gesetzlich zulässig - begrenzt in Höhe des typischen und vorhersehbaren |
||
489 | killagreg | 21 | // + Schadens. Die gesetzliche Haftung bei Personenschäden und nach dem Produkthaftungsgesetz bleibt unberührt. Dem Lizenzgeber steht jedoch der Einwand |
360 | holgerb | 22 | // + des Mitverschuldens offen. |
23 | // + Der Kunde trifft angemessene Vorkehrungen für den Fall, dass die Software ganz oder teilweise nicht ordnungsgemäß arbeitet. |
||
24 | // + Er wird die Software gründlich auf deren Verwendbarkeit zu dem von ihm beabsichtigten Zweck testen, bevor er diese operativ einsetzt. |
||
25 | // + Der Kunde wird er seine Daten vor Einsatz der Software nach dem Stand der Technik sichern. |
||
26 | // + Der Kunde ist darüber unterrichtet, dass der Lizenzgeber seine Daten im zur Vertragsdurchführung erforderlichen Umfang |
||
27 | // + und auf Grundlage der Datenschutzvorschriften erhebt, speichert, verarbeitet und, sofern notwendig, an Dritte übermittelt. |
||
28 | // + *) Die räumliche Nutzung bezieht sich nur auf den Einsatzort, nicht auf die Reichweite der programmierten Software. |
||
29 | // + #### ENDE DER NUTZUNGSBEDINGUNGEN ####' |
||
30 | // + Hinweis: Informationen über erweiterte Nutzungsrechte (wie z.B. Nutzung für nicht-private Zwecke) sind auf Anfrage per Email an info(@)hisystems.de verfügbar. |
||
1 | ingob | 31 | // ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ |
360 | holgerb | 32 | // + Software LICENSING TERMS |
1 | ingob | 33 | // ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ |
360 | holgerb | 34 | // + of HiSystems GmbH, Flachsmeerstrasse 2, 26802 Moormerland, Germany - the Licensor - |
489 | killagreg | 35 | // + The Licensor grants the customer a non-exclusive license to use the microcontroller firmware of the Flight-Ctrl, Navi-Ctrl, BL-Ctrl, and MK3Mag hardware |
360 | holgerb | 36 | // + (the Software) exclusively for private purposes. The License is unrestricted with respect to time and territory*. |
37 | // + The Software may only be used with the Licensor's products. |
||
38 | // + The Software provided by the Licensor is protected by copyright. With respect to the relationship between the parties to this |
||
39 | // + agreement, all rights pertaining to the Software and other documents provided during the preparation and execution of this |
||
40 | // + agreement shall be the property of the Licensor. |
||
41 | // + The information contained in the Software copyright notices, trademarks, other legal reservations, serial numbers and other |
||
42 | // + features that can be used to identify the program may not be altered or defaced by the customer. |
||
43 | // + The customer shall be responsible for taking reasonable precautions |
||
44 | // + for the safe use of the Software. The customer shall test the Software thoroughly regarding its suitability for the |
||
45 | // + intended purpose before implementing it for actual operation. The Licensor's liability shall be limited to the extent of typical and |
||
46 | // + foreseeable damage to the extent permitted by law, notwithstanding statutory liability for bodily injury and product |
||
47 | // + liability. However, the Licensor shall be entitled to the defense of contributory negligence. |
||
48 | // + The customer will take adequate precautions in the case, that the software is not working properly. The customer will test |
||
49 | // + the software for his purpose before any operational usage. The customer will backup his data before using the software. |
||
50 | // + The customer understands that the Licensor collects, stores and processes, and, where required, forwards, customer data |
||
51 | // + to third parties to the extent necessary for executing the agreement, subject to applicable data protection and privacy regulations. |
||
52 | // + *) The territory aspect only refers to the place where the Software is used, not its programmed range. |
||
53 | // + #### END OF LICENSING TERMS #### |
||
54 | // + Note: For information on license extensions (e.g. commercial use), please contact us at info(@)hisystems.de. |
||
1 | ingob | 55 | // ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ |
41 | ingob | 56 | //#define MCLK96MHZ |
1 | ingob | 57 | const unsigned long _Main_Crystal = 25000; |
491 | killagreg | 58 | //#include <stdio.h> |
41 | ingob | 59 | #include "91x_lib.h" |
60 | #include "led.h" |
||
61 | #include "uart0.h" |
||
62 | #include "uart1.h" |
||
63 | #include "uart2.h" |
||
215 | killagreg | 64 | #include "gps.h" |
489 | killagreg | 65 | #include "i2c.h" |
242 | killagreg | 66 | #include "compass.h" |
426 | holgerb | 67 | #include "ncmag.h" |
119 | killagreg | 68 | #include "timer1.h" |
69 | #include "timer2.h" |
||
134 | killagreg | 70 | #include "analog.h" |
41 | ingob | 71 | #include "spi_slave.h" |
72 | #include "fat16.h" |
||
73 | #include "sdc.h" |
||
82 | killagreg | 74 | #include "logging.h" |
156 | killagreg | 75 | #include "params.h" |
88 | killagreg | 76 | #include "settings.h" |
154 | killagreg | 77 | #include "config.h" |
1 | ingob | 78 | #include "main.h" |
250 | ingob | 79 | #include "debug.h" |
254 | killagreg | 80 | #include "eeprom.h" |
350 | holgerb | 81 | #include "ssc.h" |
362 | holgerb | 82 | #include "sdc.h" |
380 | holgerb | 83 | #include "uart1.h" |
254 | killagreg | 84 | |
427 | killagreg | 85 | |
314 | killagreg | 86 | #ifdef FOLLOW_ME |
87 | u8 TransmitAlsoToFC = 0; |
||
88 | #endif |
||
41 | ingob | 89 | u32 TimerCheckError; |
489 | killagreg | 90 | u8 ErrorCode = 0; |
41 | ingob | 91 | u16 BeepTime; |
92 | killagreg | 92 | u8 NCFlags = 0; |
153 | killagreg | 93 | s16 GeoMagDec = 0; // local magnetic declination in 0.1 deg |
328 | holgerb | 94 | u8 ErrorGpsFixLost = 0; |
513 | killagreg | 95 | u8 FromFC_LoadWP_List = 0, FromFC_Load_SinglePoint = 0, FromFC_Save_SinglePoint = 0; |
531 | holgerb | 96 | u8 ToFC_MaxWpListIndex = 4; |
255 | killagreg | 97 | u8 ClearFCStatusFlags = 0; |
41 | ingob | 98 | u8 StopNavigation = 0; |
378 | holgerb | 99 | volatile u32 PollingTimeout = 10000; |
41 | ingob | 100 | Param_t Parameter; |
78 | holgerb | 101 | volatile FC_t FC; |
378 | holgerb | 102 | volatile u32 SPIWatchDog = 15000; // stop Navigation if this goes to zero |
400 | holgerb | 103 | volatile u32 SD_WatchDog = 15000; // stop Logging if this goes to zero |
457 | holgerb | 104 | u32 CountGpsProcessedIn5Sec = 0,CountNewGpsDataIn5Sec = 0, FreqGpsProcessedIn5Sec = 0, FreqNewGpsDataIn5Sec = 0; |
504 | holgerb | 105 | u8 NewWPL_Name = 0; |
532 | holgerb | 106 | u32 MaxWP_Radius_in_m = 0; |
41 | ingob | 107 | s8 ErrorMSG[25]; |
533 | holgerb | 108 | u32 TimeSinceMotorStart = 0; |
41 | ingob | 109 | |
1 | ingob | 110 | //---------------------------------------------------------------------------------------------------- |
41 | ingob | 111 | void SCU_Config(void) |
1 | ingob | 112 | { |
41 | ingob | 113 | /* configure PLL and set it as master clock source */ |
114 | SCU_MCLKSourceConfig(SCU_MCLK_OSC); // set master clock source to external oscillator clock (25MHz) before diabling the PLL |
||
115 | SCU_PLLCmd(DISABLE); // now disable the PLL |
||
116 | #ifdef MCLK96MHZ |
||
117 | SCU_BRCLKDivisorConfig(SCU_BRCLK_Div2); // set BRCLK to MCLK/2 = 48MHz |
||
118 | SCU_PCLKDivisorConfig(SCU_PCLK_Div4); // set PCLK (APB bus clock) divisor to 4 (half Reference Clock) |
||
119 | SCU_RCLKDivisorConfig(SCU_RCLK_Div2); // set RCLK (Reference Clock) divisor to 1 (full PPL clock) |
||
120 | SCU_HCLKDivisorConfig(SCU_HCLK_Div2); // set HCLK (AHB bus clock) divisor to 1 (full Reference Clock) |
||
121 | SCU_PLLFactorsConfig(192,25,2); // PLL = 96 MHz, Feedback Divider N=192, Pre-Divider M=25, Post-Divider P=2 |
||
122 | #else |
||
123 | SCU_BRCLKDivisorConfig(SCU_BRCLK_Div1); // set BRCLK to MCLK = 48MHz |
||
124 | SCU_PCLKDivisorConfig(SCU_PCLK_Div2); // set PCLK (APB bus clock) divisor to 2 (half Reference Clock) |
||
125 | SCU_RCLKDivisorConfig(SCU_RCLK_Div1); // set RCLK (Reference Clock) divisor to 1 (full PPL clock) |
||
126 | SCU_HCLKDivisorConfig(SCU_HCLK_Div1); // set HCLK (AHB bus clock) divisor to 1 (full Reference Clock) |
||
127 | SCU_PLLFactorsConfig(192,25,3); // PLL = 48 MHz, Feedback Divider N=192, Pre-Divider M=25, Post-Divider P=3 |
||
128 | #endif |
||
129 | SCU_PLLCmd(ENABLE); // Enable PLL (is disabled by SCU_PLLFactorsConfig) |
||
130 | SCU_MCLKSourceConfig(SCU_MCLK_PLL); // set master clock source to PLL |
||
131 | } |
||
1 | ingob | 132 | |
41 | ingob | 133 | //---------------------------------------------------------------------------------------------------- |
134 | void GetNaviCtrlVersion(void) |
||
1 | ingob | 135 | { |
41 | ingob | 136 | u8 msg[25]; |
270 | killagreg | 137 | |
530 | holgerb | 138 | sprintf(msg,"\n\r NaviCtrl HW: V%d.%d SW: V%d.%02d%c", UART_VersionInfo.HWMajor/10, UART_VersionInfo.HWMajor%10, VERSION_MAJOR, VERSION_MINOR, 'a'+ VERSION_PATCH); |
110 | killagreg | 139 | UART1_PutString(msg); |
1 | ingob | 140 | } |
141 | |||
142 | //---------------------------------------------------------------------------------------------------- |
||
231 | holgerb | 143 | |
41 | ingob | 144 | void CheckErrors(void) |
145 | { |
||
516 | holgerb | 146 | static s32 no_error_delay = 0; |
328 | holgerb | 147 | s32 newErrorCode = 0; |
232 | killagreg | 148 | UART_VersionInfo.HardwareError[0] = 0; |
231 | holgerb | 149 | |
489 | killagreg | 150 | if(CheckDelay(I2CBus(Compass_I2CPort)->Timeout) || (Compass_Heading < 0)) DebugOut.StatusRed |= AMPEL_COMPASS; |
338 | holgerb | 151 | else DebugOut.StatusRed &= ~AMPEL_COMPASS; // MK3Mag green status |
231 | holgerb | 152 | |
338 | holgerb | 153 | if((FC.Error[1] & FC_ERROR1_I2C) || (FC.Error[1] & FC_ERROR1_BL_MISSING)) DebugOut.StatusRed |= AMPEL_BL; |
154 | else DebugOut.StatusRed &= ~AMPEL_BL; // BL-Ctrl green status |
||
232 | killagreg | 155 | |
338 | holgerb | 156 | if(UART_VersionInfo.HardwareError[0] || UART_VersionInfo.HardwareError[1]) DebugOut.StatusRed |= AMPEL_NC; |
157 | else DebugOut.StatusRed &= ~AMPEL_NC; |
||
158 | |||
483 | holgerb | 159 | |
489 | killagreg | 160 | if(CheckDelay(I2CBus(Compass_I2CPort)->Timeout)) |
41 | ingob | 161 | { |
489 | killagreg | 162 | LED_RED_ON; |
472 | holgerb | 163 | sprintf(ErrorMSG,"no compass communica"); |
489 | killagreg | 164 | //Reset Compass communication |
501 | holgerb | 165 | if(Compass_I2CPort == NCMAG_PORT_EXTERN) I2CBus_Init(I2C0); else I2CBus_Init(I2C1); |
489 | killagreg | 166 | Compass_Init(); |
472 | holgerb | 167 | newErrorCode = 4; |
41 | ingob | 168 | StopNavigation = 1; |
472 | holgerb | 169 | UART_VersionInfo.HardwareError[0] |= NC_ERROR0_COMPASS_RX; |
170 | DebugOut.StatusRed |= AMPEL_COMPASS; |
||
41 | ingob | 171 | } |
488 | holgerb | 172 | else if(CompassValueErrorCount > 30) |
173 | { |
||
174 | LED_RED_ON; |
||
175 | sprintf(ErrorMSG,"compass sensor error"); |
||
176 | newErrorCode = 34; |
||
177 | StopNavigation = 1; |
||
178 | UART_VersionInfo.HardwareError[0] |= NC_ERROR0_COMPASS_VALUE; |
||
501 | holgerb | 179 | if(Compass_I2CPort == NCMAG_PORT_EXTERN) I2CBus_Init(I2C0); else I2CBus_Init(I2C1); |
489 | killagreg | 180 | Compass_Init(); |
488 | holgerb | 181 | } |
489 | killagreg | 182 | else if((FCCalibActive || CompassCalState) && FC_Version.Hardware) |
183 | { |
||
488 | holgerb | 184 | sprintf(ErrorMSG,"Calibrate... "); |
489 | killagreg | 185 | newErrorCode = 0; |
488 | holgerb | 186 | ErrorCode = 0; |
187 | no_error_delay = 1; |
||
489 | killagreg | 188 | } |
189 | else if(CheckDelay(SPI0_Timeout)) |
||
483 | holgerb | 190 | { |
489 | killagreg | 191 | LED_RED_ON; |
472 | holgerb | 192 | sprintf(ErrorMSG,"no FC communication "); |
193 | newErrorCode = 3; |
||
194 | StopNavigation = 1; |
||
195 | DebugOut.StatusGreen &= ~AMPEL_FC; // status of FC Present |
||
196 | DebugOut.StatusGreen &= ~AMPEL_BL; // status of BL Present |
||
197 | UART_VersionInfo.HardwareError[0] |= NC_ERROR0_SPI_RX; |
||
198 | } |
||
41 | ingob | 199 | else if(FC_Version.Compatible != FC_SPI_COMPATIBLE) |
200 | { |
||
201 | LED_RED_ON; |
||
318 | holgerb | 202 | #ifndef FOLLOW_ME |
41 | ingob | 203 | sprintf(ErrorMSG,"FC not compatible "); |
318 | holgerb | 204 | #else |
205 | sprintf(ErrorMSG,"! FollowMe only ! "); |
||
206 | #endif |
||
328 | holgerb | 207 | newErrorCode = 1; |
41 | ingob | 208 | StopNavigation = 1; |
256 | killagreg | 209 | UART_VersionInfo.HardwareError[0] |= NC_ERROR0_FC_INCOMPATIBLE; |
338 | holgerb | 210 | DebugOut.StatusRed |= AMPEL_NC; |
41 | ingob | 211 | } |
255 | killagreg | 212 | else if(FC.Error[0] & FC_ERROR0_GYRO_NICK) |
231 | holgerb | 213 | { |
214 | LED_RED_ON; |
||
215 | sprintf(ErrorMSG,"ERR: FC Nick Gyro"); |
||
328 | holgerb | 216 | newErrorCode = 10; |
232 | killagreg | 217 | } |
255 | killagreg | 218 | else if(FC.Error[0] & FC_ERROR0_GYRO_ROLL) |
231 | holgerb | 219 | { |
220 | LED_RED_ON; |
||
221 | sprintf(ErrorMSG,"ERR: FC Roll Gyro"); |
||
328 | holgerb | 222 | newErrorCode = 11; |
232 | killagreg | 223 | } |
255 | killagreg | 224 | else if(FC.Error[0] & FC_ERROR0_GYRO_YAW) |
231 | holgerb | 225 | { |
226 | LED_RED_ON; |
||
227 | sprintf(ErrorMSG,"ERR: FC Yaw Gyro"); |
||
328 | holgerb | 228 | newErrorCode = 12; |
232 | killagreg | 229 | } |
255 | killagreg | 230 | else if(FC.Error[0] & FC_ERROR0_ACC_NICK) |
231 | holgerb | 231 | { |
232 | LED_RED_ON; |
||
233 | sprintf(ErrorMSG,"ERR: FC Nick ACC"); |
||
328 | holgerb | 234 | newErrorCode = 13; |
232 | killagreg | 235 | } |
255 | killagreg | 236 | else if(FC.Error[0] & FC_ERROR0_ACC_ROLL) |
231 | holgerb | 237 | { |
238 | LED_RED_ON; |
||
239 | sprintf(ErrorMSG,"ERR: FC Roll ACC"); |
||
328 | holgerb | 240 | newErrorCode = 14; |
232 | killagreg | 241 | } |
255 | killagreg | 242 | else if(FC.Error[0] & FC_ERROR0_ACC_TOP) |
231 | holgerb | 243 | { |
244 | LED_RED_ON; |
||
327 | holgerb | 245 | sprintf(ErrorMSG,"ERR:FC Z-ACC"); |
328 | holgerb | 246 | newErrorCode = 15; |
232 | killagreg | 247 | } |
351 | holgerb | 248 | else if(NC_To_FC_Flags & NC_TO_FC_FLYING_RANGE) |
249 | { |
||
250 | LED_RED_ON; |
||
251 | sprintf(ErrorMSG,"ERR:Flying range!"); |
||
252 | newErrorCode = 28; |
||
253 | } |
||
255 | killagreg | 254 | else if(FC.Error[0] & FC_ERROR0_PRESSURE) |
231 | holgerb | 255 | { |
489 | killagreg | 256 | LED_RED_ON; |
327 | holgerb | 257 | sprintf(ErrorMSG,"ERR:Pressure sensor"); |
328 | holgerb | 258 | newErrorCode = 16; |
232 | killagreg | 259 | } |
255 | killagreg | 260 | else if(FC.Error[1] & FC_ERROR1_I2C) |
231 | holgerb | 261 | { |
262 | LED_RED_ON; |
||
327 | holgerb | 263 | sprintf(ErrorMSG,"ERR:I2C FC to BL"); |
328 | holgerb | 264 | newErrorCode = 17; |
232 | killagreg | 265 | } |
255 | killagreg | 266 | else if(FC.Error[1] & FC_ERROR1_BL_MISSING) |
231 | holgerb | 267 | { |
268 | LED_RED_ON; |
||
269 | sprintf(ErrorMSG,"ERR: Bl Missing"); |
||
328 | holgerb | 270 | newErrorCode = 18; |
232 | killagreg | 271 | } |
255 | killagreg | 272 | else if(FC.Error[1] & FC_ERROR1_MIXER) |
231 | holgerb | 273 | { |
274 | LED_RED_ON; |
||
275 | sprintf(ErrorMSG,"Mixer Error"); |
||
328 | holgerb | 276 | newErrorCode = 19; |
232 | killagreg | 277 | } |
350 | holgerb | 278 | else if(CheckDelay(UBX_Timeout) && Parameter.GlobalConfig & FC_CFG_GPS_AKTIV) |
41 | ingob | 279 | { |
280 | LED_RED_ON; |
||
516 | holgerb | 281 | // if(!(Parameter.GlobalConfig & FC_CFG_GPS_AKTIV)) sprintf(ErrorMSG,"GPS disconnected "); |
489 | killagreg | 282 | // else |
283 | { |
||
284 | sprintf(ErrorMSG,"no GPS communication"); |
||
285 | UART_VersionInfo.HardwareError[0] |= NC_ERROR0_GPS_RX; |
||
286 | UART_VersionInfo.Flags &= ~NC_VERSION_FLAG_GPS_PRESENT; |
||
287 | newErrorCode = 5; |
||
288 | } |
||
41 | ingob | 289 | StopNavigation = 1; |
320 | holgerb | 290 | // UBX_Timeout = SetDelay(500); |
41 | ingob | 291 | } |
426 | holgerb | 292 | else if(Compass_Heading < 0 && NCMAG_Present && !NCMAG_IsCalibrated) |
293 | { |
||
294 | LED_RED_ON; |
||
295 | sprintf(ErrorMSG,"compass not calibr."); |
||
296 | newErrorCode = 31; |
||
297 | StopNavigation = 1; |
||
298 | UART_VersionInfo.HardwareError[0] |= NC_ERROR0_COMPASS_VALUE; |
||
299 | } |
||
254 | killagreg | 300 | else if(Compass_Heading < 0) |
41 | ingob | 301 | { |
302 | LED_RED_ON; |
||
303 | sprintf(ErrorMSG,"bad compass value "); |
||
328 | holgerb | 304 | newErrorCode = 6; |
41 | ingob | 305 | StopNavigation = 1; |
256 | killagreg | 306 | UART_VersionInfo.HardwareError[0] |= NC_ERROR0_COMPASS_VALUE; |
41 | ingob | 307 | } |
255 | killagreg | 308 | else if((FC.Error[1] & FC_ERROR1_SPI_RX)) |
199 | killagreg | 309 | { |
310 | LED_RED_ON; |
||
311 | sprintf(ErrorMSG,"FC spi rx error "); |
||
328 | holgerb | 312 | newErrorCode = 8; |
213 | killagreg | 313 | StopNavigation = 1; |
199 | killagreg | 314 | } |
255 | killagreg | 315 | else if(FC.Error[0] & FC_ERROR0_CAREFREE) |
231 | holgerb | 316 | { |
317 | LED_RED_ON; |
||
318 | sprintf(ErrorMSG,"FC: Carefree Error"); |
||
328 | holgerb | 319 | newErrorCode = 20; |
232 | killagreg | 320 | } |
255 | killagreg | 321 | else if(FC.Error[1] & FC_ERROR1_PPM) |
41 | ingob | 322 | { |
323 | LED_RED_ON; |
||
324 | sprintf(ErrorMSG,"RC Signal lost "); |
||
328 | holgerb | 325 | newErrorCode = 7; |
41 | ingob | 326 | } |
489 | killagreg | 327 | else if(ErrorGpsFixLost) |
328 | holgerb | 328 | { |
489 | killagreg | 329 | LED_RED_ON; |
330 | sprintf(ErrorMSG,"GPS Fix lost "); |
||
331 | newErrorCode = 21; |
||
328 | holgerb | 332 | } |
330 | holgerb | 333 | else if(ErrorDisturbedEarthMagnetField) |
334 | { |
||
489 | killagreg | 335 | LED_RED_ON; |
336 | sprintf(ErrorMSG,"Magnet error "); |
||
337 | newErrorCode = 22; |
||
338 | DebugOut.StatusRed |= AMPEL_COMPASS | AMPEL_NC; |
||
339 | UART_VersionInfo.HardwareError[0] |= NC_ERROR0_COMPASS_VALUE; |
||
330 | holgerb | 340 | } |
533 | holgerb | 341 | else if(((ErrorCheck_BL_MinOfMaxPWM == 40 && (TimeSinceMotorStart > 3)) || (ErrorCheck_BL_MinOfMaxPWM == 39)) && !ErrorCode) |
338 | holgerb | 342 | { |
489 | killagreg | 343 | LED_RED_ON; |
344 | sprintf(ErrorMSG,"ERR:Motor restart "); |
||
345 | newErrorCode = 23; |
||
346 | DebugOut.StatusRed |= AMPEL_BL; |
||
338 | holgerb | 347 | } |
472 | holgerb | 348 | else if(BL_MinOfMaxPWM < 30 && !ErrorCode) |
338 | holgerb | 349 | { |
489 | killagreg | 350 | u16 i; |
516 | holgerb | 351 | for(i = 0; i < 12; i++) if(Motor[i].MaxPWM == BL_MinOfMaxPWM) break; |
489 | killagreg | 352 | LED_RED_ON; |
353 | sprintf(ErrorMSG,"ERR:BL%2d Test:%2d ",i+1,BL_MinOfMaxPWM); |
||
516 | holgerb | 354 | newErrorCode = 32; |
355 | DebugOut.StatusRed |= AMPEL_BL; |
||
472 | holgerb | 356 | } |
533 | holgerb | 357 | else if(ErrorCheck_BL_MinOfMaxPWM < 248 && (TimeSinceMotorStart > 3) && !ErrorCode) |
472 | holgerb | 358 | { |
489 | killagreg | 359 | LED_RED_ON; |
360 | sprintf(ErrorMSG,"ERR:BL Limitation "); |
||
361 | newErrorCode = 24; |
||
362 | DebugOut.StatusRed |= AMPEL_BL; |
||
338 | holgerb | 363 | } |
491 | killagreg | 364 | else if((NCFlags & NC_FLAG_RANGE_LIMIT) && (FC.StatusFlags & FC_STATUS_FLY) && !ErrorCode) |
348 | holgerb | 365 | { |
489 | killagreg | 366 | LED_RED_ON; |
532 | holgerb | 367 | sprintf(ErrorMSG,"ERR:GPS WP range "); |
489 | killagreg | 368 | newErrorCode = 25; |
369 | DebugOut.StatusRed |= AMPEL_NC; |
||
348 | holgerb | 370 | } |
397 | holgerb | 371 | else if((!SD_SWITCH || (SDCardInfo.Valid == 0)) && Parameter.GlobalConfig3 & CFG3_NO_SDCARD_NO_START && !(FC.StatusFlags & FC_STATUS_FLY)) |
350 | holgerb | 372 | { |
489 | killagreg | 373 | LED_RED_ON; |
374 | sprintf(ErrorMSG,"ERR:No SD-Card "); |
||
375 | newErrorCode = 26; |
||
376 | DebugOut.StatusRed |= AMPEL_NC; |
||
350 | holgerb | 377 | } |
383 | holgerb | 378 | else if((SD_LoggingError || (SD_WatchDog < 2000 && SD_WatchDog != 0)) && Parameter.GlobalConfig3 & CFG3_NO_SDCARD_NO_START) |
351 | holgerb | 379 | { |
489 | killagreg | 380 | LED_RED_ON; |
381 | sprintf(ErrorMSG,"ERR:SD Logging abort"); |
||
382 | newErrorCode = 27; |
||
383 | DebugOut.StatusRed |= AMPEL_NC; |
||
384 | SD_LoggingError = 0; |
||
351 | holgerb | 385 | } |
355 | holgerb | 386 | else if(((AbsoluteFlyingAltitude) && (NaviData.Altimeter / 20 >= AbsoluteFlyingAltitude)) && (FC.StatusFlags & FC_STATUS_FLY)) |
387 | { |
||
489 | killagreg | 388 | LED_RED_ON; |
389 | sprintf(ErrorMSG,"ERR:Max Altitude "); |
||
390 | newErrorCode = 29; |
||
391 | DebugOut.StatusRed |= AMPEL_NC; |
||
355 | holgerb | 392 | } |
516 | holgerb | 393 | else if(Parameter.GlobalConfig3 & CFG3_NO_GPSFIX_NO_START && !(NCFlags & NC_FLAG_GPS_OK) && ((FC.StatusFlags & (FC_STATUS_START | FC_STATUS_MOTOR_RUN)) || (FC.StickGas < -50 && FC.StickYaw < -50))) |
489 | killagreg | 394 | { |
395 | LED_RED_ON; |
||
396 | sprintf(ErrorMSG,"No GPS Fix "); |
||
397 | newErrorCode = 30; |
||
398 | holgerb | 398 | } |
41 | ingob | 399 | else // no error occured |
400 | { |
||
401 | StopNavigation = 0; |
||
402 | LED_RED_OFF; |
||
489 | killagreg | 403 | if(no_error_delay) { no_error_delay--; } |
404 | else |
||
405 | { |
||
406 | sprintf(ErrorMSG,"No Error "); |
||
407 | ErrorCode = 0; |
||
408 | } |
||
41 | ingob | 409 | } |
328 | holgerb | 410 | |
516 | holgerb | 411 | if(newErrorCode) |
412 | { |
||
413 | if(FC.StatusFlags & FC_STATUS_MOTOR_RUN) no_error_delay = 8; // delay the errors if the motors are running |
||
414 | ErrorCode = newErrorCode; |
||
415 | } |
||
416 | FC.Error[0] = 0; |
||
417 | FC.Error[1] = 0; |
||
418 | FC.Error[2] = 0; |
||
419 | FC.Error[3] = 0; |
||
420 | FC.Error[4] = 0; |
||
421 | ErrorGpsFixLost = 0; |
||
530 | holgerb | 422 | ErrorCheck_BL_MinOfMaxPWM = BL_MinOfMaxPWM; |
41 | ingob | 423 | } |
24 | StephanB | 424 | |
378 | holgerb | 425 | |
426 | |||
484 | holgerb | 427 | u8 Polling(void) |
378 | holgerb | 428 | { |
489 | killagreg | 429 | static u8 running = 0, oldFcFlags = 0, count5sec; |
430 | static u32 old_ms = 0; |
||
431 | |||
516 | holgerb | 432 | if(running) {/*DebugOut.Analog[]++;*/ return(1);}; |
489 | killagreg | 433 | running = 1; |
434 | |||
435 | if(CountMilliseconds != old_ms) // 1 ms |
||
436 | { |
||
483 | holgerb | 437 | old_ms = CountMilliseconds; |
438 | Compass_Update(); // update compass communication |
||
439 | Analog_Update(); // get new ADC values |
||
440 | CalcHeadFree(); |
||
441 | } |
||
488 | holgerb | 442 | |
489 | killagreg | 443 | SPI0_UpdateBuffer(); // also calls the GPS-functions |
444 | UART0_ProcessRxData(); // GPS process request |
||
445 | UART0_TransmitTxData(); // GPS send answer |
||
446 | UART1_ProcessRxData(); // PC process request |
||
447 | UART1_TransmitTxData(); // PC send answer |
||
448 | UART2_TransmitTxData(); // FC send answer |
||
449 | |||
533 | holgerb | 450 | if(!(FC.StatusFlags & FC_STATUS_MOTOR_RUN)) TimeSinceMotorStart = 0; |
451 | |||
489 | killagreg | 452 | // ---------------- Error Check Timing ---------------------------- |
453 | if(CheckDelay(TimerCheckError) || (FC.StatusFlags & FC_STATUS_START && !(oldFcFlags & FC_STATUS_START))) // Timer or FY wants to start |
||
454 | { |
||
455 | if(CheckDelay(TimerCheckError)) |
||
380 | holgerb | 456 | { |
489 | killagreg | 457 | TimerCheckError = SetDelay(1000); |
458 | if(CompassValueErrorCount) CompassValueErrorCount--; |
||
459 | if(++count5sec == 5) |
||
460 | { |
||
453 | holgerb | 461 | count5sec = 0; |
457 | holgerb | 462 | FreqGpsProcessedIn5Sec = CountGpsProcessedIn5Sec * 2; |
463 | FreqNewGpsDataIn5Sec = CountNewGpsDataIn5Sec * 2; |
||
489 | killagreg | 464 | CountGpsProcessedIn5Sec = 0; |
465 | CountNewGpsDataIn5Sec = 0; |
||
466 | } |
||
380 | holgerb | 467 | } |
489 | killagreg | 468 | oldFcFlags = FC.StatusFlags; |
469 | if(CheckDelay(SPI0_Timeout) && (DebugUART == UART1)) GPS_Navigation(&GPSData, &(ToFlightCtrl.GPSStick)); // process the GPS data even if the FC is not connected |
||
470 | |||
471 | if(!CheckDelay(SPI0_Timeout) || (DebugUART == UART1)) CheckErrors(); |
||
472 | |||
533 | holgerb | 473 | if(FC.StatusFlags & FC_STATUS_FLY) |
474 | { |
||
475 | NaviData.FlyingTime++; // we want to count the battery-time |
||
476 | TimeSinceMotorStart++; |
||
477 | } |
||
478 | |||
489 | killagreg | 479 | if(SerialLinkOkay) SerialLinkOkay--; |
480 | if(SerialLinkOkay < 250 - 5) NCFlags |= NC_FLAG_NOSERIALLINK; // 5 seconds timeout for serial communication |
||
481 | else NCFlags &= ~NC_FLAG_NOSERIALLINK; |
||
482 | if(StopNavigation && (Parameter.NaviGpsModeControl >= 50) && (Parameter.GlobalConfig & FC_CFG_GPS_AKTIV)) BeepTime = 1000; |
||
483 | } |
||
484 | running = 0; |
||
514 | holgerb | 485 | // if(!PollingTimeout) DebugOut.Analog[17]++; |
489 | killagreg | 486 | return(0); |
378 | holgerb | 487 | } |
488 | |||
380 | holgerb | 489 | // the handler will be cyclic called by the timer 1 ISR |
490 | // used is for critical timing parts that normaly would handled |
||
491 | // within the main loop that could block longer at logging activities |
||
483 | holgerb | 492 | void EXTIT3_IRQHandler(void) // 1ms - Takt |
154 | killagreg | 493 | { |
195 | killagreg | 494 | IENABLE; |
154 | killagreg | 495 | VIC_ITCmd(EXTIT3_ITLine,DISABLE); // disable irq |
489 | killagreg | 496 | |
516 | holgerb | 497 | if(PollingTimeout == 0) |
498 | { |
||
499 | PollingTimeout = 5; |
||
500 | //if(Polling() == 0) DebugOut.Analog[]++; |
||
501 | Polling(); |
||
380 | holgerb | 502 | } |
378 | holgerb | 503 | |
504 | VIC_SWITCmd(EXTIT3_ITLine,DISABLE); // clear pending bit |
||
195 | killagreg | 505 | VIC_ITCmd(EXTIT3_ITLine, ENABLE); // enable irq |
506 | IDISABLE; |
||
378 | holgerb | 507 | VIC1->VAR = 0xFF; // write any value to VIC0 Vector address register |
154 | killagreg | 508 | } |
509 | |||
41 | ingob | 510 | //---------------------------------------------------------------------------------------------------- |
511 | int main(void) |
||
512 | { |
||
489 | killagreg | 513 | |
514 | // static u32 ftimer =0; |
||
515 | // static u8 fstate = 0; |
||
456 | holgerb | 516 | // static File_t* f = NULL; |
489 | killagreg | 517 | |
518 | |||
41 | ingob | 519 | /* Configure the system clocks */ |
520 | SCU_Config(); |
||
521 | /* init VIC (Vectored Interrupt Controller) */ |
||
522 | SCU_AHBPeriphClockConfig(__VIC,ENABLE); // enable AHB bus clock for VIC |
||
523 | SCU_AHBPeriphReset(__VIC, DISABLE); // disable reset state for VIC |
||
524 | VIC_DeInit(); // deinitializes the VIC module registers to their default reset values. |
||
196 | killagreg | 525 | VIC_InitDefaultVectors(); |
526 | |||
119 | killagreg | 527 | // initialize timer 1 for System Clock and delay rountines |
41 | ingob | 528 | TIMER1_Init(); |
529 | // initialize the LEDs (needs Timer 1) |
||
530 | Led_Init(); |
||
531 | // initialize the debug UART1 |
||
532 | UART1_Init(); |
||
110 | killagreg | 533 | UART1_PutString("\r\n---------------------------------------------"); |
120 | killagreg | 534 | // initialize timer 2 for servo outputs |
180 | killagreg | 535 | //TIMER2_Init(); |
41 | ingob | 536 | // initialize UART2 to FLIGHTCTRL |
537 | UART2_Init(); |
||
538 | // initialize UART0 (to MKGPS or MK3MAG) |
||
539 | UART0_Init(); |
||
134 | killagreg | 540 | // initialize adc |
541 | Analog_Init(); |
||
41 | ingob | 542 | // initialize SPI0 to FC |
543 | SPI0_Init(); |
||
469 | killagreg | 544 | // initialize i2c busses (needs Timer 1) |
489 | killagreg | 545 | I2CBus_Init(I2C0); |
546 | I2CBus_Init(I2C1); |
||
247 | killagreg | 547 | // initialize fat16 partition on sd card (needs Timer 1) |
41 | ingob | 548 | Fat16_Init(); |
156 | killagreg | 549 | // initialize NC params |
550 | NCParams_Init(); |
||
88 | killagreg | 551 | // initialize the settings |
552 | Settings_Init(); |
||
92 | killagreg | 553 | // initialize logging (needs settings) |
82 | killagreg | 554 | Logging_Init(); |
1 | ingob | 555 | |
362 | holgerb | 556 | LED_GRN_ON; |
41 | ingob | 557 | TimerCheckError = SetDelay(3000); |
175 | holgerb | 558 | UART1_PutString("\r\n++++++++++++++++++++++++++++++++++++++++++"); |
110 | killagreg | 559 | UART1_PutString("\n\r Version information:"); |
116 | killagreg | 560 | |
41 | ingob | 561 | GetNaviCtrlVersion(); |
338 | holgerb | 562 | DebugOut.StatusGreen = AMPEL_NC | AMPEL_COMPASS; // NC and MK3Mag |
563 | DebugOut.StatusRed = 0x00; |
||
400 | holgerb | 564 | UART1_PutString("\r\n++++++++++++++++++++++++++++++++++++++++++"); |
149 | killagreg | 565 | |
516 | holgerb | 566 | Compass_Init(); |
270 | killagreg | 567 | |
400 | holgerb | 568 | GPS_Init(); |
569 | |||
528 | holgerb | 570 | |
314 | killagreg | 571 | #ifdef FOLLOW_ME |
572 | TransmitAlsoToFC = 1; |
||
573 | UART1_PutString("\r\n++++++++++++++++++++++++++++++++++++++++++"); |
||
574 | UART1_PutString("\n\r FOLLOW-ME Transmitter only!"); |
||
575 | UART1_PutString("\r\n++++++++++++++++++++++++++++++++++++++++++\r\n\r\n"); |
||
576 | TransmitAlsoToFC = 0; |
||
577 | #else |
||
150 | killagreg | 578 | SPI0_GetFlightCtrlVersion(); |
579 | if(FC_Version.Compatible != FC_SPI_COMPATIBLE) |
||
41 | ingob | 580 | { |
461 | holgerb | 581 | UART1_PutString("\n\r Flight-Ctrl not compatible\n\r"); |
41 | ingob | 582 | LED_RED_ON; |
583 | } |
||
314 | killagreg | 584 | #endif |
528 | holgerb | 585 | |
213 | killagreg | 586 | // ---------- Prepare the isr driven |
154 | killagreg | 587 | // set to absolute lowest priority |
516 | holgerb | 588 | VIC_Config(EXTIT3_ITLine, VIC_IRQ, PRIORITY_SW); |
195 | killagreg | 589 | // enable interrupts |
516 | holgerb | 590 | VIC_ITCmd(EXTIT3_ITLine, ENABLE); |
244 | killagreg | 591 | |
250 | ingob | 592 | Debug_OK("START"); |
362 | holgerb | 593 | UART1_PutString("\r\n"); |
380 | holgerb | 594 | fifo_purge(&UART1_rx_fifo); // flush the whole fifo init buffer |
595 | LED_GRN_ON; |
||
596 | LED_RED_OFF; |
||
530 | holgerb | 597 | Settings_GetParamValue(PID_SEND_NMEA,(u16 *) &NMEA_Interval); |
461 | holgerb | 598 | UART1_PutString("\r\n"); |
528 | holgerb | 599 | |
487 | holgerb | 600 | CompassValueErrorCount = 0; |
503 | holgerb | 601 | I2CBus(Compass_I2CPort)->Timeout = SetDelay(3000); |
528 | holgerb | 602 | // ++++++++++++++++++++++++++++++++++++++++++++++ |
154 | killagreg | 603 | for (;;) // the endless main loop |
41 | ingob | 604 | { |
484 | holgerb | 605 | PollingTimeout = 5; |
431 | killagreg | 606 | Polling(); |
500 | holgerb | 607 | // ++++++++++++++++++++++++++++++++++++++++++++++ |
608 | if(FromFC_LoadWP_List) |
||
516 | holgerb | 609 | { |
610 | WPL_Store.Index = (FromFC_LoadWP_List & ~0x80); |
||
611 | if(WPL_Store.Index <= ToFC_MaxWpListIndex) |
||
612 | { |
||
513 | killagreg | 613 | if(PointList_ReadFromFile(&WPL_Store) == WPL_OK) |
614 | { |
||
615 | if(FromFC_LoadWP_List & 0x80)// -> load relative |
||
516 | holgerb | 616 | { |
513 | killagreg | 617 | if(NCFlags & NC_FLAG_FREE || NaviData.TargetPositionDeviation.Distance > 7*10) |
516 | holgerb | 618 | { // take actual position |
619 | if(!PointList_Move(1,&(GPSData.Position),NaviData.CompassHeading)) PointList_Clear(); // try to move wp-list so that 1st entry matches the current position |
||
620 | } |
||
621 | else |
||
513 | killagreg | 622 | { // take last target position |
516 | holgerb | 623 | if(!PointList_Move(1, &(NaviData.TargetPosition),NaviData.CompassHeading)) PointList_Clear(); // try to move wp-list so that 1st entry matches the current position |
513 | killagreg | 624 | } |
625 | } |
||
626 | if(FC.StatusFlags & FC_STATUS_FLY) PointList_WPActive(TRUE); |
||
627 | GPS_pWaypoint = PointList_WPBegin(); // updates POI index |
||
519 | holgerb | 628 | SpeakWaypointRached = 1; // Speak once when the last Point is reached |
629 | SpeakNextWaypoint = 1; // Speak once as soon as the Points are active |
||
630 | NCFlags &= ~NC_FLAG_TARGET_REACHED; |
||
513 | killagreg | 631 | BeepTime = 150; |
632 | } |
||
633 | } |
||
634 | FromFC_LoadWP_List = 0; |
||
635 | } |
||
636 | // ++++++++++++++++++++++++++++++++++++++++++++++ |
||
637 | if(FromFC_Save_SinglePoint) |
||
638 | { |
||
639 | WPL_Store.Index = FromFC_Save_SinglePoint; |
||
516 | holgerb | 640 | if(WPL_Store.Index <= ToFC_MaxWpListIndex) if(PointList_SaveSinglePoint(&WPL_Store) == WPL_OK) BeepTime = 150; |
513 | killagreg | 641 | FromFC_Save_SinglePoint = 0; |
642 | } |
||
643 | // ++++++++++++++++++++++++++++++++++++++++++++++ |
||
644 | if(FromFC_Load_SinglePoint) |
||
645 | { |
||
516 | holgerb | 646 | WPL_Store.Index = FromFC_Load_SinglePoint; |
647 | if(WPL_Store.Index <= ToFC_MaxWpListIndex) |
||
648 | { |
||
513 | killagreg | 649 | if(PointList_LoadSinglePoint(&WPL_Store) == WPL_OK) |
502 | killagreg | 650 | { |
651 | if(FC.StatusFlags & FC_STATUS_FLY) PointList_WPActive(TRUE); |
||
652 | GPS_pWaypoint = PointList_WPBegin(); // updates POI index |
||
519 | holgerb | 653 | SpeakWaypointRached = 1; // Speak once when the last Point is reached |
654 | SpeakNextWaypoint = 1; // Speak once as soon as the Points are active |
||
655 | NCFlags &= ~NC_FLAG_TARGET_REACHED; |
||
502 | killagreg | 656 | BeepTime = 150; |
657 | } |
||
516 | holgerb | 658 | } |
513 | killagreg | 659 | FromFC_Load_SinglePoint = 0; |
504 | holgerb | 660 | } |
500 | holgerb | 661 | // ++++++++++++++++++++++++++++++++++++++++++++++ |
431 | killagreg | 662 | // ---------------- Logging --------------------------------------- |
489 | killagreg | 663 | if(SD_WatchDog) |
431 | killagreg | 664 | { |
665 | SD_WatchDog = 30000; |
||
666 | if(SDCardInfo.Valid == 1) Logging_Update(); // could be block some time for at max. 2 seconds, therefore move time critical part of the mainloop into the ISR of timer 1 |
||
516 | holgerb | 667 | else |
668 | { |
||
669 | ToFC_MaxWpListIndex = 0; |
||
670 | if(FC.StatusFlags & FC_STATUS_START) SD_LoggingError = 100; |
||
503 | holgerb | 671 | } |
431 | killagreg | 672 | if(!SD_WatchDog) UART1_PutString("\n\rSD-Watchdog - Logging aborted\n\r"); |
673 | } |
||
489 | killagreg | 674 | |
675 | /* |
||
324 | killagreg | 676 | if(CheckDelay(ftimer)) |
677 | { |
||
678 | |||
431 | killagreg | 679 | static s8 filename[35]; |
680 | static u8 i = 0; |
||
681 | s8 dbgmsg[40]; |
||
324 | killagreg | 682 | |
489 | killagreg | 683 | |
684 | |||
324 | killagreg | 685 | ftimer = SetDelay(100); |
686 | if(FC.Poti[3]>100 && fstate == 0) |
||
687 | { |
||
688 | fstate = 1; |
||
431 | killagreg | 689 | sprintf(filename, "/toast/toasta/toast%02i.txt",i++); |
324 | killagreg | 690 | } |
691 | else if(FC.Poti[3]<100 && fstate == 2) |
||
692 | { |
||
693 | fstate = 3; |
||
694 | } |
||
695 | |||
696 | switch(fstate) |
||
697 | { |
||
698 | case 1: |
||
431 | killagreg | 699 | sprintf(dbgmsg,"\r\nStart writing file: %s", filename); |
700 | Debug(dbgmsg); |
||
324 | killagreg | 701 | f = fopen_(filename, 'a'); |
702 | if(f== NULL) Fat16_Init(); |
||
703 | fstate = 2; |
||
704 | break; |
||
705 | |||
706 | case 2: |
||
707 | fputs_("\r\ntest edins sdv dsivbds iv dsivb disbv idsv bisd bv d suiv dsibsivbdis fbvisdöb visdbvisdb vidbfibds ibv", f); |
||
708 | break; |
||
489 | killagreg | 709 | |
324 | killagreg | 710 | case 3: |
431 | killagreg | 711 | sprintf(dbgmsg,"\r\nClosing file: %s", filename); |
712 | Debug(dbgmsg); |
||
324 | killagreg | 713 | fclose_(f); |
714 | fstate = 0; |
||
715 | break; |
||
716 | |||
717 | default: |
||
718 | break; |
||
719 | } |
||
720 | } |
||
489 | killagreg | 721 | */ |
24 | StephanB | 722 | } |
1 | ingob | 723 | } |
516 | holgerb | 724 | //DebugOut.Analog[] |