![]() |
![]() |
|
![]() |
![]() |
|
Home Cockpit - Das Forum für die "Bastler" Cockpitbauer tauschen Pläne, Erfahrungen, Meinungen über den Bau von Homecockpits aus... |
|
Themen-Optionen | Ansicht |
![]() |
#37 | ||
Jr. Member
![]() |
![]() Zitat:
************************************* inhalt der schalter.ini ************************************* 'COCKPIT COMPONENTS - LIGHTS '------------------------------------------------------------------------------- 'C NAME TYPE CID RID FLAGS P1 P2 P3 '------------------------------------------------------------------------------- C, CSMixLev, SWITCH, 28, 0, NEGEDGE|TOGGLE ************************************************* inhalt der mixture.dab ************************************************* Dim Var_Zaehler Dim Var_Wert SUB OnBegin LoadConfigFile("schalter.ini") WriteFSDirect(0, 0x0890,I16,1,1) Var_Zaehler = 0 END SUB Sub OnCSMixLev Var_Zaehler = Var_Zaehler + 1 select case Var_Zaehler case 1 Var_Wert = 1640 case 2 Var_Wert = 3280 case 3 Var_Wert = 4918 case 4 Var_Wert = 6556 case 5 Var_Wert = 8194 case 6 Var_Wert = 9832 case 7 Var_Wert = 11470 case 8 Var_Wert = 13108 case 9 Var_Wert = 14746 case 10 Var_Wert = 16384 case 11 Var_Wert = 0 Var_Zaehler = 0 end select WriteFSDirect(Var_Wert, 0x0890,I16,1,1) END SUB ************************************************** * zu beginn wird die mixtur auf 0 gesetzt. bei jedem klick um ca 10% erhöht. der 11te klick setzt die mixture wieder aud 0 zurück. geht bestimmt auch anders. Zitat:
____________________________________
Gruß Andreas ______________________________________ My Cockpit: http://www.737ng.de Hapagfly Boeing 737-8K5 D-AHFC ICAO: EDDL IATA: DUS. Coordinates. N 051° 17\' 22\'\' E 006° 46\' 00\'\' _____________________________________ My Bike: http://www.sradspeed.de |
||
![]() |
![]() |
Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Gäste: 1) | |
|
|