Lampka hamowania ED: i-dynamicbrake

Hebelek baterii: battery_sw

Train.cpp

@@ -467,6 +467,10 @@ void TTrain::OnKeyDown(int cKey)
 				if (mvOccupied->BatterySwitch(true)) // bateria potrzebna np. do zapalenia œwiate³
 				{
 					dsbSwitch->Play(0, 0, 0);
+					if (ggBatteryButton.SubModel)
+                    {
+                        ggBatteryButton.PutValue(1);
+                    }
 					if (mvOccupied->LightsPosNo > 0)
 					{
 						SetLights();
@@ -1508,6 +1512,10 @@ void TTrain::OnKeyDown(int cKey)
             { // ewentualnie zablokowaæ z FIZ,
                 // np. w samochodach siê nie
                 // od³¹cza akumulatora
+				if (ggBatteryButton.SubModel)
+                    {
+                        ggBatteryButton.PutValue(0);
+                    }
                 dsbSwitch->Play(0, 0, 0);
                 // mvOccupied->SecuritySystem.Status=0;
                 mvControlled->PantFront(false);
@@ -3673,6 +3681,7 @@ bool TTrain::Update()
                                     (mvOccupied->EpFuse)); // napiecie na nastawniku hamulcowym
             btLampkaForward.Turn(mvControlled->ActiveDir > 0); // jazda do przodu
             btLampkaBackward.Turn(mvControlled->ActiveDir < 0); // jazda do ty³u
+            btLampkaED.Turn(mvControlled->DynamicBrakeFlag); //hamulec ED
         }
         else
         { // gdy bateria wy³¹czona
@@ -3686,6 +3695,7 @@ bool TTrain::Update()
             btLampkaNapNastHam.TurnOff();
             btLampkaForward.TurnOff();
             btLampkaBackward.TurnOff();
+			btLampkaED.TurnOff();
         }
         // McZapkie-080602: obroty (albo translacje) regulatorow
         if (ggMainCtrl.SubModel)
@@ -4958,6 +4968,7 @@ bool TTrain::Update()
         // hunter-091012
         ggCabLightButton.Update();
         ggCabLightDimButton.Update();
+		ggBatteryButton.Update();
         //------
         if (ActiveUniversal4)
             ggUniversal4Button.PermIncValue(dt);
@@ -5437,6 +5448,7 @@ bool TTrain::InitializeCab(int NewCabNo, AnsiString asFileName)
                 // hunter-091012
                 ggCabLightButton.Clear();
                 ggCabLightDimButton.Clear();
+				ggBatteryButton.Clear();
                 //-------
                 ggUniversal4Button.Clear();
                 ggFuseButton.Clear();
@@ -5522,6 +5534,7 @@ bool TTrain::InitializeCab(int NewCabNo, AnsiString asFileName)
                 btLampkaWylSzybkiB.Clear();
                 btLampkaForward.Clear();
                 btLampkaBackward.Clear();
+				btLampkaED.Clear();
                 btCabLight.Clear(); // hunter-171012
                 ggLeftLightButton.Clear();
                 ggRightLightButton.Clear();
@@ -5657,9 +5670,9 @@ bool TTrain::InitializeCab(int NewCabNo, AnsiString asFileName)
             else if (str == AnsiString("cablight_sw:")) // hunter-091012: swiatlo w kabinie
                 ggCabLightButton.Load(Parser, DynamicObject->mdKabina);
             else if (str == AnsiString("cablightdim_sw:"))
-                ggCabLightDimButton.Load(
+                ggCabLightDimButton.Load(Parser, DynamicObject->mdKabina); // hunter-091012: przyciemnienie swiatla w kabinie
-                    Parser,
+            else if (str == AnsiString("battery_sw:"))
-                    DynamicObject->mdKabina); // hunter-091012: przyciemnienie swiatla w kabinie
+                ggBatteryButton.Load(Parser, DynamicObject->mdKabina);
             // ABu 090305: uniwersalne przyciski lub inne rzeczy
             else if (str == AnsiString("universal1:"))
                 ggUniversal1Button.Load(Parser, DynamicObject->mdKabina, DynamicObject->mdModel);
@@ -5919,6 +5932,8 @@ bool TTrain::InitializeCab(int NewCabNo, AnsiString asFileName)
                 btLampkaBocznik4.Load(Parser, DynamicObject->mdKabina);
             else if (str == AnsiString("i-braking:"))
                 btLampkaHamienie.Load(Parser, DynamicObject->mdKabina);
+			else if (str == AnsiString("i-dynamicbrake:"))
+                btLampkaED.Load(Parser, DynamicObject->mdKabina);
             else if (str == AnsiString("i-braking-ezt:"))
                 btLampkaHamowanie1zes.Load(Parser, DynamicObject->mdKabina);
             else if (str == AnsiString("i-braking-ezt2:"))

Train.h

@@ -189,6 +189,7 @@ class TTrain
 
     TGauge ggCabLightButton; // hunter-091012: przelacznik oswietlania kabiny
     TGauge ggCabLightDimButton; // hunter-091012: przelacznik przyciemnienia
+	TGauge ggBatteryButton; // Stele 161228 hebelek baterii
     // oswietlenia kabiny
 
     // NBMX wrzesien 2003 - obsluga drzwi
@@ -255,6 +256,7 @@ class TTrain
     TButton btLampkaBocznik4;
     TButton btLampkaRadiotelefon;
     TButton btLampkaHamienie;
+	TButton btLampkaED; //Stele 161228 hamowanie elektrodynamiczne
     TButton btLampkaJazda; // Ra: nie u篡wane
     // KURS90
     TButton btLampkaBoczniki;