Subversion Repositories FlightCtrl

Rev

Rev 1101 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1 ingob 1
/*#######################################################################################
2
Flight Control
3
#######################################################################################*/
4
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
5
// + Copyright (c) 04.2007 Holger Buss
6
// + Nur für den privaten Gebrauch
7
// + www.MikroKopter.com
8
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1051 killagreg 9
// + Es gilt für das gesamte Projekt (Hardware, Software, Binärfiles, Sourcecode und Dokumentation),
10
// + dass eine Nutzung (auch auszugsweise) nur für den privaten (nicht-kommerziellen) Gebrauch zulässig ist.
11
// + Sollten direkte oder indirekte kommerzielle Absichten verfolgt werden, ist mit uns (info@mikrokopter.de) Kontakt
12
// + bzgl. der Nutzungsbedingungen aufzunehmen.
1 ingob 13
// + Eine kommerzielle Nutzung ist z.B.Verkauf von MikroKoptern, Bestückung und Verkauf von Platinen oder Bausätzen,
14
// + Verkauf von Luftbildaufnahmen, usw.
15
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1051 killagreg 16
// + Werden Teile des Quellcodes (mit oder ohne Modifikation) weiterverwendet oder veröffentlicht,
1 ingob 17
// + unterliegen sie auch diesen Nutzungsbedingungen und diese Nutzungsbedingungen incl. Copyright müssen dann beiliegen
18
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
19
// + Sollte die Software (auch auszugesweise) oder sonstige Informationen des MikroKopter-Projekts
20
// + auf anderen Webseiten oder sonstigen Medien veröffentlicht werden, muss unsere Webseite "http://www.mikrokopter.de"
21
// + eindeutig als Ursprung verlinkt werden
22
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
23
// + Keine Gewähr auf Fehlerfreiheit, Vollständigkeit oder Funktion
24
// + Benutzung auf eigene Gefahr
25
// + Wir übernehmen keinerlei Haftung für direkte oder indirekte Personen- oder Sachschäden
26
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1051 killagreg 27
// + Die Portierung der Software (oder Teile davon) auf andere Systeme (ausser der Hardware von www.mikrokopter.de) ist nur
1 ingob 28
// + mit unserer Zustimmung zulässig
29
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
30
// + Die Funktion printf_P() unterliegt ihrer eigenen Lizenz und ist hiervon nicht betroffen
31
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1051 killagreg 32
// + Redistributions of source code (with or without modifications) must retain the above copyright notice,
1 ingob 33
// + this list of conditions and the following disclaimer.
34
// +   * Neither the name of the copyright holders nor the names of contributors may be used to endorse or promote products derived
35
// +     from this software without specific prior written permission.
1051 killagreg 36
// +   * The use of this project (hardware, software, binary files, sources and documentation) is only permittet
1 ingob 37
// +     for non-commercial use (directly or indirectly)
1051 killagreg 38
// +     Commercial use (for excample: selling of MikroKopters, selling of PCBs, assembly, ...) is only permitted
1 ingob 39
// +     with our written permission
1051 killagreg 40
// +   * If sources or documentations are redistributet on other webpages, out webpage (http://www.MikroKopter.de) must be
41
// +     clearly linked as origin
831 hbuss 42
// +   * porting to systems other than hardware from www.mikrokopter.de is not allowed
1 ingob 43
// +  THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
44
// +  AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
45
// +  IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
46
// +  ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
47
// +  LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
48
// +  CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
49
// +  SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
492 hbuss 50
// +  INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN// +  CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
1 ingob 51
// +  ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
1051 killagreg 52
// +  POSSIBILITY OF SUCH DAMAGE.
1 ingob 53
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1099 salvo 54
// Aenderungen von Peter Muehlenbrock ("Salvo") Stand 29.12.2008
1086 salvo 55
/*
56
Driftkompensation fuer Gyros verbessert
57
Linearsensor optional mit fixem Neutralwert
58
Ersatzkompass abgeleitet aus Magnetkompass und Giergyro fuer nahezu neigungsunabhaengige Kompassfunktion
59
*/
1 ingob 60
 
61
#include "main.h"
395 hbuss 62
#include "eeprom.c"
1 ingob 63
 
64
unsigned char h,m,s;
173 holgerb 65
volatile unsigned int I2CTimeout = 100;
927 hbuss 66
volatile int MesswertNick,MesswertRoll,MesswertGier,MesswertGierBias;
1051 killagreg 67
int AdNeutralGierBias;
927 hbuss 68
int AdNeutralNick = 0,AdNeutralRoll = 0,AdNeutralGier = 0,StartNeutralRoll = 0,StartNeutralNick = 0;
69
int Mittelwert_AccNick, Mittelwert_AccRoll,Mittelwert_AccHoch, NeutralAccX=0, NeutralAccY=0;
805 hbuss 70
int NaviAccNick, NaviAccRoll,NaviCntAcc = 0;
1 ingob 71
volatile float NeutralAccZ = 0;
72
unsigned char CosinusNickWinkel = 0, CosinusRollWinkel = 0;
693 hbuss 73
long IntegralNick = 0,IntegralNick2 = 0;
74
long IntegralRoll = 0,IntegralRoll2 = 0;
75
long IntegralAccNick = 0,IntegralAccRoll = 0,IntegralAccZ = 0;
76
long Integral_Gier = 0;
77
long Mess_IntegralNick = 0,Mess_IntegralNick2 = 0;
78
long Mess_IntegralRoll = 0,Mess_IntegralRoll2 = 0;
79
long Mess_Integral_Gier = 0,Mess_Integral_Gier2 = 0;
80
long MittelIntegralNick,MittelIntegralRoll,MittelIntegralNick2,MittelIntegralRoll2;
1 ingob 81
volatile long Mess_Integral_Hoch = 0;
82
volatile int  KompassValue = 0;
83
volatile int  KompassStartwert = 0;
84
volatile int  KompassRichtung = 0;
693 hbuss 85
unsigned int  KompassSignalSchlecht = 500;
855 hbuss 86
unsigned char  MAX_GAS,MIN_GAS;
1 ingob 87
unsigned char Notlandung = 0;
88
unsigned char HoehenReglerAktiv = 0;
880 hbuss 89
unsigned char TrichterFlug = 0;
395 hbuss 90
long Umschlag180Nick = 250000L, Umschlag180Roll = 250000L;
693 hbuss 91
long  ErsatzKompass;
92
int   ErsatzKompassInGrad; // Kompasswert in Grad
93
int   GierGyroFehler = 0;
1086 salvo 94
//Salvo 12.10.2007
95
uint8_t magkompass_ok=0;
96
uint8_t gps_cmd = GPS_CMD_STOP;
97
static int       ubat_cnt =0;
98
static int gas_actual,gas_mittel; //Parameter fuer Gasreduzierung bei unterspannung
99
int w,v;
100
//Salvo End
101
 
102
 //Salvo 15.12.2007 Ersatzkompass und Giergyrokompensation
103
long GyroKomp_Int;
104
long int GyroGier_Comp;
1102 salvo 105
//int GyroKomp_Value; //  Der ermittelte Kompasswert aus Gyro und Magnetkompass
1086 salvo 106
short int cnt_stickgier_zero =0;
107
int gyrogier_kompass;
108
//Salvo End
109
 
110
 //Salvo 2.1.2008 Allgemeine Debugvariablen
111
int debug_gp_0,debug_gp_1,debug_gp_2,debug_gp_3,debug_gp_4,debug_gp_5,debug_gp_6,debug_gp_7;
112
//Salvo End
1 ingob 113
float GyroFaktor;
114
float IntegralFaktor;
115
volatile int  DiffNick,DiffRoll;
1051 killagreg 116
int  Poti1 = 0, Poti2 = 0, Poti3 = 0, Poti4 = 0;
1 ingob 117
volatile unsigned char Motor_Vorne,Motor_Hinten,Motor_Rechts,Motor_Links, Count;
118
volatile unsigned char SenderOkay = 0;
595 hbuss 119
int StickNick = 0,StickRoll = 0,StickGier = 0,StickGas = 0;
1 ingob 120
char MotorenEin = 0;
121
int HoehenWert = 0;
122
int SollHoehe = 0;
498 hbuss 123
int LageKorrekturRoll = 0,LageKorrekturNick = 0;
1 ingob 124
float Ki =  FAKTOR_I;
395 hbuss 125
unsigned char Looping_Nick = 0,Looping_Roll = 0;
126
unsigned char Looping_Links = 0, Looping_Rechts = 0, Looping_Unten = 0, Looping_Oben = 0;
1 ingob 127
 
128
unsigned char Parameter_Luftdruck_D  = 48;      // Wert : 0-250
129
unsigned char Parameter_MaxHoehe     = 251;      // Wert : 0-250
130
unsigned char Parameter_Hoehe_P      = 16;      // Wert : 0-32
131
unsigned char Parameter_Hoehe_ACC_Wirkung = 58; // Wert : 0-250
132
unsigned char Parameter_KompassWirkung = 64;    // Wert : 0-250
173 holgerb 133
unsigned char Parameter_Gyro_P = 150;           // Wert : 10-250
1 ingob 134
unsigned char Parameter_Gyro_I = 150;           // Wert : 0-250
135
unsigned char Parameter_Gier_P = 2;             // Wert : 1-20
136
unsigned char Parameter_I_Faktor = 10;          // Wert : 1-20
137
unsigned char Parameter_UserParam1 = 0;
138
unsigned char Parameter_UserParam2 = 0;
139
unsigned char Parameter_UserParam3 = 0;
140
unsigned char Parameter_UserParam4 = 0;
499 hbuss 141
unsigned char Parameter_UserParam5 = 0;
142
unsigned char Parameter_UserParam6 = 0;
143
unsigned char Parameter_UserParam7 = 0;
144
unsigned char Parameter_UserParam8 = 0;
1 ingob 145
unsigned char Parameter_ServoNickControl = 100;
173 holgerb 146
unsigned char Parameter_LoopGasLimit = 70;
395 hbuss 147
unsigned char Parameter_AchsKopplung1 = 0;
148
unsigned char Parameter_AchsGegenKopplung1 = 0;
499 hbuss 149
unsigned char Parameter_DynamicStability = 100;
921 hbuss 150
unsigned char Parameter_J16Bitmask;             // for the J16 Output
151
unsigned char Parameter_J16Timing;              // for the J16 Output
152
unsigned char Parameter_J17Bitmask;             // for the J17 Output
153
unsigned char Parameter_J17Timing;              // for the J17 Output
154
unsigned char Parameter_NaviGpsModeControl;     // Parameters for the Naviboard
1051 killagreg 155
unsigned char Parameter_NaviGpsGain;
156
unsigned char Parameter_NaviGpsP;
157
unsigned char Parameter_NaviGpsI;
158
unsigned char Parameter_NaviGpsD;
159
unsigned char Parameter_NaviGpsACC;
1086 salvo 160
unsigned char Parameter_NaviStickThreshold; //salvo 16.10.2008      
993 hbuss 161
unsigned char Parameter_NaviOperatingRadius;
162
unsigned char Parameter_NaviWindCorrection;
163
unsigned char Parameter_NaviSpeedCompensation;
921 hbuss 164
unsigned char Parameter_ExternalControl;
1 ingob 165
struct mk_param_struct EE_Parameter;
492 hbuss 166
signed int ExternStickNick = 0,ExternStickRoll = 0,ExternStickGier = 0, ExternHoehenValue = -20;
614 hbuss 167
int MaxStickNick = 0,MaxStickRoll = 0;
871 hbuss 168
unsigned int  modell_fliegt = 0;
921 hbuss 169
unsigned char MikroKopterFlags = 0;
1 ingob 170
 
1086 salvo 171
//Salvo 2.1.2008 Allgemeine Debugvariablen
172
int debug_gp_0,debug_gp_1,debug_gp_2,debug_gp_3,debug_gp_4,debug_gp_5,debug_gp_6,debug_gp_7;
173
//Salvo End
174
 
175
 
1 ingob 176
void Piep(unsigned char Anzahl)
177
{
178
 while(Anzahl--)
179
 {
180
  if(MotorenEin) return; //auf keinen Fall im Flug!
181
  beeptime = 100;
182
  Delay_ms(250);
183
 }
184
}
185
 
186
//############################################################################
187
//  Nullwerte ermitteln
188
void SetNeutral(void)
189
//############################################################################
190
{
1086 salvo 191
        // Salvo 9.12.2007
192
        RX_SWTCH_ON; //GPS Daten auf RX eingang schalten 
193
        // Salvo End
194
        NeutralAccX = 0;
1 ingob 195
        NeutralAccY = 0;
196
        NeutralAccZ = 0;
1051 killagreg 197
    AdNeutralNick = 0;
198
        AdNeutralRoll = 0;
1 ingob 199
        AdNeutralGier = 0;
927 hbuss 200
    AdNeutralGierBias = 0;
395 hbuss 201
    Parameter_AchsKopplung1 = 0;
202
    Parameter_AchsGegenKopplung1 = 0;
1036 hbuss 203
    ExpandBaro = 0;
1051 killagreg 204
    CalibrierMittelwert();
395 hbuss 205
    Delay_ms_Mess(100);
1 ingob 206
        CalibrierMittelwert();
207
    if((EE_Parameter.GlobalConfig & CFG_HOEHENREGELUNG))  // Höhenregelung aktiviert?
1051 killagreg 208
     {
1 ingob 209
      if((MessLuftdruck > 950) || (MessLuftdruck < 750)) SucheLuftruckOffset();
210
     }
173 holgerb 211
 
1051 killagreg 212
     AdNeutralNick= AdWertNick;
213
         AdNeutralRoll= AdWertRoll;
395 hbuss 214
         AdNeutralGier= AdWertGier;
927 hbuss 215
     AdNeutralGierBias = AdWertGier;
401 hbuss 216
     StartNeutralRoll = AdNeutralRoll;
217
     StartNeutralNick = AdNeutralNick;
1051 killagreg 218
    if(eeprom_read_byte(&EEPromArray[EEPROM_ADR_ACC_NICK]) > 4)
513 hbuss 219
    {
220
      NeutralAccY = abs(Mittelwert_AccRoll) / ACC_AMPLIFY;
221
          NeutralAccX = abs(Mittelwert_AccNick) / ACC_AMPLIFY;
222
          NeutralAccZ = Aktuell_az;
223
    }
1051 killagreg 224
    else
513 hbuss 225
    {
226
      NeutralAccX = (int)eeprom_read_byte(&EEPromArray[EEPROM_ADR_ACC_NICK]) * 256 + (int)eeprom_read_byte(&EEPromArray[EEPROM_ADR_ACC_NICK+1]);
227
          NeutralAccY = (int)eeprom_read_byte(&EEPromArray[EEPROM_ADR_ACC_ROLL]) * 256 + (int)eeprom_read_byte(&EEPromArray[EEPROM_ADR_ACC_ROLL+1]);
228
          NeutralAccZ = (int)eeprom_read_byte(&EEPromArray[EEPROM_ADR_ACC_Z]) * 256 + (int)eeprom_read_byte(&EEPromArray[EEPROM_ADR_ACC_Z+1]);
229
    }
1051 killagreg 230
 
231
        Mess_IntegralNick = 0;
1 ingob 232
    Mess_IntegralNick2 = 0;
1051 killagreg 233
    Mess_IntegralRoll = 0;
1 ingob 234
    Mess_IntegralRoll2 = 0;
1051 killagreg 235
    Mess_Integral_Gier = 0;
1 ingob 236
    MesswertNick = 0;
237
    MesswertRoll = 0;
238
    MesswertGier = 0;
927 hbuss 239
 Delay_ms_Mess(100);
1 ingob 240
    StartLuftdruck = Luftdruck;
241
    HoeheD = 0;
242
    Mess_Integral_Hoch = 0;
243
    KompassStartwert = KompassValue;
244
    GPS_Neutral();
1051 killagreg 245
    beeptime = 50;
882 hbuss 246
        Umschlag180Nick = ((long) EE_Parameter.WinkelUmschlagNick * 2500L) + 15000L;
247
        Umschlag180Roll = ((long) EE_Parameter.WinkelUmschlagRoll * 2500L) + 15000L;
492 hbuss 248
    ExternHoehenValue = 0;
693 hbuss 249
    ErsatzKompass = KompassValue * GIER_GRAD_FAKTOR;
250
    GierGyroFehler = 0;
723 hbuss 251
    SendVersionToNavi = 1;
921 hbuss 252
    LED_Init();
253
    MikroKopterFlags |= FLAG_CALIBRATE;
992 hbuss 254
    FromNaviCtrl_Value.Kalman_K = -1;
255
    FromNaviCtrl_Value.Kalman_MaxDrift = EE_Parameter.Driftkomp * 16;
256
    FromNaviCtrl_Value.Kalman_MaxFusion = 32;
1086 salvo 257
 
258
//Salvo 13.10.2007 Ersatzkompass und Gas
259
        GyroKomp_Int =  KompassValue * GIER_GRAD_FAKTOR; //Neu ab 15.10.2008
260
//      gas_mittel      =       30;
261
//      gas_actual      =       gas_mittel;
262
// Salvo End
263
 
1 ingob 264
}
265
 
266
//############################################################################
395 hbuss 267
// Bearbeitet die Messwerte
1 ingob 268
void Mittelwert(void)
269
//############################################################################
1051 killagreg 270
{
271
    static signed long tmpl,tmpl2;
395 hbuss 272
    MesswertGier = (signed int) AdNeutralGier - AdWertGier;
927 hbuss 273
    MesswertGierBias = (signed int) AdNeutralGierBias - AdWertGier;
395 hbuss 274
    MesswertRoll = (signed int) AdWertRoll - AdNeutralRoll;
275
    MesswertNick = (signed int) AdWertNick - AdNeutralNick;
401 hbuss 276
 
604 hbuss 277
//DebugOut.Analog[26] = MesswertNick;
1086 salvo 278
//DebugOut.Analog[28] = MesswertRoll;
604 hbuss 279
 
395 hbuss 280
// Beschleunigungssensor  ++++++++++++++++++++++++++++++++++++++++++++++++
281
        Mittelwert_AccNick = ((long)Mittelwert_AccNick * 1 + ((ACC_AMPLIFY * (long)AdWertAccNick))) / 2L;
282
        Mittelwert_AccRoll = ((long)Mittelwert_AccRoll * 1 + ((ACC_AMPLIFY * (long)AdWertAccRoll))) / 2L;
283
        Mittelwert_AccHoch = ((long)Mittelwert_AccHoch * 1 + ((long)AdWertAccHoch)) / 2L;
284
    IntegralAccNick += ACC_AMPLIFY * AdWertAccNick;
285
    IntegralAccRoll += ACC_AMPLIFY * AdWertAccRoll;
805 hbuss 286
    NaviAccNick    += AdWertAccNick;
287
    NaviAccRoll    += AdWertAccRoll;
288
    NaviCntAcc++;
513 hbuss 289
    IntegralAccZ    += Aktuell_az - NeutralAccZ;
395 hbuss 290
// Gier  ++++++++++++++++++++++++++++++++++++++++++++++++
693 hbuss 291
            ErsatzKompass +=  MesswertGier;
1101 salvo 292
//Salvo 30.12.2008
293
//      if(EE_Parameter.GlobalConfig & CFG_KOMPASS_AKTIV) 
1096 salvo 294
        {
1086 salvo 295
                        GyroKomp_Int   += (long)MesswertGier;
296
                        GyroGier_Comp  += (long)MesswertGier;
1096 salvo 297
        }
298
 
1086 salvo 299
//Salvo End
395 hbuss 300
            Mess_Integral_Gier +=  MesswertGier;
927 hbuss 301
//            Mess_Integral_Gier2 += MesswertGier;
693 hbuss 302
                    if(ErsatzKompass >= (360L * GIER_GRAD_FAKTOR)) ErsatzKompass -= 360L * GIER_GRAD_FAKTOR;  // 360° Umschlag
303
                    if(ErsatzKompass < 0)                          ErsatzKompass += 360L * GIER_GRAD_FAKTOR;
395 hbuss 304
// Kopplungsanteil  +++++++++++++++++++++++++++++++++++++
305
      if(!Looping_Nick && !Looping_Roll && (EE_Parameter.GlobalConfig & CFG_ACHSENKOPPLUNG_AKTIV))
306
         {
927 hbuss 307
            tmpl = (MesswertGierBias * Mess_IntegralNick) / 2048L;
395 hbuss 308
            tmpl *= Parameter_AchsKopplung1;  //125
880 hbuss 309
            tmpl /= 4096L;
927 hbuss 310
            tmpl2 = (MesswertGierBias * Mess_IntegralRoll) / 2048L;
395 hbuss 311
            tmpl2 *= Parameter_AchsKopplung1;
880 hbuss 312
            tmpl2 /= 4096L;
1051 killagreg 313
            if(labs(tmpl) > 128 || labs(tmpl2) > 128) TrichterFlug = 1;
395 hbuss 314
         }
315
      else  tmpl = tmpl2 = 0;
316
// Roll  ++++++++++++++++++++++++++++++++++++++++++++++++
317
            MesswertRoll += tmpl;
318
            MesswertRoll += (tmpl2*Parameter_AchsGegenKopplung1)/512L; //109
319
            Mess_IntegralRoll2 += MesswertRoll;
498 hbuss 320
            Mess_IntegralRoll +=  MesswertRoll - LageKorrekturRoll;
1051 killagreg 321
            if(Mess_IntegralRoll > Umschlag180Roll)
395 hbuss 322
            {
882 hbuss 323
             Mess_IntegralRoll  = -(Umschlag180Roll - 25000L);
395 hbuss 324
             Mess_IntegralRoll2 = Mess_IntegralRoll;
1051 killagreg 325
            }
395 hbuss 326
            if(Mess_IntegralRoll <-Umschlag180Roll)
327
            {
882 hbuss 328
             Mess_IntegralRoll =  (Umschlag180Roll - 25000L);
395 hbuss 329
             Mess_IntegralRoll2 = Mess_IntegralRoll;
1051 killagreg 330
            }
395 hbuss 331
            if(AdWertRoll < 15)   MesswertRoll = -1000;
332
            if(AdWertRoll <  7)   MesswertRoll = -2000;
401 hbuss 333
            if(PlatinenVersion == 10)
334
                         {
335
              if(AdWertRoll > 1010) MesswertRoll = +1000;
336
              if(AdWertRoll > 1017) MesswertRoll = +2000;
337
                         }
1051 killagreg 338
                         else
401 hbuss 339
                         {
340
              if(AdWertRoll > 2020) MesswertRoll = +1000;
341
              if(AdWertRoll > 2034) MesswertRoll = +2000;
342
                         }
395 hbuss 343
// Nick  ++++++++++++++++++++++++++++++++++++++++++++++++
344
            MesswertNick -= tmpl2;
345
            MesswertNick -= (tmpl*Parameter_AchsGegenKopplung1)/512L;
346
            Mess_IntegralNick2 += MesswertNick;
498 hbuss 347
            Mess_IntegralNick  += MesswertNick - LageKorrekturNick;
882 hbuss 348
 
1051 killagreg 349
            if(Mess_IntegralNick > Umschlag180Nick)
882 hbuss 350
             {
351
              Mess_IntegralNick = -(Umschlag180Nick - 25000L);
352
              Mess_IntegralNick2 = Mess_IntegralNick;
1051 killagreg 353
             }
354
            if(Mess_IntegralNick <-Umschlag180Nick)
395 hbuss 355
            {
882 hbuss 356
             Mess_IntegralNick =  (Umschlag180Nick - 25000L);
395 hbuss 357
             Mess_IntegralNick2 = Mess_IntegralNick;
1051 killagreg 358
            }
395 hbuss 359
            if(AdWertNick < 15)   MesswertNick = -1000;
360
            if(AdWertNick <  7)   MesswertNick = -2000;
401 hbuss 361
            if(PlatinenVersion == 10)
362
                         {
363
              if(AdWertNick > 1010) MesswertNick = +1000;
364
              if(AdWertNick > 1017) MesswertNick = +2000;
365
                         }
1051 killagreg 366
                         else
401 hbuss 367
                         {
368
              if(AdWertNick > 2020) MesswertNick = +1000;
369
              if(AdWertNick > 2034) MesswertNick = +2000;
370
                         }
395 hbuss 371
//++++++++++++++++++++++++++++++++++++++++++++++++
372
// ADC einschalten
1051 killagreg 373
    ANALOG_ON;
395 hbuss 374
//++++++++++++++++++++++++++++++++++++++++++++++++
375
 
1 ingob 376
    Integral_Gier  = Mess_Integral_Gier;
377
    IntegralNick = Mess_IntegralNick;
378
    IntegralRoll = Mess_IntegralRoll;
1051 killagreg 379
    IntegralNick2 = Mess_IntegralNick2;
1 ingob 380
    IntegralRoll2 = Mess_IntegralRoll2;
381
 
395 hbuss 382
  if(EE_Parameter.GlobalConfig & CFG_DREHRATEN_BEGRENZER && !Looping_Nick && !Looping_Roll)
383
  {
384
    if(MesswertNick > 200)       MesswertNick += 4 * (MesswertNick - 200);
1051 killagreg 385
    else if(MesswertNick < -200) MesswertNick += 4 * (MesswertNick + 200);
395 hbuss 386
    if(MesswertRoll > 200)       MesswertRoll += 4 * (MesswertRoll - 200);
1051 killagreg 387
    else if(MesswertRoll < -200) MesswertRoll += 4 * (MesswertRoll + 200);
395 hbuss 388
  }
1 ingob 389
    if(Poti1 < PPM_in[EE_Parameter.Kanalbelegung[K_POTI1]] + 110) Poti1++; else if(Poti1 > PPM_in[EE_Parameter.Kanalbelegung[K_POTI1]] + 110 && Poti1) Poti1--;
390
    if(Poti2 < PPM_in[EE_Parameter.Kanalbelegung[K_POTI2]] + 110) Poti2++; else if(Poti2 > PPM_in[EE_Parameter.Kanalbelegung[K_POTI2]] + 110 && Poti2) Poti2--;
391
    if(Poti3 < PPM_in[EE_Parameter.Kanalbelegung[K_POTI3]] + 110) Poti3++; else if(Poti3 > PPM_in[EE_Parameter.Kanalbelegung[K_POTI3]] + 110 && Poti3) Poti3--;
392
    if(Poti4 < PPM_in[EE_Parameter.Kanalbelegung[K_POTI4]] + 110) Poti4++; else if(Poti4 > PPM_in[EE_Parameter.Kanalbelegung[K_POTI4]] + 110 && Poti4) Poti4--;
393
    if(Poti1 < 0) Poti1 = 0; else if(Poti1 > 255) Poti1 = 255;
394
    if(Poti2 < 0) Poti2 = 0; else if(Poti2 > 255) Poti2 = 255;
395
    if(Poti3 < 0) Poti3 = 0; else if(Poti3 > 255) Poti3 = 255;
396
    if(Poti4 < 0) Poti4 = 0; else if(Poti4 > 255) Poti4 = 255;
397
}
398
 
399
//############################################################################
400
// Messwerte beim Ermitteln der Nullage
401
void CalibrierMittelwert(void)
402
//############################################################################
1051 killagreg 403
{
1021 hbuss 404
    if(PlatinenVersion == 13) SucheGyroOffset();
1 ingob 405
    // ADC auschalten, damit die Werte sich nicht während der Berechnung ändern
406
        ANALOG_OFF;
395 hbuss 407
        MesswertNick = AdWertNick;
408
        MesswertRoll = AdWertRoll;
409
        MesswertGier = AdWertGier;
410
        Mittelwert_AccNick = ACC_AMPLIFY * (long)AdWertAccNick;
411
        Mittelwert_AccRoll = ACC_AMPLIFY * (long)AdWertAccRoll;
412
        Mittelwert_AccHoch = (long)AdWertAccHoch;
413
   // ADC einschalten
1051 killagreg 414
    ANALOG_ON;
1 ingob 415
    if(Poti1 < PPM_in[EE_Parameter.Kanalbelegung[K_POTI1]] + 110) Poti1++; else if(Poti1 > PPM_in[EE_Parameter.Kanalbelegung[K_POTI1]] + 110 && Poti1) Poti1--;
416
    if(Poti2 < PPM_in[EE_Parameter.Kanalbelegung[K_POTI2]] + 110) Poti2++; else if(Poti2 > PPM_in[EE_Parameter.Kanalbelegung[K_POTI2]] + 110 && Poti2) Poti2--;
417
    if(Poti3 < PPM_in[EE_Parameter.Kanalbelegung[K_POTI3]] + 110) Poti3++; else if(Poti3 > PPM_in[EE_Parameter.Kanalbelegung[K_POTI3]] + 110 && Poti3) Poti3--;
418
    if(Poti4 < PPM_in[EE_Parameter.Kanalbelegung[K_POTI4]] + 110) Poti4++; else if(Poti4 > PPM_in[EE_Parameter.Kanalbelegung[K_POTI4]] + 110 && Poti4) Poti4--;
419
    if(Poti1 < 0) Poti1 = 0; else if(Poti1 > 255) Poti1 = 255;
420
    if(Poti2 < 0) Poti2 = 0; else if(Poti2 > 255) Poti2 = 255;
421
    if(Poti3 < 0) Poti3 = 0; else if(Poti3 > 255) Poti3 = 255;
422
    if(Poti4 < 0) Poti4 = 0; else if(Poti4 > 255) Poti4 = 255;
395 hbuss 423
 
424
        Umschlag180Nick = (long) EE_Parameter.WinkelUmschlagNick * 2500L;
720 ingob 425
        Umschlag180Roll = (long) EE_Parameter.WinkelUmschlagRoll * 2500L;
1 ingob 426
}
427
 
428
//############################################################################
429
// Senden der Motorwerte per I2C-Bus
430
void SendMotorData(void)
431
//############################################################################
1051 killagreg 432
{
921 hbuss 433
    if(!MotorenEin)
1 ingob 434
        {
435
        Motor_Hinten = 0;
436
        Motor_Vorne = 0;
437
        Motor_Rechts = 0;
438
        Motor_Links = 0;
439
        if(MotorTest[0]) Motor_Vorne = MotorTest[0];
440
        if(MotorTest[1]) Motor_Hinten = MotorTest[1];
441
        if(MotorTest[2]) Motor_Links = MotorTest[2];
442
        if(MotorTest[3]) Motor_Rechts = MotorTest[3];
921 hbuss 443
        MikroKopterFlags &= ~(FLAG_MOTOR_RUN | FLAG_FLY);
444
        } else MikroKopterFlags |= FLAG_MOTOR_RUN;
1 ingob 445
 
446
    DebugOut.Analog[12] = Motor_Vorne;
447
    DebugOut.Analog[13] = Motor_Hinten;
448
    DebugOut.Analog[14] = Motor_Links;
1051 killagreg 449
    DebugOut.Analog[15] = Motor_Rechts;
1 ingob 450
 
451
    //Start I2C Interrupt Mode
452
    twi_state = 0;
453
    motor = 0;
1051 killagreg 454
    i2c_start();
1 ingob 455
}
456
 
457
 
458
 
459
//############################################################################
460
// Trägt ggf. das Poti als Parameter ein
1051 killagreg 461
void ParameterZuordnung(void)
1 ingob 462
//############################################################################
463
{
921 hbuss 464
 #define CHK_POTI_MM(b,a,min,max) { if(a > 250) { if(a == 251) b = Poti1; else if(a == 252) b = Poti2; else if(a == 253) b = Poti3; else if(a == 254) b = Poti4;} else b = a; if(b <= min) b = min; else if(b >= max) b = max;}
465
 #define CHK_POTI(b,a,min,max) { if(a > 250) { if(a == 251) b = Poti1; else if(a == 252) b = Poti2; else if(a == 253) b = Poti3; else if(a == 254) b = Poti4;} else b = a; }
1 ingob 466
 CHK_POTI(Parameter_MaxHoehe,EE_Parameter.MaxHoehe,0,255);
921 hbuss 467
 CHK_POTI_MM(Parameter_Luftdruck_D,EE_Parameter.Luftdruck_D,0,100);
468
 CHK_POTI_MM(Parameter_Hoehe_P,EE_Parameter.Hoehe_P,0,100);
1 ingob 469
 CHK_POTI(Parameter_Hoehe_ACC_Wirkung,EE_Parameter.Hoehe_ACC_Wirkung,0,255);
470
 CHK_POTI(Parameter_KompassWirkung,EE_Parameter.KompassWirkung,0,255);
921 hbuss 471
 CHK_POTI_MM(Parameter_Gyro_P,EE_Parameter.Gyro_P,10,255);
1 ingob 472
 CHK_POTI(Parameter_Gyro_I,EE_Parameter.Gyro_I,0,255);
1051 killagreg 473
 CHK_POTI(Parameter_I_Faktor,EE_Parameter.I_Faktor,0,255);
474
 CHK_POTI(Parameter_UserParam1,EE_Parameter.UserParam1,0,255);
475
 CHK_POTI(Parameter_UserParam2,EE_Parameter.UserParam2,0,255);
476
 CHK_POTI(Parameter_UserParam3,EE_Parameter.UserParam3,0,255);
477
 CHK_POTI(Parameter_UserParam4,EE_Parameter.UserParam4,0,255);
478
 CHK_POTI(Parameter_UserParam5,EE_Parameter.UserParam5,0,255);
479
 CHK_POTI(Parameter_UserParam6,EE_Parameter.UserParam6,0,255);
480
 CHK_POTI(Parameter_UserParam7,EE_Parameter.UserParam7,0,255);
481
 CHK_POTI(Parameter_UserParam8,EE_Parameter.UserParam8,0,255);
1 ingob 482
 CHK_POTI(Parameter_ServoNickControl,EE_Parameter.ServoNickControl,0,255);
173 holgerb 483
 CHK_POTI(Parameter_LoopGasLimit,EE_Parameter.LoopGasLimit,0,255);
395 hbuss 484
 CHK_POTI(Parameter_AchsKopplung1,    EE_Parameter.AchsKopplung1,0,255);
485
 CHK_POTI(Parameter_AchsGegenKopplung1,EE_Parameter.AchsGegenKopplung1,0,255);
499 hbuss 486
 CHK_POTI(Parameter_DynamicStability,EE_Parameter.DynamicStability,0,255);
921 hbuss 487
 CHK_POTI_MM(Parameter_J16Timing,EE_Parameter.J16Timing,1,255);
488
 CHK_POTI_MM(Parameter_J17Timing,EE_Parameter.J17Timing,1,255);
1086 salvo 489
 CHK_POTI(Parameter_NaviGpsModeControl,EE_Parameter.NaviGpsModeControl,0,255);
490
 CHK_POTI(Parameter_NaviGpsGain,EE_Parameter.NaviGpsGain,0,255);
491
 CHK_POTI(Parameter_NaviGpsP,EE_Parameter.NaviGpsP,0,255);
492
 CHK_POTI(Parameter_NaviGpsI,EE_Parameter.NaviGpsI,0,255);
493
 CHK_POTI(Parameter_NaviGpsD,EE_Parameter.NaviGpsD,0,255);
1091 salvo 494
 CHK_POTI(Parameter_NaviStickThreshold,EE_Parameter.NaviStickThreshold,0,255); //Salvo 16.10.2008
1086 salvo 495
 CHK_POTI(Parameter_NaviGpsACC,EE_Parameter.NaviGpsACC,0,255);
993 hbuss 496
// CHK_POTI_MM(Parameter_NaviOperatingRadius,EE_Parameter.NaviOperatingRadius,10,255);
497
// CHK_POTI(Parameter_NaviWindCorrection,EE_Parameter.NaviWindCorrection,0,255);
498
// CHK_POTI(Parameter_NaviSpeedCompensation,EE_Parameter.NaviSpeedCompensation,0,255);
499
 
921 hbuss 500
 CHK_POTI(Parameter_ExternalControl,EE_Parameter.ExternalControl,0,255);
1 ingob 501
 
502
 Ki = (float) Parameter_I_Faktor * 0.0001;
503
 MAX_GAS = EE_Parameter.Gas_Max;
504
 MIN_GAS = EE_Parameter.Gas_Min;
505
}
506
 
507
 
819 hbuss 508
 
1 ingob 509
//############################################################################
510
//
511
void MotorRegler(void)
512
//############################################################################
513
{
514
         int motorwert,pd_ergebnis,h,tmp_int;
515
         int GierMischanteil,GasMischanteil;
516
     static long SummeNick=0,SummeRoll=0;
517
     static long sollGier = 0,tmp_long,tmp_long2;
395 hbuss 518
     static long IntegralFehlerNick = 0;
519
     static long IntegralFehlerRoll = 0;
1 ingob 520
         static unsigned int RcLostTimer;
521
         static unsigned char delay_neutral = 0;
522
         static unsigned char delay_einschalten = 0,delay_ausschalten = 0;
523
     static int hoehenregler = 0;
524
     static char TimerWerteausgabe = 0;
525
     static char NeueKompassRichtungMerken = 0;
395 hbuss 526
     static long ausgleichNick, ausgleichRoll;
1086 salvo 527
 
528
        Mittelwert();
529
//****** GPS Daten holen ***************
530
        short int n;
531
        if (gps_alive_cnt > 0) gps_alive_cnt--; //Dekrementieren. Wenn 0 kommen keine ausreichenden GPS Meldungen (Timeout)
532
        n = Get_Rel_Position();
533
        if (n == 0)    
534
        {
535
                ROT_ON; //led blitzen lassen
536
        }
537
//******PROVISORISCH***************
1 ingob 538
    GRN_ON;
1051 killagreg 539
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 540
// Gaswert ermitteln
1051 killagreg 541
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
542
        GasMischanteil = StickGas;
831 hbuss 543
    if(GasMischanteil < MIN_GAS + 10) GasMischanteil = MIN_GAS + 10;
1051 killagreg 544
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
693 hbuss 545
// Empfang schlecht
1051 killagreg 546
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 547
   if(SenderOkay < 100)
548
        {
1051 killagreg 549
        if(!PcZugriff)
173 holgerb 550
         {
1051 killagreg 551
           if(BeepMuster == 0xffff)
552
            {
173 holgerb 553
             beeptime = 15000;
554
             BeepMuster = 0x0c00;
1051 killagreg 555
            }
173 holgerb 556
         }
1051 killagreg 557
        if(RcLostTimer) RcLostTimer--;
558
        else
1 ingob 559
         {
560
          MotorenEin = 0;
561
          Notlandung = 0;
1051 killagreg 562
         }
1 ingob 563
        ROT_ON;
693 hbuss 564
        if(modell_fliegt > 1000)  // wahrscheinlich in der Luft --> langsam absenken
1 ingob 565
            {
566
            GasMischanteil = EE_Parameter.NotGas;
567
            Notlandung = 1;
744 hbuss 568
            PPM_diff[EE_Parameter.Kanalbelegung[K_NICK]] = 0;
1051 killagreg 569
            PPM_diff[EE_Parameter.Kanalbelegung[K_ROLL]] = 0;
1 ingob 570
            PPM_in[EE_Parameter.Kanalbelegung[K_NICK]] = 0;
571
            PPM_in[EE_Parameter.Kanalbelegung[K_ROLL]] = 0;
572
            PPM_in[EE_Parameter.Kanalbelegung[K_GIER]] = 0;
173 holgerb 573
            }
1 ingob 574
         else MotorenEin = 0;
575
        }
1051 killagreg 576
        else
577
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 578
// Emfang gut
1051 killagreg 579
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 580
        if(SenderOkay > 140)
581
            {
582
            Notlandung = 0;
583
            RcLostTimer = EE_Parameter.NotGasZeit * 50;
921 hbuss 584
            if(GasMischanteil > 40 && MotorenEin)
1 ingob 585
                {
586
                if(modell_fliegt < 0xffff) modell_fliegt++;
587
                }
871 hbuss 588
            if((modell_fliegt < 256))
1 ingob 589
                {
590
                SummeNick = 0;
591
                SummeRoll = 0;
1051 killagreg 592
                if(modell_fliegt == 250)
918 hbuss 593
                 {
1051 killagreg 594
                  NeueKompassRichtungMerken = 1;
918 hbuss 595
                  sollGier = 0;
1051 killagreg 596
                  Mess_Integral_Gier = 0;
927 hbuss 597
//                  Mess_Integral_Gier2 = 0;
1051 killagreg 598
                 }
921 hbuss 599
                } else MikroKopterFlags |= FLAG_FLY;
1051 killagreg 600
 
595 hbuss 601
            if((PPM_in[EE_Parameter.Kanalbelegung[K_GAS]] > 80) && MotorenEin == 0)
1 ingob 602
                {
1051 killagreg 603
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 604
// auf Nullwerte kalibrieren
1051 killagreg 605
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 606
                if(PPM_in[EE_Parameter.Kanalbelegung[K_GIER]] > 75)  // Neutralwerte
607
                    {
608
                    if(++delay_neutral > 200)  // nicht sofort
609
                        {
610
                        GRN_OFF;
1086 salvo 611
                        SetNeutral();
1 ingob 612
                        MotorenEin = 0;
613
                        delay_neutral = 0;
614
                        modell_fliegt = 0;
615
                        if(PPM_in[EE_Parameter.Kanalbelegung[K_NICK]] > 70 || abs(PPM_in[EE_Parameter.Kanalbelegung[K_ROLL]]) > 70)
616
                        {
304 ingob 617
                         unsigned char setting=1;
1 ingob 618
                         if(PPM_in[EE_Parameter.Kanalbelegung[K_ROLL]] > 70 && PPM_in[EE_Parameter.Kanalbelegung[K_NICK]] < 70) setting = 1;
619
                         if(PPM_in[EE_Parameter.Kanalbelegung[K_ROLL]] > 70 && PPM_in[EE_Parameter.Kanalbelegung[K_NICK]] > 70) setting = 2;
620
                         if(PPM_in[EE_Parameter.Kanalbelegung[K_ROLL]] < 70 && PPM_in[EE_Parameter.Kanalbelegung[K_NICK]] > 70) setting = 3;
621
                         if(PPM_in[EE_Parameter.Kanalbelegung[K_ROLL]] <-70 && PPM_in[EE_Parameter.Kanalbelegung[K_NICK]] > 70) setting = 4;
622
                         if(PPM_in[EE_Parameter.Kanalbelegung[K_ROLL]] <-70 && PPM_in[EE_Parameter.Kanalbelegung[K_NICK]] < 70) setting = 5;
1063 killagreg 623
                         SetActiveParamSetNumber(setting);  // aktiven Datensatz merken
1 ingob 624
                        }
820 hbuss 625
//                        else
1051 killagreg 626
                         if(abs(PPM_in[EE_Parameter.Kanalbelegung[K_ROLL]]) < 30 && PPM_in[EE_Parameter.Kanalbelegung[K_NICK]] < -70)
627
                          {
819 hbuss 628
                           WinkelOut.CalcState = 1;
629
                           beeptime = 1000;
630
                          }
631
                          else
1 ingob 632
                          {
819 hbuss 633
                               ReadParameterSet(GetActiveParamSetNumber(), (unsigned char *) &EE_Parameter.Kanalbelegung[0], STRUCT_PARAM_LAENGE);
634
                           if((EE_Parameter.GlobalConfig & CFG_HOEHENREGELUNG))  // Höhenregelung aktiviert?
635
                            {
1 ingob 636
                             if((MessLuftdruck > 950) || (MessLuftdruck < 750)) SucheLuftruckOffset();
1051 killagreg 637
                            }
819 hbuss 638
                           SetNeutral();
639
                           Piep(GetActiveParamSetNumber());
1086 salvo 640
                                                        GPS_Save_Home(); //Daten sind jetzt hoffentlich verfuegbar
641
                                                        if (gps_home_position.status > 0 )
642
                                                        {
643
                                                                Delay_ms(1000);  //akustisch verkuenden dass GPS Home Daten da sind
644
                                                                beeptime = 1000;
645
                                                                Delay_ms(500);
646
                                                        }
819 hbuss 647
                         }
1051 killagreg 648
                        }
1 ingob 649
                    }
1051 killagreg 650
                 else
513 hbuss 651
                if(PPM_in[EE_Parameter.Kanalbelegung[K_GIER]] < -75)  // ACC Neutralwerte speichern
652
                    {
653
                    if(++delay_neutral > 200)  // nicht sofort
654
                        {
655
                        GRN_OFF;
656
                        eeprom_write_byte(&EEPromArray[EEPROM_ADR_ACC_NICK],0xff); // Werte löschen
657
                        MotorenEin = 0;
658
                        delay_neutral = 0;
659
                        modell_fliegt = 0;
660
                        SetNeutral();
661
                        eeprom_write_byte(&EEPromArray[EEPROM_ADR_ACC_NICK],NeutralAccX / 256); // ACC-NeutralWerte speichern
662
                        eeprom_write_byte(&EEPromArray[EEPROM_ADR_ACC_NICK+1],NeutralAccX % 256); // ACC-NeutralWerte speichern
663
                        eeprom_write_byte(&EEPromArray[EEPROM_ADR_ACC_ROLL],NeutralAccY / 256);
664
                        eeprom_write_byte(&EEPromArray[EEPROM_ADR_ACC_ROLL+1],NeutralAccY % 256);
665
                        eeprom_write_byte(&EEPromArray[EEPROM_ADR_ACC_Z],(int)NeutralAccZ / 256);
666
                        eeprom_write_byte(&EEPromArray[EEPROM_ADR_ACC_Z+1],(int)NeutralAccZ % 256);
667
                        Piep(GetActiveParamSetNumber());
1051 killagreg 668
                        }
513 hbuss 669
                    }
1 ingob 670
                 else delay_neutral = 0;
671
                }
1051 killagreg 672
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 673
// Gas ist unten
1051 killagreg 674
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
595 hbuss 675
            if(PPM_in[EE_Parameter.Kanalbelegung[K_GAS]] < 35-120)
1 ingob 676
                {
677
                // Starten
678
                if(PPM_in[EE_Parameter.Kanalbelegung[K_GIER]] < -75)
679
                    {
1051 killagreg 680
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 681
// Einschalten
1051 killagreg 682
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 683
                    if(++delay_einschalten > 200)
684
                        {
1086 salvo 685
                                                int n;
686
                                                // Salvo 9.12.2007
687
                                                RX_SWTCH_ON; //GPS Daten auf RX eingang schalten 
688
                                                // Salvo End
1 ingob 689
                        delay_einschalten = 200;
690
                        modell_fliegt = 1;
691
                        MotorenEin = 1;
692
                        sollGier = 0;
1051 killagreg 693
                        Mess_Integral_Gier = 0;
1 ingob 694
                        Mess_Integral_Gier2 = 0;
695
                        Mess_IntegralNick = 0;
696
                        Mess_IntegralRoll = 0;
697
                        Mess_IntegralNick2 = IntegralNick;
698
                        Mess_IntegralRoll2 = IntegralRoll;
699
                        SummeNick = 0;
700
                        SummeRoll = 0;
1086 salvo 701
                        n= GPS_CRTL(GPS_CMD_STOP); //GPS Lageregelung beenden
702
 
921 hbuss 703
                        MikroKopterFlags |= FLAG_START;
1051 killagreg 704
                        }
705
                    }
1 ingob 706
                    else delay_einschalten = 0;
707
                //Auf Neutralwerte setzen
1051 killagreg 708
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 709
// Auschalten
1051 killagreg 710
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 711
                if(PPM_in[EE_Parameter.Kanalbelegung[K_GIER]] > 75)
712
                    {
713
                    if(++delay_ausschalten > 200)  // nicht sofort
714
                        {
1086 salvo 715
                                                // Salvo 9.12.2007
716
                                                RX_SWTCH_OFF; //Bluetooth Daten auf RX eingang schalten 
717
                                                // Salvo End
718
 
1 ingob 719
                        MotorenEin = 0;
720
                        delay_ausschalten = 200;
721
                        modell_fliegt = 0;
1051 killagreg 722
                        }
1 ingob 723
                    }
724
                else delay_ausschalten = 0;
725
                }
726
            }
727
 
1051 killagreg 728
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 729
// neue Werte von der Funke
1051 killagreg 730
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
731
 if(!NewPpmData-- || Notlandung)
1 ingob 732
  {
492 hbuss 733
    int tmp_int;
604 hbuss 734
        static int stick_nick,stick_roll;
1 ingob 735
    ParameterZuordnung();
1051 killagreg 736
    stick_nick = (stick_nick * 3 + PPM_in[EE_Parameter.Kanalbelegung[K_NICK]] * EE_Parameter.Stick_P) / 4;
723 hbuss 737
    stick_nick += PPM_diff[EE_Parameter.Kanalbelegung[K_NICK]] * EE_Parameter.Stick_D;
805 hbuss 738
    StickNick = stick_nick - (GPS_Nick + GPS_Nick2);
1051 killagreg 739
//    StickNick  = (StickNick  * 3 + PPM_in[EE_Parameter.Kanalbelegung[K_NICK]] * EE_Parameter.Stick_P) / 4;
604 hbuss 740
 
723 hbuss 741
    stick_roll = (stick_roll * 3 + PPM_in[EE_Parameter.Kanalbelegung[K_ROLL]] * EE_Parameter.Stick_P) / 4;
742
    stick_roll += PPM_diff[EE_Parameter.Kanalbelegung[K_ROLL]] * EE_Parameter.Stick_D;
805 hbuss 743
    StickRoll = stick_roll - (GPS_Roll + GPS_Roll2);
723 hbuss 744
 
745
//    StickRoll = (StickRoll * 3 + PPM_in[EE_Parameter.Kanalbelegung[K_ROLL]] * EE_Parameter.Stick_P) / 4;
746
 
1 ingob 747
    StickGier = -PPM_in[EE_Parameter.Kanalbelegung[K_GIER]];
595 hbuss 748
        StickGas  = PPM_in[EE_Parameter.Kanalbelegung[K_GAS]] + 120;
749
 
1051 killagreg 750
/*   if(abs(PPM_in[EE_Parameter.Kanalbelegung[K_NICK]]) > MaxStickNick)
614 hbuss 751
     MaxStickNick = abs(PPM_in[EE_Parameter.Kanalbelegung[K_NICK]]); else MaxStickNick--;
1051 killagreg 752
   if(abs(PPM_in[EE_Parameter.Kanalbelegung[K_ROLL]]) > MaxStickRoll)
614 hbuss 753
     MaxStickRoll = abs(PPM_in[EE_Parameter.Kanalbelegung[K_ROLL]]); else MaxStickRoll--;
723 hbuss 754
*/
855 hbuss 755
    GyroFaktor     = ((float)Parameter_Gyro_P + 10.0) / (256.0/STICK_GAIN);
756
    IntegralFaktor = ((float) Parameter_Gyro_I) / (44000 / STICK_GAIN);
1 ingob 757
 
595 hbuss 758
//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
759
//+ Analoge Steuerung per Seriell
760
//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
921 hbuss 761
   if(ExternControl.Config & 0x01 && Parameter_ExternalControl > 128)
595 hbuss 762
    {
763
         StickNick += (int) ExternControl.Nick * (int) EE_Parameter.Stick_P;
764
         StickRoll += (int) ExternControl.Roll * (int) EE_Parameter.Stick_P;
765
         StickGier += ExternControl.Gier;
766
     ExternHoehenValue =  (int) ExternControl.Hight * (int)EE_Parameter.Hoehe_Verstaerkung;
767
     if(ExternControl.Gas < StickGas) StickGas = ExternControl.Gas;
768
    }
855 hbuss 769
    if(StickGas < 0) StickGas = 0;
492 hbuss 770
 
1 ingob 771
    if(EE_Parameter.GlobalConfig & CFG_HEADING_HOLD) IntegralFaktor =  0;
772
    if(GyroFaktor < 0) GyroFaktor = 0;
773
    if(IntegralFaktor < 0) IntegralFaktor = 0;
723 hbuss 774
 
1051 killagreg 775
    if(abs(StickNick/STICK_GAIN) > MaxStickNick)
928 hbuss 776
     {
1051 killagreg 777
      MaxStickNick = abs(StickNick)/STICK_GAIN;
928 hbuss 778
      if(MaxStickNick > 100) MaxStickNick = 100;
1051 killagreg 779
     }
928 hbuss 780
     else MaxStickNick--;
1051 killagreg 781
    if(abs(StickRoll/STICK_GAIN) > MaxStickRoll)
928 hbuss 782
     {
1051 killagreg 783
      MaxStickRoll = abs(StickRoll)/STICK_GAIN;
928 hbuss 784
      if(MaxStickRoll > 100) MaxStickRoll = 100;
1051 killagreg 785
     }
928 hbuss 786
     else MaxStickRoll--;
723 hbuss 787
    if(Notlandung)  {MaxStickNick = 0; MaxStickRoll = 0;}
788
 
1051 killagreg 789
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
173 holgerb 790
// Looping?
1051 killagreg 791
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
993 hbuss 792
  if((PPM_in[EE_Parameter.Kanalbelegung[K_ROLL]] > EE_Parameter.LoopThreshold) && EE_Parameter.BitConfig & CFG_LOOP_LINKS)  Looping_Links = 1;
1051 killagreg 793
  else
794
   {
395 hbuss 795
     {
1051 killagreg 796
      if((PPM_in[EE_Parameter.Kanalbelegung[K_ROLL]] < (EE_Parameter.LoopThreshold - EE_Parameter.LoopHysterese))) Looping_Links = 0;
797
     }
798
   }
993 hbuss 799
  if((PPM_in[EE_Parameter.Kanalbelegung[K_ROLL]] < -EE_Parameter.LoopThreshold) && EE_Parameter.BitConfig & CFG_LOOP_RECHTS) Looping_Rechts = 1;
1051 killagreg 800
   else
395 hbuss 801
   {
802
   if(Looping_Rechts) // Hysterese
803
     {
804
      if(PPM_in[EE_Parameter.Kanalbelegung[K_ROLL]] > -(EE_Parameter.LoopThreshold - EE_Parameter.LoopHysterese)) Looping_Rechts = 0;
805
     }
1051 killagreg 806
   }
173 holgerb 807
 
993 hbuss 808
  if((PPM_in[EE_Parameter.Kanalbelegung[K_NICK]] > EE_Parameter.LoopThreshold) && EE_Parameter.BitConfig & CFG_LOOP_OBEN) Looping_Oben = 1;
1051 killagreg 809
  else
810
   {
395 hbuss 811
    if(Looping_Oben)  // Hysterese
812
     {
1051 killagreg 813
      if((PPM_in[EE_Parameter.Kanalbelegung[K_NICK]] < (EE_Parameter.LoopThreshold - EE_Parameter.LoopHysterese))) Looping_Oben = 0;
814
     }
815
   }
993 hbuss 816
  if((PPM_in[EE_Parameter.Kanalbelegung[K_NICK]] < -EE_Parameter.LoopThreshold) && EE_Parameter.BitConfig & CFG_LOOP_UNTEN) Looping_Unten = 1;
1051 killagreg 817
   else
395 hbuss 818
   {
819
    if(Looping_Unten) // Hysterese
820
     {
821
      if(PPM_in[EE_Parameter.Kanalbelegung[K_NICK]] > -(EE_Parameter.LoopThreshold - EE_Parameter.LoopHysterese)) Looping_Unten = 0;
822
     }
1051 killagreg 823
   }
395 hbuss 824
 
825
   if(Looping_Links || Looping_Rechts)   Looping_Roll = 1; else Looping_Roll = 0;
826
   if(Looping_Oben  || Looping_Unten) {Looping_Nick = 1; Looping_Roll = 0; Looping_Links = 0; Looping_Rechts = 0;} else Looping_Nick = 0;
827
  } // Ende neue Funken-Werte
828
 
829
  if(Looping_Roll || Looping_Nick)
830
   {
173 holgerb 831
    if(GasMischanteil > EE_Parameter.LoopGasLimit) GasMischanteil = EE_Parameter.LoopGasLimit;
832
   }
833
 
1051 killagreg 834
 
835
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
836
// Bei Empfangsausfall im Flug
837
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 838
   if(Notlandung)
839
    {
840
     StickGier = 0;
841
     StickNick = 0;
842
     StickRoll = 0;
855 hbuss 843
     GyroFaktor     = (float) 100 / (256.0 / STICK_GAIN);
844
     IntegralFaktor = (float) 120 / (44000 / STICK_GAIN);
173 holgerb 845
     Looping_Roll = 0;
846
     Looping_Nick = 0;
1051 killagreg 847
    }
395 hbuss 848
 
849
 
1051 killagreg 850
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 851
// Integrale auf ACC-Signal abgleichen
1051 killagreg 852
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
395 hbuss 853
#define ABGLEICH_ANZAHL 256L
854
 
855
 MittelIntegralNick  += IntegralNick;    // Für die Mittelwertbildung aufsummieren
856
 MittelIntegralRoll  += IntegralRoll;
857
 MittelIntegralNick2 += IntegralNick2;
858
 MittelIntegralRoll2 += IntegralRoll2;
859
 
860
 if(Looping_Nick || Looping_Roll)
861
  {
862
    IntegralAccNick = 0;
863
    IntegralAccRoll = 0;
864
    MittelIntegralNick = 0;
865
    MittelIntegralRoll = 0;
866
    MittelIntegralNick2 = 0;
867
    MittelIntegralRoll2 = 0;
868
    Mess_IntegralNick2 = Mess_IntegralNick;
869
    Mess_IntegralRoll2 = Mess_IntegralRoll;
870
    ZaehlMessungen = 0;
498 hbuss 871
    LageKorrekturNick = 0;
872
    LageKorrekturRoll = 0;
395 hbuss 873
  }
874
 
1051 killagreg 875
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
498 hbuss 876
  if(!Looping_Nick && !Looping_Roll)
469 hbuss 877
  {
878
   long tmp_long, tmp_long2;
992 hbuss 879
   if(FromNaviCtrl_Value.Kalman_K != -1)
880
     {
881
      tmp_long = (long)(IntegralNick / EE_Parameter.GyroAccFaktor - (long)Mittelwert_AccNick);
1051 killagreg 882
      tmp_long2 = (long)(IntegralRoll / EE_Parameter.GyroAccFaktor - (long)Mittelwert_AccRoll);
883
      tmp_long  = (tmp_long  * FromNaviCtrl_Value.Kalman_K) / (32 * 16);
884
      tmp_long2 = (tmp_long2 * FromNaviCtrl_Value.Kalman_K) / (32 * 16);
992 hbuss 885
     if((MaxStickNick > 64) || (MaxStickRoll > 64))
886
      {
887
      tmp_long  /= 2;
888
      tmp_long2 /= 2;
889
      }
890
     if(abs(PPM_in[EE_Parameter.Kanalbelegung[K_GIER]]) > 25)
891
      {
892
      tmp_long  /= 3;
893
      tmp_long2 /= 3;
894
      }
895
      if(tmp_long >  (long) FromNaviCtrl_Value.Kalman_MaxFusion)  tmp_long  = (long) FromNaviCtrl_Value.Kalman_MaxFusion;
896
      if(tmp_long <  (long)-FromNaviCtrl_Value.Kalman_MaxFusion)  tmp_long  = (long)-FromNaviCtrl_Value.Kalman_MaxFusion;
897
      if(tmp_long2 > (long) FromNaviCtrl_Value.Kalman_MaxFusion)  tmp_long2 = (long) FromNaviCtrl_Value.Kalman_MaxFusion;
898
      if(tmp_long2 < (long)-FromNaviCtrl_Value.Kalman_MaxFusion)  tmp_long2 = (long)-FromNaviCtrl_Value.Kalman_MaxFusion;
899
     }
1051 killagreg 900
     else
992 hbuss 901
     {
902
      tmp_long = (long)(IntegralNick / EE_Parameter.GyroAccFaktor - (long)Mittelwert_AccNick);
1051 killagreg 903
      tmp_long2 = (long)(IntegralRoll / EE_Parameter.GyroAccFaktor - (long)Mittelwert_AccRoll);
992 hbuss 904
      tmp_long /= 16;
905
      tmp_long2 /= 16;
906
     if((MaxStickNick > 64) || (MaxStickRoll > 64))
907
      {
908
      tmp_long  /= 3;
909
      tmp_long2 /= 3;
910
      }
911
     if(abs(PPM_in[EE_Parameter.Kanalbelegung[K_GIER]]) > 25)
912
      {
913
      tmp_long  /= 3;
914
      tmp_long2 /= 3;
915
      }
614 hbuss 916
 #define AUSGLEICH 32
992 hbuss 917
      if(tmp_long >  AUSGLEICH)  tmp_long  = AUSGLEICH;
918
      if(tmp_long < -AUSGLEICH)  tmp_long  =-AUSGLEICH;
919
      if(tmp_long2 > AUSGLEICH)  tmp_long2 = AUSGLEICH;
920
      if(tmp_long2 <-AUSGLEICH)  tmp_long2 =-AUSGLEICH;
921
     }
1051 killagreg 922
 
469 hbuss 923
    Mess_IntegralNick -= tmp_long;
924
    Mess_IntegralRoll -= tmp_long2;
925
  }
1051 killagreg 926
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
395 hbuss 927
 if(ZaehlMessungen >= ABGLEICH_ANZAHL)
928
 {
929
  static int cnt = 0;
930
  static char last_n_p,last_n_n,last_r_p,last_r_n;
931
  static long MittelIntegralNick_Alt,MittelIntegralRoll_Alt;
880 hbuss 932
  if(!Looping_Nick && !Looping_Roll && !TrichterFlug)
173 holgerb 933
  {
395 hbuss 934
    MittelIntegralNick  /= ABGLEICH_ANZAHL;
935
    MittelIntegralRoll  /= ABGLEICH_ANZAHL;
936
        IntegralAccNick = (EE_Parameter.GyroAccFaktor * IntegralAccNick) / ABGLEICH_ANZAHL;
937
        IntegralAccRoll = (EE_Parameter.GyroAccFaktor * IntegralAccRoll) / ABGLEICH_ANZAHL;
938
    IntegralAccZ    = IntegralAccZ / ABGLEICH_ANZAHL;
492 hbuss 939
#define MAX_I 0//(Poti2/10)
395 hbuss 940
// Nick ++++++++++++++++++++++++++++++++++++++++++++++++
941
    IntegralFehlerNick = (long)(MittelIntegralNick - (long)IntegralAccNick);
942
    ausgleichNick = IntegralFehlerNick / EE_Parameter.GyroAccAbgleich;
1051 killagreg 943
// Roll ++++++++++++++++++++++++++++++++++++++++++++++++
944
    IntegralFehlerRoll = (long)(MittelIntegralRoll - (long)IntegralAccRoll);
395 hbuss 945
    ausgleichRoll = IntegralFehlerRoll / EE_Parameter.GyroAccAbgleich;
614 hbuss 946
 
947
    LageKorrekturNick = ausgleichNick / ABGLEICH_ANZAHL;
498 hbuss 948
    LageKorrekturRoll = ausgleichRoll / ABGLEICH_ANZAHL;
395 hbuss 949
 
992 hbuss 950
   if(((MaxStickNick > 64) || (MaxStickRoll > 64) || (abs(PPM_in[EE_Parameter.Kanalbelegung[K_GIER]]) > 25)) && (FromNaviCtrl_Value.Kalman_K == -1))
614 hbuss 951
    {
952
     LageKorrekturNick /= 2;
720 ingob 953
     LageKorrekturRoll /= 2;
614 hbuss 954
    }
498 hbuss 955
 
1051 killagreg 956
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
395 hbuss 957
// Gyro-Drift ermitteln
1051 killagreg 958
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
395 hbuss 959
    MittelIntegralNick2 /= ABGLEICH_ANZAHL;
960
    MittelIntegralRoll2 /= ABGLEICH_ANZAHL;
1051 killagreg 961
    tmp_long  = IntegralNick2 - IntegralNick;
962
    tmp_long2 = IntegralRoll2 - IntegralRoll;
395 hbuss 963
    //DebugOut.Analog[25] = MittelIntegralRoll2 / 26;
964
 
965
    IntegralFehlerNick = tmp_long;
966
    IntegralFehlerRoll = tmp_long2;
967
    Mess_IntegralNick2 -= IntegralFehlerNick;
968
    Mess_IntegralRoll2 -= IntegralFehlerRoll;
969
 
970
//    IntegralFehlerNick = (IntegralFehlerNick * 1 + tmp_long) / 2;
971
//    IntegralFehlerRoll = (IntegralFehlerRoll * 1 + tmp_long2) / 2;
972
 
1096 salvo 973
//Salvo 29.12.2008 auskommentiert
974
//    if(GierGyroFehler > ABGLEICH_ANZAHL/2) { AdNeutralGier++; AdNeutralGierBias++; }
975
//    if(GierGyroFehler <-ABGLEICH_ANZAHL/2) { AdNeutralGier--; AdNeutralGierBias--; }
976
//Salvo End 
977
 
1086 salvo 978
//DebugOut.Analog[22] = MittelIntegralRoll / 26;
921 hbuss 979
//DebugOut.Analog[24] = GierGyroFehler;
693 hbuss 980
    GierGyroFehler = 0;
720 ingob 981
 
1086 salvo 982
//Salvo Ersatzkompass Ueberlauf korrigieren
983
                if (GyroKomp_Int >= ((long)360 * GIER_GRAD_FAKTOR)) GyroKomp_Int = GyroKomp_Int - (GIER_GRAD_FAKTOR *(long)360); //neu ab 3.11.2007
984
                if (GyroKomp_Int < 0) GyroKomp_Int = GyroKomp_Int + (GIER_GRAD_FAKTOR *(long)360); //neu ab 3.11.2007
985
                ROT_OFF;
986
// Salvo End
720 ingob 987
 
988
/*DebugOut.Analog[17] = IntegralAccNick / 26;
395 hbuss 989
DebugOut.Analog[18] = IntegralAccRoll / 26;
990
DebugOut.Analog[19] = IntegralFehlerNick;// / 26;
991
DebugOut.Analog[20] = IntegralFehlerRoll;// / 26;
720 ingob 992
*/
993
//DebugOut.Analog[21] = MittelIntegralNick / 26;
994
//MittelIntegralRoll = MittelIntegralRoll;
469 hbuss 995
//DebugOut.Analog[28] = ausgleichNick;
720 ingob 996
/*
395 hbuss 997
DebugOut.Analog[29] = ausgleichRoll;
498 hbuss 998
DebugOut.Analog[30] = LageKorrekturRoll * 10;
720 ingob 999
*/
395 hbuss 1000
 
492 hbuss 1001
#define FEHLER_LIMIT  (ABGLEICH_ANZAHL * 4)
1002
#define FEHLER_LIMIT2 (ABGLEICH_ANZAHL * 16)
1003
#define BEWEGUNGS_LIMIT 20000
395 hbuss 1004
// Nick +++++++++++++++++++++++++++++++++++++++++++++++++
1005
        cnt = 1;// + labs(IntegralFehlerNick) / 4096;
992 hbuss 1006
        if(labs(MittelIntegralNick_Alt - MittelIntegralNick) < BEWEGUNGS_LIMIT || (FromNaviCtrl_Value.Kalman_MaxDrift > 3*16))
492 hbuss 1007
        {
1051 killagreg 1008
        if(IntegralFehlerNick >  FEHLER_LIMIT2)
395 hbuss 1009
         {
1051 killagreg 1010
           if(last_n_p)
395 hbuss 1011
           {
1051 killagreg 1012
            cnt += labs(IntegralFehlerNick) / FEHLER_LIMIT2;
492 hbuss 1013
            ausgleichNick = IntegralFehlerNick / 8;
401 hbuss 1014
            if(ausgleichNick > 5000) ausgleichNick = 5000;
498 hbuss 1015
            LageKorrekturNick += ausgleichNick / ABGLEICH_ANZAHL;
1051 killagreg 1016
           }
395 hbuss 1017
           else last_n_p = 1;
1018
         } else  last_n_p = 0;
1051 killagreg 1019
        if(IntegralFehlerNick < -FEHLER_LIMIT2)
395 hbuss 1020
         {
1021
           if(last_n_n)
1051 killagreg 1022
            {
1023
             cnt += labs(IntegralFehlerNick) / FEHLER_LIMIT2;
492 hbuss 1024
             ausgleichNick = IntegralFehlerNick / 8;
401 hbuss 1025
             if(ausgleichNick < -5000) ausgleichNick = -5000;
498 hbuss 1026
             LageKorrekturNick += ausgleichNick / ABGLEICH_ANZAHL;
1051 killagreg 1027
            }
395 hbuss 1028
           else last_n_n = 1;
1029
         } else  last_n_n = 0;
1051 killagreg 1030
        }
1031
        else
847 hbuss 1032
        {
1033
         cnt = 0;
921 hbuss 1034
         KompassSignalSchlecht = 1000;
1051 killagreg 1035
        }
499 hbuss 1036
        if(cnt > EE_Parameter.Driftkomp) cnt = EE_Parameter.Driftkomp;
992 hbuss 1037
        if(cnt * 16 > FromNaviCtrl_Value.Kalman_MaxDrift) cnt = FromNaviCtrl_Value.Kalman_MaxDrift/16;
395 hbuss 1038
        if(IntegralFehlerNick >  FEHLER_LIMIT)   AdNeutralNick += cnt;
1039
        if(IntegralFehlerNick < -FEHLER_LIMIT)   AdNeutralNick -= cnt;
401 hbuss 1040
 
395 hbuss 1041
// Roll +++++++++++++++++++++++++++++++++++++++++++++++++
492 hbuss 1042
        cnt = 1;// + labs(IntegralFehlerNick) / 4096;
1043
 
498 hbuss 1044
        ausgleichRoll = 0;
992 hbuss 1045
        if(labs(MittelIntegralRoll_Alt - MittelIntegralRoll) < BEWEGUNGS_LIMIT || (FromNaviCtrl_Value.Kalman_MaxDrift > 3*16))
492 hbuss 1046
        {
1051 killagreg 1047
        if(IntegralFehlerRoll >  FEHLER_LIMIT2)
395 hbuss 1048
         {
1051 killagreg 1049
           if(last_r_p)
395 hbuss 1050
           {
1051 killagreg 1051
            cnt += labs(IntegralFehlerRoll) / FEHLER_LIMIT2;
492 hbuss 1052
            ausgleichRoll = IntegralFehlerRoll / 8;
401 hbuss 1053
            if(ausgleichRoll > 5000) ausgleichRoll = 5000;
498 hbuss 1054
            LageKorrekturRoll += ausgleichRoll / ABGLEICH_ANZAHL;
1051 killagreg 1055
           }
395 hbuss 1056
           else last_r_p = 1;
1057
         } else  last_r_p = 0;
1051 killagreg 1058
        if(IntegralFehlerRoll < -FEHLER_LIMIT2)
395 hbuss 1059
         {
1051 killagreg 1060
           if(last_r_n)
395 hbuss 1061
           {
1051 killagreg 1062
            cnt += labs(IntegralFehlerRoll) / FEHLER_LIMIT2;
492 hbuss 1063
            ausgleichRoll = IntegralFehlerRoll / 8;
401 hbuss 1064
            if(ausgleichRoll < -5000) ausgleichRoll = -5000;
498 hbuss 1065
            LageKorrekturRoll += ausgleichRoll / ABGLEICH_ANZAHL;
395 hbuss 1066
           }
1067
           else last_r_n = 1;
1068
         } else  last_r_n = 0;
1051 killagreg 1069
        } else
492 hbuss 1070
        {
1071
         cnt = 0;
921 hbuss 1072
         KompassSignalSchlecht = 1000;
1051 killagreg 1073
        }
499 hbuss 1074
        if(cnt > EE_Parameter.Driftkomp) cnt = EE_Parameter.Driftkomp;
992 hbuss 1075
        if(cnt * 16 > FromNaviCtrl_Value.Kalman_MaxDrift) cnt = FromNaviCtrl_Value.Kalman_MaxDrift/16;
395 hbuss 1076
        if(IntegralFehlerRoll >  FEHLER_LIMIT)   AdNeutralRoll += cnt;
1077
        if(IntegralFehlerRoll < -FEHLER_LIMIT)   AdNeutralRoll -= cnt;
173 holgerb 1078
  }
1051 killagreg 1079
  else
498 hbuss 1080
  {
1081
   LageKorrekturRoll = 0;
1082
   LageKorrekturNick = 0;
880 hbuss 1083
   TrichterFlug = 0;
498 hbuss 1084
  }
1051 killagreg 1085
 
498 hbuss 1086
  if(!IntegralFaktor) { LageKorrekturRoll = 0; LageKorrekturNick = 0;} // z.B. bei HH
1051 killagreg 1087
// +++++++++++++++++++++++++++++++++++++++++++++++++++++
1088
   MittelIntegralNick_Alt = MittelIntegralNick;
1089
   MittelIntegralRoll_Alt = MittelIntegralRoll;
1090
// +++++++++++++++++++++++++++++++++++++++++++++++++++++
395 hbuss 1091
    IntegralAccNick = 0;
1092
    IntegralAccRoll = 0;
1093
    IntegralAccZ = 0;
1094
    MittelIntegralNick = 0;
1095
    MittelIntegralRoll = 0;
1096
    MittelIntegralNick2 = 0;
1097
    MittelIntegralRoll2 = 0;
1098
    ZaehlMessungen = 0;
1099
 }
469 hbuss 1100
//DebugOut.Analog[31] = StickRoll / (26*IntegralFaktor);
1099 salvo 1101
 
1102 salvo 1102
// Salvo Ersatzkompass  und Giergyrokompensation 30.12.2007 **********************
1103
if ((Kompass_Neuer_Wert > 0) && (Kompass_present>0)) //nur wenn Kompass einen neuen Wert geliefert hat
1086 salvo 1104
{
1096 salvo 1105
   Kompass_Neuer_Wert = 0;
1086 salvo 1106
   w = (abs(Mittelwert_AccNick));
1107
   v = (abs(Mittelwert_AccRoll));
1102 salvo 1108
   if  ((w  < ACC_WAAGRECHT_LIMIT) && (v < ACC_WAAGRECHT_LIMIT)) //Ersatzkompass und Giergyro nur mit Magnetkompass aktualisieren wenn alles ok
1086 salvo 1109
   {
1110
        if  ((abs(KompassValue - Kompass_Value_Old)) <= 5) // Aufeinanderfolgende Werte duerfen nur minimal abweichen
1111
        {
1112
          if ((abs(StickGier) < 20)) //Giergyroabgleich mit Kompass
1113
          {
1114
                        if (cnt_stickgier_zero < 255) cnt_stickgier_zero += 1;
1102 salvo 1115
                        if (cnt_stickgier_zero > 1) //nur Abgleichen wenn keine Stickbewegung da
1086 salvo 1116
                        {
1117
                                w = (int) (GyroGier_Comp/(long)GIER_GRAD_FAKTOR);
1102 salvo 1118
                                v = KompassValue - gyrogier_kompass; //realen Drehwinkel seit letztem Ruecksetzen von GyroGier_Comp bestimmen
1086 salvo 1119
                                if (v <-180) v +=360; // Uberlaufkorrektur
1120
                                if (v > 180) v -=360; // Uberlaufkorrektur
1121
 
1122
                                v = w-v;  //Differenz Gyro zu Kompass ist der Driftfehler
1123
 
1124
                                if (v > GIER_COMP_MAX)  v= GIER_COMP_MAX;
1125
                                if (v < -GIER_COMP_MAX) v= - GIER_COMP_MAX;
1126
                                if (abs(w) > 1)
1127
                                {      
1128
                                        GyroGier_Comp           = 0;
1129
                                        gyrogier_kompass        = KompassValue; // Kompasswert merken
1130
                                        AdNeutralGier           -= v;  
1131
                                }
1132
                        }
1133
          }
1134
          else
1135
          {
1136
                gyrogier_kompass        = KompassValue; // Kompasswert merken
1137
                cnt_stickgier_zero      = 0;
1138
                GyroGier_Comp = 0;
1139
          }
1140
 
1141
          magkompass_ok = 1; // Flag dass Magnetkompass stabil arbeitet 
1142
          GyroKomp_Int = (GyroKomp_Int )/(long)GIER_GRAD_FAKTOR;
1143
 
1144
          w = KompassValue - GyroKomp_Int;
1145
          if ((w > 0) && (w < 180))
1146
          {
1147
           ++GyroKomp_Int;
1148
          }
1149
          else if ((w > 0) && (w >= 180))
1150
          {
1151
           --GyroKomp_Int;
1152
          }
1153
          else if ((w < 0) && (w >= -180))
1154
          {
1155
           --GyroKomp_Int;
1156
          }
1157
          else if ((w < 0) && (w < -180))
1158
          {
1159
           ++GyroKomp_Int;
1160
          }
1161
          if (GyroKomp_Int < 0)  GyroKomp_Int = GyroKomp_Int + 360L;
1162
          GyroKomp_Int = (GyroKomp_Int%360L) * (long)GIER_GRAD_FAKTOR; // An Magnetkompasswert annaehern
1163
        }
1164
   }
1102 salvo 1165
   else //Kompass wegen zu grosser Neigung ungueltig
1086 salvo 1166
   {
1167
    magkompass_ok = 0;
1168
        GyroGier_Comp = 0;
1169
   }
1099 salvo 1170
   Kompass_Value_Old =KompassValue;
1086 salvo 1171
}
1172
// Salvo End *************************
1173
 
1099 salvo 1174
 
1086 salvo 1175
// Salvo 6.10.2007 
1099 salvo 1176
        //GPS Home aktivieren wenn Knueppel in Ruhelage und Hoehenschalter aktiviert ist
1177
        //GPS Hold Aktivieren wenn Knueppel in Ruhelage sind
1086 salvo 1178
        if ((abs(PPM_in[EE_Parameter.Kanalbelegung[K_NICK]]) < Parameter_NaviStickThreshold)
1179
        && (abs(PPM_in[EE_Parameter.Kanalbelegung[K_ROLL]]) < Parameter_NaviStickThreshold) && (gps_alive_cnt > 0))
1180
        {
1101 salvo 1181
                if ((Parameter_NaviGpsModeControl > 170) && (EE_Parameter.GlobalConfig & CFG_GPS_AKTIV) && (Kompass_present>0)) //Hoehenschalter und GPS Flag aktiv
1086 salvo 1182
                {      
1183
                        if ( gps_cmd == GPS_CMD_REQ_HOLD) gps_cmd = GPS_CMD_STOP; // erst mal stoppen, denn altes Kommando wurde noch nicht beendet
1184
                        else gps_cmd = GPS_CMD_REQ_HOME;
1185
                        n = GPS_CRTL(gps_cmd);
1186
                }
1101 salvo 1187
                else if ((Parameter_NaviGpsModeControl < 170) && (EE_Parameter.GlobalConfig & CFG_GPS_AKTIV)&& (Kompass_present>0)) //Hoehenschalter Mittelstellung und GPS Flag aktiv
1086 salvo 1188
                {
1189
                        if ( gps_cmd == GPS_CMD_REQ_HOME) gps_cmd = GPS_CMD_STOP; // erst mal stoppen, denn altes Kommando wurde noch nicht beendet
1190
                        else gps_cmd = GPS_CMD_REQ_HOLD;
1191
                        n= GPS_CRTL(gps_cmd);
1192
                }
1193
                else  // GPS komplett aus
1194
                {
1195
                        if (gps_cmd != GPS_CMD_STOP)
1196
                        {
1197
                                gps_cmd = GPS_CMD_STOP;
1198
                                n= GPS_CRTL(gps_cmd); //GPS Lageregelung beenden
1199
                        }
1200
                }
1201
        }
1202
        else
1203
        {
1204
                if (gps_cmd != GPS_CMD_STOP)
1205
                {
1206
                        gps_cmd = GPS_CMD_STOP;
1207
                        n= GPS_CRTL(gps_cmd); //GPS Lageregelung beenden
1208
                }
1209
        }
1210
        if (gps_state != GPS_CRTL_IDLE) if (TimerWerteausgabe == 12)  LED_J16_OFF; //led im GPS Mode schnell blinken lassen
1211
 
1212
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++                
1 ingob 1213
//  Gieren
1051 killagreg 1214
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
693 hbuss 1215
//    if(GasMischanteil < 35) { if(StickGier > 10) StickGier = 10; else if(StickGier < -10) StickGier = -10;};
1051 killagreg 1216
    if(abs(StickGier) > 15) // war 35
1099 salvo 1217
    {
921 hbuss 1218
      KompassSignalSchlecht = 1000;
1096 salvo 1219
      if(!(EE_Parameter.GlobalConfig & CFG_KOMPASS_FIX)) NeueKompassRichtungMerken = 1;
1099 salvo 1220
    }
395 hbuss 1221
    tmp_int  = (long) EE_Parameter.Gier_P * ((long)StickGier * abs(StickGier)) / 512L; // expo  y = ax + bx²
1051 killagreg 1222
    tmp_int += (EE_Parameter.Gier_P * StickGier) / 4;
173 holgerb 1223
    sollGier = tmp_int;
1051 killagreg 1224
    Mess_Integral_Gier -= tmp_int;
395 hbuss 1225
    if(Mess_Integral_Gier > 50000) Mess_Integral_Gier = 50000;  // begrenzen
1226
    if(Mess_Integral_Gier <-50000) Mess_Integral_Gier =-50000;
1051 killagreg 1227
 
1228
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 1229
//  Kompass
1051 killagreg 1230
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1096 salvo 1231
// Salvo 29.12.2008 
1099 salvo 1232
        if (NeueKompassRichtungMerken)  
1233
    {
1234
         KompassStartwert = KompassValue;
1235
     NeueKompassRichtungMerken = 0;
1236
    }
1086 salvo 1237
// Salvo 13.9.2007
1099 salvo 1238
    w=0;
1239
//  w = (w * Parameter_KompassWirkung) / 64; // auf die Wirkung normieren
1086 salvo 1240
// Salvo End
1099 salvo 1241
    w = Parameter_KompassWirkung - w; // Wirkung ggf drosseln
1242
    if(w > 0)
1243
    {
1086 salvo 1244
// Salvo Kompasssteuerung **********************        
1101 salvo 1245
        if ((magkompass_ok > 0) && (EE_Parameter.GlobalConfig & CFG_KOMPASS_AKTIV))  Mess_Integral_Gier += (KompassRichtung * w) / 32;  // nach Kompass ausrichten wenn dieser ok ist
1086 salvo 1246
// Salvo End
1099 salvo 1247
    }
1086 salvo 1248
 
1249
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++                
1250
 
1051 killagreg 1251
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 1252
//  Debugwerte zuordnen
1051 killagreg 1253
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 1254
  if(!TimerWerteausgabe--)
1255
   {
395 hbuss 1256
    TimerWerteausgabe = 24;
1086 salvo 1257
        // Salvo 13.12.2007 Beleuchtung steuern
1258
        if (!(beeptime & BeepMuster)) LED_J16_FLASH;
1259
        else if (MotorenEin) LED_J16_ON;
1260
        else LED_J16_OFF;
1261
        // Salvo End
805 hbuss 1262
 
1 ingob 1263
    DebugOut.Analog[0] = IntegralNick / EE_Parameter.GyroAccFaktor;
1264
    DebugOut.Analog[1] = IntegralRoll / EE_Parameter.GyroAccFaktor;
1265
    DebugOut.Analog[2] = Mittelwert_AccNick;
1266
    DebugOut.Analog[3] = Mittelwert_AccRoll;
1267
    DebugOut.Analog[4] = MesswertGier;
1268
    DebugOut.Analog[5] = HoehenWert;
1086 salvo 1269
//    DebugOut.Analog[6] = (Mess_Integral_Hoch / 512);
1093 salvo 1270
 
1271
//Salvo 28.12.2008 Ersatzkompass und Kompassvalue werden vertauscht damit OSD Ersatzkompass anzeigt     
1272
    DebugOut.Analog[11] = KompassValue;  
1273
    DebugOut.Analog[8] = GyroKomp_Int / GIER_GRAD_FAKTOR;  
1274
// Salvo End
297 holgerb 1275
    DebugOut.Analog[9] = UBat;
1092 salvo 1276
    DebugOut.Analog[10] = SenderOkay;
929 hbuss 1277
    //DebugOut.Analog[16] = Mittelwert_AccHoch;
1086 salvo 1278
//    DebugOut.Analog[17] = FromNaviCtrl_Value.Distance;
1279
//    DebugOut.Analog[18] = (int)FromNaviCtrl_Value.OsdBar;
1280
//    DebugOut.Analog[19] = WinkelOut.CalcState;
1281
//    DebugOut.Analog[20] = ServoValue;
720 ingob 1282
 
805 hbuss 1283
 
1284
//    DebugOut.Analog[19] -= DebugOut.Analog[19]/128;
1285
//    if(DebugOut.Analog[19] > 0) DebugOut.Analog[19]--; else DebugOut.Analog[19]++;
1086 salvo 1286
        DebugOut.Analog[23] = debug_gp_0;
1287
    DebugOut.Analog[24] = debug_gp_1;
1288
    DebugOut.Analog[25] = debug_gp_2;
1289
        DebugOut.Analog[26] = gps_rel_act_position.utm_east; //in 10cm ausgeben
1290
        DebugOut.Analog[27] = gps_rel_act_position.utm_north;
1291
        DebugOut.Analog[28] = gps_rel_act_position.utm_alt;
1292
        DebugOut.Analog[29] = gps_state + (gps_sub_state*10)+(50*gps_cmd);
1096 salvo 1293
//      DebugOut.Analog[29] = magkompass_ok;
1101 salvo 1294
//      DebugOut.Analog[29] = Kompass_present;
805 hbuss 1295
 
1096 salvo 1296
 
1086 salvo 1297
    DebugOut.Analog[30] = GPS_Nick;
1298
    DebugOut.Analog[31] = GPS_Roll;
1096 salvo 1299
//    DebugOut.Analog[30] = KompassStartwert;
1300
//    DebugOut.Analog[31] = KompassRichtung;
1086 salvo 1301
 
1302
 
173 holgerb 1303
/*    DebugOut.Analog[16] = motor_rx[0];
1304
    DebugOut.Analog[17] = motor_rx[1];
1305
    DebugOut.Analog[18] = motor_rx[2];
1306
    DebugOut.Analog[19] = motor_rx[3];
1307
    DebugOut.Analog[20] = motor_rx[0] + motor_rx[1] + motor_rx[2] + motor_rx[3];
1308
    DebugOut.Analog[20] /= 14;
1309
    DebugOut.Analog[21] = motor_rx[4];
1310
    DebugOut.Analog[22] = motor_rx[5];
1311
    DebugOut.Analog[23] = motor_rx[6];
1312
    DebugOut.Analog[24] = motor_rx[7];
1313
    DebugOut.Analog[25] = motor_rx[4] + motor_rx[5] + motor_rx[6] + motor_rx[7];
1314
*/
1315
//    DebugOut.Analog[9] = MesswertNick;
1 ingob 1316
//    DebugOut.Analog[9] = SollHoehe;
1317
//    DebugOut.Analog[10] = Mess_Integral_Gier / 128;
1318
//    DebugOut.Analog[11] = KompassStartwert;
1051 killagreg 1319
//    DebugOut.Analog[10] = Parameter_Gyro_I;
1320
//    DebugOut.Analog[10] = EE_Parameter.Gyro_I;
1321
//    DebugOut.Analog[9] = KompassRichtung;
1 ingob 1322
//    DebugOut.Analog[10] = GasMischanteil;
1323
//    DebugOut.Analog[3] = HoeheD * 32;
1324
//    DebugOut.Analog[4] = hoehenregler;
1325
  }
1326
 
1051 killagreg 1327
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 1328
//  Drehgeschwindigkeit und -winkel zu einem Istwert zusammenfassen
1051 killagreg 1329
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
604 hbuss 1330
 
173 holgerb 1331
    if(Looping_Nick) MesswertNick = MesswertNick * GyroFaktor;
1332
    else             MesswertNick = IntegralNick * IntegralFaktor + MesswertNick * GyroFaktor;
1333
    if(Looping_Roll) MesswertRoll = MesswertRoll * GyroFaktor;
1334
    else             MesswertRoll = IntegralRoll * IntegralFaktor + MesswertRoll * GyroFaktor;
855 hbuss 1335
    MesswertGier =   MesswertGier * (2 * GyroFaktor) + Integral_Gier * IntegralFaktor / 2;
1 ingob 1336
 
854 hbuss 1337
    DebugOut.Analog[21] = MesswertNick;
1338
    DebugOut.Analog[22] = MesswertRoll;
1339
 
1 ingob 1340
    // Maximalwerte abfangen
882 hbuss 1341
    #define MAX_SENSOR  (4096*STICK_GAIN)
1 ingob 1342
    if(MesswertNick >  MAX_SENSOR) MesswertNick =  MAX_SENSOR;
1343
    if(MesswertNick < -MAX_SENSOR) MesswertNick = -MAX_SENSOR;
1344
    if(MesswertRoll >  MAX_SENSOR) MesswertRoll =  MAX_SENSOR;
1345
    if(MesswertRoll < -MAX_SENSOR) MesswertRoll = -MAX_SENSOR;
1346
    if(MesswertGier >  MAX_SENSOR) MesswertGier =  MAX_SENSOR;
1347
    if(MesswertGier < -MAX_SENSOR) MesswertGier = -MAX_SENSOR;
1348
 
1051 killagreg 1349
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 1350
// Höhenregelung
1351
// Die Höhenregelung schwächt lediglich das Gas ab, erhöht es allerdings nicht
1051 killagreg 1352
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 1353
//OCR0B = 180 - (Poti1 + 120) / 4;
1354
//DruckOffsetSetting = OCR0B;
855 hbuss 1355
  GasMischanteil *= STICK_GAIN;
1036 hbuss 1356
/*
1357
  if(Poti1 > 200) {OCR0A = DruckOffsetSetting - 16; ExpandBaro = 16; }else
1358
  if(Poti1 > 150) {OCR0A = DruckOffsetSetting - 8; ExpandBaro = 8; }else
1359
  if(Poti1 > 100) {OCR0A = DruckOffsetSetting - 4; ExpandBaro = 4; }else
1360
  if(Poti1 >  50) {OCR0A = DruckOffsetSetting - 2; ExpandBaro = 1; }else
1361
  {OCR0A = DruckOffsetSetting; ExpandBaro = 0;}
1362
*/
1 ingob 1363
 if((EE_Parameter.GlobalConfig & CFG_HOEHENREGELUNG))  // Höhenregelung
1364
  {
1365
    int tmp_int;
1036 hbuss 1366
        static char delay = 100;
1 ingob 1367
    if(EE_Parameter.GlobalConfig & CFG_HOEHEN_SCHALTER)  // Regler wird über Schalter gesteuert
1368
    {
1036 hbuss 1369
    if(((EE_Parameter.BitConfig & CFG_HIGHT_3SWITCH) && ((Parameter_MaxHoehe > 80) && (Parameter_MaxHoehe < 140))) ||
993 hbuss 1370
      (!(EE_Parameter.BitConfig & CFG_HIGHT_3SWITCH) && (Parameter_MaxHoehe < 50)))
1 ingob 1371
      {
1036 hbuss 1372
       if(!delay--)
1373
            {
1051 killagreg 1374
         if(MessLuftdruck > 1000)
1036 hbuss 1375
                  {
1376
                   ExpandBaro -= 10;
1051 killagreg 1377
                   OCR0A = DruckOffsetSetting - ExpandBaro;
1036 hbuss 1378
                   beeptime = 300;
1379
           delay = 250;
1380
                  }
1381
                  else
1051 killagreg 1382
         if(MessLuftdruck < 100)
1036 hbuss 1383
                  {
1384
                   ExpandBaro += 10;
1051 killagreg 1385
                   OCR0A = DruckOffsetSetting - ExpandBaro;
1036 hbuss 1386
                   beeptime = 300;
1387
           delay = 250;
1388
                  }
1389
          else
1051 killagreg 1390
          {
1036 hbuss 1391
               SollHoehe = HoehenWert - 20;  // Parameter_MaxHoehe ist der PPM-Wert des Schalters
1392
           HoehenReglerAktiv = 0;
1393
                   delay = 1;
1394
                  }
1051 killagreg 1395
                }
1 ingob 1396
      }
1051 killagreg 1397
      else
1398
        {
1036 hbuss 1399
         HoehenReglerAktiv = 1;
1400
                 delay = 200;
1051 killagreg 1401
                }
1 ingob 1402
    }
1051 killagreg 1403
    else
1 ingob 1404
    {
492 hbuss 1405
     SollHoehe = ((int) ExternHoehenValue + (int) Parameter_MaxHoehe) * (int)EE_Parameter.Hoehe_Verstaerkung - 20;
1 ingob 1406
     HoehenReglerAktiv = 1;
1407
    }
1408
 
1409
    if(Notlandung) SollHoehe = 0;
1410
    h = HoehenWert;
1411
    if((h > SollHoehe) && HoehenReglerAktiv)      // zu hoch --> drosseln
1051 killagreg 1412
     {
855 hbuss 1413
      h = ((h - SollHoehe) * (int) Parameter_Hoehe_P) / (16 / STICK_GAIN); // Differenz bestimmen --> P-Anteil
1 ingob 1414
      h = GasMischanteil - h;         // vom Gas abziehen
871 hbuss 1415
//      h -= (HoeheD * Parameter_Luftdruck_D)/(8/STICK_GAIN);    // D-Anteil
1416
      h -= (HoeheD)/(8/STICK_GAIN);    // D-Anteil
1417
      tmp_int = ((Mess_Integral_Hoch / 128) * (signed long) Parameter_Hoehe_ACC_Wirkung) / (128 / STICK_GAIN);
1418
      if(tmp_int > 70*STICK_GAIN) tmp_int = 70*STICK_GAIN;
1419
      else if(tmp_int < -(70*STICK_GAIN)) tmp_int = -(70*STICK_GAIN);
1 ingob 1420
      h -= tmp_int;
1051 killagreg 1421
      hoehenregler = (hoehenregler*15 + h) / 16;
855 hbuss 1422
      if(hoehenregler < EE_Parameter.Hoehe_MinGas * STICK_GAIN) // nicht unter MIN
1 ingob 1423
       {
855 hbuss 1424
         if(GasMischanteil >= EE_Parameter.Hoehe_MinGas * STICK_GAIN) hoehenregler = EE_Parameter.Hoehe_MinGas * STICK_GAIN;
1425
         if(GasMischanteil < EE_Parameter.Hoehe_MinGas * STICK_GAIN) hoehenregler = GasMischanteil;
1051 killagreg 1426
       }
1 ingob 1427
      if(hoehenregler > GasMischanteil) hoehenregler = GasMischanteil; // nicht mehr als Gas
1428
      GasMischanteil = hoehenregler;
1051 killagreg 1429
     }
1 ingob 1430
  }
855 hbuss 1431
  if(GasMischanteil > (MAX_GAS - 20) * STICK_GAIN) GasMischanteil = (MAX_GAS - 20) * STICK_GAIN;
1051 killagreg 1432
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 1433
// + Mischer und PI-Regler
1051 killagreg 1434
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
173 holgerb 1435
  DebugOut.Analog[7] = GasMischanteil;
1051 killagreg 1436
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 1437
// Gier-Anteil
1051 killagreg 1438
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
188 holgerb 1439
#define MUL_G  1.0
855 hbuss 1440
    GierMischanteil = MesswertGier - sollGier * STICK_GAIN;     // Regler für Gier
604 hbuss 1441
// GierMischanteil = 0;
855 hbuss 1442
#define MIN_GIERGAS  (40*STICK_GAIN)  // unter diesem Gaswert trotzdem Gieren
693 hbuss 1443
   if(GasMischanteil > MIN_GIERGAS)
1444
    {
1051 killagreg 1445
     if(GierMischanteil > (GasMischanteil / 2)) GierMischanteil = GasMischanteil / 2;
1446
     if(GierMischanteil < -(GasMischanteil / 2)) GierMischanteil = -(GasMischanteil / 2);
693 hbuss 1447
    }
1051 killagreg 1448
    else
693 hbuss 1449
    {
1051 killagreg 1450
     if(GierMischanteil > (MIN_GIERGAS / 2))  GierMischanteil = MIN_GIERGAS / 2;
1451
     if(GierMischanteil < -(MIN_GIERGAS / 2)) GierMischanteil = -(MIN_GIERGAS / 2);
693 hbuss 1452
    }
855 hbuss 1453
    tmp_int = MAX_GAS*STICK_GAIN;
1051 killagreg 1454
    if(GierMischanteil > ((tmp_int - GasMischanteil))) GierMischanteil = ((tmp_int - GasMischanteil));
855 hbuss 1455
    if(GierMischanteil < -((tmp_int - GasMischanteil))) GierMischanteil = -((tmp_int - GasMischanteil));
513 hbuss 1456
 
1051 killagreg 1457
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 1458
// Nick-Achse
1051 killagreg 1459
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
723 hbuss 1460
    DiffNick = MesswertNick - StickNick;        // Differenz bestimmen
1461
    if(IntegralFaktor) SummeNick += IntegralNick * IntegralFaktor - StickNick; // I-Anteil bei Winkelregelung
1051 killagreg 1462
    else  SummeNick += DiffNick; // I-Anteil bei HH
855 hbuss 1463
    if(SummeNick >  (STICK_GAIN * 16000L)) SummeNick =  (STICK_GAIN * 16000L);
1464
    if(SummeNick < -(16000L * STICK_GAIN)) SummeNick = -(16000L * STICK_GAIN);
1051 killagreg 1465
    pd_ergebnis = DiffNick + Ki * SummeNick; // PI-Regler für Nick
1 ingob 1466
    // Motor Vorn
499 hbuss 1467
    tmp_int = (long)((long)Parameter_DynamicStability * (long)(GasMischanteil + abs(GierMischanteil)/2)) / 64;
1051 killagreg 1468
    if(pd_ergebnis >  tmp_int) pd_ergebnis =  tmp_int;
1469
    if(pd_ergebnis < -tmp_int) pd_ergebnis = -tmp_int;
173 holgerb 1470
 
1 ingob 1471
    motorwert = GasMischanteil + pd_ergebnis + GierMischanteil;   // Mischer
855 hbuss 1472
    motorwert /= STICK_GAIN;
173 holgerb 1473
        if ((motorwert < 0)) motorwert = 0;
1 ingob 1474
        else if(motorwert > MAX_GAS)        motorwert = MAX_GAS;
1051 killagreg 1475
        if (motorwert < MIN_GAS)            motorwert = MIN_GAS;
1476
        Motor_Vorne = motorwert;
1 ingob 1477
    // Motor Heck
1478
        motorwert = GasMischanteil - pd_ergebnis + GierMischanteil;
855 hbuss 1479
    motorwert /= STICK_GAIN;
173 holgerb 1480
        if ((motorwert < 0)) motorwert = 0;
1 ingob 1481
        else if(motorwert > MAX_GAS)        motorwert = MAX_GAS;
1482
        if (motorwert < MIN_GAS)            motorwert = MIN_GAS;
1051 killagreg 1483
        Motor_Hinten = motorwert;
1484
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 ingob 1485
// Roll-Achse
1051 killagreg 1486
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
723 hbuss 1487
        DiffRoll = MesswertRoll - StickRoll;    // Differenz bestimmen
1488
    if(IntegralFaktor) SummeRoll += IntegralRoll * IntegralFaktor - StickRoll;// I-Anteil bei Winkelregelung
498 hbuss 1489
    else                 SummeRoll += DiffRoll;  // I-Anteil bei HH
918 hbuss 1490
    if(SummeRoll >  (STICK_GAIN * 16000L)) SummeRoll =  (STICK_GAIN * 16000L);
1491
    if(SummeRoll < -(16000L * STICK_GAIN)) SummeRoll = -(16000L * STICK_GAIN);
297 holgerb 1492
    pd_ergebnis = DiffRoll + Ki * SummeRoll;    // PI-Regler für Roll
499 hbuss 1493
    tmp_int = (long)((long)Parameter_DynamicStability * (long)(GasMischanteil + abs(GierMischanteil)/2)) / 64;
1051 killagreg 1494
    if(pd_ergebnis >  tmp_int) pd_ergebnis =  tmp_int;
1495
    if(pd_ergebnis < -tmp_int) pd_ergebnis = -tmp_int;
1 ingob 1496
    // Motor Links
1497
    motorwert = GasMischanteil + pd_ergebnis - GierMischanteil;
855 hbuss 1498
    motorwert /= STICK_GAIN;
173 holgerb 1499
        if ((motorwert < 0)) motorwert = 0;
1 ingob 1500
        else if(motorwert > MAX_GAS)            motorwert = MAX_GAS;
1501
        if (motorwert < MIN_GAS)            motorwert = MIN_GAS;
1051 killagreg 1502
    Motor_Links = motorwert;
1 ingob 1503
    // Motor Rechts
1504
        motorwert = GasMischanteil - pd_ergebnis - GierMischanteil;
855 hbuss 1505
    motorwert /= STICK_GAIN;
173 holgerb 1506
        if ((motorwert < 0)) motorwert = 0;
1 ingob 1507
        else if(motorwert > MAX_GAS)            motorwert = MAX_GAS;
1051 killagreg 1508
        if (motorwert < MIN_GAS)            motorwert = MIN_GAS;
1509
    Motor_Rechts = motorwert;
1 ingob 1510
   // +++++++++++++++++++++++++++++++++++++++++++++++
1511
}
1512