Partager l'article ! Engine Anti Ice: Attention, ce code (en NOIR) ne peut pas être utilisé en copier-collé à cause des explications (en JAUNE). Pour q ...
Attention, ce code (en NOIR)
ne peut pas être utilisé en copier-collé à cause des explications (en JAUNE).
Pour que cela ne vous pose pas de souci rendez vous ICI pour retrouver le programme complet sans
explication.
// *****************************************************************************
// * Config_SIOC ver 3.7B1 - By Manolo Vélez - www.opencockpits.com
// *****************************************************************************
// * FileName : sioc.txt
// * Date : 19/07/2010
Var 0000, name iNITIALISATION
{
CALL &Init_inters // Sub 0300
CALL &Init_voyants // Sub 0399
}
Var 0027, name ENG_ANTI_ICE_L, Link FSUIPC_INOUT, Offset $08B2, Length 2 // Dégivrage moteur gauche
{
&ENG_ANTI_ICE_L = &ENGIN_ICE_L_SW
}
Var 0028, name ENG_ANTI_ICE_R, Link FSUIPC_INOUT, Offset $094A, Length 2 // Dégivrage moteur droit
{
&ENG_ANTI_ICE_R = &ENGIN_ICE_R_SW
}
Var 0300, name Init_inters, Link SUBRUTINE // Initialisation des Inters
{
&ENG_ANTI_ICE_L = &ENGIN_ICE_L_SW
&ENG_ANTI_ICE_R = &ENGIN_ICE_R_SW
}
Var 0317, name L_ICE_VANE, Link SUBRUTINE // Calcul L ICE VANE voir sub 325
{
&L_ICE_VANE = &L_ICE_VANE + &ENGIN_ICE_L_SW
}
Var 0320, name R_ICE_VANE, Link SUBRUTINE // Cacul R ICE VANE voir sub 0329
{
&R_ICE_VANE = &R_ICE_VANE + &ENGIN_ICE_R_SW
}
Var 0325, name L_ICE_VANE_EXT, Link SUBRUTINE // Alarme verte & jaune ICE Vane moteur gau
{
IF &L_ICE_VANE = 0 // L'Inter vient d'être basculé sur OFF...
{
&L_ICE_EXT_LED = DELAY 0 ,1400 // ...Led s'éteint après 14"
}
IF &L_ICE_VANE = 2 // L'Inter vient d'être basculé sur ON...
{
IF &L_ENGINCOMBUST = 1 // Si moteur démarré
{
L0 = RANDOM 400 ,2000 // Temps aléatoire entre 4 & 20"
L1 = L0 + 500 // On ajoute 5" à L0
&L_ICE_EXT_LED = DELAY 1 ,L0 // Led Verte s'allume après L0
IF L0 > 1600 // Si L0 est plus grand que 16"
{
&L_ICE_VANE_LED = DELAY 1 ,1500 // Led défaut ICE VANE s'allume après 15"
&L_ICE_VANE_LED = DELAY 0 ,L1 // et s'éteint 5" après allumage de la vert
}
&L_ICE_VANE = 0 // Remise à zéro du compteur
}
}
ELSE // Pour n'allumer l'alarme défaut...
{
IF &L_ICE_VANE = 1 // ...qu'au basculement de l'inter...
{
&L_ICE_EXT_LED = 1 // ... de la position Off à On.
}
}
}
Var 0329, name R_ICE_VANE_EXT, Link SUBRUTINE // Alarme verte & jaune ICE Vane moteur dro
{
IF &R_ICE_VANE = 0 // L'Inter vient d'être basculé sur OFF...
{
&R_ICE_EXT_LED = DELAY 0 ,1400 // ...Led s'éteint après 14"
}
IF &R_ICE_VANE = 2 // L'Inter vient d'être basculé sur ON...
{
IF &R_ENGINCOMBUST = 1 // Si moteur démarré
{
L0 = RANDOM 400 ,2000 // Temps aléatoire entre 4 & 20"
L1 = L0 + 500 // On ajoute 5" à L0
&R_ICE_EXT_LED = DELAY 1 ,L0 // Led Verte s'allume après L0
IF L0 > 1600 // Si L0 est plus grand que 16"
{
&R_ICE_VANE_LED = DELAY 1 ,1500 // Led défaut ICE VANE s'allume après 15"
&R_ICE_VANE_LED = DELAY 0 ,L1 // et s'éteint 5" après allumage de la vert
}
&R_ICE_VANE = 0 // Remise à zéro du compteur
}
}
ELSE // Pour n'allumer l'alarme défaut...
{
IF &R_ICE_VANE = 1 // ...qu'au basculement de l'inter...
{
&R_ICE_EXT_LED = 1 // ... de la position Off à On.
}
}
}
Var 0399, name Init_voyants, Link SUBRUTINE // Initialisation des sorties
{
IF &BATTERY = 0
{
&L_ICE_VANE_LED = 0
&R_ICE_VANE_LED = 0
&L_ICE_EXT_LED = 0
&R_ICE_EXT_LED = 0
}
ELSE // Si inter déjà sur"ON" à l'initialisation
{
CALL &L_ICE_VANE_EXT // Sub 0325 L ICE VANE EXT led
CALL &R_ICE_VANE_EXT // Sub 0329 R ICE VANE EXT led
}
}
Var 0410, name ENGIN_ICE_L_SW, Link IOCARD_SW, Input 2 // inter anti ice moteur gauche
{
&ENG_ANTI_ICE_L = &ENGIN_ICE_L_SW // var 0027
&L_ICE_VANE = &ENGIN_ICE_L_SW // Sub 0317
CALL &L_ICE_VANE_EXT // Sub 0325 L ICE VANE EXT led
}
Var 0411, name ENGIN_ICE_R_SW, Link IOCARD_SW, Input 1 // inter anti ice moteur droit
{
&ENG_ANTI_ICE_R = &ENGIN_ICE_R_SW // var 0028
&R_ICE_VANE = &ENGIN_ICE_R_SW // Sub 0320
CALL &R_ICE_VANE_EXT // Sub 0329 R ICE VANE EXT led
}
Var 0723, name L_ICE_VANE_LED, Link IOCARD_OUT, Output 35 // Alarme Jaune L ICE VANE
Var 0726, name R_ICE_VANE_LED, Link IOCARD_OUT, Output 45 // Alarme Jaune R ICE VANE
Var 0731, name L_ICE_EXT_LED, Link IOCARD_OUT, Output 41 // Alarme verte LEFT ICE VANE EXT
Var 0735, name R_ICE_EXT_LED, Link IOCARD_OUT, Output 52 // Alarme verte R ICE VANE EXT