/*
This Source Code Form is subject to the
terms of the Mozilla Public License, v.
2.0. If a copy of the MPL was not
distributed with this file, You can
obtain one at
http://mozilla.org/MPL/2.0/.
*/
/*
    MaSzyna EU07 locomotive simulator
    Copyright (C) 2001-2004  Marcin Wozniak, Maciej Czapkiewicz and others

*/

#include "stdafx.h"
#include "Train.h"

#include "Globals.h"
#include "simulation.h"
#include "simulationtime.h"
#include "Camera.h"
#include "Logs.h"
#include "MdlMngr.h"
#include "Model3d.h"
#include "dumb3d.h"
#include "Timer.h"
#include "Driver.h"
#include "DynObj.h"
#include "mtable.h"
#include "Console.h"
#include "application.h"
#include "renderer.h"
#include "dictionary.h"
/*
namespace input {

extern user_command command;

}
*/
void
control_mapper::insert( TGauge const &Gauge, std::string const &Label ) {

    auto const submodel = Gauge.SubModel;
    if( submodel != nullptr ) {
        m_controlnames.emplace( submodel, Label );
    }
}

std::string
control_mapper::find( TSubModel const *Control ) const {

    auto const lookup = m_controlnames.find( Control );
    if( lookup != m_controlnames.end() ) {
        return lookup->second;
    }
    else {
        return "";
    }
}

void TCab::Load(cParser &Parser)
{
    // NOTE: clearing control tables here is bit of a crutch, imposed by current scheme of loading compartments anew on each cab change
    ggList.clear();
    btList.clear();

    std::string token;
    Parser.getTokens();
    Parser >> token;
    if (token == "cablight:")
    {
		Parser.getTokens( 9, false );
/*
		Parser
			>> dimm.r
			>> dimm.g
			>> dimm.b
			>> intlit.r
			>> intlit.g
			>> intlit.b
			>> intlitlow.r
			>> intlitlow.g
			>> intlitlow.b;
*/
		Parser.getTokens(); Parser >> token;
    }
	CabPos1.x = std::stod( token );
	Parser.getTokens( 5, false );
	Parser
		>> CabPos1.y
		>> CabPos1.z
		>> CabPos2.x
		>> CabPos2.y
		>> CabPos2.z;

    bEnabled = true;
    bOccupied = true;
}

TGauge &TCab::Gauge(int n)
{ // pobranie adresu obiektu aniomowanego ruchem
/*
    if (n < 0)
    { // rezerwacja wolnego
        ggList[iGauges].Clear();
        return ggList + iGauges++;
    }
    else if (n < iGauges)
        return ggList + n;
    return NULL;
*/
    if( n < 0 ) {
        ggList.emplace_back();
        return ggList.back();
    }
    else {
        return ggList[ n ];
    }
};

TButton &TCab::Button(int n)
{ // pobranie adresu obiektu animowanego wyborem 1 z 2
/*
    if (n < 0)
    { // rezerwacja wolnego
        return btList + iButtons++;
    }
    else if (n < iButtons)
        return btList + n;
    return NULL;
*/
    if( n < 0 ) {
        btList.emplace_back();
        return btList.back();
    }
    else {
        return btList[ n ];
    }
};

void TCab::Update( bool const Power )
{ // odczyt parametrów i ustawienie animacji submodelom
    for( auto &gauge : ggList ) {
        // animacje izometryczne
        gauge.UpdateValue(); // odczyt parametru i przeliczenie na kąt
        gauge.Update(); // ustawienie animacji
    }

    for( auto &button : btList ) {
        // animacje dwustanowe
        button.Update( Power ); // odczyt parametru i wybór submodelu
    }
};

// NOTE: we're currently using universal handlers and static handler map but it may be beneficial to have these implemented on individual class instance basis
// TBD, TODO: consider this approach if we ever want to have customized consist behaviour to received commands, based on the consist/vehicle type or whatever
TTrain::commandhandler_map const TTrain::m_commandhandlers = {

    { user_command::aidriverenable, &TTrain::OnCommand_aidriverenable },
    { user_command::aidriverdisable, &TTrain::OnCommand_aidriverdisable },
    { user_command::jointcontrollerset, &TTrain::OnCommand_jointcontrollerset },
    { user_command::mastercontrollerincrease, &TTrain::OnCommand_mastercontrollerincrease },
    { user_command::mastercontrollerincreasefast, &TTrain::OnCommand_mastercontrollerincreasefast },
    { user_command::mastercontrollerdecrease, &TTrain::OnCommand_mastercontrollerdecrease },
    { user_command::mastercontrollerdecreasefast, &TTrain::OnCommand_mastercontrollerdecreasefast },
    { user_command::mastercontrollerset, &TTrain::OnCommand_mastercontrollerset },
    { user_command::secondcontrollerincrease, &TTrain::OnCommand_secondcontrollerincrease },
    { user_command::secondcontrollerincreasefast, &TTrain::OnCommand_secondcontrollerincreasefast },
    { user_command::secondcontrollerdecrease, &TTrain::OnCommand_secondcontrollerdecrease },
    { user_command::secondcontrollerdecreasefast, &TTrain::OnCommand_secondcontrollerdecreasefast },
    { user_command::secondcontrollerset, &TTrain::OnCommand_secondcontrollerset },
    { user_command::notchingrelaytoggle, &TTrain::OnCommand_notchingrelaytoggle },
    { user_command::tempomattoggle, &TTrain::OnCommand_tempomattoggle },
    { user_command::mucurrentindicatorothersourceactivate, &TTrain::OnCommand_mucurrentindicatorothersourceactivate },
    { user_command::independentbrakeincrease, &TTrain::OnCommand_independentbrakeincrease },
    { user_command::independentbrakeincreasefast, &TTrain::OnCommand_independentbrakeincreasefast },
    { user_command::independentbrakedecrease, &TTrain::OnCommand_independentbrakedecrease },
    { user_command::independentbrakedecreasefast, &TTrain::OnCommand_independentbrakedecreasefast },
    { user_command::independentbrakeset, &TTrain::OnCommand_independentbrakeset },
    { user_command::independentbrakebailoff, &TTrain::OnCommand_independentbrakebailoff },
    { user_command::trainbrakeincrease, &TTrain::OnCommand_trainbrakeincrease },
    { user_command::trainbrakedecrease, &TTrain::OnCommand_trainbrakedecrease },
    { user_command::trainbrakeset, &TTrain::OnCommand_trainbrakeset },
    { user_command::trainbrakecharging, &TTrain::OnCommand_trainbrakecharging },
    { user_command::trainbrakerelease, &TTrain::OnCommand_trainbrakerelease },
    { user_command::trainbrakefirstservice, &TTrain::OnCommand_trainbrakefirstservice },
    { user_command::trainbrakeservice, &TTrain::OnCommand_trainbrakeservice },
    { user_command::trainbrakefullservice, &TTrain::OnCommand_trainbrakefullservice },
    { user_command::trainbrakehandleoff, &TTrain::OnCommand_trainbrakehandleoff },
    { user_command::trainbrakeemergency, &TTrain::OnCommand_trainbrakeemergency },
    { user_command::trainbrakebasepressureincrease, &TTrain::OnCommand_trainbrakebasepressureincrease },
    { user_command::trainbrakebasepressuredecrease, &TTrain::OnCommand_trainbrakebasepressuredecrease },
    { user_command::trainbrakebasepressurereset, &TTrain::OnCommand_trainbrakebasepressurereset },
    { user_command::trainbrakeoperationtoggle, &TTrain::OnCommand_trainbrakeoperationtoggle },
    { user_command::manualbrakeincrease, &TTrain::OnCommand_manualbrakeincrease },
    { user_command::manualbrakedecrease, &TTrain::OnCommand_manualbrakedecrease },
    { user_command::alarmchaintoggle, &TTrain::OnCommand_alarmchaintoggle },
    { user_command::wheelspinbrakeactivate, &TTrain::OnCommand_wheelspinbrakeactivate },
    { user_command::sandboxactivate, &TTrain::OnCommand_sandboxactivate },
    { user_command::epbrakecontroltoggle, &TTrain::OnCommand_epbrakecontroltoggle },
	{ user_command::trainbrakeoperationmodeincrease, &TTrain::OnCommand_trainbrakeoperationmodeincrease },
	{ user_command::trainbrakeoperationmodedecrease, &TTrain::OnCommand_trainbrakeoperationmodedecrease },
    { user_command::brakeactingspeedincrease, &TTrain::OnCommand_brakeactingspeedincrease },
    { user_command::brakeactingspeeddecrease, &TTrain::OnCommand_brakeactingspeeddecrease },
    { user_command::brakeactingspeedsetcargo, &TTrain::OnCommand_brakeactingspeedsetcargo },
    { user_command::brakeactingspeedsetpassenger, &TTrain::OnCommand_brakeactingspeedsetpassenger },
    { user_command::brakeactingspeedsetrapid, &TTrain::OnCommand_brakeactingspeedsetrapid },
    { user_command::brakeloadcompensationincrease, &TTrain::OnCommand_brakeloadcompensationincrease },
    { user_command::brakeloadcompensationdecrease, &TTrain::OnCommand_brakeloadcompensationdecrease },
    { user_command::mubrakingindicatortoggle, &TTrain::OnCommand_mubrakingindicatortoggle },
    { user_command::reverserincrease, &TTrain::OnCommand_reverserincrease },
    { user_command::reverserdecrease, &TTrain::OnCommand_reverserdecrease },
    { user_command::reverserforwardhigh, &TTrain::OnCommand_reverserforwardhigh },
    { user_command::reverserforward, &TTrain::OnCommand_reverserforward },
    { user_command::reverserneutral, &TTrain::OnCommand_reverserneutral },
    { user_command::reverserbackward, &TTrain::OnCommand_reverserbackward },
    { user_command::alerteracknowledge, &TTrain::OnCommand_alerteracknowledge },
    { user_command::batterytoggle, &TTrain::OnCommand_batterytoggle },
    { user_command::batteryenable, &TTrain::OnCommand_batteryenable },
    { user_command::batterydisable, &TTrain::OnCommand_batterydisable },
    { user_command::pantographcompressorvalvetoggle, &TTrain::OnCommand_pantographcompressorvalvetoggle },
    { user_command::pantographcompressoractivate, &TTrain::OnCommand_pantographcompressoractivate },
    { user_command::pantographtogglefront, &TTrain::OnCommand_pantographtogglefront },
    { user_command::pantographtogglerear, &TTrain::OnCommand_pantographtogglerear },
    { user_command::pantographraisefront, &TTrain::OnCommand_pantographraisefront },
    { user_command::pantographraiserear, &TTrain::OnCommand_pantographraiserear },
    { user_command::pantographlowerfront, &TTrain::OnCommand_pantographlowerfront },
    { user_command::pantographlowerrear, &TTrain::OnCommand_pantographlowerrear },
    { user_command::pantographlowerall, &TTrain::OnCommand_pantographlowerall },
    { user_command::linebreakertoggle, &TTrain::OnCommand_linebreakertoggle },
    { user_command::linebreakeropen, &TTrain::OnCommand_linebreakeropen },
    { user_command::linebreakerclose, &TTrain::OnCommand_linebreakerclose },
    { user_command::fuelpumptoggle, &TTrain::OnCommand_fuelpumptoggle },
    { user_command::fuelpumpenable, &TTrain::OnCommand_fuelpumpenable },
    { user_command::fuelpumpdisable, &TTrain::OnCommand_fuelpumpdisable },
    { user_command::oilpumptoggle, &TTrain::OnCommand_oilpumptoggle },
    { user_command::oilpumpenable, &TTrain::OnCommand_oilpumpenable },
    { user_command::oilpumpdisable, &TTrain::OnCommand_oilpumpdisable },
    { user_command::waterheaterbreakertoggle, &TTrain::OnCommand_waterheaterbreakertoggle },
    { user_command::waterheaterbreakerclose, &TTrain::OnCommand_waterheaterbreakerclose },
    { user_command::waterheaterbreakeropen, &TTrain::OnCommand_waterheaterbreakeropen },
    { user_command::waterheatertoggle, &TTrain::OnCommand_waterheatertoggle },
    { user_command::waterheaterenable, &TTrain::OnCommand_waterheaterenable },
    { user_command::waterheaterdisable, &TTrain::OnCommand_waterheaterdisable },
    { user_command::waterpumpbreakertoggle, &TTrain::OnCommand_waterpumpbreakertoggle },
    { user_command::waterpumpbreakerclose, &TTrain::OnCommand_waterpumpbreakerclose },
    { user_command::waterpumpbreakeropen, &TTrain::OnCommand_waterpumpbreakeropen },
    { user_command::waterpumptoggle, &TTrain::OnCommand_waterpumptoggle },
    { user_command::waterpumpenable, &TTrain::OnCommand_waterpumpenable },
    { user_command::waterpumpdisable, &TTrain::OnCommand_waterpumpdisable },
    { user_command::watercircuitslinktoggle, &TTrain::OnCommand_watercircuitslinktoggle },
    { user_command::watercircuitslinkenable, &TTrain::OnCommand_watercircuitslinkenable },
    { user_command::watercircuitslinkdisable, &TTrain::OnCommand_watercircuitslinkdisable },
    { user_command::convertertoggle, &TTrain::OnCommand_convertertoggle },
    { user_command::converterenable, &TTrain::OnCommand_converterenable },
    { user_command::converterdisable, &TTrain::OnCommand_converterdisable },
    { user_command::convertertogglelocal, &TTrain::OnCommand_convertertogglelocal },
    { user_command::converteroverloadrelayreset, &TTrain::OnCommand_converteroverloadrelayreset },
    { user_command::compressortoggle, &TTrain::OnCommand_compressortoggle },
    { user_command::compressorenable, &TTrain::OnCommand_compressorenable },
    { user_command::compressordisable, &TTrain::OnCommand_compressordisable },
    { user_command::compressortogglelocal, &TTrain::OnCommand_compressortogglelocal },
    { user_command::motorblowerstogglefront, &TTrain::OnCommand_motorblowerstogglefront },
    { user_command::motorblowerstogglerear, &TTrain::OnCommand_motorblowerstogglerear },
    { user_command::motorblowersdisableall, &TTrain::OnCommand_motorblowersdisableall },
    { user_command::coolingfanstoggle, &TTrain::OnCommand_coolingfanstoggle },
    { user_command::motorconnectorsopen, &TTrain::OnCommand_motorconnectorsopen },
    { user_command::motorconnectorsclose, &TTrain::OnCommand_motorconnectorsclose },
    { user_command::motordisconnect, &TTrain::OnCommand_motordisconnect },
    { user_command::motoroverloadrelaythresholdtoggle, &TTrain::OnCommand_motoroverloadrelaythresholdtoggle },
    { user_command::motoroverloadrelaythresholdsetlow, &TTrain::OnCommand_motoroverloadrelaythresholdsetlow },
    { user_command::motoroverloadrelaythresholdsethigh, &TTrain::OnCommand_motoroverloadrelaythresholdsethigh },
    { user_command::motoroverloadrelayreset, &TTrain::OnCommand_motoroverloadrelayreset },
    { user_command::heatingtoggle, &TTrain::OnCommand_heatingtoggle },
    { user_command::heatingenable, &TTrain::OnCommand_heatingenable },
    { user_command::heatingdisable, &TTrain::OnCommand_heatingdisable },
    { user_command::lightspresetactivatenext, &TTrain::OnCommand_lightspresetactivatenext },
    { user_command::lightspresetactivateprevious, &TTrain::OnCommand_lightspresetactivateprevious },
    { user_command::headlighttoggleleft, &TTrain::OnCommand_headlighttoggleleft },
    { user_command::headlightenableleft, &TTrain::OnCommand_headlightenableleft },
    { user_command::headlightdisableleft, &TTrain::OnCommand_headlightdisableleft },
    { user_command::headlighttoggleright, &TTrain::OnCommand_headlighttoggleright },
    { user_command::headlightenableright, &TTrain::OnCommand_headlightenableright },
    { user_command::headlightdisableright, &TTrain::OnCommand_headlightdisableright },
    { user_command::headlighttoggleupper, &TTrain::OnCommand_headlighttoggleupper },
    { user_command::headlightenableupper, &TTrain::OnCommand_headlightenableupper },
    { user_command::headlightdisableupper, &TTrain::OnCommand_headlightdisableupper },
    { user_command::redmarkertoggleleft, &TTrain::OnCommand_redmarkertoggleleft },
    { user_command::redmarkerenableleft, &TTrain::OnCommand_redmarkerenableleft },
    { user_command::redmarkerdisableleft, &TTrain::OnCommand_redmarkerdisableleft },
    { user_command::redmarkertoggleright, &TTrain::OnCommand_redmarkertoggleright },
    { user_command::redmarkerenableright, &TTrain::OnCommand_redmarkerenableright },
    { user_command::redmarkerdisableright, &TTrain::OnCommand_redmarkerdisableright },
    { user_command::headlighttogglerearleft, &TTrain::OnCommand_headlighttogglerearleft },
    { user_command::headlighttogglerearright, &TTrain::OnCommand_headlighttogglerearright },
    { user_command::headlighttogglerearupper, &TTrain::OnCommand_headlighttogglerearupper },
    { user_command::redmarkertogglerearleft, &TTrain::OnCommand_redmarkertogglerearleft },
    { user_command::redmarkertogglerearright, &TTrain::OnCommand_redmarkertogglerearright },
    { user_command::redmarkerstoggle, &TTrain::OnCommand_redmarkerstoggle },
    { user_command::endsignalstoggle, &TTrain::OnCommand_endsignalstoggle },
    { user_command::headlightsdimtoggle, &TTrain::OnCommand_headlightsdimtoggle },
    { user_command::headlightsdimenable, &TTrain::OnCommand_headlightsdimenable },
    { user_command::headlightsdimdisable, &TTrain::OnCommand_headlightsdimdisable },
    { user_command::interiorlighttoggle, &TTrain::OnCommand_interiorlighttoggle },
    { user_command::interiorlightenable, &TTrain::OnCommand_interiorlightenable },
    { user_command::interiorlightdimdisable, &TTrain::OnCommand_interiorlightdisable },
    { user_command::interiorlightdimtoggle, &TTrain::OnCommand_interiorlightdimtoggle },
    { user_command::interiorlightdimenable, &TTrain::OnCommand_interiorlightdimenable },
    { user_command::interiorlightdimdisable, &TTrain::OnCommand_interiorlightdimdisable },
    { user_command::instrumentlighttoggle, &TTrain::OnCommand_instrumentlighttoggle },
    { user_command::instrumentlightenable, &TTrain::OnCommand_instrumentlightenable },
    { user_command::instrumentlightdisable, &TTrain::OnCommand_instrumentlightdisable },
    { user_command::dashboardlighttoggle, &TTrain::OnCommand_dashboardlighttoggle },
    { user_command::timetablelighttoggle, &TTrain::OnCommand_timetablelighttoggle },
    { user_command::doorlocktoggle, &TTrain::OnCommand_doorlocktoggle },
    { user_command::doortoggleleft, &TTrain::OnCommand_doortoggleleft },
    { user_command::doortoggleright, &TTrain::OnCommand_doortoggleright },
    { user_command::doorpermitleft, &TTrain::OnCommand_doorpermitleft },
    { user_command::doorpermitright, &TTrain::OnCommand_doorpermitright },
    { user_command::doorpermitpresetactivatenext, &TTrain::OnCommand_doorpermitpresetactivatenext },
    { user_command::doorpermitpresetactivateprevious, &TTrain::OnCommand_doorpermitpresetactivateprevious },
    { user_command::dooropenleft, &TTrain::OnCommand_dooropenleft },
    { user_command::dooropenright, &TTrain::OnCommand_dooropenright },
    { user_command::doorcloseleft, &TTrain::OnCommand_doorcloseleft },
    { user_command::doorcloseright, &TTrain::OnCommand_doorcloseright },
    { user_command::dooropenall, &TTrain::OnCommand_dooropenall },
    { user_command::doorcloseall, &TTrain::OnCommand_doorcloseall },
    { user_command::doorsteptoggle, &TTrain::OnCommand_doorsteptoggle },
    { user_command::doormodetoggle, &TTrain::OnCommand_doormodetoggle },
    { user_command::carcouplingincrease, &TTrain::OnCommand_carcouplingincrease },
    { user_command::carcouplingdisconnect, &TTrain::OnCommand_carcouplingdisconnect },
    { user_command::departureannounce, &TTrain::OnCommand_departureannounce },
    { user_command::hornlowactivate, &TTrain::OnCommand_hornlowactivate },
    { user_command::hornhighactivate, &TTrain::OnCommand_hornhighactivate },
    { user_command::whistleactivate, &TTrain::OnCommand_whistleactivate },
    { user_command::radiotoggle, &TTrain::OnCommand_radiotoggle },
    { user_command::radiochannelincrease, &TTrain::OnCommand_radiochannelincrease },
    { user_command::radiochanneldecrease, &TTrain::OnCommand_radiochanneldecrease },
    { user_command::radiostopsend, &TTrain::OnCommand_radiostopsend },
    { user_command::radiostoptest, &TTrain::OnCommand_radiostoptest },
    { user_command::cabchangeforward, &TTrain::OnCommand_cabchangeforward },
    { user_command::cabchangebackward, &TTrain::OnCommand_cabchangebackward },
    { user_command::generictoggle0, &TTrain::OnCommand_generictoggle },
    { user_command::generictoggle1, &TTrain::OnCommand_generictoggle },
    { user_command::generictoggle2, &TTrain::OnCommand_generictoggle },
    { user_command::generictoggle3, &TTrain::OnCommand_generictoggle },
    { user_command::generictoggle4, &TTrain::OnCommand_generictoggle },
    { user_command::generictoggle5, &TTrain::OnCommand_generictoggle },
    { user_command::generictoggle6, &TTrain::OnCommand_generictoggle },
    { user_command::generictoggle7, &TTrain::OnCommand_generictoggle },
    { user_command::generictoggle8, &TTrain::OnCommand_generictoggle },
    { user_command::generictoggle9, &TTrain::OnCommand_generictoggle }
};

std::vector<std::string> const TTrain::fPress_labels = {

    "ch1:  ", "ch2:  ", "ch3:  ", "ch4:  ", "ch5:  ", "ch6:  ", "ch7:  ", "ch8:  ", "ch9:  ", "ch0:  "
};

TTrain::TTrain() {

    ShowNextCurrent = false;
    // McZapkie-240302 - przyda sie do tachometru
    fTachoVelocity = 0;
    fTachoCount = 0;
    fPPress = fNPress = 0;

    // asMessage="";
    pMechOffset = Math3D::vector3(0, 0, 0);
    fBlinkTimer = 0;
    fHaslerTimer = 0;
    DynamicSet(NULL); // ustawia wszystkie mv*
    //-----
    pMechSittingPosition = Math3D::vector3(0, 0, 0); // ABu: 180404
    fTachoTimer = 0.0; // włączenie skoków wskazań prędkościomierza

    //
    for( int i = 0; i < 8; i++ ) {
        bMains[ i ] = false;
        fCntVol[ i ] = 0.0f;
        bPants[ i ][ 0 ] = false;
        bPants[ i ][ 1 ] = false;
        bFuse[ i ] = false;
        bBatt[ i ] = false;
        bConv[ i ] = false;
        bComp[ i ][ 0 ] = false;
        bComp[ i ][ 1 ] = false;
        bHeat[ i ] = false;
    }
    for( int i = 0; i < 9; ++i )
		for (int j = 0; j < 10; ++j)
		{
			fEIMParams[i][j] = 0.0;
			fDieselParams[i][j] = 0.0;
		}

    for( int i = 0; i < 20; ++i )
        for( int j = 0; j < 3; ++j )
            fPress[ i ][ j ] = 0.0;
}

bool TTrain::Init(TDynamicObject *NewDynamicObject, bool e3d)
{ // powiązanie ręcznego sterowania kabiną z pojazdem
    if( NewDynamicObject->Mechanik == nullptr ) {
        ErrorLog( "Bad config: can't take control of inactive vehicle \"" + NewDynamicObject->asName + "\"" );
        return false;
    }

    DynamicSet(NewDynamicObject);
    if (!e3d)
        if (DynamicObject->Mechanik == NULL)
            return false;

    DynamicObject->MechInside = true;

    fMainRelayTimer = 0; // Hunter, do k...y nędzy, ustawiaj wartości początkowe zmiennych!

	if( false == LoadMMediaFile( DynamicObject->asBaseDir + DynamicObject->MoverParameters->TypeName + ".mmd" ) ) {
        return false;
	}

    iCabn = 0;
    // Ra: taka proteza - przesłanie kierunku do członów connected
    if (mvControlled->ActiveDir > 0)
    { // było do przodu
        mvControlled->DirectionBackward();
        mvControlled->DirectionForward();
    }
    else if (mvControlled->ActiveDir < 0)
    {
        mvControlled->DirectionForward();
        mvControlled->DirectionBackward();
    }
    return true;
}

dictionary_source *TTrain::GetTrainState() {

    auto const *mover = DynamicObject->MoverParameters;
    if( mover == nullptr ) { return nullptr; }

    auto *dict { new dictionary_source };
    if( dict == nullptr ) { return nullptr; }

    dict->insert( "name", DynamicObject->asName );
    dict->insert( "cab", mover->ActiveCab );
    // basic systems state data
    dict->insert( "battery", mvControlled->Battery );
    dict->insert( "linebreaker", mvControlled->Mains );
    dict->insert( "converter", mvControlled->ConverterFlag );
    dict->insert( "converter_overload", mvControlled->ConvOvldFlag );
    dict->insert( "compress", mvControlled->CompressorFlag );
    // reverser
    dict->insert( "direction", mover->ActiveDir );
    // throttle
    dict->insert( "mainctrl_pos", mvControlled->MainCtrlPos );
    dict->insert( "main_ctrl_actual_pos", mvControlled->MainCtrlActualPos );
    dict->insert( "scndctrl_pos", mvControlled->ScndCtrlPos );
    dict->insert( "scnd_ctrl_actual_pos", mvControlled->ScndCtrlActualPos );
	dict->insert( "new_speed", mover->NewSpeed);
    // brakes
    dict->insert( "manual_brake", ( mvOccupied->ManualBrakePos > 0 ) );
    bool const bEP = ( mvControlled->LocHandle->GetCP() > 0.2 ) || ( fEIMParams[ 0 ][ 2 ] > 0.01 );
    dict->insert( "dir_brake", bEP );
    bool bPN;
    if( ( typeid( *mvOccupied->Hamulec ) == typeid( TLSt ) )
     || ( typeid( *mvOccupied->Hamulec ) == typeid( TEStED ) ) ) {

        TBrake* temp_ham = mvOccupied->Hamulec.get();
        bPN = ( static_cast<TLSt*>( temp_ham )->GetEDBCP() > 0.2 );
    }
    else
        bPN = false;
    dict->insert( "indir_brake", bPN );
	dict->insert( "brake_delay_flag", mvOccupied->BrakeDelayFlag );
	dict->insert( "brake_op_mode_flag", mvOccupied->BrakeOpModeFlag );
    // other controls
    dict->insert( "ca", TestFlag( mvOccupied->SecuritySystem.Status, s_aware ) );
    dict->insert( "shp", TestFlag( mvOccupied->SecuritySystem.Status, s_active ) );
    dict->insert( "pantpress", std::abs( mvControlled->PantPress ) );
    dict->insert( "universal3", InstrumentLightActive );
    dict->insert( "radio_channel", iRadioChannel );
    dict->insert( "door_lock", mvOccupied->Doors.lock_enabled );
    // movement data
    dict->insert( "velocity", std::abs( mover->Vel ) );
    dict->insert( "tractionforce", std::abs( mover->Ft ) );
    dict->insert( "slipping_wheels", mover->SlippingWheels );
    dict->insert( "sanding", mover->SandDose );
    // electric current data
    dict->insert( "traction_voltage", std::abs( mvControlled->RunningTraction.TractionVoltage ) );
    dict->insert( "voltage", std::abs( mvControlled->Voltage ) );
    dict->insert( "im", std::abs(  mvControlled->Im ) );
    dict->insert( "fuse", mvControlled->FuseFlag );
    dict->insert( "epfuse", mvOccupied->EpFuse );
    // induction motor state data
    char const *TXTT[ 10 ] = { "fd", "fdt", "fdb", "pd", "pdt", "pdb", "itothv", "1", "2", "3" };
    char const *TXTC[ 10 ] = { "fr", "frt", "frb", "pr", "prt", "prb", "im", "vm", "ihv", "uhv" };
	char const *TXTD[ 10 ] = { "enrot", "nrot", "fill_des", "fill_real", "clutch_des", "clutch_real", "water_temp", "oil_press", "res1", "res2" };
    char const *TXTP[ 3 ] = { "bc", "bp", "sp" };
    for( int j = 0; j < 10; ++j )
        dict->insert( ( "eimp_t_" + std::string( TXTT[ j ] ) ), fEIMParams[ 0 ][ j ] );
    for( int i = 0; i < 8; ++i ) {
        for( int j = 0; j < 10; ++j )
            dict->insert( ( "eimp_c" + std::to_string( i + 1 ) + "_" + std::string( TXTC[ j ] ) ), fEIMParams[ i + 1 ][ j ] );

		for (int j = 0; j < 10; ++j)
			dict->insert(("diesel_param_" + std::to_string(i + 1) + "_" + std::string(TXTD[j])), fDieselParams[i + 1][j]);

        dict->insert( ( "eimp_c" + std::to_string( i + 1 ) + "_ms" ), bMains[ i ] );
        dict->insert( ( "eimp_c" + std::to_string( i + 1 ) + "_cv" ), fCntVol[ i ] );
        dict->insert( ( "eimp_u" + std::to_string( i + 1 ) + "_pf" ), bPants[ i ][ 0 ] );
        dict->insert( ( "eimp_u" + std::to_string( i + 1 ) + "_pr" ), bPants[ i ][ 1 ] );
        dict->insert( ( "eimp_c" + std::to_string( i + 1 ) + "_fuse" ), bFuse[ i ] );
        dict->insert( ( "eimp_c" + std::to_string( i + 1 ) + "_batt" ), bBatt[ i ] );
        dict->insert( ( "eimp_c" + std::to_string( i + 1 ) + "_conv" ), bConv[ i ] );
        dict->insert( ( "eimp_u" + std::to_string( i + 1 ) + "_comp_a" ), bComp[ i ][ 0 ] );
        dict->insert( ( "eimp_u" + std::to_string( i + 1 ) + "_comp_w" ), bComp[ i ][ 1 ] );
        dict->insert( ( "eimp_c" + std::to_string( i + 1 ) + "_heat" ), bHeat[ i ] );

    }
    for( int i = 0; i < 20; ++i ) {
        for( int j = 0; j < 3; ++j ) {
            dict->insert( ( "eimp_pn" + std::to_string( i + 1 ) + "_" + TXTP[ j ] ), fPress[ i ][ j ] );
        }
    }
    // multi-unit state data
    dict->insert( "car_no", iCarNo );
    dict->insert( "power_no", iPowerNo );
    dict->insert( "unit_no", iUnitNo );

    for( int i = 0; i < 20; i++ ) {
        auto const caridx { std::to_string( i + 1 ) };
        dict->insert( ( "doors_" + caridx ), bDoors[ i ][ 0 ] );
        dict->insert( ( "doors_l_" + caridx ), bDoors[ i ][ 1 ] );
        dict->insert( ( "doors_r_" + caridx ), bDoors[ i ][ 2 ] );
        dict->insert( ( "doorstep_l_" + caridx ), bDoors[ i ][ 3 ] );
        dict->insert( ( "doorstep_r_" + caridx ), bDoors[ i ][ 4 ] );
        dict->insert( ( "doors_no_" + caridx ), iDoorNo[ i ] );
        dict->insert( ( "code_" + caridx ), ( std::to_string( iUnits[ i ] ) + cCode[ i ] ) );
        dict->insert( ( "car_name" + caridx ), asCarName[ i ] );
        dict->insert( ( "slip_" + caridx ), bSlip[ i ] );
    }
    // ai state data
    auto const *driver = DynamicObject->Mechanik;

    dict->insert( "velocity_desired", driver->VelDesired );
    dict->insert( "velroad", driver->VelRoad );
    dict->insert( "vellimitlast", driver->VelLimitLast );
    dict->insert( "velsignallast", driver->VelSignalLast );
    dict->insert( "velsignalnext", driver->VelSignalNext );
    dict->insert( "velnext", driver->VelNext );
    dict->insert( "actualproximitydist", driver->ActualProximityDist );
    // train data
    driver->TrainTimetable()->serialize( dict );
    dict->insert( "train_stationstart", driver->iStationStart );
    dict->insert( "train_atpassengerstop", driver->IsAtPassengerStop );
    // world state data
    dict->insert( "scenario", Global.SceneryFile );
    dict->insert( "hours", static_cast<int>( simulation::Time.data().wHour ) );
    dict->insert( "minutes", static_cast<int>( simulation::Time.data().wMinute ) );
    dict->insert( "seconds", static_cast<int>( simulation::Time.second() ) );
    dict->insert( "air_temperature", Global.AirTemperature );
    dict->insert( "light_level", Global.fLuminance - std::max( 0.f, Global.Overcast - 1.f ) );

    return dict;
}

TTrain::state_t
TTrain::get_state() const {

    return {
        btLampkaSHP.GetValue(),
        btLampkaCzuwaka.GetValue(),
        btLampkaRadioStop.GetValue(),
        btLampkaOpory.GetValue(),
        btLampkaWylSzybki.GetValue(),
        btLampkaNadmSil.GetValue(),
        btLampkaStyczn.GetValue(),
        btLampkaPoslizg.GetValue(),
        btLampkaNadmPrzetw.GetValue(),
        btLampkaPrzetwOff.GetValue(),
        btLampkaNadmSpr.GetValue(),
        btLampkaNadmWent.GetValue(),
        btLampkaWysRozr.GetValue(),
        btLampkaOgrzewanieSkladu.GetValue(),
        btHaslerBrakes.GetValue(),
        btHaslerCurrent.GetValue(),
        ( TestFlag( mvOccupied->SecuritySystem.Status, s_CAalarm ) || TestFlag( mvOccupied->SecuritySystem.Status, s_SHPalarm ) ),
        btLampkaHVoltageB.GetValue(),
        fTachoVelocity,
        static_cast<float>( mvOccupied->Compressor ),
        static_cast<float>( mvOccupied->PipePress ),
        static_cast<float>( mvOccupied->BrakePress ),
        fHVoltage,
        { fHCurrent[ ( mvControlled->TrainType & dt_EZT ) ? 0 : 1 ], fHCurrent[ 2 ], fHCurrent[ 3 ] }
    };
}

bool TTrain::is_eztoer() const {

    return
        ( ( mvControlled->TrainType == dt_EZT )
       && ( mvOccupied->BrakeSubsystem == TBrakeSubSystem::ss_ESt )
       && ( mvControlled->Battery == true )
       && ( mvControlled->EpFuse == true )
       && ( mvControlled->ActiveDir != 0 ) ); // od yB
}

// mover master controller to specified position
void TTrain::set_master_controller( double const Position ) {

    auto positionchange {
        std::min<int>(
            Position,
            ( mvControlled->CoupledCtrl ?
                mvControlled->MainCtrlPosNo + mvControlled->ScndCtrlPosNo :
                mvControlled->MainCtrlPosNo ) )
        - ( mvControlled->CoupledCtrl ?
                mvControlled->MainCtrlPos + mvControlled->ScndCtrlPos :
                mvControlled->MainCtrlPos ) };
    while( ( positionchange < 0 )
        && ( true == mvControlled->DecMainCtrl( 1 ) ) ) {
        ++positionchange;
    }
    while( ( positionchange > 0 )
        && ( true == mvControlled->IncMainCtrl( 1 ) ) ) {
        --positionchange;
    }
}

// moves train brake lever to specified position, potentially emits switch sound if conditions are met
void TTrain::set_train_brake( double const Position ) {

    auto const originalbrakeposition { static_cast<int>( 100.0 * mvOccupied->fBrakeCtrlPos ) };

    mvOccupied->BrakeLevelSet( Position );

    if( static_cast<int>( 100.0 * mvOccupied->fBrakeCtrlPos ) == originalbrakeposition ) { return; }

    if( ( true == is_eztoer() )
     && ( false == (
            ( ( originalbrakeposition / 100 == 0 ) || ( originalbrakeposition / 100 >= 5 ) )
         && ( ( mvOccupied->BrakeCtrlPos == 0 ) || ( mvOccupied->BrakeCtrlPos >= 5 ) ) ) ) ) {
        // sound feedback if the lever movement activates one of the switches
        dsbPneumaticSwitch.play();
    }
}

void TTrain::zero_charging_train_brake() {

    if( ( mvOccupied->BrakeCtrlPos == -1 )
     && ( DynamicObject->Controller != AIdriver )
     && ( Global.iFeedbackMode < 3 )
     && ( ( mvOccupied->BrakeHandle == TBrakeHandle::FVel6 )
		 || (mvOccupied->BrakeHandle == TBrakeHandle::MHZ_EN57)
		 || (mvOccupied->BrakeHandle == TBrakeHandle::MHZ_K8P)) ) {
        // Odskakiwanie hamulce EP
        set_train_brake( 0 );
    }
}

void TTrain::set_train_brake_speed( TDynamicObject *Vehicle, int const Speed ) {

    if( true == Vehicle->MoverParameters->BrakeDelaySwitch( Speed ) ) {
        // visual feedback
        // TODO: add setting indicator to vehicle class, for external lever/indicator
        if( Vehicle == DynamicObject ) {
            if( ggBrakeProfileCtrl.SubModel != nullptr ) {
                ggBrakeProfileCtrl.UpdateValue(
                    ( ( mvOccupied->BrakeDelayFlag & bdelay_R ) != 0 ?
                        2.0 :
                        mvOccupied->BrakeDelayFlag - 1 ),
                    dsbSwitch );
            }
            if( ggBrakeProfileG.SubModel != nullptr ) {
                ggBrakeProfileG.UpdateValue(
                    ( mvOccupied->BrakeDelayFlag == bdelay_G ?
                        1.0 :
                        0.0 ),
                    dsbSwitch );
            }
            if( ggBrakeProfileR.SubModel != nullptr ) {
                ggBrakeProfileR.UpdateValue(
                    ( ( mvOccupied->BrakeDelayFlag & bdelay_R ) != 0 ?
                        1.0 :
                        0.0 ),
                    dsbSwitch );
            }
        }
    }
}

void TTrain::set_paired_open_motor_connectors_button( bool const State ) {

    if( ( mvControlled->TrainType == dt_ET41 )
     || ( mvControlled->TrainType == dt_ET42 ) ) {
        // crude implementation of the button affecting entire unit for multi-unit engines
        // TODO: rework it into part of standard command propagation system
        if( ( mvControlled->Couplers[ end::front ].Connected != nullptr )
         && ( true == TestFlag( mvControlled->Couplers[ end::front ].CouplingFlag, coupling::permanent ) ) ) {
            mvControlled->Couplers[ end::front ].Connected->StLinSwitchOff = State;
        }
        if( ( mvControlled->Couplers[ end::rear ].Connected != nullptr )
         && ( true == TestFlag( mvControlled->Couplers[ end::rear ].CouplingFlag, coupling::permanent ) ) ) {
            mvControlled->Couplers[ end::rear ].Connected->StLinSwitchOff = State;
        }
    }
}

// locates nearest vehicle belonging to the consist
TDynamicObject *
TTrain::find_nearest_consist_vehicle() const {

    if( false == FreeFlyModeFlag ) {
        return DynamicObject;
    }
    auto coupler { -2 }; // scan for vehicle, not any specific coupler
    auto *vehicle{ DynamicObject->ABuScanNearestObject( DynamicObject->GetTrack(), 1, 1500, coupler ) };
    if( vehicle == nullptr )
        vehicle = DynamicObject->ABuScanNearestObject( DynamicObject->GetTrack(), -1, 1500, coupler );
    // TBD, TODO: perform owner test for the located vehicle
    return vehicle;
}


// command handlers
void TTrain::OnCommand_aidriverenable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // on press
        if( Train->DynamicObject->Mechanik == nullptr ) { return; }

        if( true == Train->DynamicObject->Mechanik->AIControllFlag ) {
            //żeby nie trzeba było rozłączać dla zresetowania
            Train->DynamicObject->Mechanik->TakeControl( false );
        }
        Train->DynamicObject->Mechanik->TakeControl( true );
    }
}

void TTrain::OnCommand_aidriverdisable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // on press
        if( Train->DynamicObject->Mechanik )
            Train->DynamicObject->Mechanik->TakeControl( false );
    }
}

auto const EU07_CONTROLLER_BASERETURNDELAY { 0.5f };
auto const EU07_CONTROLLER_KEYBOARDETURNDELAY { 1.5f };

void TTrain::OnCommand_jointcontrollerset( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {
        // on press or hold
        // value controls brake in range 0-0.5, master controller in range 0.5-1.0
        if( Command.param1 >= 0.5 ) {
            Train->set_master_controller( 
                ( Command.param1 * 2 - 1 )
                * ( Train->mvControlled->CoupledCtrl ?
                        Train->mvControlled->MainCtrlPosNo + Train->mvControlled->ScndCtrlPosNo :
                        Train->mvControlled->MainCtrlPosNo ) );
            Train->m_mastercontrollerinuse = true;
            Train->mvOccupied->LocalBrakePosA = 0;
        }
        else {
            Train->mvOccupied->LocalBrakePosA = (
                clamp(
                    1.0 - ( Command.param1 * 2 ),
                    0.0, 1.0 ) );
            if( Train->mvControlled->MainCtrlPowerPos() > 0 ) {
                Train->set_master_controller( Train->mvControlled->MainCtrlNoPowerPos() );
            }
        }
    }
    else {
        // release
        Train->m_mastercontrollerinuse = false;
        Train->m_mastercontrollerreturndelay = EU07_CONTROLLER_BASERETURNDELAY; // NOTE: keyboard return delay is omitted for other input sources
    }
}

void TTrain::OnCommand_mastercontrollerincrease( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {
        // on press or hold
        if( ( Train->ggJointCtrl.SubModel != nullptr )
         && ( Train->mvOccupied->LocalBrakePosA > 0.0 ) ) {
            OnCommand_independentbrakedecrease( Train, Command );
        }
        else {
            Train->mvControlled->IncMainCtrl( 1 );
            Train->m_mastercontrollerinuse = true;
        }
    }
    else {
        // release
        Train->m_mastercontrollerinuse = false;
        Train->m_mastercontrollerreturndelay = EU07_CONTROLLER_KEYBOARDETURNDELAY + EU07_CONTROLLER_BASERETURNDELAY;
    }
}

void TTrain::OnCommand_mastercontrollerincreasefast( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {
        // on press or hold
        if( ( Train->ggJointCtrl.SubModel != nullptr )
         && ( Train->mvOccupied->LocalBrakePosA > 0.0 ) ) {
            OnCommand_independentbrakedecreasefast( Train, Command );
        }
        else {
            Train->mvControlled->IncMainCtrl( 2 );
            Train->m_mastercontrollerinuse = true;
        }
    }
    else {
        // release
        Train->m_mastercontrollerinuse = false;
        Train->m_mastercontrollerreturndelay = EU07_CONTROLLER_KEYBOARDETURNDELAY + EU07_CONTROLLER_BASERETURNDELAY;
    }
}

void TTrain::OnCommand_mastercontrollerdecrease( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {
        // on press or hold
        if( ( Train->ggJointCtrl.SubModel != nullptr )
         && ( Train->mvControlled->IsMainCtrlNoPowerPos() ) ) {
            OnCommand_independentbrakeincrease( Train, Command );
        }
        else {
            Train->mvControlled->DecMainCtrl( 1 );
            Train->m_mastercontrollerinuse = true;
        }
    }
    else {
        // release
        Train->m_mastercontrollerinuse = false;
        Train->m_mastercontrollerreturndelay = EU07_CONTROLLER_KEYBOARDETURNDELAY + EU07_CONTROLLER_BASERETURNDELAY;
    }
}

void TTrain::OnCommand_mastercontrollerdecreasefast( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {
        // on press or hold
        if( ( Train->ggJointCtrl.SubModel != nullptr )
         && ( Train->mvControlled->IsMainCtrlNoPowerPos() ) ) {
            OnCommand_independentbrakeincreasefast( Train, Command );
        }
        else {
            Train->mvControlled->DecMainCtrl( 2 );
            Train->m_mastercontrollerinuse = true;
        }
    }
    else {
        // release
        Train->m_mastercontrollerinuse = false;
        Train->m_mastercontrollerreturndelay = EU07_CONTROLLER_KEYBOARDETURNDELAY + EU07_CONTROLLER_BASERETURNDELAY;
    }
}

void TTrain::OnCommand_mastercontrollerset( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {
        // on press or hold
        Train->set_master_controller( Command.param1 );
        Train->m_mastercontrollerinuse = true;
    }
    else {
        // release
        Train->m_mastercontrollerinuse = false;
        Train->m_mastercontrollerreturndelay = EU07_CONTROLLER_BASERETURNDELAY; // NOTE: keyboard return delay is omitted for other input sources
    }
}

void TTrain::OnCommand_secondcontrollerincrease( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {
        // on press or hold
        if( ( Train->mvControlled->EngineType == TEngineType::DieselElectric )
         && ( true == Train->mvControlled->ShuntMode ) ) {
            Train->mvControlled->AnPos = clamp(
                Train->mvControlled->AnPos + 0.025,
                0.0, 1.0 );
        }
        else {
            Train->mvControlled->IncScndCtrl( 1 );
        }
    }
}

void TTrain::OnCommand_secondcontrollerincreasefast( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {
        // on press or hold
        if( ( Train->mvControlled->EngineType == TEngineType::DieselElectric )
         && ( true == Train->mvControlled->ShuntMode ) ) {
            Train->mvControlled->AnPos = 1.0;
        }
        else {
            Train->mvControlled->IncScndCtrl( 2 );
        }
    }
}

void TTrain::OnCommand_notchingrelaytoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( false == Train->mvOccupied->AutoRelayFlag ) {
            // turn on
            Train->mvOccupied->AutoRelaySwitch( true );
        }
        else {
            //turn off
            Train->mvOccupied->AutoRelaySwitch( false );
        }
    }
}

void TTrain::OnCommand_tempomattoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Train->ggScndCtrlButton.type() == TGaugeType::push ) {
        // impulse switch
        if( Command.action == GLFW_RELEASE ) {
            // just move the button back to default position
            // visual feedback
            Train->ggScndCtrlButton.UpdateValue( 0.0, Train->dsbSwitch );
            return;
        }
        // glfw_press
        if( Train->mvControlled->ScndCtrlPos == 0 ) {
            // turn on if needed
            Train->mvControlled->IncScndCtrl( 1 );
        }
        // visual feedback
        Train->ggScndCtrlButton.UpdateValue( 1.0, Train->dsbSwitch );
    }
    else {
        // two-state switch
        if( Command.action == GLFW_RELEASE ) { return; }

        if( Train->mvControlled->ScndCtrlPos == 0 ) {
            // turn on
            Train->mvControlled->IncScndCtrl( 1 );
            // visual feedback
            Train->ggScndCtrlButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            //turn off
            Train->mvControlled->DecScndCtrl( 2 );
            // visual feedback
            Train->ggScndCtrlButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_mucurrentindicatorothersourceactivate( TTrain *Train, command_data const &Command ) {

    if( Train->ggNextCurrentButton.SubModel == nullptr ) {
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Current Indicator Source switch is missing, or wasn't defined" );
        }
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // turn on
        Train->ShowNextCurrent = true;
        // visual feedback
        Train->ggNextCurrentButton.UpdateValue( 1.0, Train->dsbSwitch );
    }
    else if( Command.action == GLFW_RELEASE ) {
        //turn off
        Train->ShowNextCurrent = false;
        // visual feedback
        Train->ggNextCurrentButton.UpdateValue( 0.0, Train->dsbSwitch );
    }
}

void TTrain::OnCommand_secondcontrollerdecrease( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {
        // on press or hold
        if( ( Train->mvControlled->EngineType == TEngineType::DieselElectric )
         && ( true == Train->mvControlled->ShuntMode ) ) {
            Train->mvControlled->AnPos = clamp(
                Train->mvControlled->AnPos - 0.025,
                0.0, 1.0 );
        }
        else {
            Train->mvControlled->DecScndCtrl( 1 );
        }
    }
}

void TTrain::OnCommand_secondcontrollerdecreasefast( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {
        // on press or hold
        if( ( Train->mvControlled->EngineType == TEngineType::DieselElectric )
         && ( true == Train->mvControlled->ShuntMode ) ) {
            Train->mvControlled->AnPos = 0.0;
        }
        else {
            Train->mvControlled->DecScndCtrl( 2 );
        }
    }
}

void TTrain::OnCommand_secondcontrollerset( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {
        // on press or hold
        auto const targetposition{ std::min<int>( Command.param1, Train->mvControlled->ScndCtrlPosNo ) };
        while( ( targetposition < Train->mvControlled->ScndCtrlPos )
            && ( true == Train->mvControlled->DecScndCtrl( 1 ) ) ) {
            // all work is done in the header
            ;
        }
        while( ( targetposition > Train->mvControlled->ScndCtrlPos )
            && ( true == Train->mvControlled->IncScndCtrl( 1 ) ) ) {
            // all work is done in the header
            ;
        }
    }
}

void TTrain::OnCommand_independentbrakeincrease( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {

        if( Train->mvOccupied->LocalBrake != TLocalBrake::ManualBrake ) {
            Train->mvOccupied->IncLocalBrakeLevel( 1 );
        }
    }
}

void TTrain::OnCommand_independentbrakeincreasefast( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {

        if( Train->mvOccupied->LocalBrake != TLocalBrake::ManualBrake ) {
            Train->mvOccupied->IncLocalBrakeLevel( LocalBrakePosNo );
        }
    }
}

void TTrain::OnCommand_independentbrakedecrease( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {

        if( ( Train->mvOccupied->LocalBrake != TLocalBrake::ManualBrake )
            // Ra 1014-06: AI potrafi zahamować pomocniczym mimo jego braku - odhamować jakoś trzeba
            // TODO: sort AI out so it doesn't do things it doesn't have equipment for
         || ( Train->mvOccupied->LocalBrakePosA > 0 ) ) {
            Train->mvOccupied->DecLocalBrakeLevel( 1 );
        }
    }
}

void TTrain::OnCommand_independentbrakedecreasefast( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {

        if( ( Train->mvOccupied->LocalBrake != TLocalBrake::ManualBrake )
            // Ra 1014-06: AI potrafi zahamować pomocniczym mimo jego braku - odhamować jakoś trzeba
            // TODO: sort AI out so it doesn't do things it doesn't have equipment for
         || ( Train->mvOccupied->LocalBrakePosA > 0 ) ) {
            Train->mvOccupied->DecLocalBrakeLevel( LocalBrakePosNo );
        }
    }
}

void TTrain::OnCommand_independentbrakeset( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {

        Train->mvOccupied->LocalBrakePosA = (
            clamp(
                Command.param1,
                0.0, 1.0 ) );
    }
/*
    Train->mvControlled->LocalBrakePos = (
        std::round(
            interpolate<double>(
                0.0,
                LocalBrakePosNo,
                clamp(
                    Command.param1,
                    0.0, 1.0 ) ) ) );
*/
}

void TTrain::OnCommand_independentbrakebailoff( TTrain *Train, command_data const &Command ) {

    if( false == FreeFlyModeFlag ) {
        // TODO: check if this set of conditions can be simplified.
        // it'd be more flexible to have an attribute indicating whether bail off position is supported
        if( ( Train->mvControlled->TrainType != dt_EZT )
         && ( ( Train->mvControlled->EngineType == TEngineType::ElectricSeriesMotor )
           || ( Train->mvControlled->EngineType == TEngineType::DieselElectric )
           || ( Train->mvControlled->EngineType == TEngineType::ElectricInductionMotor ) )
         && ( Train->mvOccupied->BrakeCtrlPosNo > 0 ) ) {

            if( Command.action == GLFW_PRESS ) {
                // press or hold
                // visual feedback
                Train->ggReleaserButton.UpdateValue( 1.0, Train->dsbSwitch );

                Train->mvOccupied->BrakeReleaser( 1 );
            }
            else if( Command.action == GLFW_RELEASE ) {
                // release
                // visual feedback
                Train->ggReleaserButton.UpdateValue( 0.0, Train->dsbSwitch );

                Train->mvOccupied->BrakeReleaser( 0 );
            }
        }
    }
    else {
        // car brake handling, while in walk mode
        auto *vehicle { Train->find_nearest_consist_vehicle() };
        if( vehicle != nullptr ) {
            if( Command.action == GLFW_PRESS ) {
                // press or hold
                vehicle->MoverParameters->BrakeReleaser( 1 );
            }
            else if( Command.action == GLFW_RELEASE ) {
                // release
                vehicle->MoverParameters->BrakeReleaser( 0 );
            }
        }
    }
}

void TTrain::OnCommand_trainbrakeincrease( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {

        if( Train->mvOccupied->BrakeHandle == TBrakeHandle::FV4a ) {
            Train->mvOccupied->BrakeLevelAdd( 0.1 * Global.fBrakeStep );
        }
        else {
            Train->set_train_brake( Train->mvOccupied->BrakeCtrlPos + Global.fBrakeStep );
        }
    }
}

void TTrain::OnCommand_trainbrakedecrease( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {
        // press or hold
        if( Train->mvOccupied->BrakeHandle == TBrakeHandle::FV4a ) {
            Train->mvOccupied->BrakeLevelAdd( -0.1 * Global.fBrakeStep );
        }
        else {
            Train->set_train_brake( Train->mvOccupied->BrakeCtrlPos - Global.fBrakeStep );
        }
    }
    else {
        // release
        Train->zero_charging_train_brake();
    }
}

void TTrain::OnCommand_trainbrakeset( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {
        // press or hold
        Train->mvOccupied->BrakeLevelSet(
            interpolate(
                Train->mvOccupied->Handle->GetPos( bh_MIN ),
                Train->mvOccupied->Handle->GetPos( bh_MAX ),
                clamp(
                    Command.param1,
                    0.0, 1.0 ) ) );
    } else {
        // release
        Train->zero_charging_train_brake();
    }
}

void TTrain::OnCommand_trainbrakecharging( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {
        // press or hold
        Train->set_train_brake( -1 );
    }
    else {
        // release
        Train->zero_charging_train_brake();
    }
}

void TTrain::OnCommand_trainbrakerelease( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        Train->set_train_brake( 0 );
    }
}

void TTrain::OnCommand_trainbrakefirstservice( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        Train->set_train_brake( 1 );
    }
}

void TTrain::OnCommand_trainbrakeservice( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        Train->set_train_brake( (
            Train->mvOccupied->BrakeCtrlPosNo / 2
            + ( Train->mvOccupied->BrakeHandle == TBrakeHandle::FV4a ?
                1 :
                0 ) ) );
    }
}

void TTrain::OnCommand_trainbrakefullservice( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        Train->set_train_brake( Train->mvOccupied->BrakeCtrlPosNo - 1 );
    }
}

void TTrain::OnCommand_trainbrakehandleoff( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        Train->set_train_brake( Train->mvOccupied->Handle->GetPos( bh_NP ) );
    }
}

void TTrain::OnCommand_trainbrakeemergency( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        Train->set_train_brake( Train->mvOccupied->Handle->GetPos( bh_EB ) );
/*
        if( Train->mvOccupied->BrakeCtrlPosNo <= 0.1 ) {
            // hamulec bezpieczeństwa dla wagonów
            Train->mvOccupied->RadioStopFlag = true;
        }
*/
    }
}

void TTrain::OnCommand_trainbrakebasepressureincrease( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {

        switch( Train->mvOccupied->BrakeHandle ) {
            case TBrakeHandle::FV4a: {
                Train->mvOccupied->BrakeCtrlPos2 = clamp( Train->mvOccupied->BrakeCtrlPos2 - 0.01, -1.5, 2.0 );
                break;
            }
            default: {
                Train->mvOccupied->BrakeLevelAdd( 0.01 );
                break;
            }
        }
    }
}

void TTrain::OnCommand_trainbrakebasepressuredecrease( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {

        switch( Train->mvOccupied->BrakeHandle ) {
            case TBrakeHandle::FV4a: {
                Train->mvOccupied->BrakeCtrlPos2 = clamp( Train->mvOccupied->BrakeCtrlPos2 + 0.01, -1.5, 2.0 );
                break;
            }
            default: {
                Train->mvOccupied->BrakeLevelAdd( -0.01 );
                break;
            }
        }
    }
}

void TTrain::OnCommand_trainbrakebasepressurereset( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        Train->mvOccupied->BrakeCtrlPos2 = 0;
    }
}

void TTrain::OnCommand_trainbrakeoperationtoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        auto *vehicle { Train->find_nearest_consist_vehicle() };
        if( vehicle == nullptr ) { return; }

        vehicle->MoverParameters->Hamulec->SetBrakeStatus( vehicle->MoverParameters->Hamulec->GetBrakeStatus() ^ b_dmg );
    }
}

void TTrain::OnCommand_manualbrakeincrease( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {

        auto *vehicle { Train->find_nearest_consist_vehicle() };
        if( vehicle == nullptr ) { return; }

        if( ( vehicle->MoverParameters->LocalBrake == TLocalBrake::ManualBrake )
         || ( vehicle->MoverParameters->MBrake == true ) ) {

            vehicle->MoverParameters->IncManualBrakeLevel( 1 );
        }
    }
}

void TTrain::OnCommand_manualbrakedecrease( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_RELEASE ) {

        auto *vehicle { Train->find_nearest_consist_vehicle() };
        if( vehicle == nullptr ) { return; }

        if( ( vehicle->MoverParameters->LocalBrake == TLocalBrake::ManualBrake )
         || ( vehicle->MoverParameters->MBrake == true ) ) {

            vehicle->MoverParameters->DecManualBrakeLevel( 1 );
        }
    }
}

void TTrain::OnCommand_alarmchaintoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        if( false == Train->mvOccupied->AlarmChainFlag ) {
            // pull
            Train->mvOccupied->AlarmChainSwitch( true );
            // visual feedback
            Train->ggAlarmChain.UpdateValue( 1.0 );
        }
        else {
            // release
            Train->mvOccupied->AlarmChainSwitch( false );
            // visual feedback
            Train->ggAlarmChain.UpdateValue( 0.0 );
        }
    }
}

void TTrain::OnCommand_wheelspinbrakeactivate( TTrain *Train, command_data const &Command ) {

    // TODO: proper control deviced definition for the interiors, that doesn't hinge of presence of 3d submodels
    if( Train->ggAntiSlipButton.SubModel == nullptr ) {
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Wheelspin Brake button is missing, or wasn't defined" );
        }
        return;
    }

    if( Train->mvOccupied->BrakeSystem != TBrakeSystem::ElectroPneumatic ) {
        // standard behaviour
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggAntiSlipButton.UpdateValue( 1.0, Train->dsbSwitch );

            // NOTE: system activation is (repeatedly) done in the train update routine
        }
        else if( Command.action == GLFW_RELEASE ) {
            // visual feedback
            Train->ggAntiSlipButton.UpdateValue( 0.0 );
        }
    }
    else {
        // electro-pneumatic, custom case
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggAntiSlipButton.UpdateValue( 1.0, Train->dsbPneumaticSwitch );

            if( ( Train->mvOccupied->BrakeHandle == TBrakeHandle::St113 )
             && ( Train->mvControlled->EpFuse == true ) ) {
                Train->mvOccupied->SwitchEPBrake( 1 );
            }
        }
        else if( Command.action == GLFW_RELEASE ) {
            // visual feedback
            Train->ggAntiSlipButton.UpdateValue( 0.0 );

            Train->mvOccupied->SwitchEPBrake( 0 );
        }
    }
}

void TTrain::OnCommand_sandboxactivate( TTrain *Train, command_data const &Command ) {

    // TODO: proper control deviced definition for the interiors, that doesn't hinge of presence of 3d submodels
    if( Train->ggSandButton.SubModel == nullptr ) {
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Sandbox activation button is missing, or wasn't defined" );
        }
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggSandButton.UpdateValue( 1.0, Train->dsbSwitch );

        Train->mvControlled->Sandbox( true );
    }
    else if( Command.action == GLFW_RELEASE) {
        // visual feedback
        Train->ggSandButton.UpdateValue( 0.0 );

        Train->mvControlled->Sandbox( false );
    }
}

void TTrain::OnCommand_epbrakecontroltoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( false == Train->mvOccupied->EpFuse ) {
            // turn on
            if( Train->mvOccupied->EpFuseSwitch( true ) ) {
                // audio feedback
                Train->dsbPneumaticSwitch.play();
                // visual feedback
                // NOTE: there's no button for ep brake control switch
                // TBD, TODO: add ep brake control switch?
            }
        }
        else {
            //turn off
            if( Train->mvOccupied->EpFuseSwitch( false ) ) {
                // audio feedback
                Train->dsbPneumaticSwitch.play();
                // visual feedback
                // NOTE: there's no button for ep brake control switch
                // TBD, TODO: add ep brake control switch?
            }
        }
    }
}

void TTrain::OnCommand_trainbrakeoperationmodeincrease(TTrain *Train, command_data const &Command) {

	if (Command.action == GLFW_PRESS) {
		// only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( ( ( Train->mvOccupied->BrakeOpModeFlag << 1 ) & Train->mvOccupied->BrakeOpModes ) != 0 ) {
            // next mode
            Train->mvOccupied->BrakeOpModeFlag <<= 1;
			// visual feedback
            Train->ggBrakeOperationModeCtrl.UpdateValue(
                Train->mvOccupied->BrakeOpModeFlag > 0 ?
                    std::log2( Train->mvOccupied->BrakeOpModeFlag ) :
                    0 ); // audio fallback
        }
	}
}

void TTrain::OnCommand_trainbrakeoperationmodedecrease(TTrain *Train, command_data const &Command) {

	if (Command.action == GLFW_PRESS) {
		// only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( ( ( Train->mvOccupied->BrakeOpModeFlag >> 1 ) & Train->mvOccupied->BrakeOpModes ) != 0 ) {
			// previous mode
			Train->mvOccupied->BrakeOpModeFlag >>= 1;
			// visual feedback
            Train->ggBrakeOperationModeCtrl.UpdateValue(
                Train->mvOccupied->BrakeOpModeFlag > 0 ?
                    std::log2( Train->mvOccupied->BrakeOpModeFlag ) :
                    0 );
		}
	}
}

void TTrain::OnCommand_brakeactingspeedincrease( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        auto *vehicle { Train->find_nearest_consist_vehicle() };
        if( vehicle == nullptr ) { return; }

        if( ( vehicle->MoverParameters->BrakeDelayFlag & bdelay_M ) != 0 ) {
            // can't speed it up any more than this
            return;
        }
        auto const fasterbrakesetting = (
            vehicle->MoverParameters->BrakeDelayFlag < bdelay_R ?
                vehicle->MoverParameters->BrakeDelayFlag << 1 :
                vehicle->MoverParameters->BrakeDelayFlag | bdelay_M );

        Train->set_train_brake_speed( vehicle, fasterbrakesetting );
    }
}

void TTrain::OnCommand_brakeactingspeeddecrease( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        auto *vehicle { Train->find_nearest_consist_vehicle() };
        if( vehicle == nullptr ) { return; }

        if( vehicle->MoverParameters->BrakeDelayFlag == bdelay_G ) {
            // can't slow it down any more than this
            return;
        }
        auto const slowerbrakesetting = (
            vehicle->MoverParameters->BrakeDelayFlag < bdelay_M ?
                vehicle->MoverParameters->BrakeDelayFlag >> 1 :
                vehicle->MoverParameters->BrakeDelayFlag ^ bdelay_M );

        Train->set_train_brake_speed( vehicle, slowerbrakesetting );
    }
}

void TTrain::OnCommand_brakeactingspeedsetcargo( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        auto *vehicle { Train->find_nearest_consist_vehicle() };
        if( vehicle == nullptr ) { return; }

        Train->set_train_brake_speed( vehicle, bdelay_G );
    }
}

void TTrain::OnCommand_brakeactingspeedsetpassenger( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        auto *vehicle { Train->find_nearest_consist_vehicle() };
        if( vehicle == nullptr ) { return; }

        Train->set_train_brake_speed( vehicle, bdelay_P );
    }
}

void TTrain::OnCommand_brakeactingspeedsetrapid( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        auto *vehicle{ Train->find_nearest_consist_vehicle() };
        if( vehicle == nullptr ) { return; }

        Train->set_train_brake_speed( vehicle, bdelay_R );
    }
}

void TTrain::OnCommand_brakeloadcompensationincrease( TTrain *Train, command_data const &Command ) {

    if( ( true == FreeFlyModeFlag )
     && ( Command.action == GLFW_PRESS ) ) {
        auto *vehicle { Train->find_nearest_consist_vehicle() };
        if( vehicle != nullptr ) {
            vehicle->MoverParameters->IncBrakeMult();
        }
    }
}

void TTrain::OnCommand_brakeloadcompensationdecrease( TTrain *Train, command_data const &Command ) {

    if( ( true == FreeFlyModeFlag )
     && ( Command.action == GLFW_PRESS ) ) {
        auto *vehicle { Train->find_nearest_consist_vehicle() };
        if( vehicle != nullptr ) {
            vehicle->MoverParameters->DecBrakeMult();
        }
    }
}

void TTrain::OnCommand_mubrakingindicatortoggle( TTrain *Train, command_data const &Command ) {

    if( Train->ggSignallingButton.SubModel == nullptr ) {
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Braking Indicator switch is missing, or wasn't defined" );
        }
        return;
    }
    if( Train->mvControlled->TrainType != dt_EZT ) {
        //
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( false == Train->mvControlled->Signalling) {
            // turn on
            Train->mvControlled->Signalling = true;
            // visual feedback
            Train->ggSignallingButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            //turn off
            Train->mvControlled->Signalling = false;
            // visual feedback
            Train->ggSignallingButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_reverserincrease( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        if( Train->mvOccupied->DirectionForward() ) {
            // aktualizacja skrajnych pojazdów w składzie
            if( ( Train->mvOccupied->ActiveDir )
             && ( Train->DynamicObject->Mechanik ) ) {

                Train->DynamicObject->Mechanik->DirectionChange();
            }
        }
    }
}

void TTrain::OnCommand_reverserdecrease( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        if( Train->mvOccupied->DirectionBackward() ) {
            // aktualizacja skrajnych pojazdów w składzie
            if( ( Train->mvOccupied->ActiveDir )
             && ( Train->DynamicObject->Mechanik ) ) {

                Train->DynamicObject->Mechanik->DirectionChange();;
            }
        }
    }
}

void TTrain::OnCommand_reverserforwardhigh( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        OnCommand_reverserforward( Train, Command );
        OnCommand_reverserincrease( Train, Command );
    }
}

void TTrain::OnCommand_reverserforward( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // HACK: try to move the reverser one position back, in case it's set to "high forward"
        OnCommand_reverserdecrease( Train, Command );

        if( Train->mvOccupied->ActiveDir < 1 ) {

            while( ( Train->mvOccupied->ActiveDir < 1 )
                && ( true == Train->mvOccupied->DirectionForward() ) ) {
                // all work is done in the header
            }
            // aktualizacja skrajnych pojazdów w składzie
            if( ( Train->mvOccupied->ActiveDir == 1 )
             && ( Train->DynamicObject->Mechanik ) ) {

                Train->DynamicObject->Mechanik->DirectionChange();
            }
        }
    }
}

void TTrain::OnCommand_reverserneutral( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        while( ( Train->mvOccupied->ActiveDir < 0 )
            && ( true == Train->mvOccupied->DirectionForward() ) ) {
            // all work is done in the header
        }
        while( ( Train->mvOccupied->ActiveDir > 0 )
            && ( true == Train->mvOccupied->DirectionBackward() ) ) {
            // all work is done in the header
        }
    }
}

void TTrain::OnCommand_reverserbackward( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        if( Train->mvOccupied->ActiveDir > -1 ) {

            while( ( Train->mvOccupied->ActiveDir > -1 )
                && ( true == Train->mvOccupied->DirectionBackward() ) ) {
                // all work is done in the header
            }
            // aktualizacja skrajnych pojazdów w składzie
            if( ( Train->mvOccupied->ActiveDir == -1 )
             && ( Train->DynamicObject->Mechanik ) ) {

                Train->DynamicObject->Mechanik->DirectionChange();
            }
        }
    }
}

void TTrain::OnCommand_alerteracknowledge( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggSecurityResetButton.UpdateValue( 1.0, Train->dsbSwitch );
        if( Train->CAflag == false ) {
            Train->CAflag = true;
            Train->mvOccupied->SecuritySystemReset();
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // visual feedback
        Train->ggSecurityResetButton.UpdateValue( 0.0 );

        Train->fCzuwakTestTimer = 0.0f;
        if( TestFlag( Train->mvOccupied->SecuritySystem.Status, s_CAtest ) ) {
            SetFlag( Train->mvOccupied->SecuritySystem.Status, -s_CAtest );
            Train->mvOccupied->s_CAtestebrake = false;
            Train->mvOccupied->SecuritySystem.SystemBrakeCATestTimer = 0.0;
        }
        Train->CAflag = false;
    }
}

// TODO: replace battery with a two-state device, update switch code accordingly
void TTrain::OnCommand_batterytoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_REPEAT ) {
        // keep the switch from flipping back and forth if key is held down
        if( false == Train->mvOccupied->Battery ) {
            // turn on
            OnCommand_batteryenable( Train, Command );
        }
        else {
            //turn off
            OnCommand_batterydisable( Train, Command );
        }
    }
}

void TTrain::OnCommand_batteryenable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggBatteryButton.UpdateValue( 1.0, Train->dsbSwitch );

        if( true == Train->mvOccupied->Battery ) { return; } // already on

        if( Train->mvOccupied->BatterySwitch( true ) ) {
            // side-effects
            if( Train->mvOccupied->LightsPosNo > 0 ) {
                Train->SetLights();
            }
            if( TestFlag( Train->mvOccupied->SecuritySystem.SystemType, 2 ) ) {
                // Ra: znowu w kabinie jest coś, co być nie powinno!
                SetFlag( Train->mvOccupied->SecuritySystem.Status, s_active );
                SetFlag( Train->mvOccupied->SecuritySystem.Status, s_SHPalarm );
            }
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        if( Train->ggBatteryButton.type() == TGaugeType::push ) {
            // return the switch to neutral position
            Train->ggBatteryButton.UpdateValue( 0.5f );
        }
    }
}

void TTrain::OnCommand_batterydisable( TTrain *Train, command_data const &Command ) {
    // TBD, TODO: ewentualnie zablokować z FIZ, np. w samochodach się nie odłącza akumulatora
    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggBatteryButton.UpdateValue( 0.0, Train->dsbSwitch );

        if( false == Train->mvOccupied->Battery ) { return; } // already off

        if( Train->mvOccupied->BatterySwitch( false ) ) {
            // side-effects
            if( false == Train->mvControlled->ConverterFlag ) {
                // if there's no (low voltage) power source left, drop pantographs
                Train->mvControlled->PantFront( false );
                Train->mvControlled->PantRear( false );
            }
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        if( Train->ggBatteryButton.type() == TGaugeType::push ) {
            // return the switch to neutral position
            Train->ggBatteryButton.UpdateValue( 0.5f );
        }
    }
}

void TTrain::OnCommand_pantographtogglefront( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( false == Train->mvControlled->PantFrontUp ) {
            // turn on...
            OnCommand_pantographraisefront( Train, Command );
        }
        else {
            // ...or turn off
            OnCommand_pantographlowerfront( Train, Command );
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // impulse switches return automatically to neutral position
        // NOTE: this routine is used also by dedicated raise and lower commands
        if( Train->mvOccupied->PantSwitchType == "impulse" ) {
            if( Train->ggPantFrontButton.SubModel )
                Train->ggPantFrontButton.UpdateValue( 0.0, Train->dsbSwitch );
            // NOTE: currently we animate the selectable pantograph control based on standard key presses
            // TODO: implement actual selection control, and refactor handling this control setup in a separate method
            if( Train->ggPantSelectedButton.SubModel )
                Train->ggPantSelectedButton.UpdateValue( 0.0, Train->dsbSwitch );
            // also the switch off button, in cabs which have it
            if( Train->ggPantFrontButtonOff.SubModel )
                Train->ggPantFrontButtonOff.UpdateValue( 0.0, Train->dsbSwitch );
            if( Train->ggPantSelectedDownButton.SubModel ) {
                // NOTE: currently we animate the selectable pantograph control based on standard key presses
                // TODO: implement actual selection control, and refactor handling this control setup in a separate method
                Train->ggPantSelectedDownButton.UpdateValue( 0.0, Train->dsbSwitch );
            }
        }
    }
}

void TTrain::OnCommand_pantographtogglerear( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( false == Train->mvControlled->PantRearUp ) {
            // turn on...
            OnCommand_pantographraiserear( Train, Command );
        }
        else {
            // ...or turn off
            OnCommand_pantographlowerrear( Train, Command );
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // impulse switches return automatically to neutral position
        // NOTE: this routine is used also by dedicated raise and lower commands
        if( Train->mvOccupied->PantSwitchType == "impulse" ) {
            if( Train->ggPantRearButton.SubModel )
                Train->ggPantRearButton.UpdateValue( 0.0, Train->dsbSwitch );
            // NOTE: currently we animate the selectable pantograph control based on standard key presses
            // TODO: implement actual selection control, and refactor handling this control setup in a separate method
            if( Train->ggPantSelectedButton.SubModel )
                Train->ggPantSelectedButton.UpdateValue( 0.0, Train->dsbSwitch );
            // also the switch off button, in cabs which have it
            if( Train->ggPantRearButtonOff.SubModel )
                Train->ggPantRearButtonOff.UpdateValue( 0.0, Train->dsbSwitch );
            if( Train->ggPantSelectedDownButton.SubModel ) {
                // NOTE: currently we animate the selectable pantograph control based on standard key presses
                // TODO: implement actual selection control, and refactor handling this control setup in a separate method
                Train->ggPantSelectedDownButton.UpdateValue( 0.0, Train->dsbSwitch );
            }
        }
    }
}

void TTrain::OnCommand_pantographraisefront( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        // visual feedback
        if( Train->ggPantFrontButton.SubModel )
            Train->ggPantFrontButton.UpdateValue( 1.0, Train->dsbSwitch );
        // NOTE: currently we animate the selectable pantograph control based on standard key presses
        // TODO: implement actual selection control, and refactor handling this control setup in a separate method
        if( Train->ggPantSelectedButton.SubModel )
            Train->ggPantSelectedButton.UpdateValue( 1.0, Train->dsbSwitch );
        // pantograph control can have two-button setup
        if( Train->ggPantFrontButtonOff.SubModel )
            Train->ggPantFrontButtonOff.UpdateValue( 0.0, Train->dsbSwitch );
        // NOTE: currently we animate the selectable pantograph control based on standard key presses
        // TODO: implement actual selection control, and refactor handling this control setup in a separate method
        if( Train->ggPantSelectedDownButton.SubModel )
            Train->ggPantSelectedDownButton.UpdateValue( 0.0, Train->dsbSwitch );

        if( true == Train->mvControlled->PantFrontUp ) { return; } // already up

        // TBD, TODO: impulse switch should only work when the power is on?
        if( Train->mvControlled->PantFront( true ) ) {
            Train->mvControlled->PantFrontSP = false;
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // visual feedback
        // NOTE: bit of a hax here, we're reusing button reset routine so we don't need a copy in every branch
        OnCommand_pantographtogglefront( Train, Command );
    }
}

void TTrain::OnCommand_pantographraiserear( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        // visual feedback
        if( Train->ggPantRearButton.SubModel )
            Train->ggPantRearButton.UpdateValue( 1.0, Train->dsbSwitch );
        // NOTE: currently we animate the selectable pantograph control based on standard key presses
        // TODO: implement actual selection control, and refactor handling this control setup in a separate method
        if( Train->ggPantSelectedButton.SubModel )
            Train->ggPantSelectedButton.UpdateValue( 1.0, Train->dsbSwitch );
        // pantograph control can have two-button setup
        if( Train->ggPantRearButtonOff.SubModel )
            Train->ggPantRearButtonOff.UpdateValue( 0.0, Train->dsbSwitch );
        // NOTE: currently we animate the selectable pantograph control based on standard key presses
        // TODO: implement actual selection control, and refactor handling this control setup in a separate method
        if( Train->ggPantSelectedDownButton.SubModel )
            Train->ggPantSelectedDownButton.UpdateValue( 0.0, Train->dsbSwitch );

        if( true == Train->mvControlled->PantRearUp ) { return; } // already up

        // TBD, TODO: impulse switch should only work when the power is on?
        if( Train->mvControlled->PantRear( true ) ) {
            Train->mvControlled->PantRearSP = false;
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // visual feedback
        // NOTE: bit of a hax here, we're reusing button reset routine so we don't need a copy in every branch
        OnCommand_pantographtogglerear( Train, Command );
    }
}

void TTrain::OnCommand_pantographlowerfront( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        if( Train->mvOccupied->PantSwitchType == "impulse" ) {
            if( ( Train->ggPantFrontButtonOff.SubModel == nullptr )
             && ( Train->ggPantSelectedDownButton.SubModel == nullptr ) ) {
                // with impulse buttons we expect a dedicated switch to lower the pantograph, and if the cabin lacks it
                // then another control has to be used (like pantographlowerall)
                // TODO: we should have a way to define presence of cab controls without having to bind these to 3d submodels
                return;
            }
        }

        // visual feedback
        if( Train->ggPantFrontButton.SubModel )
            Train->ggPantFrontButton.UpdateValue( 0.0, Train->dsbSwitch );
        // NOTE: currently we animate the selectable pantograph control based on standard key presses
        // TODO: implement actual selection control, and refactor handling this control setup in a separate method
        if( Train->ggPantSelectedButton.SubModel )
            Train->ggPantSelectedButton.UpdateValue( 0.0, Train->dsbSwitch );
        // pantograph control can have two-button setup
        if( Train->ggPantFrontButtonOff.SubModel )
            Train->ggPantFrontButtonOff.UpdateValue( 1.0, Train->dsbSwitch );
        // NOTE: currently we animate the selectable pantograph control based on standard key presses
        // TODO: implement actual selection control, and refactor handling this control setup in a separate method
        if( Train->ggPantSelectedDownButton.SubModel )
            Train->ggPantSelectedDownButton.UpdateValue( 1.0, Train->dsbSwitch );

        if( false == Train->mvControlled->PantFrontUp ) { return; } // already down

        // TBD, TODO: impulse switch should only work when the power is on?
        if( Train->mvControlled->PantFront( false ) ) {
            Train->mvControlled->PantFrontSP = false;
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // visual feedback
        // NOTE: bit of a hax here, we're reusing button reset routine so we don't need a copy in every branch
        OnCommand_pantographtogglefront( Train, Command );
    }
}

void TTrain::OnCommand_pantographlowerrear( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        if( Train->mvOccupied->PantSwitchType == "impulse" ) {
            if( ( Train->ggPantRearButtonOff.SubModel == nullptr )
             && ( Train->ggPantSelectedDownButton.SubModel == nullptr ) ) {
                // with impulse buttons we expect a dedicated switch to lower the pantograph, and if the cabin lacks it
                // then another control has to be used (like pantographlowerall)
                // TODO: we should have a way to define presence of cab controls without having to bind these to 3d submodels
                return;
            }
        }

        // visual feedback
        if( Train->ggPantRearButton.SubModel )
            Train->ggPantRearButton.UpdateValue( 0.0, Train->dsbSwitch );
        // NOTE: currently we animate the selectable pantograph control based on standard key presses
        // TODO: implement actual selection control, and refactor handling this control setup in a separate method
        if( Train->ggPantSelectedButton.SubModel )
            Train->ggPantSelectedButton.UpdateValue( 0.0, Train->dsbSwitch );
        // pantograph control can have two-button setup
        if( Train->ggPantRearButtonOff.SubModel )
            Train->ggPantRearButtonOff.UpdateValue( 1.0, Train->dsbSwitch );
        // NOTE: currently we animate the selectable pantograph control based on standard key presses
        // TODO: implement actual selection control, and refactor handling this control setup in a separate method
        if( Train->ggPantSelectedDownButton.SubModel )
            Train->ggPantSelectedDownButton.UpdateValue( 1.0, Train->dsbSwitch );

        if( false == Train->mvControlled->PantRearUp ) { return; } // already down

        // TBD, TODO: impulse switch should only work when the power is on?
        if( Train->mvControlled->PantRear( false ) ) {
            Train->mvControlled->PantRearSP = false;
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // visual feedback
        // NOTE: bit of a hax here, we're reusing button reset routine so we don't need a copy in every branch
        OnCommand_pantographtogglerear( Train, Command );
    }
}

void TTrain::OnCommand_pantographlowerall( TTrain *Train, command_data const &Command ) {

    if( ( Train->ggPantAllDownButton.SubModel == nullptr )
     && ( Train->ggPantSelectedDownButton.SubModel == nullptr ) ) {
        // TODO: expand definition of cab controls so we can know if the control is present without testing for presence of 3d switch
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Lower All Pantographs switch is missing, or wasn't defined" );
        }
        return;
    }
    if( Command.action == GLFW_PRESS ) {
        // press the button
        // since we're just lowering all potential pantographs we don't need to test for state and effect
        // front...
        Train->mvControlled->PantFrontSP = false;
        Train->mvControlled->PantFront( false );
        // ...and rear
        Train->mvControlled->PantRearSP = false;
        Train->mvControlled->PantRear( false );
        // visual feedback
        if( Train->ggPantAllDownButton.SubModel )
            Train->ggPantAllDownButton.UpdateValue( 1.0, Train->dsbSwitch );
        if( Train->ggPantSelectedDownButton.SubModel ) {
            Train->ggPantSelectedDownButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // release the button
        // visual feedback
        if( Train->ggPantAllDownButton.SubModel )
            Train->ggPantAllDownButton.UpdateValue( 0.0 );
        if( Train->ggPantSelectedDownButton.SubModel ) {
            Train->ggPantSelectedDownButton.UpdateValue( 0.0 );
        }
    }
}

void TTrain::OnCommand_pantographcompressorvalvetoggle( TTrain *Train, command_data const &Command ) {

    if( ( Train->mvControlled->TrainType == dt_EZT ?
        ( Train->mvControlled != Train->mvOccupied ) :
        ( Train->mvOccupied->ActiveCab != 0 ) ) ) {
        // tylko w maszynowym
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only react to press
        if( Train->mvControlled->bPantKurek3 == false ) {
            // connect pantographs with primary tank
            Train->mvControlled->bPantKurek3 = true;
            // visual feedback:
            Train->ggPantCompressorValve.UpdateValue( 0.0 );
        }
        else {
            // connect pantograps with pantograph compressor
            Train->mvControlled->bPantKurek3 = false;
            // visual feedback:
            Train->ggPantCompressorValve.UpdateValue( 1.0 );
        }
    }
}

void TTrain::OnCommand_pantographcompressoractivate( TTrain *Train, command_data const &Command ) {

    if( ( Train->mvControlled->TrainType == dt_EZT ?
            ( Train->mvControlled != Train->mvOccupied ) :
            ( Train->mvOccupied->ActiveCab != 0 ) ) ) {
        // tylko w maszynowym
        return;
    }

    if( ( Train->mvControlled->PantPress > 4.8 )
     || ( false == Train->mvControlled->Battery ) ) {
        // needs live power source and low enough pressure to work
        return;
    }

    if( Command.action != GLFW_RELEASE ) {
        // press or hold to activate
        Train->mvControlled->PantCompFlag = true;
        // visual feedback:
        Train->ggPantCompressorButton.UpdateValue( 1.0 );
    }
    else {
        // release to disable
        Train->mvControlled->PantCompFlag = false;
        // visual feedback:
        Train->ggPantCompressorButton.UpdateValue( 0.0 );
    }
}

void TTrain::OnCommand_linebreakertoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // press or hold...
        if( Train->m_linebreakerstate == 0 ) {
            // ...to close the circuit
            // NOTE: bit of a dirty shortcut here
            OnCommand_linebreakerclose( Train, Command );
        }
        else if( Train->m_linebreakerstate == 1 ) {
            // ...to open the circuit
            OnCommand_linebreakeropen( Train, Command );
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // release...
        if( ( Train->ggMainOnButton.SubModel != nullptr )
         || ( Train->mvControlled->TrainType == dt_EZT ) ) {
            // only impulse switches react to release events; since we don't have switch type definition for the line breaker,
            // we detect it from presence of relevant button, or presume such switch arrangement for EMUs
            if( Train->m_linebreakerstate == 0 ) {
                // ...after opening circuit, or holding for too short time to close it
                OnCommand_linebreakeropen( Train, Command );
            }
            else {
                // ...after closing the circuit
                // NOTE: bit of a dirty shortcut here
                OnCommand_linebreakerclose( Train, Command );
            }
        }
    }
}

void TTrain::OnCommand_linebreakeropen( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        if( Train->ggMainOffButton.SubModel != nullptr ) {
            // two separate switches to close and break the circuit
            Train->ggMainOffButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else if( Train->ggMainButton.SubModel != nullptr ) {
            // single two-state switch
            // NOTE: we don't have switch type definition for the line breaker switch
            // so for the time being we have hard coded "impulse" switches for all EMUs
            // TODO: have proper switch type config for all switches, and put it in the cab switch descriptions, not in the .fiz
            if( Train->mvControlled->TrainType == dt_EZT ) {
                Train->ggMainButton.UpdateValue( 1.0, Train->dsbSwitch );
            }
            else {
                Train->ggMainButton.UpdateValue( 0.0, Train->dsbSwitch );
            }
        }
        else {
            // fallback for cabs with no submodel
            Train->ggMainButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
        // play sound immediately when the switch is hit, not after release
        Train->fMainRelayTimer = 0.0f;

        if( Train->m_linebreakerstate == 0 ) { return; } // already in the desired state
        // NOTE: we don't have switch type definition for the line breaker switch
        // so for the time being we have hard coded "impulse" switches for all EMUs
        // TODO: have proper switch type config for all switches, and put it in the cab switch descriptions, not in the .fiz
        if( Train->mvControlled->TrainType == dt_EZT ) {
            // a single impulse switch can't open the circuit, only close it
            return;
        }

        if( true == Train->mvControlled->MainSwitch( false ) ) {
            Train->m_linebreakerstate = 0;
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // visual feedback
        // we don't exactly know which of the two buttons was used, so reset both
        // for setup with two separate swiches
        if( Train->ggMainOnButton.SubModel != nullptr ) {
            Train->ggMainOnButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
        if( Train->ggMainOffButton.SubModel != nullptr ) {
            Train->ggMainOffButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
        // and the two-state switch too, for good measure
        if( Train->ggMainButton.SubModel != nullptr ) {
            Train->ggMainButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_linebreakerclose( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        if( Train->ggMainOnButton.SubModel != nullptr ) {
            // two separate switches to close and break the circuit
            Train->ggMainOnButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else if( Train->ggMainButton.SubModel != nullptr ) {
            // single two-state switch
            Train->ggMainButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            // fallback for cabs with no submodel
            Train->ggMainButton.UpdateValue( 1.0, Train->dsbSwitch );
        }

        // the actual closing of the line breaker is handled in the train update routine
    }
    else if( Command.action == GLFW_RELEASE ) {
        // visual feedback
        if( Train->ggMainOnButton.SubModel != nullptr ) {
            // setup with two separate switches
            Train->ggMainOnButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
        // NOTE: we don't have switch type definition for the line breaker switch
        // so for the time being we have hard coded "impulse" switches for all EMUs
        // TODO: have proper switch type config for all switches, and put it in the cab switch descriptions, not in the .fiz
        if( Train->mvControlled->TrainType == dt_EZT ) {
            if( Train->ggMainButton.SubModel != nullptr ) {
                Train->ggMainButton.UpdateValue( 0.0, Train->dsbSwitch );
            }
        }

        if( Train->m_linebreakerstate == 1 ) { return; } // already in the desired state

        if( Train->m_linebreakerstate == 2 ) {
            // we don't need to start the diesel twice, but the other types (with impulse switch setup) still need to be launched
            if( ( Train->mvControlled->EngineType != TEngineType::DieselEngine )
             && ( Train->mvControlled->EngineType != TEngineType::DieselElectric ) ) {
                // try to finalize state change of the line breaker, set the state based on the outcome
                Train->m_linebreakerstate = (
                    Train->mvControlled->MainSwitch( true ) ?
                        1 :
                        0 );
            }
        }
        // on button release reset the closing timer
        Train->fMainRelayTimer = 0.0f;
    }
}

void TTrain::OnCommand_fuelpumptoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Train->ggFuelPumpButton.type() == TGaugeType::push ) {
        // impulse switch
        // currently there's no off button so we always try to turn it on
        OnCommand_fuelpumpenable( Train, Command );
    }
    else {
        // two-state switch
        if( Command.action == GLFW_RELEASE ) { return; }

        if( false == Train->mvControlled->FuelPump.is_enabled ) {
            // turn on
            OnCommand_fuelpumpenable( Train, Command );
        }
        else {
            //turn off
            OnCommand_fuelpumpdisable( Train, Command );
        }
    }
}

void TTrain::OnCommand_fuelpumpenable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Train->ggFuelPumpButton.type() == TGaugeType::push ) {
        // impulse switch
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggFuelPumpButton.UpdateValue( 1.0, Train->dsbSwitch );
            Train->mvControlled->FuelPumpSwitch( true );
        }
        else if( Command.action == GLFW_RELEASE ) {
            // visual feedback
            Train->ggFuelPumpButton.UpdateValue( 0.0, Train->dsbSwitch );
            Train->mvControlled->FuelPumpSwitch( false );
        }
    }
    else {
        // two-state switch, only cares about press events
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggFuelPumpButton.UpdateValue( 1.0, Train->dsbSwitch );
            Train->mvControlled->FuelPumpSwitch( true );
            Train->mvControlled->FuelPumpSwitchOff( false );
        }
    }
}

void TTrain::OnCommand_fuelpumpdisable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Train->ggFuelPumpButton.type() == TGaugeType::push ) {
        // impulse switch
        // currently there's no disable return type switch
        return;
    }
    else {
        // two-state switch, only cares about press events
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggFuelPumpButton.UpdateValue( 0.0, Train->dsbSwitch );
            Train->mvControlled->FuelPumpSwitch( false );
            Train->mvControlled->FuelPumpSwitchOff( true );
        }
    }
}

void TTrain::OnCommand_oilpumptoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Train->ggOilPumpButton.type() == TGaugeType::push ) {
        // impulse switch
        // currently there's no off button so we always try to turn it on
        OnCommand_oilpumpenable( Train, Command );
    }
    else {
        // two-state switch
        if( Command.action == GLFW_RELEASE ) { return; }

        if( false == Train->mvControlled->OilPump.is_enabled ) {
            // turn on
            OnCommand_oilpumpenable( Train, Command );
        }
        else {
            //turn off
            OnCommand_oilpumpdisable( Train, Command );
        }
    }
}

void TTrain::OnCommand_oilpumpenable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Train->ggOilPumpButton.type() == TGaugeType::push ) {
        // impulse switch
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggOilPumpButton.UpdateValue( 1.0, Train->dsbSwitch );
            Train->mvControlled->OilPumpSwitch( true );
        }
        else if( Command.action == GLFW_RELEASE ) {
            // visual feedback
            Train->ggOilPumpButton.UpdateValue( 0.0, Train->dsbSwitch );
            Train->mvControlled->OilPumpSwitch( false );
        }
    }
    else {
        // two-state switch, only cares about press events
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggOilPumpButton.UpdateValue( 1.0, Train->dsbSwitch );
            Train->mvControlled->OilPumpSwitch( true );
            Train->mvControlled->OilPumpSwitchOff( false );
        }
    }
}

void TTrain::OnCommand_oilpumpdisable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Train->ggOilPumpButton.type() == TGaugeType::push ) {
        // impulse switch
        // currently there's no disable return type switch
        return;
    }
    else {
        // two-state switch, only cares about press events
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggOilPumpButton.UpdateValue( 0.0, Train->dsbSwitch );
            Train->mvControlled->OilPumpSwitch( false );
            Train->mvControlled->OilPumpSwitchOff( true );
        }
    }
}

void TTrain::OnCommand_waterheaterbreakertoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( false == Train->mvControlled->WaterHeater.breaker ) {
            // turn on
            OnCommand_waterheaterbreakerclose( Train, Command );
        }
        else {
            //turn off
            OnCommand_waterheaterbreakeropen( Train, Command );
        }
    }
}

void TTrain::OnCommand_waterheaterbreakerclose( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggWaterHeaterBreakerButton.UpdateValue( 1.0, Train->dsbSwitch );

        if( true == Train->mvControlled->WaterHeater.breaker ) { return; } // already enabled

        Train->mvControlled->WaterHeaterBreakerSwitch( true );
    }
}

void TTrain::OnCommand_waterheaterbreakeropen( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggWaterHeaterBreakerButton.UpdateValue( 0.0, Train->dsbSwitch );

        if( false == Train->mvControlled->WaterHeater.breaker ) { return; } // already enabled

        Train->mvControlled->WaterHeaterBreakerSwitch( false );
    }
}

void TTrain::OnCommand_waterheatertoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( false == Train->mvControlled->WaterHeater.is_enabled ) {
            // turn on
            OnCommand_waterheaterenable( Train, Command );
        }
        else {
            //turn off
            OnCommand_waterheaterdisable( Train, Command );
        }
    }
}

void TTrain::OnCommand_waterheaterenable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggWaterHeaterButton.UpdateValue( 1.0, Train->dsbSwitch );

        if( true == Train->mvControlled->WaterHeater.is_enabled ) { return; } // already enabled

        Train->mvControlled->WaterHeaterSwitch( true );
    }
}

void TTrain::OnCommand_waterheaterdisable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggWaterHeaterButton.UpdateValue( 0.0, Train->dsbSwitch );

        if( false == Train->mvControlled->WaterHeater.is_enabled ) { return; } // already disabled

        Train->mvControlled->WaterHeaterSwitch( false );
    }
}

void TTrain::OnCommand_waterpumpbreakertoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( false == Train->mvControlled->WaterPump.breaker ) {
            // turn on
            OnCommand_waterpumpbreakerclose( Train, Command );
        }
        else {
            //turn off
            OnCommand_waterpumpbreakeropen( Train, Command );
        }
    }
}

void TTrain::OnCommand_waterpumpbreakerclose( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggWaterPumpBreakerButton.UpdateValue( 1.0, Train->dsbSwitch );

        if( true == Train->mvControlled->WaterPump.breaker ) { return; } // already enabled

        Train->mvControlled->WaterPumpBreakerSwitch( true );
    }
}

void TTrain::OnCommand_waterpumpbreakeropen( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggWaterPumpBreakerButton.UpdateValue( 0.0, Train->dsbSwitch );

        if( false == Train->mvControlled->WaterPump.breaker ) { return; } // already enabled

        Train->mvControlled->WaterPumpBreakerSwitch( false );
    }
}

void TTrain::OnCommand_waterpumptoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Train->ggWaterPumpButton.type() == TGaugeType::push ) {
        // impulse switch
        // currently there's no off button so we always try to turn it on
        OnCommand_waterpumpenable( Train, Command );
    }
    else {
        // two-state switch
        if( Command.action == GLFW_RELEASE ) { return; }

        if( false == Train->mvControlled->WaterPump.is_enabled ) {
            // turn on
            OnCommand_waterpumpenable( Train, Command );
        }
        else {
            //turn off
            OnCommand_waterpumpdisable( Train, Command );
        }
    }
}

void TTrain::OnCommand_waterpumpenable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Train->ggWaterPumpButton.type() == TGaugeType::push ) {
        // impulse switch
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggWaterPumpButton.UpdateValue( 1.0, Train->dsbSwitch );
            Train->mvControlled->WaterPumpSwitch( true );
        }
        else if( Command.action == GLFW_RELEASE ) {
            // visual feedback
            Train->ggWaterPumpButton.UpdateValue( 0.0, Train->dsbSwitch );
            Train->mvControlled->WaterPumpSwitch( false );
        }
    }
    else {
        // two-state switch, only cares about press events
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggWaterPumpButton.UpdateValue( 1.0, Train->dsbSwitch );
            Train->mvControlled->WaterPumpSwitch( true );
            Train->mvControlled->WaterPumpSwitchOff( false );
        }
    }
}

void TTrain::OnCommand_waterpumpdisable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Train->ggWaterPumpButton.type() == TGaugeType::push ) {
        // impulse switch
        // currently there's no disable return type switch
        return;
    }
    else {
        // two-state switch, only cares about press events
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggWaterPumpButton.UpdateValue( 0.0, Train->dsbSwitch );
            Train->mvControlled->WaterPumpSwitch( false );
            Train->mvControlled->WaterPumpSwitchOff( true );
        }
    }
}

void TTrain::OnCommand_watercircuitslinktoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( false == Train->mvControlled->WaterCircuitsLink ) {
            // turn on
            OnCommand_watercircuitslinkenable( Train, Command );
        }
        else {
            //turn off
            OnCommand_watercircuitslinkdisable( Train, Command );
        }
    }
}

void TTrain::OnCommand_watercircuitslinkenable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggWaterCircuitsLinkButton.UpdateValue( 1.0, Train->dsbSwitch );

        if( true == Train->mvControlled->WaterCircuitsLink ) { return; } // already enabled

        Train->mvControlled->WaterCircuitsLinkSwitch( true );
    }
}

void TTrain::OnCommand_watercircuitslinkdisable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggWaterCircuitsLinkButton.UpdateValue( 0.0, Train->dsbSwitch );

        if( false == Train->mvControlled->WaterCircuitsLink ) { return; } // already disabled

        Train->mvControlled->WaterCircuitsLinkSwitch( false );
    }
}

void TTrain::OnCommand_convertertoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( ( false == Train->mvControlled->ConverterAllow )
         && ( Train->ggConverterButton.GetValue() < 0.5 ) ) {
            // turn on
            OnCommand_converterenable( Train, Command );
        }
        else {
            //turn off
            OnCommand_converterdisable( Train, Command );
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // on button release...
        if( Train->mvOccupied->ConvSwitchType == "impulse" ) {
            // ...return switches to start position if applicable
            Train->ggConverterButton.UpdateValue( 0.0, Train->dsbSwitch );
            Train->ggConverterOffButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_converterenable( TTrain *Train, command_data const &Command ) {

    if( Train->mvControlled->ConverterStart == start_t::automatic ) {
        // let the automatic thing do its automatic thing...
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggConverterButton.UpdateValue( 1.0, Train->dsbSwitch );

        if( true == Train->mvControlled->ConverterAllow ) { return; } // already enabled

        // impulse type switch has no effect if there's no power
        // NOTE: this is most likely setup wrong, but the whole thing is smoke and mirrors anyway
        if( ( Train->mvOccupied->ConvSwitchType != "impulse" )
         || ( Train->mvControlled->Mains ) ) {
               // won't start if the line breaker button is still held
            if( true == Train->mvControlled->ConverterSwitch( true ) ) {
                // side effects
                // control the compressor, if it's paired with the converter
                if( Train->mvControlled->CompressorPower == 2 ) {
                    // hunter-091012: tak jest poprawnie
                    Train->mvControlled->CompressorSwitch( true );
                }
            }
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // potentially reset impulse switch position, using shared code branch
        OnCommand_convertertoggle( Train, Command );
    }
}

void TTrain::OnCommand_converterdisable( TTrain *Train, command_data const &Command ) {

    if( Train->mvControlled->ConverterStart == start_t::automatic ) {
        // let the automatic thing do its automatic thing...
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggConverterButton.UpdateValue( 0.0, Train->dsbSwitch );
        if( Train->ggConverterOffButton.SubModel != nullptr ) {
            Train->ggConverterOffButton.UpdateValue( 1.0, Train->dsbSwitch );
        }

        if( false == Train->mvControlled->ConverterAllow ) { return; } // already disabled

        if( true == Train->mvControlled->ConverterSwitch( false ) ) {
            // side effects
            // control the compressor, if it's paired with the converter
            if( Train->mvControlled->CompressorPower == 2 ) {
                // hunter-091012: tak jest poprawnie
                Train->mvControlled->CompressorSwitch( false );
            }
            if( ( Train->mvControlled->TrainType == dt_EZT )
             && ( false == TestFlag( Train->mvControlled->EngDmgFlag, 4 ) ) ) {
                Train->mvControlled->ConvOvldFlag = false;
            }
            // if there's no (low voltage) power source left, drop pantographs
            if( false == Train->mvControlled->Battery ) {
                Train->mvControlled->PantFront( false );
                Train->mvControlled->PantRear( false );
            }
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // potentially reset impulse switch position, using shared code branch
        OnCommand_convertertoggle( Train, Command );
    }
}

void TTrain::OnCommand_convertertogglelocal( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->ConverterStart == start_t::automatic ) {
        // let the automatic thing do its automatic thing...
        return;
    }
    if( Train->ggConverterLocalButton.SubModel == nullptr ) {
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( ( false == Train->mvOccupied->ConverterAllowLocal )
         && ( Train->ggConverterLocalButton.GetValue() < 0.5 ) ) {
            // turn on
            // visual feedback
            Train->ggConverterLocalButton.UpdateValue( 1.0, Train->dsbSwitch );
            // effect
            Train->mvOccupied->ConverterAllowLocal = true;
/*
            if( true == Train->mvControlled->ConverterSwitch( true, range::local ) ) {
                // side effects
                // control the compressor, if it's paired with the converter
                if( Train->mvControlled->CompressorPower == 2 ) {
                    // hunter-091012: tak jest poprawnie
                    Train->mvControlled->CompressorSwitch( true, range::local );
                }
            }
*/
        }
        else {
            //turn off
            // visual feedback
            Train->ggConverterLocalButton.UpdateValue( 0.0, Train->dsbSwitch );
            // effect
            Train->mvOccupied->ConverterAllowLocal = false;
/*
            if( true == Train->mvControlled->ConverterSwitch( false, range::local ) ) {
                // side effects
                // control the compressor, if it's paired with the converter
                if( Train->mvControlled->CompressorPower == 2 ) {
                    // hunter-091012: tak jest poprawnie
                    Train->mvControlled->CompressorSwitch( false, range::local );
                }
                // if there's no (low voltage) power source left, drop pantographs
                if( false == Train->mvControlled->Battery ) {
                    Train->mvControlled->PantFront( false, range::local );
                    Train->mvControlled->PantRear( false, range::local );
                }
            }
*/
        }
    }
}

void TTrain::OnCommand_converteroverloadrelayreset( TTrain *Train, command_data const &Command ) {

    if( Train->ggConverterFuseButton.SubModel == nullptr ) {
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Converter Overload Relay Reset button is missing, or wasn't defined" );
        }
//        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggConverterFuseButton.UpdateValue( 1.0, Train->dsbSwitch );

        if( ( Train->mvControlled->Mains == false )
         && ( Train->ggConverterButton.GetValue() < 0.05 )
         && ( Train->mvControlled->TrainType != dt_EZT ) ) {
            Train->mvControlled->ConvOvldFlag = false;
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // visual feedback
        Train->ggConverterFuseButton.UpdateValue( 0.0, Train->dsbSwitch );
    }
}

void TTrain::OnCommand_compressortoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( false == Train->mvControlled->CompressorAllow ) {
            // turn on
            OnCommand_compressorenable( Train, Command );
        }
        else {
            //turn off
            OnCommand_compressordisable( Train, Command );
        }
    }
/*
    // disabled because we don't have yet support for compressor switch type definition
    else if( Command.action == GLFW_RELEASE ) {
        // on button release...
        if( Train->mvOccupied->CompSwitchType == "impulse" ) {
            // ...return switches to start position if applicable
            Train->ggCompressorButton.UpdateValue( 0.0, Train->dsbSwitch );
            Train->ggCompressorOffButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
*/
}

void TTrain::OnCommand_compressorenable( TTrain *Train, command_data const &Command ) {

    if( Train->mvControlled->CompressorPower >= 2 ) {
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggCompressorButton.UpdateValue( 1.0, Train->dsbSwitch );

        if( true == Train->mvControlled->CompressorAllow ) { return; } // already enabled

        // impulse type switch has no effect if there's no power
        // NOTE: this is most likely setup wrong, but the whole thing is smoke and mirrors anyway
//        if( ( Train->mvOccupied->CompSwitchType != "impulse" )
//         || ( Train->mvControlled->Mains ) ) {

            Train->mvControlled->CompressorSwitch( true );
//        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // potentially reset impulse switch position, using shared code branch
        OnCommand_compressortoggle( Train, Command );
    }

}

void TTrain::OnCommand_compressordisable( TTrain *Train, command_data const &Command ) {

    if( Train->mvControlled->CompressorPower >= 2 ) {
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggCompressorButton.UpdateValue( 0.0, Train->dsbSwitch );
/*
        if( Train->ggCompressorOffButton.SubModel != nullptr ) {
            Train->ggCompressorOffButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
*/
        if( false == Train->mvControlled->CompressorAllow ) { return; } // already disabled

        Train->mvControlled->CompressorSwitch( false );
    }
    else if( Command.action == GLFW_RELEASE ) {
        // potentially reset impulse switch position, using shared code branch
        OnCommand_compressortoggle( Train, Command );
    }
}

void TTrain::OnCommand_compressortogglelocal( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->CompressorPower >= 2 ) {
        return;
    }
    if( Train->ggCompressorLocalButton.SubModel == nullptr ) {
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( false == Train->mvOccupied->CompressorAllowLocal ) {
            // turn on
            // visual feedback
            Train->ggCompressorLocalButton.UpdateValue( 1.0, Train->dsbSwitch );
            // effect
            Train->mvOccupied->CompressorAllowLocal = true;
        }
        else {
            // turn off
            // visual feedback
            Train->ggCompressorLocalButton.UpdateValue( 0.0, Train->dsbSwitch );
            // effect
            Train->mvOccupied->CompressorAllowLocal = false;
        }
    }
}

void TTrain::OnCommand_motorblowerstogglefront( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Train->ggMotorBlowersFrontButton.type() == TGaugeType::push ) {
        // impulse switch
        // currently there's no off button so we always try to turn it on
        OnCommand_motorblowersenablefront( Train, Command );
    }
    else {
        // two-state switch
        if( Command.action == GLFW_RELEASE ) { return; }

        if( false == Train->mvControlled->MotorBlowers[end::front].is_enabled ) {
            // turn on
            OnCommand_motorblowersenablefront( Train, Command );
        }
        else {
            //turn off
            OnCommand_motorblowersdisablefront( Train, Command );
        }
    }
}

void TTrain::OnCommand_motorblowersenablefront( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Train->ggMotorBlowersFrontButton.type() == TGaugeType::push ) {
        // impulse switch
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggMotorBlowersFrontButton.UpdateValue( 1.f, Train->dsbSwitch );
            Train->mvControlled->MotorBlowersSwitch( true, end::front );
        }
        else if( Command.action == GLFW_RELEASE ) {
            // visual feedback
            Train->ggMotorBlowersFrontButton.UpdateValue( 0.f, Train->dsbSwitch );
            Train->mvControlled->MotorBlowersSwitch( false, end::front );
        }
    }
    else {
        // two-state switch, only cares about press events
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggMotorBlowersFrontButton.UpdateValue( 1.f, Train->dsbSwitch );
            Train->mvControlled->MotorBlowersSwitch( true, end::front );
            Train->mvControlled->MotorBlowersSwitchOff( false, end::front );
        }
    }
}

void TTrain::OnCommand_motorblowersdisablefront( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Train->ggMotorBlowersFrontButton.type() == TGaugeType::push ) {
        // impulse switch
        // currently there's no disable return type switch
        return;
    }
    else {
        // two-state switch, only cares about press events
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggMotorBlowersFrontButton.UpdateValue( 0.f, Train->dsbSwitch );
            Train->mvControlled->MotorBlowersSwitch( false, end::front );
            Train->mvControlled->MotorBlowersSwitchOff( true, end::front );
        }
    }
}

void TTrain::OnCommand_motorblowerstogglerear( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Train->ggMotorBlowersRearButton.type() == TGaugeType::push ) {
        // impulse switch
        // currently there's no off button so we always try to turn it on
        OnCommand_motorblowersenablerear( Train, Command );
    }
    else {
        // two-state switch
        if( Command.action == GLFW_RELEASE ) { return; }

        if( false == Train->mvControlled->MotorBlowers[ end::rear ].is_enabled ) {
            // turn on
            OnCommand_motorblowersenablerear( Train, Command );
        }
        else {
            //turn off
            OnCommand_motorblowersdisablerear( Train, Command );
        }
    }
}

void TTrain::OnCommand_motorblowersenablerear( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Train->ggMotorBlowersRearButton.type() == TGaugeType::push ) {
        // impulse switch
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggMotorBlowersRearButton.UpdateValue( 1.f, Train->dsbSwitch );
            Train->mvControlled->MotorBlowersSwitch( true, end::rear );
        }
        else if( Command.action == GLFW_RELEASE ) {
            // visual feedback
            Train->ggMotorBlowersRearButton.UpdateValue( 0.f, Train->dsbSwitch );
            Train->mvControlled->MotorBlowersSwitch( false, end::rear );
        }
    }
    else {
        // two-state switch, only cares about press events
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggMotorBlowersRearButton.UpdateValue( 1.f, Train->dsbSwitch );
            Train->mvControlled->MotorBlowersSwitch( true, end::rear );
            Train->mvControlled->MotorBlowersSwitchOff( false, end::rear );
        }
    }
}

void TTrain::OnCommand_motorblowersdisablerear( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Train->ggMotorBlowersRearButton.type() == TGaugeType::push ) {
        // impulse switch
        // currently there's no disable return type switch
        return;
    }
    else {
        // two-state switch, only cares about press events
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggMotorBlowersRearButton.UpdateValue( 0.f, Train->dsbSwitch );
            Train->mvControlled->MotorBlowersSwitch( false, end::rear );
            Train->mvControlled->MotorBlowersSwitchOff( true, end::rear );
        }
    }
}

void TTrain::OnCommand_motorblowersdisableall( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Train->ggMotorBlowersAllOffButton.type() == TGaugeType::push ) {
        // impulse switch
        if( Command.action == GLFW_PRESS ) {
            // visual feedback
            Train->ggMotorBlowersAllOffButton.UpdateValue( 1.f, Train->dsbSwitch );
            Train->mvControlled->MotorBlowersSwitchOff( true, end::front );
            Train->mvControlled->MotorBlowersSwitchOff( true, end::rear );
        }
        else if( Command.action == GLFW_RELEASE ) {
            // visual feedback
            Train->ggMotorBlowersAllOffButton.UpdateValue( 0.f, Train->dsbSwitch );
            Train->mvControlled->MotorBlowersSwitchOff( false, end::front );
            Train->mvControlled->MotorBlowersSwitchOff( false, end::rear );
        }
    }
    else {
        // two-state switch, only cares about press events
        // NOTE: generally this switch doesn't come in two-state form
        if( Command.action == GLFW_PRESS ) {
            if( Train->ggMotorBlowersAllOffButton.GetDesiredValue() < 0.5f ) {
                // switch is off, activate
                Train->mvControlled->MotorBlowersSwitchOff( true, end::front );
                Train->mvControlled->MotorBlowersSwitchOff( true, end::rear );
                // visual feedback
                Train->ggMotorBlowersRearButton.UpdateValue( 1.f, Train->dsbSwitch );
            }
            else {
                // deactivate
                Train->mvControlled->MotorBlowersSwitchOff( false, end::front );
                Train->mvControlled->MotorBlowersSwitchOff( false, end::rear );
                // visual feedback
                Train->ggMotorBlowersRearButton.UpdateValue( 0.f, Train->dsbSwitch );
            }
        }
    }
}

void TTrain::OnCommand_coolingfanstoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action != GLFW_PRESS ) { return; }

    Train->mvControlled->RVentForceOn = ( !Train->mvControlled->RVentForceOn );
}

void TTrain::OnCommand_motorconnectorsopen( TTrain *Train, command_data const &Command ) {

    // TODO: don't rely on presense of 3d model to determine presence of the switch
    if( Train->ggStLinOffButton.SubModel == nullptr ) {
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Open Motor Power Connectors button is missing, or wasn't defined" );
        }
        return;
    }
    // HACK: because we don't have modeled actual circuits this is a simplification of the real mechanics
    // namely, pressing the button will flip it in the entire unit, which isn't exactly physically possible
    if( Command.action == GLFW_PRESS ) {
        // button works while it's held down but we can ignore repeats
        if( false == Train->mvControlled->StLinSwitchOff ) {
            // open the connectors
            // visual feedback
            Train->ggStLinOffButton.UpdateValue( 1.0, Train->dsbSwitch );

            Train->mvControlled->StLinSwitchOff = true;
            Train->set_paired_open_motor_connectors_button( true );
        }
        else {
            // potentially close the connectors
            OnCommand_motorconnectorsclose( Train, Command );
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // button released
        if( Train->mvControlled->StLinSwitchType != "toggle" ) {
            // default button type (impulse) ceases its work on button release
            // visual feedback
            Train->ggStLinOffButton.UpdateValue( 0.0, Train->dsbSwitch );

            Train->mvControlled->StLinSwitchOff = false;
            Train->set_paired_open_motor_connectors_button( false );
        }
    }
}

void TTrain::OnCommand_motorconnectorsclose( TTrain *Train, command_data const &Command ) {

    // TODO: don't rely on presense of 3d model to determine presence of the switch
    if( Train->ggStLinOffButton.SubModel == nullptr ) {
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Open Motor Power Connectors button is missing, or wasn't defined" );
        }
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        if( Train->mvControlled->StLinSwitchType == "toggle" ) {
            // default type of button (impulse) has only one effect on press, but the toggle type can toggle the state
            // visual feedback
            Train->ggStLinOffButton.UpdateValue( 0.0, Train->dsbSwitch );
        }

        if( false == Train->mvControlled->StLinSwitchOff ) { return; } // already closed

        Train->mvControlled->StLinSwitchOff = false;
        Train->set_paired_open_motor_connectors_button( false );
    }
}

void TTrain::OnCommand_motordisconnect( TTrain *Train, command_data const &Command ) {

    if( ( Train->mvControlled->TrainType == dt_EZT ?
            ( Train->mvControlled != Train->mvOccupied ) :
            ( Train->mvOccupied->ActiveCab != 0 ) ) ) {
        // tylko w maszynowym
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        Train->mvControlled->CutOffEngine();
    }
}

void TTrain::OnCommand_motoroverloadrelaythresholdtoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( ( true == Train->mvControlled->ShuntModeAllow ?
                ( false == Train->mvControlled->ShuntMode ) :
                ( Train->mvControlled->Imax < Train->mvControlled->ImaxHi ) ) ) {
            // turn on
            OnCommand_motoroverloadrelaythresholdsethigh( Train, Command );
        }
        else {
            //turn off
            OnCommand_motoroverloadrelaythresholdsetlow( Train, Command );
        }
    }
}

void TTrain::OnCommand_motoroverloadrelaythresholdsetlow( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( true == Train->mvControlled->CurrentSwitch( false ) ) {
            // visual feedback
            Train->ggMaxCurrentCtrl.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_motoroverloadrelaythresholdsethigh( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( true == Train->mvControlled->CurrentSwitch( true ) ) {
            // visual feedback
            Train->ggMaxCurrentCtrl.UpdateValue( 1.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_motoroverloadrelayreset( TTrain *Train, command_data const &Command ) {

    if( Train->ggFuseButton.SubModel == nullptr ) {
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Motor Overload Relay Reset button is missing, or wasn't defined" );
        }
//        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // visual feedback
        Train->ggFuseButton.UpdateValue( 1.0, Train->dsbSwitch );

        Train->mvControlled->FuseOn();
    }
    else if( Command.action == GLFW_RELEASE ) {
        // visual feedback
        Train->ggFuseButton.UpdateValue( 0.0, Train->dsbSwitch );
    }
}

void TTrain::OnCommand_lightspresetactivatenext( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->LightsPosNo == 0 ) {
        // lights are controlled by preset selector
        return;
    }
    if( Command.action != GLFW_PRESS ) {
        // one change per key press
        return;
    }

    if( ( Train->mvOccupied->LightsPos < Train->mvOccupied->LightsPosNo )
     || ( true == Train->mvOccupied->LightsWrap ) ) {
        // active light preset is stored as value in range 1-LigthPosNo
        Train->mvOccupied->LightsPos = (
            Train->mvOccupied->LightsPos < Train->mvOccupied->LightsPosNo ?
                Train->mvOccupied->LightsPos + 1 :
                1 ); // wrap mode

        Train->SetLights();
        // visual feedback
        if( Train->ggLightsButton.SubModel != nullptr ) {
            Train->ggLightsButton.UpdateValue( Train->mvOccupied->LightsPos - 1, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_lightspresetactivateprevious( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->LightsPosNo == 0 ) {
        // lights are controlled by preset selector
        return;
    }
    if( Command.action != GLFW_PRESS ) {
        // one change per key press
        return;
    }

    if( ( Train->mvOccupied->LightsPos > 1 )
     || ( true == Train->mvOccupied->LightsWrap ) ) {
        // active light preset is stored as value in range 1-LigthPosNo
        Train->mvOccupied->LightsPos = (
            Train->mvOccupied->LightsPos > 1 ?
                Train->mvOccupied->LightsPos - 1 :
                Train->mvOccupied->LightsPosNo ); // wrap mode

        Train->SetLights();
        // visual feedback
        if( Train->ggLightsButton.SubModel != nullptr ) {
            Train->ggLightsButton.UpdateValue( Train->mvOccupied->LightsPos - 1, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_headlighttoggleleft( TTrain *Train, command_data const &Command ) {

    int const vehicleside =
        ( Train->mvOccupied->ActiveCab == 1 ?
            end::front :
            end::rear );

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::headlight_left ) == 0 ) {
            // turn on
            OnCommand_headlightenableleft( Train, Command );
        }
        else {
            //turn off
            OnCommand_headlightdisableleft( Train, Command );
        }
    }
}

void TTrain::OnCommand_headlightenableleft( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->LightsPosNo > 0 ) {
        // lights are controlled by preset selector
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        int const vehicleside =
            ( Train->mvOccupied->ActiveCab == 1 ?
                end::front :
                end::rear );

        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::headlight_left ) != 0 ) { return; } // already enabled

        Train->DynamicObject->iLights[ vehicleside ] ^= light::headlight_left;
        // visual feedback
        Train->ggLeftLightButton.UpdateValue( 1.0, Train->dsbSwitch );
        // if the light is controlled by 3-way switch, disable marker light
        if( Train->ggLeftEndLightButton.SubModel == nullptr ) {
            Train->DynamicObject->iLights[ vehicleside ] &= ~light::redmarker_left;
        }
    }
}

void TTrain::OnCommand_headlightdisableleft( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->LightsPosNo > 0 ) {
        // lights are controlled by preset selector
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        int const vehicleside =
            ( Train->mvOccupied->ActiveCab == 1 ?
                end::front :
                end::rear );

        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::headlight_left ) == 0 ) { return; } // already disabled

        Train->DynamicObject->iLights[ vehicleside ] ^= light::headlight_left;
        // visual feedback
        Train->ggLeftLightButton.UpdateValue( 0.0, Train->dsbSwitch );
    }
}

void TTrain::OnCommand_headlighttoggleright( TTrain *Train, command_data const &Command ) {

    int const vehicleside =
        ( Train->mvOccupied->ActiveCab == 1 ?
            end::front :
            end::rear );

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::headlight_right ) == 0 ) {
            // turn on
            OnCommand_headlightenableright( Train, Command );
        }
        else {
            //turn off
            OnCommand_headlightdisableright( Train, Command );
        }
    }
}

void TTrain::OnCommand_headlightenableright( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->LightsPosNo > 0 ) {
        // lights are controlled by preset selector
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        int const vehicleside =
            ( Train->mvOccupied->ActiveCab == 1 ?
                end::front :
                end::rear );

        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::headlight_right ) != 0 ) { return; } // already enabled

        Train->DynamicObject->iLights[ vehicleside ] ^= light::headlight_right;
        // visual feedback
        Train->ggRightLightButton.UpdateValue( 1.0, Train->dsbSwitch );
        // if the light is controlled by 3-way switch, disable marker light
        if( Train->ggRightEndLightButton.SubModel == nullptr ) {
            Train->DynamicObject->iLights[ vehicleside ] &= ~light::redmarker_right;
        }
    }
}

void TTrain::OnCommand_headlightdisableright( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->LightsPosNo > 0 ) {
        // lights are controlled by preset selector
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        int const vehicleside =
            ( Train->mvOccupied->ActiveCab == 1 ?
                end::front :
                end::rear );

        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::headlight_right ) == 0 ) { return; } // already disabled

        Train->DynamicObject->iLights[ vehicleside ] ^= light::headlight_right;
        // visual feedback
        Train->ggRightLightButton.UpdateValue( 0.0, Train->dsbSwitch );
    }
}

void TTrain::OnCommand_headlighttoggleupper( TTrain *Train, command_data const &Command ) {

    int const vehicleside =
        ( Train->mvOccupied->ActiveCab == 1 ?
            end::front :
            end::rear );

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::headlight_upper ) == 0 ) {
            // turn on
            OnCommand_headlightenableupper( Train, Command );
        }
        else {
            //turn off
            OnCommand_headlightdisableupper( Train, Command );
        }
    }
}

void TTrain::OnCommand_headlightenableupper( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->LightsPosNo > 0 ) {
        // lights are controlled by preset selector
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        int const vehicleside =
            ( Train->mvOccupied->ActiveCab == 1 ?
                end::front :
                end::rear );

        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::headlight_upper ) != 0 ) { return; } // already enabled

        Train->DynamicObject->iLights[ vehicleside ] ^= light::headlight_upper;
        // visual feedback
        Train->ggUpperLightButton.UpdateValue( 1.0, Train->dsbSwitch );
    }
}

void TTrain::OnCommand_headlightdisableupper( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->LightsPosNo > 0 ) {
        // lights are controlled by preset selector
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        int const vehicleside =
            ( Train->mvOccupied->ActiveCab == 1 ?
                end::front :
                end::rear );

        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::headlight_upper ) == 0 ) { return; } // already disabled

        Train->DynamicObject->iLights[ vehicleside ] ^= light::headlight_upper;
        // visual feedback
        Train->ggUpperLightButton.UpdateValue( 0.0, Train->dsbSwitch );
    }
}

void TTrain::OnCommand_redmarkertoggleleft( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        int const vehicleside =
            ( Train->mvOccupied->ActiveCab == 1 ?
                end::front :
                end::rear );

        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::redmarker_left ) == 0 ) {
            // turn on
            OnCommand_redmarkerenableleft( Train, Command );
        }
        else {
            //turn off
            OnCommand_redmarkerdisableleft( Train, Command );
        }
    }
}

void TTrain::OnCommand_redmarkerenableleft( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->LightsPosNo > 0 ) {
        // lights are controlled by preset selector
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        int const vehicleside =
            ( Train->mvOccupied->ActiveCab == 1 ?
                end::front :
                end::rear );

        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::redmarker_left ) != 0 ) { return; } // already enabled

        Train->DynamicObject->iLights[ vehicleside ] ^= light::redmarker_left;
        // visual feedback
        if( Train->ggLeftEndLightButton.SubModel != nullptr ) {
            Train->ggLeftEndLightButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            // we interpret lack of dedicated switch as a sign the light is controlled with 3-way switch
            // this is crude, but for now will do
            Train->ggLeftLightButton.UpdateValue( -1.0, Train->dsbSwitch );
            // if the light is controlled by 3-way switch, disable the headlight
            Train->DynamicObject->iLights[ vehicleside ] &= ~light::headlight_left;
        }
    }
}

void TTrain::OnCommand_redmarkerdisableleft( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->LightsPosNo > 0 ) {
        // lights are controlled by preset selector
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        int const vehicleside =
            ( Train->mvOccupied->ActiveCab == 1 ?
                end::front :
                end::rear );

        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::redmarker_left ) == 0 ) { return; } // already disabled

        Train->DynamicObject->iLights[ vehicleside ] ^= light::redmarker_left;
        // visual feedback
        if( Train->ggLeftEndLightButton.SubModel != nullptr ) {
            Train->ggLeftEndLightButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
        else {
            // we interpret lack of dedicated switch as a sign the light is controlled with 3-way switch
            // this is crude, but for now will do
            Train->ggLeftLightButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_redmarkertoggleright( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        int const vehicleside =
            ( Train->mvOccupied->ActiveCab == 1 ?
                end::front :
                end::rear );

        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::redmarker_right ) == 0 ) {
            // turn on
            OnCommand_redmarkerenableright( Train, Command );
        }
        else {
            //turn off
            OnCommand_redmarkerdisableright( Train, Command );
        }
    }
}

void TTrain::OnCommand_redmarkerenableright( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->LightsPosNo > 0 ) {
        // lights are controlled by preset selector
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        int const vehicleside =
            ( Train->mvOccupied->ActiveCab == 1 ?
                end::front :
                end::rear );

        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::redmarker_right ) != 0 ) { return; } // already enabled

        Train->DynamicObject->iLights[ vehicleside ] ^= light::redmarker_right;
        // visual feedback
        if( Train->ggRightEndLightButton.SubModel != nullptr ) {
            Train->ggRightEndLightButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            // we interpret lack of dedicated switch as a sign the light is controlled with 3-way switch
            // this is crude, but for now will do
            Train->ggRightLightButton.UpdateValue( -1.0, Train->dsbSwitch );
            // if the light is controlled by 3-way switch, disable the headlight
            Train->DynamicObject->iLights[ vehicleside ] &= ~light::headlight_right;
        }
    }
}

void TTrain::OnCommand_redmarkerdisableright( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->LightsPosNo > 0 ) {
        // lights are controlled by preset selector
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        int const vehicleside =
            ( Train->mvOccupied->ActiveCab == 1 ?
                end::front :
                end::rear );

        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::redmarker_right ) == 0 ) { return; } // already disabled

        Train->DynamicObject->iLights[ vehicleside ] ^= light::redmarker_right;
        // visual feedback
        if( Train->ggRightEndLightButton.SubModel != nullptr ) {
            Train->ggRightEndLightButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
        else {
            // we interpret lack of dedicated switch as a sign the light is controlled with 3-way switch
            // this is crude, but for now will do
            Train->ggRightLightButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_headlighttogglerearleft( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->LightsPosNo > 0 ) {
        // lights are controlled by preset selector
        return;
    }

    int const vehicleside =
        ( Train->mvOccupied->ActiveCab == 1 ?
            end::rear :
            end::front );

    if( Command.action == GLFW_PRESS ) {
        // NOTE: we toggle the light on opposite side, as 'rear right' is 'front left' on the rear end etc
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::headlight_right ) == 0 ) {
            // turn on
            Train->DynamicObject->iLights[ vehicleside ] ^= light::headlight_right;
            // visual feedback
            Train->ggRearLeftLightButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            //turn off
            Train->DynamicObject->iLights[ vehicleside ] ^= light::headlight_right;
            // visual feedback
            Train->ggRearLeftLightButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_headlighttogglerearright( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->LightsPosNo > 0 ) {
        // lights are controlled by preset selector
        return;
    }

    int const vehicleside =
        ( Train->mvOccupied->ActiveCab == 1 ?
            end::rear :
            end::front );

    if( Command.action == GLFW_PRESS ) {
        // NOTE: we toggle the light on opposite side, as 'rear right' is 'front left' on the rear end etc
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::headlight_left ) == 0 ) {
            // turn on
            Train->DynamicObject->iLights[ vehicleside ] ^= light::headlight_left;
            // visual feedback
            Train->ggRearRightLightButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            //turn off
            Train->DynamicObject->iLights[ vehicleside ] ^= light::headlight_left;
            // visual feedback
            Train->ggRearRightLightButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_headlighttogglerearupper( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->LightsPosNo > 0 ) {
        // lights are controlled by preset selector
        return;
    }

    int const vehicleside =
        ( Train->mvOccupied->ActiveCab == 1 ?
            end::rear :
            end::front );

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::headlight_upper ) == 0 ) {
            // turn on
            Train->DynamicObject->iLights[ vehicleside ] ^= light::headlight_upper;
            // visual feedback
            Train->ggRearUpperLightButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            //turn off
            Train->DynamicObject->iLights[ vehicleside ] ^= light::headlight_upper;
            // visual feedback
            Train->ggRearUpperLightButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_redmarkertogglerearleft( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->LightsPosNo > 0 ) {
        // lights are controlled by preset selector
        return;
    }

    int const vehicleside =
        ( Train->mvOccupied->ActiveCab == 1 ?
            end::rear :
            end::front );

    if( Command.action == GLFW_PRESS ) {
        // NOTE: we toggle the light on opposite side, as 'rear right' is 'front left' on the rear end etc
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::redmarker_right ) == 0 ) {
            // turn on
            Train->DynamicObject->iLights[ vehicleside ] ^= light::redmarker_right;
            // visual feedback
            Train->ggRearLeftEndLightButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            //turn off
            Train->DynamicObject->iLights[ vehicleside ] ^= light::redmarker_right;
            // visual feedback
            Train->ggRearLeftEndLightButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_redmarkertogglerearright( TTrain *Train, command_data const &Command ) {

    if( Train->mvOccupied->LightsPosNo > 0 ) {
        // lights are controlled by preset selector
        return;
    }

    int const vehicleside =
        ( Train->mvOccupied->ActiveCab == 1 ?
            end::rear :
            end::front );

    if( Command.action == GLFW_PRESS ) {
        // NOTE: we toggle the light on opposite side, as 'rear right' is 'front left' on the rear end etc
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( ( Train->DynamicObject->iLights[ vehicleside ] & light::redmarker_left ) == 0 ) {
            // turn on
            Train->DynamicObject->iLights[ vehicleside ] ^= light::redmarker_left;
            // visual feedback
            Train->ggRearRightEndLightButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            //turn off
            Train->DynamicObject->iLights[ vehicleside ] ^= light::redmarker_left;
            // visual feedback
            Train->ggRearRightEndLightButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_redmarkerstoggle( TTrain *Train, command_data const &Command ) {

    if( ( true == FreeFlyModeFlag )
     && ( Command.action == GLFW_PRESS ) ) {

        auto *vehicle { std::get<TDynamicObject *>( simulation::Region->find_vehicle( Global.pCamera.Pos, 10, false, true ) ) };

        if( vehicle == nullptr ) { return; }

        int const CouplNr {
            clamp(
                vehicle->DirectionGet()
                * ( Math3D::LengthSquared3( vehicle->HeadPosition() - Global.pCamera.Pos ) > Math3D::LengthSquared3( vehicle->RearPosition() - Global.pCamera.Pos ) ?
                     1 :
                    -1 ),
                0, 1 ) }; // z [-1,1] zrobić [0,1]

        auto const lightset { light::redmarker_left | light::redmarker_right };

        vehicle->iLights[ CouplNr ] = (
            false == TestFlag( vehicle->iLights[ CouplNr ], lightset ) ?
                vehicle->iLights[ CouplNr ] |= lightset : // turn signals on
                vehicle->iLights[ CouplNr ] ^= lightset ); // turn signals off
    }
}

void TTrain::OnCommand_endsignalstoggle( TTrain *Train, command_data const &Command ) {

    if( ( true == FreeFlyModeFlag )
     && ( Command.action == GLFW_PRESS ) ) {

        auto *vehicle { std::get<TDynamicObject *>( simulation::Region->find_vehicle( Global.pCamera.Pos, 10, false, true ) ) };

        if( vehicle == nullptr ) { return; }

        int const CouplNr {
            clamp(
                vehicle->DirectionGet()
                * ( Math3D::LengthSquared3( vehicle->HeadPosition() - Global.pCamera.Pos ) > Math3D::LengthSquared3( vehicle->RearPosition() - Global.pCamera.Pos ) ?
                     1 :
                    -1 ),
                0, 1 ) }; // z [-1,1] zrobić [0,1]

        auto const lightset { light::rearendsignals };

        vehicle->iLights[ CouplNr ] = (
            false == TestFlag( vehicle->iLights[ CouplNr ], lightset ) ?
                vehicle->iLights[ CouplNr ] |= lightset : // turn signals on
                vehicle->iLights[ CouplNr ] ^= lightset ); // turn signals off
    }
}

void TTrain::OnCommand_headlightsdimtoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( false == Train->DynamicObject->DimHeadlights ) {
            // turn on
            OnCommand_headlightsdimenable( Train, Command );
        }
        else {
            //turn off
            OnCommand_headlightsdimdisable( Train, Command );
        }
    }
}

void TTrain::OnCommand_headlightsdimenable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( Train->ggDimHeadlightsButton.SubModel == nullptr ) {
            // TODO: proper control deviced definition for the interiors, that doesn't hinge of presence of 3d submodels
            WriteLog( "Dim Headlights switch is missing, or wasn't defined" );
            return;
        }
        // visual feedback
        Train->ggDimHeadlightsButton.UpdateValue( 1.0, Train->dsbSwitch );

        if( true == Train->DynamicObject->DimHeadlights ) { return; } // already enabled

        Train->DynamicObject->DimHeadlights = true;
    }
}

void TTrain::OnCommand_headlightsdimdisable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( Train->ggDimHeadlightsButton.SubModel == nullptr ) {
            // TODO: proper control deviced definition for the interiors, that doesn't hinge of presence of 3d submodels
            WriteLog( "Dim Headlights switch is missing, or wasn't defined" );
            return;
        }
        // visual feedback
        Train->ggDimHeadlightsButton.UpdateValue( 0.0, Train->dsbSwitch );

        if( false == Train->DynamicObject->DimHeadlights ) { return; } // already enabled

        Train->DynamicObject->DimHeadlights = false;
    }
}

void TTrain::OnCommand_interiorlighttoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( false == Train->Cabine[Train->iCabn].bLight ) {
            // turn on
            OnCommand_interiorlightenable( Train, Command );
        }
        else {
            //turn off
            OnCommand_interiorlightdisable( Train, Command );
        }
    }
}

void TTrain::OnCommand_interiorlightenable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( Train->ggCabLightButton.SubModel == nullptr ) {
            // TODO: proper control deviced definition for the interiors, that doesn't hinge of presence of 3d submodels
            WriteLog( "Interior Light switch is missing, or wasn't defined" );
            return;
        }
        // visual feedback
        Train->ggCabLightButton.UpdateValue( 1.0, Train->dsbSwitch );
        Train->btCabLight.Turn( true );
        // store lighting switch states
        if( false == Train->DynamicObject->JointCabs ) {
            // vehicles with separate cabs get separate lighting switch states
            Train->Cabine[ Train->iCabn ].bLight = true;
        }
        else {
            // joint virtual cabs share lighting switch states
            for( auto &cab : Train->Cabine ) {
                cab.bLight = true;
            }
        }
    }
}

void TTrain::OnCommand_interiorlightdisable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( Train->ggCabLightButton.SubModel == nullptr ) {
            // TODO: proper control deviced definition for the interiors, that doesn't hinge of presence of 3d submodels
            WriteLog( "Interior Light switch is missing, or wasn't defined" );
            return;
        }
        // visual feedback
        Train->ggCabLightButton.UpdateValue( 0.0, Train->dsbSwitch );
        Train->btCabLight.Turn( false );
        // store lighting switch states
        if( false == Train->DynamicObject->JointCabs ) {
            // vehicles with separate cabs get separate lighting switch states
            Train->Cabine[ Train->iCabn ].bLight = false;
        }
        else {
            // joint virtual cabs share lighting switch states
            for( auto &cab : Train->Cabine ) {
                cab.bLight = false;
            }
        }
    }
}

void TTrain::OnCommand_interiorlightdimtoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( false == Train->Cabine[ Train->iCabn ].bLightDim ) {
            // turn on
            OnCommand_interiorlightdimenable( Train, Command );
        }
        else {
            //turn off
            OnCommand_interiorlightdimdisable( Train, Command );
        }
    }
}

void TTrain::OnCommand_interiorlightdimenable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( Train->ggCabLightDimButton.SubModel == nullptr ) {
            // TODO: proper control deviced definition for the interiors, that doesn't hinge of presence of 3d submodels
            WriteLog( "Dim Interior Light switch is missing, or wasn't defined" );
            return;
        }
        // visual feedback
        Train->ggCabLightDimButton.UpdateValue( 1.0, Train->dsbSwitch );
        // store lighting switch states
        if( false == Train->DynamicObject->JointCabs ) {
            // vehicles with separate cabs get separate lighting switch states
            Train->Cabine[ Train->iCabn ].bLightDim = true;
        }
        else {
            // joint virtual cabs share lighting switch states
            for( auto &cab : Train->Cabine ) {
                cab.bLightDim = true;
            }
        }
    }
}

void TTrain::OnCommand_interiorlightdimdisable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( Train->ggCabLightDimButton.SubModel == nullptr ) {
            // TODO: proper control deviced definition for the interiors, that doesn't hinge of presence of 3d submodels
            WriteLog( "Dim Interior Light switch is missing, or wasn't defined" );
            return;
        }
        // visual feedback
        Train->ggCabLightDimButton.UpdateValue( 0.0, Train->dsbSwitch );
        // store lighting switch states
        if( false == Train->DynamicObject->JointCabs ) {
            // vehicles with separate cabs get separate lighting switch states
            Train->Cabine[ Train->iCabn ].bLightDim = false;
        }
        else {
            // joint virtual cabs share lighting switch states
            for( auto &cab : Train->Cabine ) {
                cab.bLightDim = false;
            }
        }
    }
}

void TTrain::OnCommand_instrumentlighttoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( false == Train->InstrumentLightActive ) {
            // turn on
            OnCommand_instrumentlightenable( Train, Command );
        }
        else {
            //turn off
            OnCommand_instrumentlightdisable( Train, Command );
        }
    }
}

void TTrain::OnCommand_instrumentlightenable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( Train->ggInstrumentLightButton.SubModel == nullptr ) {
            // TODO: proper control deviced definition for the interiors, that doesn't hinge of presence of 3d submodels
            WriteLog( "Instrument Light switch is missing, or wasn't defined" );
            return;
        }
        // visual feedback
        Train->ggInstrumentLightButton.UpdateValue( 1.0, Train->dsbSwitch );

        if( true == Train->InstrumentLightActive ) { return; } // already enabled

        Train->InstrumentLightActive = true;
    }
}

void TTrain::OnCommand_instrumentlightdisable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( Train->ggInstrumentLightButton.SubModel == nullptr ) {
            // TODO: proper control deviced definition for the interiors, that doesn't hinge of presence of 3d submodels
            WriteLog( "Instrument Light switch is missing, or wasn't defined" );
            return;
        }
        // visual feedback
        Train->ggInstrumentLightButton.UpdateValue( 0.0, Train->dsbSwitch );

        if( false == Train->InstrumentLightActive ) { return; } // already disabled

        Train->InstrumentLightActive = false;
    }
}

void TTrain::OnCommand_dashboardlighttoggle( TTrain *Train, command_data const &Command ) {
    // only reacting to press, so the switch doesn't flip back and forth if key is held down
    if( Command.action != GLFW_PRESS ) { return; }

    if( Train->ggDashboardLightButton.SubModel == nullptr ) {
        // TODO: proper control deviced definition for the interiors, that doesn't hinge of presence of 3d submodels
        WriteLog( "Dashboard Light switch is missing, or wasn't defined" );
        return;
    }

    if( false == Train->DashboardLightActive ) {
        // turn on
        Train->DashboardLightActive = true;
        // visual feedback
        Train->ggDashboardLightButton.UpdateValue( 1.0, Train->dsbSwitch );
    }
    else {
        //turn off
        Train->DashboardLightActive = false;
        // visual feedback
        Train->ggDashboardLightButton.UpdateValue( 0.0, Train->dsbSwitch );
    }
}

void TTrain::OnCommand_timetablelighttoggle( TTrain *Train, command_data const &Command ) {
    // only reacting to press, so the switch doesn't flip back and forth if key is held down
    if( Command.action != GLFW_PRESS ) { return; }

    if( Train->ggTimetableLightButton.SubModel == nullptr ) {
        // TODO: proper control deviced definition for the interiors, that doesn't hinge of presence of 3d submodels
        WriteLog( "Timetable Light switch is missing, or wasn't defined" );
        return;
    }

    if( false == Train->TimetableLightActive ) {
        // turn on
        Train->TimetableLightActive = true;
        // visual feedback
        Train->ggTimetableLightButton.UpdateValue( 1.0, Train->dsbSwitch );
    }
    else {
        //turn off
        Train->TimetableLightActive = false;
        // visual feedback
        Train->ggTimetableLightButton.UpdateValue( 0.0, Train->dsbSwitch );
    }
}

void TTrain::OnCommand_heatingtoggle( TTrain *Train, command_data const &Command ) {

    if( Train->ggTrainHeatingButton.SubModel == nullptr ) {
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Train Heating switch is missing, or wasn't defined" );
        }
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // ignore repeats so the switch doesn't flip back and forth if key is held down
        if( false == Train->mvControlled->HeatingAllow ) {
            // turn on
            OnCommand_heatingenable( Train, Command );
        }
        else {
            //turn off
            OnCommand_heatingdisable( Train, Command );
        }
    }
    else if( Command.action == GLFW_RELEASE ) {

        if( Train->ggTrainHeatingButton.type() == TGaugeType::push ) {
            // impulse switch
            // visual feedback
            Train->ggTrainHeatingButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_heatingenable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        Train->mvControlled->HeatingAllow = true;
        // visual feedback
        Train->ggTrainHeatingButton.UpdateValue( 1.0, Train->dsbSwitch );
    }
}

void TTrain::OnCommand_heatingdisable( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        Train->mvControlled->HeatingAllow = false;
        // visual feedback
        Train->ggTrainHeatingButton.UpdateValue( 
            ( Train->ggTrainHeatingButton.type() == TGaugeType::push ?
                1.0 :
                0.0 ),
            Train->dsbSwitch );
    }
}

void TTrain::OnCommand_generictoggle( TTrain *Train, command_data const &Command ) {

    auto const itemindex = static_cast<int>( Command.command ) - static_cast<int>( user_command::generictoggle0 );
    auto &item = Train->ggUniversals[ itemindex ];
/*
    if( item.SubModel == nullptr ) {
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Train generic item " + std::to_string( itemindex ) + " is missing, or wasn't defined" );
        }
        return;
    }
*/
    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the switch doesn't flip back and forth if key is held down
        if( item.GetDesiredValue() < 0.5 ) {
            // turn on
            // visual feedback
            item.UpdateValue( 1.0 );
        }
        else {
            // turn off
            // visual feedback
            item.UpdateValue( 0.0 );
        }
    }
}

void TTrain::OnCommand_doorlocktoggle( TTrain *Train, command_data const &Command ) {

    if( Train->ggDoorSignallingButton.SubModel == nullptr ) {
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Door Lock switch is missing, or wasn't defined" );
        }
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the sound can loop uninterrupted
        if( false == Train->mvOccupied->Doors.lock_enabled ) {
            // turn on
            // TODO: door lock command to send through consist
            Train->mvOccupied->LockDoors( true );
            // visual feedback
            Train->ggDoorSignallingButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            // turn off
            // TODO: door lock command to send through consist
            Train->mvOccupied->LockDoors( false );
            // visual feedback
            Train->ggDoorSignallingButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_doortoggleleft( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // NOTE: test how the door state check works with consists where the occupied vehicle doesn't have opening doors
        if( false == (
            Train->mvOccupied->ActiveCab == 1 ?
                Train->mvOccupied->Doors.instances[side::left].is_opening || Train->mvOccupied->Doors.instances[ side::left ].is_open :
                Train->mvOccupied->Doors.instances[side::right].is_opening || Train->mvOccupied->Doors.instances[ side::right ].is_open ) ) {
            // open
            OnCommand_dooropenleft( Train, Command );
        }
        else {
            // close
            if( ( Train->ggDoorAllOffButton.SubModel != nullptr )
             && ( Train->ggDoorLeftOffButton.SubModel == nullptr ) ) {
                // OnCommand_doorcloseall( Train, Command );
                // if two-button setup lacks dedicated closing button require the user to press appropriate button manually
                return;
            }
            else {
                OnCommand_doorcloseleft( Train, Command );
            }
        }
    }
    else if( Command.action == GLFW_RELEASE ) {

        if( true == (
            Train->mvOccupied->ActiveCab == 1 ?
                Train->mvOccupied->Doors.instances[side::left].is_opening || Train->mvOccupied->Doors.instances[ side::left ].is_open :
                Train->mvOccupied->Doors.instances[side::right].is_opening || Train->mvOccupied->Doors.instances[ side::right ].is_open ) ) {
            // open
            if( ( Train->mvOccupied->Doors.has_autowarning )
             && ( Train->mvOccupied->DepartureSignal ) ) {
                // complete closing the doors
                if( ( Train->ggDoorAllOffButton.SubModel != nullptr )
                 && ( Train->ggDoorLeftOffButton.SubModel == nullptr ) ) {
                    // OnCommand_doorcloseall( Train, Command );
                    // if two-button setup lacks dedicated closing button require the user to press appropriate button manually
                    return;
                }
                else {
                    OnCommand_doorcloseleft( Train, Command );
                }
            }
            else {
                OnCommand_dooropenleft( Train, Command );
            }
        }
        else {
            // close
            if( ( Train->ggDoorAllOffButton.SubModel != nullptr )
             && ( Train->ggDoorLeftOffButton.SubModel == nullptr ) ) {
                // OnCommand_doorcloseall( Train, Command );
                // if two-button setup lacks dedicated closing button require the user to press appropriate button manually
                return;
            }
            else {
                OnCommand_doorcloseleft( Train, Command );
            }
        }
        // visual feedback
        // dedicated closing buttons are presumed to be impulse switches and return automatically to neutral position
        // NOTE: temporary arrangement, can be removed when LD system is in place
        if( Train->ggDoorLeftOffButton.SubModel )
            Train->ggDoorLeftOffButton.UpdateValue( 0.0, Train->dsbSwitch );
        if( Train->ggDoorLeftOnButton.SubModel )
            Train->ggDoorLeftOnButton.UpdateValue( 0.0, Train->dsbSwitch );
    }
}

void TTrain::OnCommand_doorpermitleft( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Command.action == GLFW_PRESS ) {

        auto const side { (
            Train->mvOccupied->ActiveCab == 1 ?
                side::left :
                side::right ) };

        if( Train->ggDoorLeftPermitButton.type() == TGaugeType::push ) {
            // impulse switch
            Train->mvOccupied->PermitDoors( side );
            // visual feedback
            Train->ggDoorLeftPermitButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            // two-state switch
            auto const newstate { !( Train->mvOccupied->Doors.instances[ side ].open_permit ) };

            Train->mvOccupied->PermitDoors( side, newstate );
            // visual feedback
            Train->ggDoorLeftPermitButton.UpdateValue( ( newstate ? 1.0 : 0.0 ), Train->dsbSwitch );
        }
    }
    else if( Command.action == GLFW_RELEASE ) {

        if( Train->ggDoorLeftPermitButton.type() == TGaugeType::push ) {
            // impulse switch
            // visual feedback
            Train->ggDoorLeftPermitButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_doorpermitright( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_REPEAT ) { return; }

    if( Command.action == GLFW_PRESS ) {

        auto const side { (
            Train->mvOccupied->ActiveCab == 1 ?
                side::right :
                side::left ) };

        if( Train->ggDoorRightPermitButton.type() == TGaugeType::push ) {
            // impulse switch
            Train->mvOccupied->PermitDoors( side );
            // visual feedback
            Train->ggDoorRightPermitButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            // two-state switch
            auto const newstate { !( Train->mvOccupied->Doors.instances[ side ].open_permit ) };

            Train->mvOccupied->PermitDoors( side, newstate );
            // visual feedback
            Train->ggDoorRightPermitButton.UpdateValue( ( newstate ? 1.0 : 0.0 ), Train->dsbSwitch );
        }
    }
    else if( Command.action == GLFW_RELEASE ) {

        if( Train->ggDoorRightPermitButton.type() == TGaugeType::push ) {
            // impulse switch
            // visual feedback
            Train->ggDoorRightPermitButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_doorpermitpresetactivatenext( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        Train->mvOccupied->ChangeDoorPermitPreset( 1 );
        // visual feedback
        Train->ggDoorPermitPresetButton.UpdateValue( Train->mvOccupied->Doors.permit_preset, Train->dsbSwitch );
    }
}

void TTrain::OnCommand_doorpermitpresetactivateprevious( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {

        Train->mvOccupied->ChangeDoorPermitPreset( -1 );
        // visual feedback
        Train->ggDoorPermitPresetButton.UpdateValue( Train->mvOccupied->Doors.permit_preset, Train->dsbSwitch );
    }
}


void TTrain::OnCommand_dooropenleft( TTrain *Train, command_data const &Command ) {

    auto const remoteopencontrol {
        ( Train->mvOccupied->Doors.open_control == control_t::driver )
     || ( Train->mvOccupied->Doors.open_control == control_t::mixed ) };

    if( false == remoteopencontrol ) { return; }

    if( ( Train->ggDoorLeftOnButton.SubModel == nullptr )
     && ( Train->ggDoorLeftButton.SubModel == nullptr ) ) {

        return;
    }

    if( Command.action == GLFW_PRESS ) {
        Train->mvOccupied->OperateDoors(
            ( Train->mvOccupied->ActiveCab == 1 ?
                side::left :
                side::right ),
            true );
        // visual feedback
        if( Train->ggDoorLeftOnButton.SubModel != nullptr ) {
            // two separate impulse switches
            Train->ggDoorLeftOnButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            // single two-state switch
            Train->ggDoorLeftButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // visual feedback
        if( Train->ggDoorLeftOnButton.SubModel != nullptr ) {
            // two separate impulse switches
            Train->ggDoorLeftOnButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_doorcloseleft( TTrain *Train, command_data const &Command ) {

    auto const remoteclosecontrol {
        ( Train->mvOccupied->Doors.close_control == control_t::driver )
     || ( Train->mvOccupied->Doors.close_control == control_t::mixed ) };

    if( false == remoteclosecontrol ) { return; }

    if( ( Train->ggDoorLeftOffButton.SubModel == nullptr )
     && ( Train->ggDoorLeftButton.SubModel == nullptr ) ) {

        return;
    }

    if( Command.action == GLFW_PRESS ) {

        if( Train->mvOccupied->Doors.has_autowarning ) {
            // automatic departure signal delays actual door closing until the button is released
            Train->mvOccupied->signal_departure( true );
        }
        else {
            // TODO: move door opening/closing to the update, so the switch animation doesn't hinge on door working
            Train->mvOccupied->OperateDoors(
                ( Train->mvOccupied->ActiveCab == 1 ?
                    side::left :
                    side::right ),
                false );
        }
        // visual feedback
        if( Train->ggDoorLeftOffButton.SubModel != nullptr ) {
            // two separate switches to open and close the door
            Train->ggDoorLeftOffButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            // single two-state switch
            Train->ggDoorLeftButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
    else if( Command.action == GLFW_RELEASE ) {

        if( Train->mvOccupied->Doors.has_autowarning ) {
            // automatic departure signal delays actual door closing until the button is released
            Train->mvOccupied->signal_departure( false );
            // now we can actually close the door
            Train->mvOccupied->OperateDoors(
                ( Train->mvOccupied->ActiveCab == 1 ?
                    side::left :
                    side::right ),
                false );
        }
        // visual feedback
        // dedicated closing buttons are presumed to be impulse switches and return automatically to neutral position
        if( Train->ggDoorLeftOffButton.SubModel )
            Train->ggDoorLeftOffButton.UpdateValue( 0.0, Train->dsbSwitch );
    }
}

void TTrain::OnCommand_doortoggleright( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        // NOTE: test how the door state check works with consists where the occupied vehicle doesn't have opening doors
        if( false == (
            Train->mvOccupied->ActiveCab == 1 ?
                Train->mvOccupied->Doors.instances[side::right].is_opening || Train->mvOccupied->Doors.instances[ side::right ].is_open :
                Train->mvOccupied->Doors.instances[side::left].is_opening || Train->mvOccupied->Doors.instances[ side::left ].is_open ) ) {
            // open
            OnCommand_dooropenright( Train, Command );
        }
        else {
            // close
            if( ( Train->ggDoorAllOffButton.SubModel != nullptr )
             && ( Train->ggDoorRightOffButton.SubModel == nullptr ) ) {
                // OnCommand_doorcloseall( Train, Command );
                // if two-button setup lacks dedicated closing button require the user to press appropriate button manually
                return;
            }
            else {
                OnCommand_doorcloseright( Train, Command );
            }
        }
    }
    else if( Command.action == GLFW_RELEASE ) {

        if( true == (
            Train->mvOccupied->ActiveCab == 1 ?
                Train->mvOccupied->Doors.instances[side::right].is_opening || Train->mvOccupied->Doors.instances[ side::right ].is_open :
                Train->mvOccupied->Doors.instances[side::left].is_opening || Train->mvOccupied->Doors.instances[ side::left ].is_open ) ) {
            // open
            if( ( Train->mvOccupied->Doors.has_autowarning )
             && ( Train->mvOccupied->DepartureSignal ) ) {
                // complete closing the doors
                if( ( Train->ggDoorAllOffButton.SubModel != nullptr )
                 && ( Train->ggDoorRightOffButton.SubModel == nullptr ) ) {
                    // OnCommand_doorcloseall( Train, Command );
                    // if two-button setup lacks dedicated closing button require the user to press appropriate button manually
                    return;
                }
                else {
                    OnCommand_doorcloseright( Train, Command );
                }
            }
            else {
                OnCommand_dooropenright( Train, Command );
            }
        }
        else {
            // close
            if( ( Train->ggDoorAllOffButton.SubModel != nullptr )
             && ( Train->ggDoorRightOffButton.SubModel == nullptr ) ) {
                // OnCommand_doorcloseall( Train, Command );
                // if two-button setup lacks dedicated closing button require the user to press appropriate button manually
                return;
            }
            else {
                OnCommand_doorcloseright( Train, Command );
            }
        }
        // visual feedback
        // dedicated closing buttons are presumed to be impulse switches and return automatically to neutral position
        // NOTE: temporary arrangement, can be removed when LD system is in place
        if( Train->ggDoorRightOffButton.SubModel )
            Train->ggDoorRightOffButton.UpdateValue( 0.0, Train->dsbSwitch );
        if( Train->ggDoorRightOnButton.SubModel )
            Train->ggDoorRightOnButton.UpdateValue( 0.0, Train->dsbSwitch );
    }
}

void TTrain::OnCommand_dooropenright( TTrain *Train, command_data const &Command ) {

    auto const remoteopencontrol {
        ( Train->mvOccupied->Doors.open_control == control_t::driver )
     || ( Train->mvOccupied->Doors.open_control == control_t::mixed ) };

    if( false == remoteopencontrol ) { return; }

    if( ( Train->ggDoorRightOnButton.SubModel == nullptr )
     && ( Train->ggDoorRightButton.SubModel == nullptr ) ) {

        return;
    }

    if( Command.action == GLFW_PRESS ) {

        Train->mvOccupied->OperateDoors(
            ( Train->mvOccupied->ActiveCab == 1 ?
                side::right :
                side::left ),
            true );
        // visual feedback
        if( Train->ggDoorRightOnButton.SubModel != nullptr ) {
            // two separate impulse switches
            Train->ggDoorRightOnButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            // single two-state switch
            Train->ggDoorRightButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // visual feedback
        if( Train->ggDoorRightOnButton.SubModel != nullptr ) {
            // two separate impulse switches
            Train->ggDoorRightOnButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_doorcloseright( TTrain *Train, command_data const &Command ) {

    auto const remoteclosecontrol {
        ( Train->mvOccupied->Doors.close_control == control_t::driver )
     || ( Train->mvOccupied->Doors.close_control == control_t::mixed ) };

    if( false == remoteclosecontrol ) { return; }

    if( ( Train->ggDoorRightOffButton.SubModel == nullptr )
     && ( Train->ggDoorRightButton.SubModel == nullptr ) ) {

        return;
    }

    if( Command.action == GLFW_PRESS ) {

        if( Train->mvOccupied->Doors.has_autowarning ) {
            // automatic departure signal delays actual door closing until the button is released
            Train->mvOccupied->signal_departure( true );
        }
        else {
            Train->mvOccupied->OperateDoors(
                ( Train->mvOccupied->ActiveCab == 1 ?
                    side::right :
                    side::left ),
                false );
        }
        // visual feedback
        if( Train->ggDoorRightOffButton.SubModel != nullptr ) {
            // two separate switches to open and close the door
            Train->ggDoorRightOffButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            // single two-state switch
            Train->ggDoorRightButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
    else if( Command.action == GLFW_RELEASE ) {

        if( Train->mvOccupied->Doors.has_autowarning ) {
            // automatic departure signal delays actual door closing until the button is released
            Train->mvOccupied->signal_departure( false );
            // now we can actually close the door
            Train->mvOccupied->OperateDoors(
                ( Train->mvOccupied->ActiveCab == 1 ?
                    side::right :
                    side::left ),
                false );
        }
        // visual feedback
        // dedicated closing buttons are presumed to be impulse switches and return automatically to neutral position
        if( Train->ggDoorRightOffButton.SubModel )
            Train->ggDoorRightOffButton.UpdateValue( 0.0, Train->dsbSwitch );
    }
}

void TTrain::OnCommand_dooropenall( TTrain *Train, command_data const &Command ) {

    auto const remoteopencontrol {
        ( Train->mvOccupied->Doors.open_control == control_t::driver )
     || ( Train->mvOccupied->Doors.open_control == control_t::mixed ) };

    if( false == remoteopencontrol ) { return; }

    if( Train->ggDoorAllOnButton.SubModel == nullptr ) {
        // TODO: expand definition of cab controls so we can know if the control is present without testing for presence of 3d switch
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Open All Doors switch is missing, or wasn't defined" );
        }
        return;
    }

    if( Command.action == GLFW_PRESS ) {

        Train->mvOccupied->OperateDoors( side::right, true );
        Train->mvOccupied->OperateDoors( side::left, true );
        // visual feedback
        Train->ggDoorAllOnButton.UpdateValue( 1.0, Train->dsbSwitch );
    }
    else if( Command.action == GLFW_RELEASE ) {
        // visual feedback
        Train->ggDoorAllOnButton.UpdateValue( 0.0 );
    }
}

void TTrain::OnCommand_doorcloseall( TTrain *Train, command_data const &Command ) {

    auto const remoteclosecontrol {
        ( Train->mvOccupied->Doors.close_control == control_t::driver )
     || ( Train->mvOccupied->Doors.close_control == control_t::mixed ) };

    if( false == remoteclosecontrol ) { return; }

    if( Train->ggDoorAllOffButton.SubModel == nullptr ) {
        // TODO: expand definition of cab controls so we can know if the control is present without testing for presence of 3d switch
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Close All Doors switch is missing, or wasn't defined" );
        }
        return;
    }

    if( Command.action == GLFW_PRESS ) {

        if( Train->mvOccupied->Doors.has_autowarning ) {
            Train->mvOccupied->signal_departure( true );
        }
        if( Train->ggDoorAllOffButton.type() != TGaugeType::push_delayed ) {
            // delays the action until the button is released
            Train->mvOccupied->OperateDoors( side::right, false );
            Train->mvOccupied->OperateDoors( side::left, false );
        }
        // visual feedback
        Train->ggDoorLeftButton.UpdateValue( 0.0, Train->dsbSwitch );
        Train->ggDoorRightButton.UpdateValue( 0.0, Train->dsbSwitch );
        if( Train->ggDoorAllOffButton.SubModel )
            Train->ggDoorAllOffButton.UpdateValue( 1.0, Train->dsbSwitch );
    }
    else if( Command.action == GLFW_RELEASE ) {
        if( Train->mvOccupied->Doors.has_autowarning ) {
            Train->mvOccupied->signal_departure( false );
        }
        if( Train->ggDoorAllOffButton.type() == TGaugeType::push_delayed ) {
            // now we can actually close the door
            Train->mvOccupied->OperateDoors( side::right, false );
            Train->mvOccupied->OperateDoors( side::left, false );
        }
        // visual feedback
        if( Train->ggDoorAllOffButton.SubModel )
            Train->ggDoorAllOffButton.UpdateValue( 0.0 );
    }
}

void TTrain::OnCommand_doorsteptoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        Train->mvOccupied->PermitDoorStep( false == Train->mvOccupied->Doors.step_enabled );
    }
}

void TTrain::OnCommand_doormodetoggle( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        Train->mvOccupied->ChangeDoorControlMode( false == Train->mvOccupied->Doors.remote_only );
    }
}

void TTrain::OnCommand_carcouplingincrease( TTrain *Train, command_data const &Command ) {

    if( ( true == FreeFlyModeFlag )
     && ( Command.action == GLFW_PRESS ) ) {
        // tryb freefly, press only
        auto coupler { -1 };
        auto *vehicle { Train->DynamicObject->ABuScanNearestObject( Train->DynamicObject->GetTrack(), 1, 1500, coupler ) };
        if( vehicle == nullptr )
            vehicle = Train->DynamicObject->ABuScanNearestObject( Train->DynamicObject->GetTrack(), -1, 1500, coupler );

        if( ( coupler != -1 )
         && ( vehicle != nullptr ) ) {

            vehicle->couple( coupler );
        }
        if( Train->DynamicObject->Mechanik ) {
            // aktualizacja flag kierunku w składzie
            Train->DynamicObject->Mechanik->CheckVehicles( Connect );
        }
    }
}

void TTrain::OnCommand_carcouplingdisconnect( TTrain *Train, command_data const &Command ) {

    if( ( true == FreeFlyModeFlag )
     && ( Command.action == GLFW_PRESS ) ) {
        // tryb freefly, press only
        auto coupler { -1 };
        auto *vehicle { Train->DynamicObject->ABuScanNearestObject( Train->DynamicObject->GetTrack(), 1, 1500, coupler ) };
        if( vehicle == nullptr )
            vehicle = Train->DynamicObject->ABuScanNearestObject( Train->DynamicObject->GetTrack(), -1, 1500, coupler );

        if( ( coupler != -1 )
         && ( vehicle != nullptr ) ) {

            vehicle->uncouple( coupler );
        }
        if( Train->DynamicObject->Mechanik ) {
            // aktualizacja flag kierunku w składzie
            Train->DynamicObject->Mechanik->CheckVehicles( Disconnect );
        }
    }
}

void TTrain::OnCommand_departureannounce( TTrain *Train, command_data const &Command ) {

    if( Train->ggDepartureSignalButton.SubModel == nullptr ) {
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Departure Signal button is missing, or wasn't defined" );
        }
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the sound can loop uninterrupted
        if( false == Train->mvOccupied->DepartureSignal ) {
            // turn on
            Train->mvOccupied->signal_departure( true );
            // visual feedback
            Train->ggDepartureSignalButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // turn off
        Train->mvOccupied->signal_departure( false );
        // visual feedback
        Train->ggDepartureSignalButton.UpdateValue( 0.0, Train->dsbSwitch );
    }
}

void TTrain::OnCommand_hornlowactivate( TTrain *Train, command_data const &Command ) {

    if( ( Train->ggHornButton.SubModel == nullptr )
     && ( Train->ggHornLowButton.SubModel == nullptr ) ) {
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Horn button is missing, or wasn't defined" );
        }
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only need to react to press, sound will continue until stopped
        if( false == TestFlag( Train->mvOccupied->WarningSignal, 1 ) ) {
            // turn on
            Train->mvOccupied->WarningSignal |= 1;
/*
            if( true == TestFlag( Train->mvOccupied->WarningSignal, 2 ) ) {
                // low and high horn are treated as mutually exclusive
                Train->mvControlled->WarningSignal &= ~2;
            }
*/
            // visual feedback
            Train->ggHornButton.UpdateValue( -1.0 );
            Train->ggHornLowButton.UpdateValue( 1.0 );
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // turn off
/*
        // NOTE: we turn off both low and high horn, due to unreliability of release event when shift key is involved
        Train->mvOccupied->WarningSignal &= ~( 1 | 2 );
*/
        Train->mvOccupied->WarningSignal &= ~1;
        // visual feedback
        Train->ggHornButton.UpdateValue( 0.0 );
        Train->ggHornLowButton.UpdateValue( 0.0 );
    }
}

void TTrain::OnCommand_hornhighactivate( TTrain *Train, command_data const &Command ) {

    if( ( Train->ggHornButton.SubModel == nullptr )
     && ( Train->ggHornHighButton.SubModel == nullptr ) ) {
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Horn button is missing, or wasn't defined" );
        }
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only need to react to press, sound will continue until stopped
        if( false == TestFlag( Train->mvOccupied->WarningSignal, 2 ) ) {
            // turn on
            Train->mvOccupied->WarningSignal |= 2;
/*
            if( true == TestFlag( Train->mvOccupied->WarningSignal, 1 ) ) {
                // low and high horn are treated as mutually exclusive
                Train->mvControlled->WarningSignal &= ~1;
            }
*/
            // visual feedback
            Train->ggHornButton.UpdateValue( 1.0 );
            Train->ggHornHighButton.UpdateValue( 1.0 );
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // turn off
/*
        // NOTE: we turn off both low and high horn, due to unreliability of release event when shift key is involved
        Train->mvOccupied->WarningSignal &= ~( 1 | 2 );
*/
        Train->mvOccupied->WarningSignal &= ~2;
        // visual feedback
        Train->ggHornButton.UpdateValue( 0.0 );
        Train->ggHornHighButton.UpdateValue( 0.0 );
    }
}

void TTrain::OnCommand_whistleactivate( TTrain *Train, command_data const &Command ) {

    if( Train->ggWhistleButton.SubModel == nullptr ) {
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Whistle button is missing, or wasn't defined" );
        }
        return;
    }

    if( Command.action == GLFW_PRESS ) {
        // only need to react to press, sound will continue until stopped
        if( false == TestFlag( Train->mvOccupied->WarningSignal, 4 ) ) {
            // turn on
            Train->mvOccupied->WarningSignal |= 4;
            // visual feedback
            Train->ggWhistleButton.UpdateValue( 1.0 );
        }
    }
    else if( Command.action == GLFW_RELEASE ) {
        // turn off
        Train->mvOccupied->WarningSignal &= ~4;
        // visual feedback
        Train->ggWhistleButton.UpdateValue( 0.0 );
    }
}

void TTrain::OnCommand_radiotoggle( TTrain *Train, command_data const &Command ) {

    if( Train->ggRadioButton.SubModel == nullptr ) {
        if( Command.action == GLFW_PRESS ) {
            WriteLog( "Radio switch is missing, or wasn't defined" );
        }
/*
        // NOTE: we ignore the lack of 3d model to allow system reset after receiving radio-stop signal
        return;
*/
    }

    if( Command.action == GLFW_PRESS ) {
        // only reacting to press, so the sound can loop uninterrupted
        if( false == Train->mvOccupied->Radio ) {
            // turn on
            Train->mvOccupied->Radio = true;
            // visual feedback
            Train->ggRadioButton.UpdateValue( 1.0, Train->dsbSwitch );
        }
        else {
            // turn off
            Train->mvOccupied->Radio = false;
            // visual feedback
            Train->ggRadioButton.UpdateValue( 0.0, Train->dsbSwitch );
        }
    }
}

void TTrain::OnCommand_radiochannelincrease( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        Train->iRadioChannel = clamp( Train->iRadioChannel + 1, 1, 10 );
        // visual feedback
        Train->ggRadioChannelSelector.UpdateValue( Train->iRadioChannel - 1 );
        Train->ggRadioChannelNext.UpdateValue( 1.0 );
    }
    else if( Command.action == GLFW_RELEASE ) {
        // visual feedback
        Train->ggRadioChannelNext.UpdateValue( 0.0 );
    }
}

void TTrain::OnCommand_radiochanneldecrease( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        Train->iRadioChannel = clamp( Train->iRadioChannel - 1, 1, 10 );
        // visual feedback
        Train->ggRadioChannelSelector.UpdateValue( Train->iRadioChannel - 1 );
        Train->ggRadioChannelPrevious.UpdateValue( 1.0 );
    }
    else if( Command.action == GLFW_RELEASE ) {
        // visual feedback
        Train->ggRadioChannelPrevious.UpdateValue( 0.0 );
    }
}

void TTrain::OnCommand_radiostopsend( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        if( ( true == Train->mvOccupied->Radio )
         && ( Train->mvControlled->Battery || Train->mvControlled->ConverterFlag ) ) {
            simulation::Region->RadioStop( Train->Dynamic()->GetPosition() );
        }
        // visual feedback
        Train->ggRadioStop.UpdateValue( 1.0 );
    }
    else if( Command.action == GLFW_RELEASE ) {
        // visual feedback
        Train->ggRadioStop.UpdateValue( 0.0 );
    }
}

void TTrain::OnCommand_radiostoptest( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        if( ( Train->RadioChannel() == 10 )
         && ( Train->mvControlled->Battery || Train->mvControlled->ConverterFlag ) ) {
            Train->Dynamic()->RadioStop();
        }
        // visual feedback
        Train->ggRadioTest.UpdateValue( 1.0 );
    }
    else if( Command.action == GLFW_RELEASE ) {
        // visual feedback
        Train->ggRadioTest.UpdateValue( 0.0 );
    }
}

void TTrain::OnCommand_cabchangeforward( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        if( false == Train->CabChange( 1 ) ) {
            if( TestFlag( Train->DynamicObject->MoverParameters->Couplers[ end::front ].CouplingFlag, coupling::gangway ) ) {
                // przejscie do nastepnego pojazdu
                Global.changeDynObj = Train->DynamicObject->PrevConnected();
                Global.changeDynObj->MoverParameters->ActiveCab = (
                    Train->DynamicObject->MoverParameters->Neighbours[end::front].vehicle_end ?
                        -1 :
                         1 );
            }
        }
        // HACK: match consist door permit state with the preset in the active cab
        if( Train->ggDoorPermitPresetButton.SubModel != nullptr ) {
            Train->mvOccupied->ChangeDoorPermitPreset( 0 );
        }
    }
}

void TTrain::OnCommand_cabchangebackward( TTrain *Train, command_data const &Command ) {

    if( Command.action == GLFW_PRESS ) {
        if( false == Train->CabChange( -1 ) ) {
            if( TestFlag( Train->DynamicObject->MoverParameters->Couplers[ end::rear ].CouplingFlag, coupling::gangway ) ) {
                // przejscie do nastepnego pojazdu
                Global.changeDynObj = Train->DynamicObject->NextConnected();
                Global.changeDynObj->MoverParameters->ActiveCab = (
                    Train->DynamicObject->MoverParameters->Neighbours[end::rear].vehicle_end ?
                        -1 :
                         1 );
            }
        }
        // HACK: match consist door permit state with the preset in the active cab
        if( Train->ggDoorPermitPresetButton.SubModel != nullptr ) {
            Train->mvOccupied->ChangeDoorPermitPreset( 0 );
        }
    }
}

// cab movement update, fixed step part
void TTrain::UpdateCab() {

    // Ra: przesiadka, jeśli AI zmieniło kabinę (a człon?)...
    if( ( DynamicObject->Mechanik ) // może nie być?
     && ( DynamicObject->Mechanik->AIControllFlag ) ) { 
        
        if( iCabn != ( // numer kabiny (-1: kabina B)
                DynamicObject->MoverParameters->ActiveCab == -1 ?
                    2 :
                    DynamicObject->MoverParameters->ActiveCab ) ) {

            InitializeCab(
                DynamicObject->MoverParameters->ActiveCab,
                DynamicObject->asBaseDir + DynamicObject->MoverParameters->TypeName + ".mmd" );
        }
    }
    iCabn = ( DynamicObject->MoverParameters->ActiveCab == -1 ?
        2 :
        DynamicObject->MoverParameters->ActiveCab );
}

bool TTrain::Update( double const Deltatime )
{
    // train state verification
    // line breaker:
    if( m_linebreakerstate == 0 ) {
        if( true == mvControlled->Mains ) {
            // crude way to sync state of the linebreaker with ai-issued commands
            m_linebreakerstate = 1;
        }
    }
    if( m_linebreakerstate == 1 ) {
        if( false == ( mvControlled->Mains || mvControlled->dizel_startup ) ) {
            // crude way to catch cases where the main was knocked out
            // because the state of the line breaker isn't changed to match, we need to do it here manually
            m_linebreakerstate = 0;
        }
    }

    if( ( ggMainButton.GetDesiredValue() > 0.95 )
     || ( ggMainOnButton.GetDesiredValue() > 0.95 ) ) {
        // keep track of period the line breaker button is held down, to determine when/if circuit closes
        if( ( fHVoltage > 0.5 * mvControlled->EnginePowerSource.MaxVoltage )
         || ( ( mvControlled->EngineType != TEngineType::ElectricSeriesMotor )
           && ( mvControlled->EngineType != TEngineType::ElectricInductionMotor )
           && ( true == mvControlled->Battery ) ) ) {
            // prevent the switch from working if there's no power
            // TODO: consider whether it makes sense for diesel engines and such
            fMainRelayTimer += Deltatime;
        }
    }
    else {
        // button isn't down, reset the timer
        fMainRelayTimer = 0.0f;
    }
    if( ggMainOffButton.GetDesiredValue() > 0.95 ) {
        // if the button disconnecting the line breaker is down prevent the timer from accumulating
        fMainRelayTimer = 0.0f;
    }
    if( m_linebreakerstate == 0 ) {
        if( fMainRelayTimer > mvControlled->InitialCtrlDelay ) {
            // wlaczanie WSa z opoznieniem
            // mark the line breaker as ready to close; for electric vehicles with impulse switch the setup is completed on button release
            m_linebreakerstate = 2;
        }
    }
    if( m_linebreakerstate == 2 ) {
        // for diesels and/or vehicles with toggle switch setup we complete the engine start here
        if( ( ggMainOnButton.SubModel == nullptr )
         || ( ( mvControlled->EngineType == TEngineType::DieselEngine )
           || ( mvControlled->EngineType == TEngineType::DieselElectric ) ) ) {
            // try to finalize state change of the line breaker, set the state based on the outcome
            m_linebreakerstate = (
                mvControlled->MainSwitch( true ) ?
                    1 :
                    0 );
        }
    }

    // check for received user commands
    // NOTE: this is a temporary arrangement, for the transition period from old command setup to the new one
    // eventually commands are going to be retrieved directly by the vehicle, filtered through active control stand
    // and ultimately executed, provided the stand allows it.
    command_data commanddata;
    // NOTE: currently we're only storing commands for local vehicle and there's no id system in place,
    // so we're supplying 'default' vehicle id of 0
    while( simulation::Commands.pop( commanddata, static_cast<std::size_t>( command_target::vehicle ) | 0 ) ) {

        auto lookup = m_commandhandlers.find( commanddata.command );
        if( lookup != m_commandhandlers.end() ) {
            // debug data
            if( commanddata.action != GLFW_RELEASE ) {
                WriteLog( mvOccupied->Name + " received command: [" + simulation::Commands_descriptions[ static_cast<std::size_t>( commanddata.command ) ].name + "]" );
            }
            // pass the command to the assigned handler
            lookup->second( this, commanddata );
        }
    }

    UpdateCab();

    if (DynamicObject->mdKabina)
    { // Ra: TODO: odczyty klawiatury/pulpitu nie powinny być uzależnione od istnienia modelu kabiny

        if( ( DynamicObject->Mechanik != nullptr )
         && ( false == DynamicObject->Mechanik->AIControllFlag ) ) {
            // nie blokujemy AI
            if( ( mvOccupied->TrainType == dt_ET40 )
             || ( mvOccupied->TrainType == dt_EP05 ) ) {
                   // dla ET40 i EU05 automatyczne cofanie nastawnika - i tak nie będzie to działać dobrze...
                   // TODO: use deltatime to stabilize speed
/*
                if( false == (
                    ( input::command == user_command::mastercontrollerset )
                 || ( input::command == user_command::mastercontrollerincrease )
                 || ( input::command == user_command::mastercontrollerdecrease ) ) ) {
*/
                if( false == m_mastercontrollerinuse ) {
                    m_mastercontrollerreturndelay -= Deltatime;
                    if( m_mastercontrollerreturndelay < 0.f ) {
                        m_mastercontrollerreturndelay = EU07_CONTROLLER_BASERETURNDELAY;
                        if( mvOccupied->MainCtrlPos > mvOccupied->MainCtrlActualPos ) {
                            mvOccupied->DecMainCtrl( 1 );
                        }
                        else if( mvOccupied->MainCtrlPos < mvOccupied->MainCtrlActualPos ) {
                            // Ra 15-01: a to nie miało być tylko cofanie?
                            mvOccupied->IncMainCtrl( 1 );
                        }
                    }
                }
            }
/*
            if( ( mvOccupied->BrakeHandle == TBrakeHandle::FVel6 )
             && ( mvOccupied->fBrakeCtrlPos < 0.0 )
             && ( Global.iFeedbackMode < 3 ) ) {
                // Odskakiwanie hamulce EP
                if( false == (
                    ( input::command == user_command::trainbrakeset )
                 || ( input::command == user_command::trainbrakedecrease )
                 || ( input::command == user_command::trainbrakecharging ) ) ) {
                    set_train_brake( 0 );
                }
            }
*/
        }

        // McZapkie: predkosc wyswietlana na tachometrze brana jest z obrotow kol
        auto const maxtacho { 3.0 };
        fTachoVelocity = static_cast<float>( std::min( std::abs(11.31 * mvControlled->WheelDiameter * mvControlled->nrot), mvControlled->Vmax * 1.05) );
        { // skacze osobna zmienna
            float ff = simulation::Time.data().wSecond; // skacze co sekunde - pol sekundy
            // pomiar, pol sekundy ustawienie
            if (ff != fTachoTimer) // jesli w tej sekundzie nie zmienial
            {
                if (fTachoVelocity > 1) // jedzie
                    fTachoVelocityJump = fTachoVelocity + (2.0 - Random(3) + Random(3)) * 0.5;
                else
                    fTachoVelocityJump = 0; // stoi
                fTachoTimer = ff; // juz zmienil
            }
        }
        if (fTachoVelocity > 1) // McZapkie-270503: podkrecanie tachometru
        {
            // szybciej zacznij stukac
            fTachoCount = std::min( maxtacho, fTachoCount + Deltatime * 3 );
        }
        else if( fTachoCount > 0 ) {
            // schodz powoli - niektore haslery to ze 4 sekundy potrafia stukac
            fTachoCount = std::max( 0.0, fTachoCount - Deltatime * 0.66 );
        }

        // Ra 2014-09: napięcia i prądy muszą być ustalone najpierw, bo wysyłane są ewentualnie na PoKeys
		if ((mvControlled->EngineType != TEngineType::DieselElectric)
         && (mvControlled->EngineType != TEngineType::ElectricInductionMotor)) // Ra 2014-09: czy taki rozdzia? ma sens?
			fHVoltage = mvControlled->RunningTraction.TractionVoltage; // Winger czy to nie jest zle?
        // *mvControlled->Mains);
        else
            fHVoltage = mvControlled->Voltage;
        if (ShowNextCurrent)
        { // jeśli pokazywać drugi człon
            if (mvSecond)
            { // o ile jest ten drugi
                fHCurrent[0] = mvSecond->ShowCurrent(0) * 1.05;
                fHCurrent[1] = mvSecond->ShowCurrent(1) * 1.05;
                fHCurrent[2] = mvSecond->ShowCurrent(2) * 1.05;
                fHCurrent[3] = mvSecond->ShowCurrent(3) * 1.05;
            }
            else
                fHCurrent[0] = fHCurrent[1] = fHCurrent[2] = fHCurrent[3] =
                    0.0; // gdy nie ma człona
        }
        else
        { // normalne pokazywanie
            fHCurrent[0] = mvControlled->ShowCurrent(0);
            fHCurrent[1] = mvControlled->ShowCurrent(1);
            fHCurrent[2] = mvControlled->ShowCurrent(2);
            fHCurrent[3] = mvControlled->ShowCurrent(3);
        }

        bool kier = (DynamicObject->DirectionGet() * mvOccupied->ActiveCab > 0);
        TDynamicObject *p = DynamicObject->GetFirstDynamic(mvOccupied->ActiveCab < 0 ? end::rear : end::front, 4);
        int in = 0;
        fEIMParams[0][6] = 0;
        iCarNo = 0;
        iPowerNo = 0;
        iUnitNo = 1;

        for (int i = 0; i < 8; i++)
        {
            bMains[i] = false;
            fCntVol[i] = 0.0f;
            bPants[i][0] = false;
            bPants[i][1] = false;
            bFuse[i] = false;
            bBatt[i] = false;
            bConv[i] = false;
            bComp[i][0] = false;
            bComp[i][1] = false;
            bHeat[i] = false;
        }
        for (int i = 0; i < 20; i++)
        {
            if (p)
            {
                fPress[i][0] = p->MoverParameters->BrakePress;
                fPress[i][1] = p->MoverParameters->PipePress;
                fPress[i][2] = p->MoverParameters->ScndPipePress;
                bDoors[i][1] = ( p->MoverParameters->Doors.instances[ side::left ].position > 0.f );
                bDoors[i][2] = ( p->MoverParameters->Doors.instances[ side::right ].position > 0.f );
                bDoors[i][3] = ( p->MoverParameters->Doors.instances[ side::left ].step_position > 0.f );
                bDoors[i][4] = ( p->MoverParameters->Doors.instances[ side::right ].step_position > 0.f );
                bDoors[i][0] = ( bDoors[i][1] || bDoors[i][2] );
                iDoorNo[i] = p->iAnimType[ANIM_DOORS];
                iUnits[i] = iUnitNo;
                cCode[i] = p->MoverParameters->TypeName[p->MoverParameters->TypeName.length() - 1];
                asCarName[i] = p->name();
                if( p->MoverParameters->EnginePowerSource.SourceType == TPowerSource::CurrentCollector ) {
				    bPants[iUnitNo - 1][end::front] = ( bPants[iUnitNo - 1][end::front] || p->MoverParameters->PantFrontUp );
                    bPants[iUnitNo - 1][end::rear]  = ( bPants[iUnitNo - 1][end::rear]  || p->MoverParameters->PantRearUp );
                }
				bComp[iUnitNo - 1][0] = (bComp[iUnitNo - 1][0] || p->MoverParameters->CompressorAllow || (p->MoverParameters->CompressorStart == start_t::automatic));
				bSlip[i] = p->MoverParameters->SlippingWheels;
                if (p->MoverParameters->CompressorSpeed > 0.00001)
                {
					bComp[iUnitNo - 1][1] = (bComp[iUnitNo - 1][1] || p->MoverParameters->CompressorFlag);
                }
                if ((in < 8) && (p->MoverParameters->eimc[eimc_p_Pmax] > 1))
                {
                    fEIMParams[1 + in][0] = p->MoverParameters->eimv[eimv_Fmax];
                    fEIMParams[1 + in][1] = Max0R(fEIMParams[1 + in][0], 0);
                    fEIMParams[1 + in][2] = -Min0R(fEIMParams[1 + in][0], 0);
                    fEIMParams[1 + in][3] = p->MoverParameters->eimv[eimv_Fmax] /
                                            Max0R(p->MoverParameters->eimv[eimv_Fful], 1);
                    fEIMParams[1 + in][4] = Max0R(fEIMParams[1 + in][3], 0);
                    fEIMParams[1 + in][5] = -Min0R(fEIMParams[1 + in][3], 0);
                    fEIMParams[1 + in][6] = p->MoverParameters->eimv[eimv_If];
                    fEIMParams[1 + in][7] = p->MoverParameters->eimv[eimv_U];
					fEIMParams[1 + in][8] = p->MoverParameters->Itot;//p->MoverParameters->eimv[eimv_Ipoj];
                    fEIMParams[1 + in][9] = p->MoverParameters->Voltage;
                    fEIMParams[0][6] += fEIMParams[1 + in][8];
                    bMains[in] = p->MoverParameters->Mains;
                    fCntVol[in] = p->MoverParameters->BatteryVoltage;
                    bFuse[in] = p->MoverParameters->FuseFlag;
                    bBatt[in] = p->MoverParameters->Battery;
                    bConv[in] = p->MoverParameters->ConverterFlag;
                    bHeat[in] = p->MoverParameters->Heating;
                    in++;
                    iPowerNo = in;
                }
				if ((in < 8) && (p->MoverParameters->EngineType==TEngineType::DieselEngine))
				{
					fDieselParams[1 + in][0] = p->MoverParameters->enrot*60;
					fDieselParams[1 + in][1] = p->MoverParameters->nrot;
					fDieselParams[1 + in][2] = p->MoverParameters->RList[p->MoverParameters->MainCtrlPos].R;
					fDieselParams[1 + in][3] = p->MoverParameters->dizel_fill;
					fDieselParams[1 + in][4] = p->MoverParameters->RList[p->MoverParameters->MainCtrlPos].Mn;
					fDieselParams[1 + in][5] = p->MoverParameters->dizel_engage;
					fDieselParams[1 + in][6] = p->MoverParameters->dizel_heat.Twy;
					fDieselParams[1 + in][7] = p->MoverParameters->OilPump.pressure;
					//fDieselParams[1 + in][8] = p->MoverParameters->
					//fDieselParams[1 + in][9] = p->MoverParameters->
					bMains[in] = p->MoverParameters->Mains;
					fCntVol[in] = p->MoverParameters->BatteryVoltage;
					bFuse[in] = p->MoverParameters->FuseFlag;
					bBatt[in] = p->MoverParameters->Battery;
					bConv[in] = p->MoverParameters->ConverterFlag;
					bHeat[in] = p->MoverParameters->Heating;
					in++;
					iPowerNo = in;
				}
                //                p = p->NextC(4);                                       //prev
                if ((kier ? p->NextC(128) : p->PrevC(128)) != (kier ? p->NextC(4) : p->PrevC(4)))
                    iUnitNo++;
                p = (kier ? p->NextC(4) : p->PrevC(4));
                iCarNo = i + 1;
            }
            else
            {
                fPress[i][0]
                = fPress[i][1]
                = fPress[i][2]
                = 0;
                bDoors[i][0]
                = bDoors[i][1]
                = bDoors[i][2]
                = bDoors[i][3]
                = bDoors[i][4]
                = false;
				bSlip[i] = false;
                iUnits[i] = 0;
                cCode[i] = 0; //'0';
                asCarName[i] = "";
            }
        }

//        if (mvControlled == mvOccupied)
//            fEIMParams[0][3] = mvControlled->eimv[eimv_Fzad]; // procent zadany
//        else
//            fEIMParams[0][3] =
//                mvControlled->eimv[eimv_Fzad] - mvOccupied->LocalBrakeRatio(); // procent zadany
		fEIMParams[0][3] = mvOccupied->eimic_real;
        fEIMParams[0][4] = Max0R(fEIMParams[0][3], 0);
        fEIMParams[0][5] = -Min0R(fEIMParams[0][3], 0);
        fEIMParams[0][1] = fEIMParams[0][4] * mvControlled->eimv[eimv_Fful];
        fEIMParams[0][2] = fEIMParams[0][5] * mvControlled->eimv[eimv_Fful];
        fEIMParams[0][0] = fEIMParams[0][1] - fEIMParams[0][2];
        fEIMParams[0][7] = 0;
        fEIMParams[0][8] = 0;
        fEIMParams[0][9] = 0;

        for (int i = in; i < 8; i++)
        {
			for (int j = 0; j <= 9; j++)
			{
				fEIMParams[1 + i][j] = 0;
				fDieselParams[1 + i][j] = 0;
			}
        }
#ifdef _WIN32
        if (Global.iFeedbackMode == 4) {
            // wykonywać tylko gdy wyprowadzone na pulpit
            // Ra: sterowanie miernikiem: zbiornik główny
            Console::ValueSet(0, mvOccupied->Compressor);
            // Ra: sterowanie miernikiem: przewód główny
            Console::ValueSet(1, mvOccupied->PipePress);
            // Ra: sterowanie miernikiem: cylinder hamulcowy
            Console::ValueSet(2, mvOccupied->BrakePress);
            // woltomierz wysokiego napięcia
            Console::ValueSet(3, fHVoltage);
            // Ra: sterowanie miernikiem: drugi amperomierz
            Console::ValueSet(4, fHCurrent[2]);
            // pierwszy amperomierz; dla EZT prąd całkowity
            Console::ValueSet(5, fHCurrent[(mvControlled->TrainType & dt_EZT) ? 0 : 1]);
            // Ra: prędkość na pin 43 - wyjście analogowe (to nie jest PWM); skakanie zapewnia mechanika napędu
            Console::ValueSet(6, fTachoVelocity);
        }
#endif
        //------------------
        // hunter-261211: nadmiarowy przetwornicy i ogrzewania
        // Ra 15-01: to musi stąd wylecieć - zależności nie mogą być w kabinie
        if (mvControlled->ConverterFlag == true)
        {
            fConverterTimer += Deltatime;
            if ((mvControlled->CompressorFlag == true) && (mvControlled->CompressorPower == 1) &&
                ((mvControlled->EngineType == TEngineType::ElectricSeriesMotor) ||
                 (mvControlled->TrainType == dt_EZT)) &&
                (DynamicObject->Controller == Humandriver)) // hunter-110212: poprawka dla EZT
            { // hunter-091012: poprawka (zmiana warunku z CompressorPower /rozne od
                // 0/ na /rowne 1/)
                if (fConverterTimer < fConverterPrzekaznik)
                {
                    mvControlled->ConvOvldFlag = true;
                    if (mvControlled->TrainType != dt_EZT)
                        mvControlled->MainSwitch( false, ( mvControlled->TrainType == dt_EZT ? range_t::unit : range_t::local ) );
                }
                else if( fConverterTimer >= fConverterPrzekaznik ) {
                    // changed switch from always true to take into account state of the compressor switch
                    mvControlled->CompressorSwitch( mvControlled->CompressorAllow );
                }
            }
        }
        else
            fConverterTimer = 0;
        //------------------

        // youBy - prad w drugim czlonie: galaz lub calosc
        {
            TDynamicObject *tmp;
            tmp = NULL;
            if (DynamicObject->NextConnected())
                if ((TestFlag(mvControlled->Couplers[1].CouplingFlag, ctrain_controll)) &&
                    (mvOccupied->ActiveCab == 1))
                    tmp = DynamicObject->NextConnected();
            if (DynamicObject->PrevConnected())
                if ((TestFlag(mvControlled->Couplers[0].CouplingFlag, ctrain_controll)) &&
                    (mvOccupied->ActiveCab == -1))
                    tmp = DynamicObject->PrevConnected();
            if( tmp ) {
                if( tmp->MoverParameters->Power > 0 ) {
                    if( ggI1B.SubModel ) {
                        ggI1B.UpdateValue( tmp->MoverParameters->ShowCurrent( 1 ) );
                        ggI1B.Update();
                    }
                    if( ggI2B.SubModel ) {
                        ggI2B.UpdateValue( tmp->MoverParameters->ShowCurrent( 2 ) );
                        ggI2B.Update();
                    }
                    if( ggI3B.SubModel ) {
                        ggI3B.UpdateValue( tmp->MoverParameters->ShowCurrent( 3 ) );
                        ggI3B.Update();
                    }
                    if( ggItotalB.SubModel ) {
                        ggItotalB.UpdateValue( tmp->MoverParameters->ShowCurrent( 0 ) );
                        ggItotalB.Update();
                    }
                    if( ggWater1TempB.SubModel ) {
                        ggWater1TempB.UpdateValue( tmp->MoverParameters->dizel_heat.temperatura1 );
                        ggWater1TempB.Update();
                    }
                    if( ggOilPressB.SubModel ) {
                        ggOilPressB.UpdateValue( tmp->MoverParameters->OilPump.pressure );
                        ggOilPressB.Update();
                    }
                }
            }
        }
        // McZapkie-300302: zegarek
        if (ggClockMInd.SubModel)
        {
            ggClockSInd.UpdateValue(simulation::Time.data().wSecond);
            ggClockSInd.Update();
            ggClockMInd.UpdateValue(simulation::Time.data().wMinute);
            ggClockMInd.Update();
            ggClockHInd.UpdateValue(simulation::Time.data().wHour + simulation::Time.data().wMinute / 60.0);
            ggClockHInd.Update();
        }

        Cabine[iCabn].Update( mvControlled->Battery || mvControlled->ConverterFlag ); // nowy sposób ustawienia animacji
        if (ggZbS.SubModel)
        {
            ggZbS.UpdateValue(mvOccupied->Handle->GetCP());
            ggZbS.Update();
        }

        // youBy - napiecie na silnikach
        if (ggEngineVoltage.SubModel)
        {
            if (mvControlled->DynamicBrakeFlag)
            {
                ggEngineVoltage.UpdateValue(abs(mvControlled->Im * 5));
            }
            else
            {
                int x;
                if ((mvControlled->TrainType == dt_ET42) &&
                    (mvControlled->Imax == mvControlled->ImaxHi))
                    x = 1;
                else
                    x = 2;
                if ((mvControlled->RList[mvControlled->MainCtrlActualPos].Mn > 0) &&
                    (abs(mvControlled->Im) > 0))
                {
                    ggEngineVoltage.UpdateValue(
                        (x * (mvControlled->RunningTraction.TractionVoltage -
                              mvControlled->RList[mvControlled->MainCtrlActualPos].R *
                                  abs(mvControlled->Im)) /
                         mvControlled->RList[mvControlled->MainCtrlActualPos].Mn));
                }
                else
                {
                    ggEngineVoltage.UpdateValue(0);
                }
            }
            ggEngineVoltage.Update();
        }

        // Winger 140404 - woltomierz NN
        if (ggLVoltage.SubModel)
        {
            // NOTE: since we don't have functional converter object, we're faking it here by simple check whether converter is on
            // TODO: implement object-based circuits and power systems model so we can have this working more properly
            ggLVoltage.UpdateValue(
                std::max(
                    ( mvControlled->ConverterFlag ?
                        mvControlled->NominalBatteryVoltage :
                        0.0 ),
                    ( mvControlled->Battery ?
                        mvControlled->BatteryVoltage :
                        0.0 ) ) );
            ggLVoltage.Update();
        }

        if (mvControlled->EngineType == TEngineType::DieselElectric)
        { // ustawienie zmiennych dla silnika spalinowego
            fEngine[1] = mvControlled->ShowEngineRotation(1);
            fEngine[2] = mvControlled->ShowEngineRotation(2);
        }

        else if (mvControlled->EngineType == TEngineType::DieselEngine)
        { // albo dla innego spalinowego
            fEngine[1] = mvControlled->ShowEngineRotation(1);
            fEngine[2] = mvControlled->ShowEngineRotation(2);
            fEngine[3] = mvControlled->ShowEngineRotation(3);
            if (ggMainGearStatus.SubModel)
            {
                if (mvControlled->Mains)
                    ggMainGearStatus.UpdateValue(1.1 - std::abs(mvControlled->dizel_automaticgearstatus));
                else
                    ggMainGearStatus.UpdateValue(0.0);
                ggMainGearStatus.Update();
            }
            if (ggIgnitionKey.SubModel)
            {
                ggIgnitionKey.UpdateValue(
                    ( mvControlled->Mains )
                 || ( mvControlled->dizel_startup )
                 || ( fMainRelayTimer > 0.f )
                 || ( ggMainButton.GetDesiredValue() > 0.95 )
                 || ( ggMainOnButton.GetDesiredValue() > 0.95 ) );
                ggIgnitionKey.Update();
            }
        }

        if (mvControlled->SlippingWheels) {
            // Ra 2014-12: lokomotywy 181/182 dostają SlippingWheels po zahamowaniu powyżej 2.85 bara i buczały
            double veldiff = (DynamicObject->GetVelocity() - fTachoVelocity) / mvControlled->Vmax;
            if( veldiff < -0.01 ) {
                // 1% Vmax rezerwy, żeby 181/182 nie buczały po zahamowaniu, ale to proteza
                if( std::abs( mvControlled->Im ) > 10.0 ) {
                    btLampkaPoslizg.Turn( true );
                }
            }
        }
        else {
            btLampkaPoslizg.Turn( false );
        }

        if ((mvControlled->Mains) || (mvControlled->TrainType == dt_EZT))
        {
            btLampkaNadmSil.Turn(mvControlled->FuseFlagCheck());
        }
        else
        {
            btLampkaNadmSil.Turn( false );
        }

        if (mvControlled->Battery || mvControlled->ConverterFlag) {
            // alerter test
            if( true == CAflag ) {
                if( ggSecurityResetButton.GetDesiredValue() > 0.95 ) {
                    fCzuwakTestTimer += Deltatime;
                }
                if( fCzuwakTestTimer > 1.0 ) {
                    SetFlag( mvOccupied->SecuritySystem.Status, s_CAtest );
                }
            }
            // McZapkie-141102: SHP i czuwak, TODO: sygnalizacja kabinowa
            if( mvOccupied->SecuritySystem.Status > 0 ) {
                if( fBlinkTimer >  fCzuwakBlink )
                    fBlinkTimer = -fCzuwakBlink;
                else
                    fBlinkTimer += Deltatime;
                // hunter-091012: dodanie testu czuwaka
                if( ( TestFlag( mvOccupied->SecuritySystem.Status, s_aware ) )
                 || ( TestFlag( mvOccupied->SecuritySystem.Status, s_CAtest ) ) ) {
                    btLampkaCzuwaka.Turn( fBlinkTimer > 0 );
                }
                else
                    btLampkaCzuwaka.Turn( false );

                btLampkaSHP.Turn( TestFlag( mvOccupied->SecuritySystem.Status, s_active ) );
            }
            else // wylaczone
            {
                btLampkaCzuwaka.Turn( false );
                btLampkaSHP.Turn( false );
            }

            btLampkaWylSzybki.Turn(
                ( ( (m_linebreakerstate == 2)
                 || (true == mvControlled->Mains) ) ?
                    true :
                    false ) );
            // NOTE: 'off' variant uses the same test, but opposite resulting states
            btLampkaWylSzybkiOff.Turn(
                ( ( ( m_linebreakerstate == 2 )
                 || ( true == mvControlled->Mains ) ) ?
                    false :
                    true ) );

            btLampkaPrzetw.Turn( mvControlled->ConverterFlag );
            btLampkaPrzetwOff.Turn( false == mvControlled->ConverterFlag );
            btLampkaNadmPrzetw.Turn( mvControlled->ConvOvldFlag );

            btLampkaOpory.Turn(
                mvControlled->StLinFlag ?
                    mvControlled->ResistorsFlagCheck() :
                    false );

            btLampkaBezoporowa.Turn(
                ( true == mvControlled->ResistorsFlagCheck() )
             || ( mvControlled->MainCtrlActualPos == 0 ) ); // do EU04

            if( mvControlled->StLinFlag ) {
                btLampkaStyczn.Turn( false );
            }
            else {
                // mozna prowadzic rozruch
                btLampkaStyczn.Turn( mvOccupied->BrakePress < 1.0 );
            }
            if( ( ( TestFlag( mvControlled->Couplers[ end::rear ].CouplingFlag, coupling::control ) ) && ( mvControlled->CabNo == 1 ) )
             || ( ( TestFlag( mvControlled->Couplers[ end::front ].CouplingFlag, coupling::control ) ) && ( mvControlled->CabNo == -1 ) ) )
                btLampkaUkrotnienie.Turn( true );
            else
                btLampkaUkrotnienie.Turn( false );

            //         if
            //         ((TestFlag(mvControlled->BrakeStatus,+b_Rused+b_Ractive)))//Lampka drugiego stopnia hamowania
            btLampkaHamPosp.Turn((TestFlag(mvOccupied->Hamulec->GetBrakeStatus(), 1))); // lampka drugiego stopnia hamowania
            //TODO: youBy wyciągnąć flagę wysokiego stopnia

            // hunter-121211: lampka zanikowo-pradowego wentylatorow:
            btLampkaNadmWent.Turn( ( mvControlled->RventRot < 5.0 ) && ( mvControlled->ResistorsFlagCheck() ) );
            //-------

            btLampkaWysRozr.Turn(!(mvControlled->Imax < mvControlled->ImaxHi));

            if( ( false == mvControlled->DelayCtrlFlag )
             && ( ( mvControlled->ScndCtrlActualPos > 0 )
               || ( ( mvControlled->RList[ mvControlled->MainCtrlActualPos ].ScndAct != 0 )
                 && ( mvControlled->RList[ mvControlled->MainCtrlActualPos ].ScndAct != 255 ) ) ) ) {
                btLampkaBoczniki.Turn( true );
            }
            else {
                btLampkaBoczniki.Turn( false );
            }

            btLampkaNapNastHam.Turn(mvControlled->ActiveDir != 0); // napiecie na nastawniku hamulcowym
            btLampkaSprezarka.Turn(mvControlled->CompressorFlag); // mutopsitka dziala
            btLampkaSprezarkaOff.Turn( false == mvControlled->CompressorFlag );
            btLampkaFuelPumpOff.Turn( false == mvControlled->FuelPump.is_active );
            // boczniki
            unsigned char scp; // Ra: dopisałem "unsigned"
            // Ra: w SU45 boczniki wchodzą na MainCtrlPos, a nie na MainCtrlActualPos
            // - pokićkał ktoś?
            scp = mvControlled->RList[mvControlled->MainCtrlPos].ScndAct;
            scp = (scp == 255 ? 0 : scp); // Ra: whatta hella is this?
            if ((mvControlled->ScndCtrlPos > 0) || (mvControlled->ScndInMain != 0) && (scp > 0))
            { // boczniki pojedynczo
                btLampkaBocznik1.Turn( true );
                btLampkaBocznik2.Turn(mvControlled->ScndCtrlPos > 1);
                btLampkaBocznik3.Turn(mvControlled->ScndCtrlPos > 2);
                btLampkaBocznik4.Turn(mvControlled->ScndCtrlPos > 3);
            }
            else
            { // wyłączone wszystkie cztery
                btLampkaBocznik1.Turn( false );
                btLampkaBocznik2.Turn( false );
                btLampkaBocznik3.Turn( false );
                btLampkaBocznik4.Turn( false );
            }

            if( mvControlled->Signalling == true ) {
                if( mvOccupied->BrakePress >= 1.45f ) {
                    btLampkaHamowanie1zes.Turn( true );
                }
                if( mvControlled->BrakePress < 0.75f ) {
                    btLampkaHamowanie1zes.Turn( false );
                }
            }
            else {
                btLampkaHamowanie1zes.Turn( false );
            }

            switch (mvControlled->TrainType) {
                // zależnie od typu lokomotywy
                case dt_EZT: {
                    btLampkaHamienie.Turn( ( mvControlled->BrakePress >= 0.2 ) && mvControlled->Signalling );
                    break;
                }
                case dt_ET41: {
                    // odhamowanie drugiego członu
                    if( mvSecond ) {
                        // bo może komuś przyjść do głowy jeżdżenie jednym członem
                        btLampkaHamienie.Turn( mvSecond->BrakePress < 0.4 );
                    }
                    break;
                }
                default: {
                    btLampkaHamienie.Turn( ( mvOccupied->BrakePress >= 0.1 ) || mvControlled->DynamicBrakeFlag );
                    btLampkaBrakingOff.Turn( ( mvOccupied->BrakePress < 0.1 ) && ( false == mvControlled->DynamicBrakeFlag ) );
                    break;
                }
            }
            // KURS90
            btLampkaMaxSila.Turn(abs(mvControlled->Im) >= 350);
            btLampkaPrzekrMaxSila.Turn(abs(mvControlled->Im) >= 450);
            btLampkaRadio.Turn(mvOccupied->Radio);
            btLampkaRadioStop.Turn( mvOccupied->Radio && mvOccupied->RadioStopFlag );
            btLampkaHamulecReczny.Turn(mvOccupied->ManualBrakePos > 0);
            // NBMX wrzesien 2003 - drzwi oraz sygnał odjazdu
            btLampkaDoorLeft.Turn( DynamicObject->Mechanik->IsAnyDoorOpen[ ( mvOccupied->ActiveCab == 1 ? side::left : side::right ) ] );
            btLampkaDoorRight.Turn( DynamicObject->Mechanik->IsAnyDoorOpen[ ( mvOccupied->ActiveCab == 1 ? side::right : side::left ) ] );
            btLampkaDoors.Turn( DynamicObject->Mechanik->IsAnyDoorOpen[ side::right ] || DynamicObject->Mechanik->IsAnyDoorOpen[ side::left ] );
            btLampkaBlokadaDrzwi.Turn( mvOccupied->Doors.is_locked );
            btLampkaDoorLockOff.Turn( false == mvOccupied->Doors.lock_enabled );
            btLampkaDepartureSignal.Turn( mvControlled->DepartureSignal );
            btLampkaNapNastHam.Turn((mvControlled->ActiveDir != 0) && (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
            btLampkaBrakeProfileG.Turn( TestFlag( mvOccupied->BrakeDelayFlag, bdelay_G ) );
            btLampkaBrakeProfileP.Turn( TestFlag( mvOccupied->BrakeDelayFlag, bdelay_P ) );
            btLampkaBrakeProfileR.Turn( TestFlag( mvOccupied->BrakeDelayFlag, bdelay_R ) );
            // light indicators
            // NOTE: sides are hardcoded to deal with setups where single cab is equipped with all indicators
            btLampkaUpperLight.Turn( ( mvOccupied->iLights[ end::front ] & light::headlight_upper ) != 0 );
            btLampkaLeftLight.Turn( ( mvOccupied->iLights[ end::front ] & light::headlight_left ) != 0 );
            btLampkaRightLight.Turn( ( mvOccupied->iLights[ end::front ] & light::headlight_right ) != 0 );
            btLampkaLeftEndLight.Turn( ( mvOccupied->iLights[ end::front ] & light::redmarker_left ) != 0 );
            btLampkaRightEndLight.Turn( ( mvOccupied->iLights[ end::front ] & light::redmarker_right ) != 0 );
            btLampkaRearUpperLight.Turn( ( mvOccupied->iLights[ end::rear ] & light::headlight_upper ) != 0 );
            btLampkaRearLeftLight.Turn( ( mvOccupied->iLights[ end::rear ] & light::headlight_left ) != 0 );
            btLampkaRearRightLight.Turn( ( mvOccupied->iLights[ end::rear ] & light::headlight_right ) != 0 );
            btLampkaRearLeftEndLight.Turn( ( mvOccupied->iLights[ end::rear ] & light::redmarker_left ) != 0 );
            btLampkaRearRightEndLight.Turn( ( mvOccupied->iLights[ end::rear ] & light::redmarker_right ) != 0 );
            // others
            btLampkaMalfunction.Turn( mvControlled->dizel_heat.PA );
            btLampkaMotorBlowers.Turn( ( mvControlled->MotorBlowers[ end::front ].is_active ) && ( mvControlled->MotorBlowers[ end::rear ].is_active ) );
            btLampkaCoolingFans.Turn( mvControlled->RventRot > 1.0 );
            btLampkaTempomat.Turn( mvControlled->ScndCtrlPos > 0 );
            // universal devices state indicators
            for( auto idx = 0; idx < btUniversals.size(); ++idx ) {
                btUniversals[ idx ].Turn( ggUniversals[ idx ].GetValue() > 0.5 );
            }
        }
        else {
            // wylaczone
            btLampkaCzuwaka.Turn( false );
            btLampkaSHP.Turn( false );
            btLampkaWylSzybki.Turn( false );
            btLampkaWylSzybkiOff.Turn( false );
            btLampkaWysRozr.Turn( false );
            btLampkaOpory.Turn( false );
            btLampkaStyczn.Turn( false );
            btLampkaUkrotnienie.Turn( false );
            btLampkaHamPosp.Turn( false );
            btLampkaBoczniki.Turn( false );
            btLampkaNapNastHam.Turn( false );
            btLampkaPrzetw.Turn( false );
            btLampkaPrzetwOff.Turn( false );
            btLampkaNadmPrzetw.Turn( false );
            btLampkaSprezarka.Turn( false );
            btLampkaSprezarkaOff.Turn( false );
            btLampkaFuelPumpOff.Turn( false );
            btLampkaBezoporowa.Turn( false );
            btLampkaHamowanie1zes.Turn( false );
            btLampkaHamienie.Turn( false );
            btLampkaBrakingOff.Turn( false );
            btLampkaBrakeProfileG.Turn( false );
            btLampkaBrakeProfileP.Turn( false );
            btLampkaBrakeProfileR.Turn( false );
            btLampkaMaxSila.Turn( false );
            btLampkaPrzekrMaxSila.Turn( false );
            btLampkaRadio.Turn( false );
            btLampkaRadioStop.Turn( false );
            btLampkaHamulecReczny.Turn( false );
            btLampkaDoorLeft.Turn( false );
            btLampkaDoorRight.Turn( false );
            btLampkaDoors.Turn( false );
            btLampkaBlokadaDrzwi.Turn( false );
            btLampkaDoorLockOff.Turn( false );
            btLampkaDepartureSignal.Turn( false );
            btLampkaNapNastHam.Turn( false );
            btLampkaForward.Turn( false );
            btLampkaBackward.Turn( false );
            btLampkaED.Turn( false );
            // light indicators
            btLampkaUpperLight.Turn( false );
            btLampkaLeftLight.Turn( false );
            btLampkaRightLight.Turn( false );
            btLampkaLeftEndLight.Turn( false );
            btLampkaRightEndLight.Turn( false );
            btLampkaRearUpperLight.Turn( false );
            btLampkaRearLeftLight.Turn( false );
            btLampkaRearRightLight.Turn( false );
            btLampkaRearLeftEndLight.Turn( false );
            btLampkaRearRightEndLight.Turn( false );
            // others
            btLampkaMalfunction.Turn( false );
            btLampkaMotorBlowers.Turn( false );
            btLampkaCoolingFans.Turn( false );
            btLampkaTempomat.Turn( false );
            // universal devices state indicators
            for( auto &universal : btUniversals ) {
                universal.Turn( false );
            }
        }

        { // yB - wskazniki drugiego czlonu
            TDynamicObject *tmp; //=mvControlled->mvSecond; //Ra 2014-07: trzeba to
            // jeszcze wyjąć z kabiny...
            // Ra 2014-07: no nie ma potrzeby szukać tego w każdej klatce
            tmp = NULL;
            if ((TestFlag(mvControlled->Couplers[1].CouplingFlag, ctrain_controll)) &&
                (mvOccupied->ActiveCab > 0))
                tmp = DynamicObject->NextConnected();
            if ((TestFlag(mvControlled->Couplers[0].CouplingFlag, ctrain_controll)) &&
                (mvOccupied->ActiveCab < 0))
                tmp = DynamicObject->PrevConnected();

            if (tmp)
                if ( mvControlled->Battery || mvControlled->ConverterFlag ) {

                    auto const *mover { tmp->MoverParameters };

                    btLampkaWylSzybkiB.Turn( mover->Mains );
                    btLampkaWylSzybkiBOff.Turn( false == mover->Mains );

                    btLampkaOporyB.Turn(mover->ResistorsFlagCheck());
                    btLampkaBezoporowaB.Turn(
                        ( true == mover->ResistorsFlagCheck() )
                     || ( mover->MainCtrlActualPos == 0 ) ); // do EU04

                    if( ( mover->StLinFlag )
                     || ( mover->BrakePress > 2.0 )
                     || ( mover->PipePress < 0.36 ) ) {
                        btLampkaStycznB.Turn( false );
                    }
                    else if( mover->BrakePress < 1.0 ) {
                        btLampkaStycznB.Turn( true ); // mozna prowadzic rozruch
                    }
                    // hunter-271211: sygnalizacja poslizgu w pierwszym pojezdzie, gdy wystapi w drugim
                    btLampkaPoslizg.Turn(mover->SlippingWheels);

                    btLampkaSprezarkaB.Turn( mover->CompressorFlag ); // mutopsitka dziala
                    btLampkaSprezarkaBOff.Turn( false == mover->CompressorFlag );
                    if( mvControlled->Signalling == true ) {
                        if( mover->BrakePress >= 1.45f ) {
                            btLampkaHamowanie2zes.Turn( true );
                        }
                        if( mover->BrakePress < 0.75f ) {
                            btLampkaHamowanie2zes.Turn( false );
                        }
                    }
                    else {
                        btLampkaHamowanie2zes.Turn( false );
                    }
                    btLampkaNadmPrzetwB.Turn( mover->ConvOvldFlag ); // nadmiarowy przetwornicy?
                    btLampkaPrzetwB.Turn( mover->ConverterFlag ); // zalaczenie przetwornicy
                    btLampkaPrzetwBOff.Turn( false == mover->ConverterFlag );
                    btLampkaHVoltageB.Turn( mover->NoVoltRelay && mover->OvervoltageRelay );
                    btLampkaMalfunctionB.Turn( mover->dizel_heat.PA );
                    // motor fuse indicator turns on if the fuse was blown in any unit under control
                    if( mover->Mains ) {
                        btLampkaNadmSil.Turn( btLampkaNadmSil.GetValue() || mover->FuseFlagCheck() );
                    }
                }
                else // wylaczone
                {
                    btLampkaWylSzybkiB.Turn( false );
                    btLampkaWylSzybkiBOff.Turn( false );
                    btLampkaOporyB.Turn( false );
                    btLampkaStycznB.Turn( false );
                    btLampkaSprezarkaB.Turn( false );
                    btLampkaSprezarkaBOff.Turn( false );
                    btLampkaBezoporowaB.Turn( false );
                    btLampkaHamowanie2zes.Turn( false );
                    btLampkaNadmPrzetwB.Turn( false );
                    btLampkaPrzetwB.Turn( false );
                    btLampkaPrzetwBOff.Turn( false );
                    btLampkaHVoltageB.Turn( false );
                    btLampkaMalfunctionB.Turn( false );
                }
        }
        // McZapkie-080602: obroty (albo translacje) regulatorow
        if( ggJointCtrl.SubModel != nullptr ) {
            // joint master controller moves forward to adjust power and backward to adjust brakes
            auto const brakerangemultiplier {
                ( mvControlled->CoupledCtrl ?
                    mvControlled->MainCtrlPosNo + mvControlled->ScndCtrlPosNo :
                    mvControlled->MainCtrlPosNo )
                / static_cast<double>(LocalBrakePosNo) };
            ggJointCtrl.UpdateValue(
                ( mvOccupied->LocalBrakePosA > 0.0 ? mvOccupied->LocalBrakePosA * LocalBrakePosNo * -1 * brakerangemultiplier :
                  mvControlled->CoupledCtrl ? double( mvControlled->MainCtrlPos + mvControlled->ScndCtrlPos ) :
                  double( mvControlled->MainCtrlPos ) ),
                dsbNastawnikJazdy );
            ggJointCtrl.Update();
        }
        if ( ggMainCtrl.SubModel != nullptr ) {

#ifdef _WIN32
            if( ( DynamicObject->Mechanik != nullptr )
             && ( false == DynamicObject->Mechanik->AIControllFlag ) // nie blokujemy AI
             && ( Global.iFeedbackMode == 4 )
             && ( Global.fCalibrateIn[ 2 ][ 1 ] != 0.0 ) ) {

                set_master_controller( Console::AnalogCalibrateGet( 2 ) * mvOccupied->MainCtrlPosNo );
			}
#endif

            if( mvControlled->CoupledCtrl ) {
                ggMainCtrl.UpdateValue(
                    double( mvControlled->MainCtrlPos + mvControlled->ScndCtrlPos ),
                    dsbNastawnikJazdy );
            }
            else {
                ggMainCtrl.UpdateValue(
                    double( mvControlled->MainCtrlPos ),
                    dsbNastawnikJazdy );
            }
            ggMainCtrl.Update();
        }
        if (ggMainCtrlAct.SubModel)
        {
            if (mvControlled->CoupledCtrl)
                ggMainCtrlAct.UpdateValue(
                    double(mvControlled->MainCtrlActualPos + mvControlled->ScndCtrlActualPos));
            else
                ggMainCtrlAct.UpdateValue(double(mvControlled->MainCtrlActualPos));
            ggMainCtrlAct.Update();
        }
        if (ggScndCtrl.SubModel) {
            // Ra: od byte odejmowane boolean i konwertowane potem na double?
            ggScndCtrl.UpdateValue(
                double( mvControlled->ScndCtrlPos
                    - ( ( mvControlled->TrainType == dt_ET42 ) && mvControlled->DynamicBrakeFlag ) ),
                dsbNastawnikBocz );
            ggScndCtrl.Update();
        }
        ggScndCtrlButton.Update();
        if (ggDirKey.SubModel) {
            if (mvControlled->TrainType != dt_EZT)
                ggDirKey.UpdateValue(
                    double(mvControlled->ActiveDir),
                    dsbReverserKey);
            else
                ggDirKey.UpdateValue(
                    double(mvControlled->ActiveDir) + double(mvControlled->Imin == mvControlled->IminHi),
                    dsbReverserKey);
            ggDirKey.Update();
        }
        if (ggBrakeCtrl.SubModel)
        {
#ifdef _WIN32
            if (DynamicObject->Mechanik ?
                    (DynamicObject->Mechanik->AIControllFlag ? false : 
						(Global.iFeedbackMode == 4 /*|| (Global.bMWDmasterEnable && Global.bMWDBreakEnable)*/)) :
                    false) // nie blokujemy AI
            { // Ra: nie najlepsze miejsce, ale na początek gdzieś to dać trzeba
				// Firleju: dlatego kasujemy i zastepujemy funkcją w Console
				if (mvOccupied->BrakeHandle == TBrakeHandle::FV4a)
                {
                    double b = Console::AnalogCalibrateGet(0);
					b = b * 8.0 - 2.0;
                    b = clamp<double>( b, -2.0, mvOccupied->BrakeCtrlPosNo ); // przycięcie zmiennej do granic
					ggBrakeCtrl.UpdateValue(b); // przesów bez zaokrąglenia
					mvOccupied->BrakeLevelSet(b);
				}
                if (mvOccupied->BrakeHandle == TBrakeHandle::FVel6) // może można usunąć ograniczenie do FV4a i FVel6?
                {
                    double b = Console::AnalogCalibrateGet(0);
					b = b * 7.0 - 1.0;
                    b = clamp<double>( b, -1.0, mvOccupied->BrakeCtrlPosNo ); // przycięcie zmiennej do granic
                    ggBrakeCtrl.UpdateValue(b); // przesów bez zaokrąglenia
                    mvOccupied->BrakeLevelSet(b);
                }
                // else //standardowa prodedura z kranem powiązanym z klawiaturą
                // ggBrakeCtrl.UpdateValue(double(mvOccupied->BrakeCtrlPos));
            }
#endif
            // else //standardowa prodedura z kranem powiązanym z klawiaturą
            // ggBrakeCtrl.UpdateValue(double(mvOccupied->BrakeCtrlPos));
            ggBrakeCtrl.UpdateValue(mvOccupied->fBrakeCtrlPos);
            ggBrakeCtrl.Update();
        }

        if( ggLocalBrake.SubModel != nullptr ) {
#ifdef _WIN32
            if( ( DynamicObject->Mechanik != nullptr )
             && ( false == DynamicObject->Mechanik->AIControllFlag ) // nie blokujemy AI
             && ( mvOccupied->BrakeLocHandle == TBrakeHandle::FD1 )
             && ( ( Global.iFeedbackMode == 4 )
               /*|| ( Global.bMWDmasterEnable && Global.bMWDBreakEnable )*/ ) ) {
                // Ra: nie najlepsze miejsce, ale na początek gdzieś to dać trzeba
                // Firleju: dlatego kasujemy i zastepujemy funkcją w Console
                auto const b = clamp<double>(
                    Console::AnalogCalibrateGet( 1 ),
                    0.0,
                    1.0 );
                mvOccupied->LocalBrakePosA = b;
                ggLocalBrake.UpdateValue( b * LocalBrakePosNo );
            }
            else
#endif
            {
                // standardowa prodedura z kranem powiązanym z klawiaturą
                ggLocalBrake.UpdateValue( mvOccupied->LocalBrakePosA * LocalBrakePosNo );
            }
            ggLocalBrake.Update();
        }
        if (ggManualBrake.SubModel != nullptr) {
            ggManualBrake.UpdateValue(double(mvOccupied->ManualBrakePos));
            ggManualBrake.Update();
        }
        ggAlarmChain.Update();
        ggBrakeProfileCtrl.Update();
        ggBrakeProfileG.Update();
        ggBrakeProfileR.Update();
		ggBrakeOperationModeCtrl.Update();
        ggMaxCurrentCtrl.Update();
        // NBMX wrzesien 2003 - drzwi
        ggDoorLeftPermitButton.Update();
        ggDoorRightPermitButton.Update();
        ggDoorPermitPresetButton.Update();
        ggDoorLeftButton.Update();
        ggDoorRightButton.Update();
        ggDoorLeftOnButton.Update();
        ggDoorRightOnButton.Update();
        ggDoorLeftOffButton.Update();
        ggDoorRightOffButton.Update();
        ggDoorAllOnButton.Update();
        ggDoorAllOffButton.Update();
        ggDoorSignallingButton.Update();
        // NBMX dzwignia sprezarki
        ggCompressorButton.Update();
        ggCompressorLocalButton.Update();

        //---------
        // hunter-080812: poprawka na ogrzewanie w elektrykach - usuniete uzaleznienie od przetwornicy
        if( ( mvControlled->Heating == true )
         && ( mvControlled->ConvOvldFlag == false ) )
            btLampkaOgrzewanieSkladu.Turn( true );
        else
            btLampkaOgrzewanieSkladu.Turn( false );

        //----------

        // lights
        auto const lightpower { (
            InstrumentLightType == 0 ? mvControlled->Battery || mvControlled->ConverterFlag :
            InstrumentLightType == 1 ? mvControlled->Mains :
            InstrumentLightType == 2 ? mvControlled->ConverterFlag :
            InstrumentLightType == 3 ? mvControlled->Battery || mvControlled->ConverterFlag :
            InstrumentLightType == 4 ? mvControlled->Battery || mvControlled->ConverterFlag :
            false ) };
        InstrumentLightActive = (
            InstrumentLightType == 3 ? true : // TODO: link the light state with the state of the master key
            InstrumentLightType == 4 ? ( mvOccupied->iLights[end::front] != 0 ) || ( mvOccupied->iLights[end::rear] != 0 ) :
            InstrumentLightActive );
        btInstrumentLight.Turn( InstrumentLightActive && lightpower );
        btDashboardLight.Turn( DashboardLightActive && lightpower );
        btTimetableLight.Turn( TimetableLightActive && lightpower );

        // guziki:
        ggMainOffButton.Update();
        ggMainOnButton.Update();
        ggMainButton.Update();
        ggSecurityResetButton.Update();
        ggReleaserButton.Update();
        ggAntiSlipButton.Update();
        ggSandButton.Update();
        ggFuseButton.Update();
        ggConverterFuseButton.Update();
        ggStLinOffButton.Update();
        ggRadioButton.Update();
        ggRadioChannelSelector.Update();
        ggRadioChannelPrevious.Update();
        ggRadioChannelNext.Update();
        ggRadioStop.Update();
        ggRadioTest.Update();
        ggDepartureSignalButton.Update();

        ggPantFrontButton.Update();
        ggPantRearButton.Update();
        ggPantSelectedButton.Update();
        ggPantFrontButtonOff.Update();
        ggPantRearButtonOff.Update();
        ggPantSelectedDownButton.Update();
        ggPantAllDownButton.Update();
        ggPantCompressorButton.Update();
        ggPantCompressorValve.Update();

        ggLightsButton.Update();
        ggUpperLightButton.Update();
        ggLeftLightButton.Update();
        ggRightLightButton.Update();
        ggLeftEndLightButton.Update();
        ggRightEndLightButton.Update();
        // hunter-230112
        ggRearUpperLightButton.Update();
        ggRearLeftLightButton.Update();
        ggRearRightLightButton.Update();
        ggRearLeftEndLightButton.Update();
        ggRearRightEndLightButton.Update();
        ggDimHeadlightsButton.Update();
        //------------
        ggConverterButton.Update();
        ggConverterLocalButton.Update();
        ggConverterOffButton.Update();
        ggTrainHeatingButton.Update();
        ggSignallingButton.Update();
        ggNextCurrentButton.Update();
        ggHornButton.Update();
        ggHornLowButton.Update();
        ggHornHighButton.Update();
        ggWhistleButton.Update();
        if( DynamicObject->Mechanik != nullptr ) {
            ggHelperButton.UpdateValue( DynamicObject->Mechanik->HelperState );
        }
		ggHelperButton.Update();
        for( auto &universal : ggUniversals ) {
            universal.Update();
        }
        // hunter-091012
        ggInstrumentLightButton.Update();
        ggDashboardLightButton.Update();
        ggTimetableLightButton.Update();
        ggCabLightButton.Update();
        ggCabLightDimButton.Update();
        ggBatteryButton.Update();

        ggWaterPumpBreakerButton.Update();
        ggWaterPumpButton.Update();
        ggWaterHeaterBreakerButton.Update();
        ggWaterHeaterButton.Update();
        ggWaterCircuitsLinkButton.Update();
        ggFuelPumpButton.Update();
        ggOilPumpButton.Update();
        ggMotorBlowersFrontButton.Update();
        ggMotorBlowersRearButton.Update();
        ggMotorBlowersAllOffButton.Update();
        //------
    }
    // wyprowadzenie sygnałów dla haslera na PoKeys (zaznaczanie na taśmie)
    btHaslerBrakes.Turn(DynamicObject->MoverParameters->BrakePress > 0.4); // ciśnienie w cylindrach
    btHaslerCurrent.Turn(DynamicObject->MoverParameters->Im != 0.0); // prąd na silnikach

    // calculate current level of interior illumination
    {
        // TODO: organize it along with rest of train update in a more sensible arrangement
        auto const converteractive{ (
            ( mvOccupied->ConverterFlag )
         || ( ( ( mvOccupied->Couplers[ end::front ].CouplingFlag & coupling::permanent ) != 0 ) && mvOccupied->Couplers[ end::front ].Connected->ConverterFlag )
         || ( ( ( mvOccupied->Couplers[ end::rear ].CouplingFlag & coupling::permanent )  != 0 ) && mvOccupied->Couplers[ end::rear ].Connected->ConverterFlag ) ) };
        // Ra: uzeleżnic od napięcia w obwodzie sterowania
        // hunter-091012: uzaleznienie jasnosci od przetwornicy
        int cabidx { 0 };
        for( auto &cab : Cabine ) {

            auto const cablightlevel =
                ( ( cab.bLight == false ) ? 0.f :
                  ( cab.bLightDim == true ) ? 0.4f :
                  1.f )
                * ( converteractive ? 1.f : 0.5f );

            if( cab.LightLevel != cablightlevel ) {
                cab.LightLevel = cablightlevel;
                DynamicObject->set_cab_lights( cabidx, cab.LightLevel );
            }
            if( cabidx == iCabn ) {
                DynamicObject->InteriorLightLevel = cablightlevel;
            }

            ++cabidx;
        }
    }

    // anti slip system activation, maintained while the control button is down
    if( mvOccupied->BrakeSystem != TBrakeSystem::ElectroPneumatic ) {
        if( ggAntiSlipButton.GetDesiredValue() > 0.95 ) {
            mvControlled->AntiSlippingBrake();
        }
    }

    // NOTE: crude way to have the pantographs go back up if they're dropped due to insufficient pressure etc
    // TODO: rework it into something more elegant, when redoing the whole consist/unit/cab etc arrangement
    if( ( DynamicObject->Mechanik == nullptr )
     || ( false == DynamicObject->Mechanik->AIControllFlag ) ) {
        // don't mess with the ai driving, at least not while switches don't follow ai-set vehicle state
        if( ( mvControlled->Battery )
         || ( mvControlled->ConverterFlag ) ) {
            if( ggPantAllDownButton.GetDesiredValue() < 0.05 ) {
                // the 'lower all' button overrides state of switches, while active itself
                if( ( false == mvControlled->PantFrontUp )
                 && ( ggPantFrontButton.GetDesiredValue() >= 0.95 ) ) {
                    mvControlled->PantFront( true );
                }
                if( ( false == mvControlled->PantRearUp )
                 && ( ggPantRearButton.GetDesiredValue() >= 0.95 ) ) {
                    mvControlled->PantRear( true );
                }
            }
        }
    }
/*
    // check whether we should raise the pantographs, based on volume in pantograph tank
    // NOTE: disabled while switch state isn't preserved while moving between compartments
    if( mvControlled->PantPress > (
            mvControlled->TrainType == dt_EZT ?
                2.4 :
                3.5 ) ) {
        if( ( false == mvControlled->PantFrontUp )
         && ( ggPantFrontButton.GetValue() > 0.95 ) ) {
            mvControlled->PantFront( true );
        }
        if( ( false == mvControlled->PantRearUp )
         && ( ggPantRearButton.GetValue() > 0.95 ) ) {
            mvControlled->PantRear( true );
        }
    }
*/
    // screens
    fScreenTimer += Deltatime;
    if( ( fScreenTimer > Global.PythonScreenUpdateRate * 0.001f )
     && ( false == FreeFlyModeFlag ) ) { // don't bother if we're outside
        fScreenTimer = 0.f;
        for( auto const &screen : m_screens ) {
            Application.request( { screen.first, GetTrainState(), GfxRenderer.Texture( screen.second ).id } );
        }
    }
    // sounds
    update_sounds( Deltatime );

    return true; //(DynamicObject->Update(dt));
} // koniec update

void
TTrain::update_sounds( double const Deltatime ) {

    if( Deltatime == 0.0 ) { return; }

    double volume { 0.0 };
    double const brakevolumescale { 0.5 };

    // Winger-160404 - syczenie pomocniczego (luzowanie)
    if( m_lastlocalbrakepressure != -1.f ) {
        // calculate rate of pressure drop in local brake cylinder, once it's been initialized
        auto const brakepressuredifference { mvOccupied->LocBrakePress - m_lastlocalbrakepressure };
        m_localbrakepressurechange = interpolate<float>( m_localbrakepressurechange, 10 * ( brakepressuredifference / Deltatime ), 0.1f );
    }
    m_lastlocalbrakepressure = mvOccupied->LocBrakePress;
    // local brake, release
    if( ( m_localbrakepressurechange < -0.05f )
     && ( mvOccupied->LocBrakePress > mvOccupied->BrakePress - 0.05 ) ) {
        rsSBHiss
            .gain( clamp( rsSBHiss.m_amplitudeoffset + rsSBHiss.m_amplitudefactor * -m_localbrakepressurechange * 0.05, 0.0, 1.5 ) )
            .play( sound_flags::exclusive | sound_flags::looping );
    }
    else {
        // don't stop the sound too abruptly
        volume = std::max( 0.0, rsSBHiss.gain() - 0.1 * Deltatime );
        rsSBHiss.gain( volume );
        if( volume < 0.05 ) {
            rsSBHiss.stop();
        }
    }
    // local brake, engage
    if( m_localbrakepressurechange > 0.05f ) {
        rsSBHissU
            .gain( clamp( rsSBHissU.m_amplitudeoffset + rsSBHissU.m_amplitudefactor * m_localbrakepressurechange * 0.05, 0.0, 1.5 ) )
            .play( sound_flags::exclusive | sound_flags::looping );
    }
    else {
        // don't stop the sound too abruptly
        volume = std::max( 0.0, rsSBHissU.gain() - 0.1 * Deltatime );
        rsSBHissU.gain( volume );
        if( volume < 0.05 ) {
            rsSBHissU.stop();
        }
    }

    // McZapkie-280302 - syczenie
    // TODO: softer volume reduction than plain abrupt stop, perhaps as reusable wrapper?
    if( ( mvOccupied->BrakeHandle == TBrakeHandle::FV4a )
     || ( mvOccupied->BrakeHandle == TBrakeHandle::FVel6 ) ) {
        // upuszczanie z PG
        fPPress = interpolate( fPPress, static_cast<float>( mvOccupied->Handle->GetSound( s_fv4a_b ) ), 0.05f );
        volume = (
            fPPress > 0 ?
                rsHiss.m_amplitudefactor * fPPress * 0.25 :
                0 );
        if( volume * brakevolumescale > 0.05 ) {
            rsHiss
                .gain( volume * brakevolumescale )
                .play( sound_flags::exclusive | sound_flags::looping );
        }
        else {
            rsHiss.stop();
        }
        // napelnianie PG
        fNPress = interpolate( fNPress, static_cast<float>( mvOccupied->Handle->GetSound( s_fv4a_u ) ), 0.25f );
        volume = (
            fNPress > 0 ?
                rsHissU.m_amplitudefactor * fNPress :
                0 );
        if( volume * brakevolumescale > 0.05 ) {
            rsHissU
                .gain( volume * brakevolumescale )
                .play( sound_flags::exclusive | sound_flags::looping );
        }
        else {
            rsHissU.stop();
        }
        // upuszczanie przy naglym
        volume = mvOccupied->Handle->GetSound( s_fv4a_e ) * rsHissE.m_amplitudefactor;
        if( volume * brakevolumescale > 0.05 ) {
            rsHissE
                .gain( volume * brakevolumescale )
                .play( sound_flags::exclusive | sound_flags::looping );
        }
        else {
            rsHissE.stop();
        }
        // upuszczanie sterujacego fala
        volume = mvOccupied->Handle->GetSound( s_fv4a_x ) * rsHissX.m_amplitudefactor;
        if( volume * brakevolumescale > 0.05 ) {
            rsHissX
                .gain( volume * brakevolumescale )
                .play( sound_flags::exclusive | sound_flags::looping );
        }
        else {
            rsHissX.stop();
        }
        // upuszczanie z czasowego 
        volume = mvOccupied->Handle->GetSound( s_fv4a_t ) * rsHissT.m_amplitudefactor;
        if( volume * brakevolumescale > 0.05 ) {
            rsHissT
                .gain( volume * brakevolumescale )
                .play( sound_flags::exclusive | sound_flags::looping );
        }
        else {
            rsHissT.stop();
        }

    } else {
        // jesli nie FV4a
        // upuszczanie z PG
        fPPress = ( 4.0f * fPPress + std::max( mvOccupied->dpLocalValve, mvOccupied->dpMainValve ) ) / ( 4.0f + 1.0f );
        volume = (
            fPPress > 0.0f ?
                2.0 * rsHiss.m_amplitudefactor * fPPress :
                0.0 );
        if( volume > 0.05 ) {
            rsHiss
                .gain( volume )
                .play( sound_flags::exclusive | sound_flags::looping );
        }
        else {
            rsHiss.stop();
        }
        // napelnianie PG
        fNPress = ( 4.0f * fNPress + Min0R( mvOccupied->dpLocalValve, mvOccupied->dpMainValve ) ) / ( 4.0f + 1.0f );
        volume = (
            fNPress < 0.0f ?
                -1.0 * rsHissU.m_amplitudefactor * fNPress :
                 0.0 );
        if( volume > 0.01 ) {
            rsHissU
                .gain( volume )
                .play( sound_flags::exclusive | sound_flags::looping );
        }
        else {
            rsHissU.stop();
        }
    } // koniec nie FV4a

    // ambient sound
    // since it's typically ticking of the clock we can center it on tachometer or on middle of compartment bounding area
    rsFadeSound.play( sound_flags::exclusive | sound_flags::looping );

    if( mvControlled->TrainType == dt_181 ) {
        // alarm przy poslizgu dla 181/182 - BOMBARDIER
        if( ( mvControlled->SlippingWheels )
         && ( DynamicObject->GetVelocity() > 1.0 ) ) {
            dsbSlipAlarm.play( sound_flags::exclusive | sound_flags::looping );
        }
        else {
            dsbSlipAlarm.stop();
        }
    }
    // szum w czasie jazdy
    if( ( false == FreeFlyModeFlag )
     && ( false == Global.CabWindowOpen )
     && ( DynamicObject->GetVelocity() > 0.5 ) ) {

        update_sounds_runningnoise( rsRunningNoise );
    }
    else {
        // don't play the optional ending sound if the listener switches views
        rsRunningNoise.stop( true == FreeFlyModeFlag );
    }
    // hunting oscillation noise
    if( ( false == FreeFlyModeFlag )
     && ( false == Global.CabWindowOpen )
     && ( DynamicObject->GetVelocity() > 0.5 )
     && ( DynamicObject->IsHunting ) ) {

        update_sounds_runningnoise( rsHuntingNoise );
        // modify calculated sound volume by hunting amount
        auto const huntingamount =
            interpolate(
                0.0, 1.0,
                clamp(
                ( mvOccupied->Vel - DynamicObject->HuntingShake.fadein_begin ) / ( DynamicObject->HuntingShake.fadein_end - DynamicObject->HuntingShake.fadein_begin ),
                    0.0, 1.0 ) );

        rsHuntingNoise.gain( rsHuntingNoise.gain() * huntingamount );
    }
    else {
        // don't play the optional ending sound if the listener switches views
        rsHuntingNoise.stop( true == FreeFlyModeFlag );
    }

    // McZapkie-141102: SHP i czuwak, TODO: sygnalizacja kabinowa
    if (mvOccupied->SecuritySystem.Status > 0) {
        // hunter-091012: rozdzielenie alarmow
        if( TestFlag( mvOccupied->SecuritySystem.Status, s_CAalarm )
         || TestFlag( mvOccupied->SecuritySystem.Status, s_SHPalarm ) ) {

            if( false == dsbBuzzer.is_playing() ) {
                dsbBuzzer
                    .pitch( dsbBuzzer.m_frequencyoffset + dsbBuzzer.m_frequencyfactor )
                    .gain( dsbBuzzer.m_amplitudeoffset + dsbBuzzer.m_amplitudefactor )
                    .play( sound_flags::looping );
                Console::BitsSet( 1 << 14 ); // ustawienie bitu 16 na PoKeys
            }
        }
        else {
            if( true == dsbBuzzer.is_playing() ) {
                dsbBuzzer.stop();
                Console::BitsClear( 1 << 14 ); // ustawienie bitu 16 na PoKeys
            }
        }
    }
    else {
        // wylaczone
        if( true == dsbBuzzer.is_playing() ) {
            dsbBuzzer.stop();
            Console::BitsClear( 1 << 14 ); // ustawienie bitu 16 na PoKeys
        }
    }

    update_sounds_radio();

    if( fTachoCount >= 3.f ) {
        auto const frequency { (
            true == dsbHasler.is_combined() ?
                fTachoVelocity * 0.01 :
                dsbHasler.m_frequencyoffset + dsbHasler.m_frequencyfactor ) };
        dsbHasler
            .pitch( frequency )
            .gain( dsbHasler.m_amplitudeoffset + dsbHasler.m_amplitudefactor )
            .play( sound_flags::exclusive | sound_flags::looping );
    }
    else if( fTachoCount < 1.f ) {
        dsbHasler.stop();
    }
}

void TTrain::update_sounds_runningnoise( sound_source &Sound ) {
    // frequency calculation
    auto const normalizer { (
        true == Sound.is_combined() ?
            mvOccupied->Vmax * 0.01f :
            1.f ) };
    auto const frequency {
        Sound.m_frequencyoffset
        + Sound.m_frequencyfactor * mvOccupied->Vel * normalizer };

    // volume calculation
    auto volume =
        Sound.m_amplitudeoffset
        + Sound.m_amplitudefactor * interpolate(
            mvOccupied->Vel / ( 1 + mvOccupied->Vmax ), 1.0,
            0.5 ); // scale base volume between 0.5-1.0
    if( std::abs( mvOccupied->nrot ) > 0.01 ) {
        // hamulce wzmagaja halas
        auto const brakeforceratio { (
        clamp(
            mvOccupied->UnitBrakeForce / std::max( 1.0, mvOccupied->BrakeForceR( 1.0, mvOccupied->Vel ) / ( mvOccupied->NAxles * std::max( 1, mvOccupied->NBpA ) ) ),
            0.0, 1.0 ) ) };

        volume *= 1 + 0.125 * brakeforceratio;
    }
    // scale volume by track quality
    // TODO: track quality and/or environment factors as separate subroutine
    volume *=
        interpolate(
            0.8, 1.2,
            clamp(
                DynamicObject->MyTrack->iQualityFlag / 20.0,
                0.0, 1.0 ) );
    // for single sample sounds muffle the playback at low speeds
    if( false == Sound.is_combined() ) {
        volume *=
            interpolate(
                0.0, 1.0,
                clamp(
                    mvOccupied->Vel / 25.0,
                    0.0, 1.0 ) );
    }

    if( volume > 0.05 ) {
        Sound
            .pitch( frequency )
            .gain( volume )
            .play( sound_flags::exclusive | sound_flags::looping );
    }
    else {
        Sound.stop();
    }
}

void TTrain::update_sounds_radio() {

    if( false == m_radiomessages.empty() ) {
        // erase completed radio messages from the list
        m_radiomessages.erase(
            std::remove_if(
                std::begin( m_radiomessages ), std::end( m_radiomessages ),
                []( auto const &source ) {
                    return ( false == source.second->is_playing() ); } ),
            std::end( m_radiomessages ) );
    }
    // adjust audibility of remaining messages based on current radio conditions
    auto const radioenabled { ( true == mvOccupied->Radio ) && ( mvControlled->Battery || mvControlled->ConverterFlag ) };
    for( auto &message : m_radiomessages ) {
        auto const volume {
            ( true == radioenabled )
         && ( message.first == iRadioChannel ) ?
                Global.RadioVolume :
                0.0 };
        message.second->gain( volume );
    }
    // radiostop
    if( ( true == radioenabled )
     && ( true == mvOccupied->RadioStopFlag ) ) {
        m_radiostop.play( sound_flags::exclusive | sound_flags::looping );
    }
    else {
        m_radiostop.stop();
    }
}

bool TTrain::CabChange(int iDirection)
{ // McZapkie-090902: zmiana kabiny 1->0->2 i z powrotem
    if( ( DynamicObject->Mechanik == nullptr )
     || ( true == DynamicObject->Mechanik->AIControllFlag ) ) {
        // jeśli prowadzi AI albo jest w innym członie
        // jak AI prowadzi, to nie można mu mieszać
        if (abs(DynamicObject->MoverParameters->ActiveCab + iDirection) > 1)
            return false; // ewentualna zmiana pojazdu
        DynamicObject->MoverParameters->ActiveCab =
            DynamicObject->MoverParameters->ActiveCab + iDirection;
    }
    else
    { // jeśli pojazd prowadzony ręcznie albo wcale (wagon)
        DynamicObject->MoverParameters->CabDeactivisation();
        if( DynamicObject->MoverParameters->ChangeCab( iDirection ) ) {
            if( InitializeCab(
                DynamicObject->MoverParameters->ActiveCab,
                DynamicObject->asBaseDir + DynamicObject->MoverParameters->TypeName + ".mmd" ) ) {
                // zmiana kabiny w ramach tego samego pojazdu
                DynamicObject->MoverParameters->CabActivisation(); // załączenie rozrządu (wirtualne kabiny)
                DynamicObject->Mechanik->DirectionChange();
                return true; // udało się zmienić kabinę
            }
        }
        // aktywizacja poprzedniej, bo jeszcze nie wiadomo, czy jakiś pojazd jest
        DynamicObject->MoverParameters->CabActivisation();
    }
    return false; // ewentualna zmiana pojazdu
}

// McZapkie-310302
// wczytywanie pliku z danymi multimedialnymi (dzwieki, kontrolki, kabiny)
bool TTrain::LoadMMediaFile(std::string const &asFileName)
{
    cParser parser(asFileName, cParser::buffer_FILE);
    // NOTE: yaml-style comments are disabled until conflict in use of # is resolved
    // parser.addCommentStyle( "#", "\n" );

    std::string token;
    do
    {
        token = "";
        parser.getTokens();
        parser >> token;
    } while ((token != "") && (token != "internaldata:"));

    if (token == "internaldata:")
    {
        do
        {
            token = "";
            parser.getTokens();
            parser >> token;
            // SEKCJA DZWIEKOW
            if (token == "ctrl:")
            {
                // nastawnik:
                dsbNastawnikJazdy.deserialize( parser, sound_type::single );
                dsbNastawnikJazdy.owner( DynamicObject );
            }
            else if (token == "ctrlscnd:")
            {
                // hunter-081211: nastawnik bocznikowania
                dsbNastawnikBocz.deserialize( parser, sound_type::single );
                dsbNastawnikBocz.owner( DynamicObject );
            }
            else if (token == "reverserkey:")
            {
                // hunter-131211: dzwiek kierunkowego
                dsbReverserKey.deserialize( parser, sound_type::single );
                dsbReverserKey.owner( DynamicObject );
            }
            else if (token == "buzzer:")
            {
                // bzyczek shp:
                dsbBuzzer.deserialize( parser, sound_type::single );
                dsbBuzzer.owner( DynamicObject );
            }
            else if( token == "radiostop:" ) {
                // radiostop
                m_radiostop.deserialize( parser, sound_type::single );
                m_radiostop.owner( DynamicObject );
            }
            else if (token == "slipalarm:")
            {
                // Bombardier 011010: alarm przy poslizgu:
                dsbSlipAlarm.deserialize( parser, sound_type::single );
                dsbSlipAlarm.owner( DynamicObject );
            }
            else if (token == "tachoclock:")
            {
                // cykanie rejestratora:
                dsbHasler.deserialize( parser, sound_type::single );
                dsbHasler.owner( DynamicObject );
            }
            else if (token == "switch:")
            {
                // przelaczniki:
                dsbSwitch.deserialize( parser, sound_type::single );
                dsbSwitch.owner( DynamicObject );
            }
            else if (token == "pneumaticswitch:")
            {
                // stycznik EP:
                dsbPneumaticSwitch.deserialize( parser, sound_type::single );
                dsbPneumaticSwitch.owner( DynamicObject );
            }
            else if (token == "airsound:")
            {
                // syk:
                rsHiss.deserialize( parser, sound_type::single, sound_parameters::amplitude );
                rsHiss.owner( DynamicObject );
                if( true == rsSBHiss.empty() ) {
                    // fallback for vehicles without defined local brake hiss sound
                    rsSBHiss = rsHiss;
                }
            }
            else if (token == "airsound2:")
            {
                // syk:
                rsHissU.deserialize( parser, sound_type::single, sound_parameters::amplitude );
                rsHissU.owner( DynamicObject );
                if( true == rsSBHissU.empty() ) {
                    // fallback for vehicles without defined local brake hiss sound
                    rsSBHissU = rsHissU;
                }
            }
            else if (token == "airsound3:")
            {
                // syk:
                rsHissE.deserialize( parser, sound_type::single, sound_parameters::amplitude );
                rsHissE.owner( DynamicObject );
            }
            else if (token == "airsound4:")
            {
                // syk:
                rsHissX.deserialize( parser, sound_type::single, sound_parameters::amplitude );
                rsHissX.owner( DynamicObject );
            }
            else if (token == "airsound5:")
            {
                // syk:
                rsHissT.deserialize( parser, sound_type::single, sound_parameters::amplitude );
                rsHissT.owner( DynamicObject );
            }
            else if (token == "localbrakesound:")
            {
                // syk:
                rsSBHiss.deserialize( parser, sound_type::single, sound_parameters::amplitude );
                rsSBHiss.owner( DynamicObject );
            }
            else if( token == "localbrakesound2:" ) {
                // syk:
                rsSBHissU.deserialize( parser, sound_type::single, sound_parameters::amplitude );
                rsSBHissU.owner( DynamicObject );
            }
            else if (token == "fadesound:")
            {
                // ambient sound:
                rsFadeSound.deserialize( parser, sound_type::single );
                rsFadeSound.owner( DynamicObject );
            }
            else if( token == "runningnoise:" ) {
                // szum podczas jazdy:
                rsRunningNoise.deserialize( parser, sound_type::single, sound_parameters::amplitude | sound_parameters::frequency, mvOccupied->Vmax );
                rsRunningNoise.owner( DynamicObject );

//                rsRunningNoise.m_amplitudefactor /= ( 1 + mvOccupied->Vmax );
                rsRunningNoise.m_frequencyfactor /= ( 1 + mvOccupied->Vmax );
            }
            else if( token == "huntingnoise:" ) {
                // hunting oscillation sound:
                rsHuntingNoise.deserialize( parser, sound_type::single, sound_parameters::amplitude | sound_parameters::frequency, mvOccupied->Vmax );
                rsHuntingNoise.owner( DynamicObject );

//                rsHuntingNoise.m_amplitudefactor /= ( 1 + mvOccupied->Vmax );
                rsHuntingNoise.m_frequencyfactor /= ( 1 + mvOccupied->Vmax );
            }

        } while (token != "");
    }
    else
    {
        return false;
    } // nie znalazl sekcji internal

    if (!InitializeCab(mvOccupied->ActiveCab, asFileName))
    {
        // zle zainicjowana kabina
        return false;
    }
    else
    {
        if (DynamicObject->Controller == Humandriver)
        {
            // McZapkie-030303: mozliwosc wyswietlania kabiny, w przyszlosci dac opcje w mmd
            DynamicObject->bDisplayCab = true;
        }
        return true;
    }
}

bool TTrain::InitializeCab(int NewCabNo, std::string const &asFileName)
{
    m_controlmapper.clear();
    // clear python screens
    m_screens.clear();
    // reset sound positions and owner
    auto const nullvector { glm::vec3() };
    std::vector<sound_source *> sounds = {
        &dsbReverserKey, &dsbNastawnikJazdy, &dsbNastawnikBocz,
        &dsbSwitch, &dsbPneumaticSwitch,
        &rsHiss, &rsHissU, &rsHissE, &rsHissX, &rsHissT, &rsSBHiss, &rsSBHissU,
        &rsFadeSound, &rsRunningNoise, &rsHuntingNoise,
        &dsbHasler, &dsbBuzzer, &dsbSlipAlarm, &m_radiosound, &m_radiostop
    };
    for( auto sound : sounds ) {
        sound->offset( nullvector );
        sound->owner( DynamicObject );
    }
    // reset view angles
    pMechViewAngle = { 0.0, 0.0 };
    bool parse = false;
    int cabindex = 0;
    DynamicObject->mdKabina = NULL; // likwidacja wskaźnika na dotychczasową kabinę
    switch (NewCabNo)
    { // ustalenie numeru kabiny do wczytania
    case -1:
        cabindex = 2;
        break;
    case 1:
        cabindex = 1;
        break;
    case 0:
        cabindex = 0;
        break;
    }
    std::string cabstr("cab" + std::to_string(cabindex) + "definition:");

    cParser parser(asFileName, cParser::buffer_FILE);
    // NOTE: yaml-style comments are disabled until conflict in use of # is resolved
    // parser.addCommentStyle( "#", "\n" );
    std::string token;
    do
    {
        // szukanie kabiny
        token = "";
        parser.getTokens();
        parser >> token;
/*
        if( token == "locations:" ) {
            do {
                token = "";
                parser.getTokens(); parser >> token;

                if( token == "radio:" ) {
                    // point in 3d space, in format [ x, y, z ]
                    glm::vec3 radiolocation;
                    parser.getTokens( 3, false, "\n\r\t ,;[]" );
                    parser
                        >> radiolocation.x
                        >> radiolocation.y
                        >> radiolocation.z;
                    radiolocation *= glm::vec3( NewCabNo, 1, NewCabNo );
                    m_radiosound.offset( radiolocation );
                }

                else if( token == "alerter:" ) {
                    // point in 3d space, in format [ x, y, z ]
                    glm::vec3 alerterlocation;
                    parser.getTokens( 3, false, "\n\r\t ,;[]" );
                    parser
                        >> alerterlocation.x
                        >> alerterlocation.y
                        >> alerterlocation.z;
                    alerterlocation *= glm::vec3( NewCabNo, 1, NewCabNo );
                    dsbBuzzer.offset( alerterlocation );
                }

            } while( ( token != "" )
                  && ( token != "endlocations" ) );

        } // locations:
*/
    } while ((token != "") && (token != cabstr));
/*
    if ((cabindex != 1) && (token != cabstr))
    {
        // jeśli nie znaleziony wpis kabiny, próba szukania kabiny 1
        cabstr = "cab1definition:";
        // crude way to start parsing from beginning
        parser = std::make_shared<cParser>(asFileName, cParser::buffer_FILE);
        // NOTE: yaml-style comments are disabled until conflict in use of # is resolved
        // parser.addCommentStyle( "#", "\n" );
        do
        {
            token = "";
            parser.getTokens();
            parser >> token;
        } while ((token != "") && (token != cabstr));
    }
*/
    if (token == cabstr)
    {
        // jeśli znaleziony wpis kabiny
        Cabine[cabindex].Load(parser);
        // NOTE: the position and angle definitions depend on strict entry order
        // TODO: refactor into more flexible arrangement
        parser.getTokens();
        parser >> token;
        if( token == std::string( "driver" + std::to_string( cabindex ) + "angle:" ) ) {
            // camera view angle
            parser.getTokens( 2, false );
            // angle is specified in degrees but internally stored in radians
            glm::vec2 viewangle;
            parser
                >> viewangle.y // yaw first, then pitch
                >> viewangle.x;
            pMechViewAngle = glm::radians( viewangle );

            Global.pCamera.Angle.x = pMechViewAngle.x;
            Global.pCamera.Angle.y = pMechViewAngle.y;

            parser.getTokens();
            parser >> token;
        }
        if (token == std::string("driver" + std::to_string(cabindex) + "pos:"))
        {
            // pozycja poczatkowa maszynisty
            parser.getTokens(3, false);
            parser
                >> pMechOffset.x
                >> pMechOffset.y
                >> pMechOffset.z;
            pMechSittingPosition = pMechOffset;

            parser.getTokens();
            parser >> token;
        }
        // ABu: pozycja siedzaca mechanika
        if (token == std::string("driver" + std::to_string(cabindex) + "sitpos:"))
        {
            // ABu 180404 pozycja siedzaca maszynisty
            parser.getTokens(3, false);
            parser
                >> pMechSittingPosition.x
                >> pMechSittingPosition.y
                >> pMechSittingPosition.z;

            parser.getTokens();
            parser >> token;
        }
        // else parse=false;
        do {
            if( parse == true ) {
                token = "";
                parser.getTokens();
                parser >> token;
            }
            else {
                parse = true;
            }
            // inicjacja kabiny
            // Ra 2014-08: zmieniamy zasady - zamiast przypisywać submodel do
            // istniejących obiektów animujących
            // będziemy teraz uaktywniać obiekty animujące z tablicy i podawać im
            // submodel oraz wskaźnik na parametr
            if (token == std::string("cab" + std::to_string(cabindex) + "model:"))
            {
                // model kabiny
                parser.getTokens();
                parser >> token;
                if (token != "none")
                {
                    // bieżąca sciezka do tekstur to dynamic/...
                    Global.asCurrentTexturePath = DynamicObject->asBaseDir;
                    // szukaj kabinę jako oddzielny model
                    // name can contain leading slash, erase it to avoid creation of double slashes when the name is combined with current directory
                    replace_slashes( token );
                    if( token[ 0 ] == '/' ) {
                        token.erase( 0, 1 );
                    }
                    TModel3d *kabina = TModelsManager::GetModel(DynamicObject->asBaseDir + token, true);
                    // z powrotem defaultowa sciezka do tekstur
                    Global.asCurrentTexturePath = szTexturePath;
                    // if (DynamicObject->mdKabina!=k)
                    if (kabina != nullptr)
                    {
                        DynamicObject->mdKabina = kabina; // nowa kabina
                    }
                    //(mdKabina) może zostać to samo po przejściu do innego członu bez
                    // zmiany kabiny, przy powrocie musi być wiązanie ponowne
                    // else
                    // break; //wyjście z pętli, bo model zostaje bez zmian
                }
                else if (cabindex == 1) {
                    // model tylko, gdy nie ma kabiny 1
                    // McZapkie-170103: szukaj elementy kabiny w glownym modelu
                    DynamicObject->mdKabina = DynamicObject->mdModel;
                }
                clear_cab_controls();
            }
/*
            if (nullptr == DynamicObject->mdKabina)
            {
                // don't bother with other parts until the cab is initialised
                continue;
            }
*/
            else if (true == initialize_gauge(parser, token, cabindex))
            {
                // matched the token, grab the next one
                continue;
            }
            else if (true == initialize_button(parser, token, cabindex))
            {
                // matched the token, grab the next one
                continue;
            }
            // TODO: add "pydestination:"
            else if (token == "pyscreen:")
            {
                std::string submodelname, renderername;
                parser.getTokens( 2 );
                parser
                    >> submodelname
                    >> renderername;

                auto const *submodel { ( DynamicObject->mdKabina ? DynamicObject->mdKabina->GetFromName( submodelname ) : nullptr ) };
                if( submodel == nullptr ) {
                    WriteLog( "Python Screen: submodel " + submodelname + " not found - Ignoring screen" );
                    continue;
                }
                auto const material { submodel->GetMaterial() };
                if( material <= 0 ) {
                    // sub model nie posiada tekstury lub tekstura wymienna - nie obslugiwana
                    WriteLog( "Python Screen: invalid texture id " + std::to_string( material ) + " - Ignoring screen" );
                    continue;
                }
                // record renderer and material binding for future update requests
                m_screens.emplace_back(
                    ( substr_path(renderername).empty() ? // supply vehicle folder as path if none is provided
                        DynamicObject->asBaseDir + renderername :
                        renderername ),
                    GfxRenderer.Material( material ).texture1 );
            }
            // btLampkaUnknown.Init("unknown",mdKabina,false);
        } while (token != "");
    }
    else
    {
        return false;
    }
/*
    if (DynamicObject->mdKabina)
    {
*/
        // configure placement of sound emitters which aren't bound with any device model, and weren't placed manually
        // try first to bind sounds to location of possible devices
        if( dsbReverserKey.offset() == nullvector ) {
            dsbReverserKey.offset( ggDirKey.model_offset() );
        }
        if( dsbNastawnikJazdy.offset() == nullvector ) {
            dsbNastawnikJazdy.offset( ggJointCtrl.model_offset() );
        }
        if( dsbNastawnikJazdy.offset() == nullvector ) {
            dsbNastawnikJazdy.offset( ggMainCtrl.model_offset() );
        }
        if( dsbNastawnikBocz.offset() == nullvector ) {
            dsbNastawnikBocz.offset( ggScndCtrl.model_offset() );
        }
        if( dsbBuzzer.offset() == nullvector ) {
            dsbBuzzer.offset( btLampkaCzuwaka.model_offset() );
        }
        // radio has two potential items which can provide the position
        if( m_radiosound.offset() == nullvector ) {
            m_radiosound.offset( btLampkaRadio.model_offset() );
        }
        if( m_radiosound.offset() == nullvector ) {
            m_radiosound.offset( ggRadioButton.model_offset() );
        }
        if( m_radiostop.offset() == nullvector ) {
            m_radiostop.offset( m_radiosound.offset() );
        }
        auto const localbrakeoffset { ggLocalBrake.model_offset() };
        std::vector<sound_source *> localbrakesounds = {
            &rsSBHiss, &rsSBHissU
        };
        for( auto sound : localbrakesounds ) {
            if( sound->offset() == nullvector ) {
                sound->offset( localbrakeoffset );
            }
        }
        // NOTE: if the local brake model can't be located the emitter will also be assigned location of main brake
        auto const brakeoffset { ggBrakeCtrl.model_offset() };
        std::vector<sound_source *> brakesounds = {
            &rsHiss, &rsHissU, &rsHissE, &rsHissX, &rsHissT, &rsSBHiss, &rsSBHissU,
        };
        for( auto sound : brakesounds ) {
            if( sound->offset() == nullvector ) {
                sound->offset( brakeoffset );
            }
        }
        // for whatever is left fallback on generic location, centre of the cab 
        auto const caboffset { glm::dvec3 { ( Cabine[ cabindex ].CabPos1 + Cabine[ cabindex ].CabPos2 ) * 0.5 } + glm::dvec3 { 0, 1, 0 } };
        for( auto sound : sounds ) {
            if( sound->offset() == nullvector ) {
                sound->offset( caboffset );
            }
        }

        if( DynamicObject->mdKabina )
            DynamicObject->mdKabina->Init(); // obrócenie modelu oraz optymalizacja, również zapisanie binarnego

        set_cab_controls( NewCabNo < 0 ? 2 : NewCabNo );
/*
        return true;
    }
    return (token == "none");
*/
    return true;
}

Math3D::vector3 TTrain::MirrorPosition(bool lewe)
{ // zwraca współrzędne widoku kamery z lusterka
    switch (iCabn)
    {
    case 2: // tylna (-1)
        return DynamicObject->mMatrix *
               Math3D::vector3(
                   mvOccupied->Dim.W * ( lewe ? -0.5 : 0.5 ) + 0.2 * ( lewe ? -1 : 1 ),
                   1.5 + Cabine[iCabn].CabPos1.y,
                   Cabine[iCabn].CabPos1.z);
    case 1: // przednia (1)
    default:
        return DynamicObject->mMatrix *
               Math3D::vector3(
                   mvOccupied->Dim.W * ( lewe ? 0.5 : -0.5 ) + 0.2 * ( lewe ? 1 : -1 ),
                   1.5 + Cabine[iCabn].CabPos1.y,
                   Cabine[iCabn].CabPos2.z);
    }
//    return DynamicObject->GetPosition(); // współrzędne środka pojazdu
};

void TTrain::DynamicSet(TDynamicObject *d)
{ // taka proteza: chcę podłączyć
    // kabinę EN57 bezpośrednio z
    // silnikowym, aby nie robić tego
    // przez ukrotnienie
    // drugi silnikowy i tak musi być ukrotniony, podobnie jak kolejna jednostka
    // problem się robi ze światłami, które będą zapalane w silnikowym, ale muszą
    // świecić się w rozrządczych
    // dla EZT światła czołowe będą "zapalane w silnikowym", ale widziane z
    // rozrządczych
    // również wczytywanie MMD powinno dotyczyć aktualnego członu
    // problematyczna może być kwestia wybranej kabiny (w silnikowym...)
    // jeśli silnikowy będzie zapięty odwrotnie (tzn. -1), to i tak powinno
    // jeździć dobrze
    // również hamowanie wykonuje się zaworem w członie, a nie w silnikowym...
    DynamicObject = d; // jedyne miejsce zmiany
    mvOccupied = mvControlled = ( d ? DynamicObject->MoverParameters : nullptr ); // albo silnikowy w EZT

    if( DynamicObject == nullptr ) { return; }

    mvControlled = DynamicObject->ControlledFind()->MoverParameters;
    mvSecond = NULL; // gdyby się nic nie znalazło
    if (mvOccupied->Power > 1.0) // dwuczłonowe lub ukrotnienia, żeby nie szukać każdorazowo
        if (mvOccupied->Couplers[1].Connected ?
                mvOccupied->Couplers[1].AllowedFlag & ctrain_controll :
                false)
        { // gdy jest człon od sprzęgu 1, a sprzęg łączony
            // warsztatowo (powiedzmy)
            if (mvOccupied->Couplers[1].Connected->Power > 1.0) // ten drugi ma moc
                mvSecond =
                    (TMoverParameters *)mvOccupied->Couplers[1].Connected; // wskaźnik na drugiego
        }
        else if (mvOccupied->Couplers[0].Connected ?
                     mvOccupied->Couplers[0].AllowedFlag & ctrain_controll :
                     false)
        { // gdy jest człon od sprzęgu 0, a sprzęg łączony
            // warsztatowo (powiedzmy)
            if (mvOccupied->Couplers[0].Connected->Power > 1.0) // ale ten drugi ma moc
                mvSecond =
                    (TMoverParameters *)mvOccupied->Couplers[0].Connected; // wskaźnik na drugiego
        }
};

// checks whether specified point is within boundaries of the active cab
bool
TTrain::point_inside( Math3D::vector3 const Point ) const {

    return ( Point.x >= Cabine[ iCabn ].CabPos1.x )       && ( Point.x <= Cabine[ iCabn ].CabPos2.x )
        && ( Point.y >= Cabine[ iCabn ].CabPos1.y + 0.5 ) && ( Point.y <= Cabine[ iCabn ].CabPos2.y + 1.8 )
        && ( Point.z >= Cabine[ iCabn ].CabPos1.z )       && ( Point.z <= Cabine[ iCabn ].CabPos2.z );
}

Math3D::vector3
TTrain::clamp_inside( Math3D::vector3 const &Point ) const {

    if( DebugModeFlag ) { return Point; }

    return {
        clamp( Point.x, Cabine[ iCabn ].CabPos1.x, Cabine[ iCabn ].CabPos2.x ),
        clamp( Point.y, Cabine[ iCabn ].CabPos1.y + 0.5, Cabine[ iCabn ].CabPos2.y + 1.8 ),
        clamp( Point.z, Cabine[ iCabn ].CabPos1.z, Cabine[ iCabn ].CabPos2.z ) };
}

void
TTrain::radio_message( sound_source *Message, int const Channel ) {

    auto const soundrange { Message->range() };
    if( ( soundrange > 0 )
     && ( glm::length2( Message->location() - glm::dvec3 { DynamicObject->GetPosition() } ) > ( soundrange * soundrange ) ) ) {
        // skip message playback if the receiver is outside of the emitter's range
        return;
    }
    // NOTE: we initiate playback of all sounds in range, in case the user switches on the radio or tunes to the right channel mid-play
    m_radiomessages.emplace_back(
        Channel,
        std::make_shared<sound_source>( m_radiosound ) );
    // assign sound to the template and play it
    auto &message = *( m_radiomessages.back().second.get() );
    auto const radioenabled { ( true == mvOccupied->Radio ) && ( mvControlled->Battery || mvControlled->ConverterFlag ) };
    auto const volume {
        ( true == radioenabled )
     && ( Channel == iRadioChannel ) ?
            1.0 :
            0.0 };
    message
        .copy_sounds( *Message )
        .gain( volume )
        .play();
}

void TTrain::SetLights()
{
    TDynamicObject *p = DynamicObject->GetFirstDynamic(mvOccupied->ActiveCab < 0 ? 1 : 0, 4);
    bool kier = (DynamicObject->DirectionGet() * mvOccupied->ActiveCab > 0);
    int xs = (kier ? 0 : 1);
    if (kier ? p->NextC(1) : p->PrevC(1)) // jesli jest nastepny, to tylko przod
    {
        p->RaLightsSet(mvOccupied->Lights[xs][mvOccupied->LightsPos - 1] * (1 - xs),
                       mvOccupied->Lights[1 - xs][mvOccupied->LightsPos - 1] * xs);
        p = (kier ? p->NextC(4) : p->PrevC(4));
        while (p)
        {
            if (kier ? p->NextC(1) : p->PrevC(1))
            {
                p->RaLightsSet(0, 0);
            }
            else
            {
                p->RaLightsSet(mvOccupied->Lights[xs][mvOccupied->LightsPos - 1] * xs,
                               mvOccupied->Lights[1 - xs][mvOccupied->LightsPos - 1] * (1 - xs));
            }
            p = (kier ? p->NextC(4) : p->PrevC(4));
        }
    }
    else // calosc
    {
        p->RaLightsSet(mvOccupied->Lights[xs][mvOccupied->LightsPos - 1],
                       mvOccupied->Lights[1 - xs][mvOccupied->LightsPos - 1]);
    }
};

// clears state of all cabin controls
void TTrain::clear_cab_controls()
{
    // indicators exposed to custom control devices
    btLampkaSHP.Clear(0);
    btLampkaCzuwaka.Clear(1);
    btLampkaOpory.Clear(2);
    btLampkaWylSzybki.Clear(3);
    btLampkaNadmSil.Clear(4);
    btLampkaStyczn.Clear(5);
    btLampkaPoslizg.Clear(6);
    btLampkaNadmPrzetw.Clear(((mvControlled->TrainType & dt_EZT) != 0) ? -1 : 7); // EN57 nie ma tej lampki
    btLampkaPrzetwOff.Clear(((mvControlled->TrainType & dt_EZT) != 0) ? 7 : -1 ); // za to ma tę
    btLampkaNadmSpr.Clear(8);
    btLampkaNadmWent.Clear(9);
    btLampkaWysRozr.Clear(((mvControlled->TrainType & dt_ET22) != 0) ? -1 : 10); // ET22 nie ma tej lampki
    btLampkaOgrzewanieSkladu.Clear(11);
    btHaslerBrakes.Clear(12); // ciśnienie w cylindrach do odbijania na haslerze
    btHaslerCurrent.Clear(13); // prąd na silnikach do odbijania na haslerze
    // Numer 14 jest używany dla buczka SHP w update_sounds()
    // Jeśli ustawiamy nową wartość dla PoKeys wolna jest 15

    // other cab controls
    // TODO: arrange in more readable manner, and eventually refactor
    ggJointCtrl.Clear();
    ggMainCtrl.Clear();
    ggMainCtrlAct.Clear();
    ggScndCtrl.Clear();
    ggScndCtrlButton.Clear();
    ggDirKey.Clear();
    ggBrakeCtrl.Clear();
    ggLocalBrake.Clear();
    ggManualBrake.Clear();
    ggAlarmChain.Clear();
    ggBrakeProfileCtrl.Clear();
    ggBrakeProfileG.Clear();
    ggBrakeProfileR.Clear();
	ggBrakeOperationModeCtrl.Clear();
    ggMaxCurrentCtrl.Clear();
    ggMainOffButton.Clear();
    ggMainOnButton.Clear();
    ggSecurityResetButton.Clear();
    ggReleaserButton.Clear();
    ggSandButton.Clear();
    ggAntiSlipButton.Clear();
    ggHornButton.Clear();
    ggHornLowButton.Clear();
    ggHornHighButton.Clear();
    ggWhistleButton.Clear();
	ggHelperButton.Clear();
    ggNextCurrentButton.Clear();
    for( auto &universal : ggUniversals ) {
        universal.Clear();
    }
    ggInstrumentLightButton.Clear();
    ggDashboardLightButton.Clear();
    ggTimetableLightButton.Clear();
    // hunter-091012
    ggCabLightButton.Clear();
    ggCabLightDimButton.Clear();
    ggBatteryButton.Clear();
    //-------
    ggFuseButton.Clear();
    ggConverterFuseButton.Clear();
    ggStLinOffButton.Clear();
    ggRadioButton.Clear();
    ggRadioChannelSelector.Clear();
    ggRadioChannelPrevious.Clear();
    ggRadioChannelNext.Clear();
    ggRadioStop.Clear();
    ggRadioTest.Clear();
    ggDoorLeftPermitButton.Clear();
    ggDoorRightPermitButton.Clear();
    ggDoorPermitPresetButton.Clear();
    ggDoorLeftButton.Clear();
    ggDoorRightButton.Clear();
    ggDoorLeftOnButton.Clear();
    ggDoorRightOnButton.Clear();
    ggDoorLeftOffButton.Clear();
    ggDoorRightOffButton.Clear();
    ggDoorAllOnButton.Clear();
    ggDoorAllOffButton.Clear();
    ggTrainHeatingButton.Clear();
    ggSignallingButton.Clear();
    ggDoorSignallingButton.Clear();
    ggDepartureSignalButton.Clear();
    ggCompressorButton.Clear();
    ggCompressorLocalButton.Clear();
    ggConverterButton.Clear();
    ggConverterOffButton.Clear();
    ggConverterLocalButton.Clear();
    ggMainButton.Clear();
    ggPantFrontButton.Clear();
    ggPantRearButton.Clear();
    ggPantSelectedButton.Clear();
    ggPantFrontButtonOff.Clear();
    ggPantRearButtonOff.Clear();
    ggPantSelectedDownButton.Clear();
    ggPantAllDownButton.Clear();
    ggPantCompressorButton.Clear();
    ggPantCompressorValve.Clear();
    ggZbS.Clear();
    ggI1B.Clear();
    ggI2B.Clear();
    ggI3B.Clear();
    ggItotalB.Clear();
    ggOilPressB.Clear();
    ggWater1TempB.Clear();

    ggClockSInd.Clear();
    ggClockMInd.Clear();
    ggClockHInd.Clear();
    ggEngineVoltage.Clear();
    ggLVoltage.Clear();
    ggMainGearStatus.Clear();
    ggIgnitionKey.Clear();

    ggWaterPumpBreakerButton.Clear();
    ggWaterPumpButton.Clear();
    ggWaterHeaterBreakerButton.Clear();
    ggWaterHeaterButton.Clear();
    ggWaterCircuitsLinkButton.Clear();
    ggFuelPumpButton.Clear();
    ggOilPumpButton.Clear();
    ggMotorBlowersFrontButton.Clear();
    ggMotorBlowersRearButton.Clear();
    ggMotorBlowersAllOffButton.Clear();

    btLampkaPrzetw.Clear();
    btLampkaPrzetwB.Clear();
    btLampkaPrzetwBOff.Clear();
    btLampkaPrzekRozn.Clear();
    btLampkaPrzekRoznPom.Clear();
    btLampkaUkrotnienie.Clear();
    btLampkaHamPosp.Clear();
    btLampkaWylSzybkiOff.Clear();
    btLampkaWylSzybkiB.Clear();
    btLampkaWylSzybkiBOff.Clear();
    btLampkaBezoporowa.Clear();
    btLampkaBezoporowaB.Clear();
    btLampkaMaxSila.Clear();
    btLampkaPrzekrMaxSila.Clear();
    btLampkaRadio.Clear();
    btLampkaRadioStop.Clear();
    btLampkaHamulecReczny.Clear();
    btLampkaBlokadaDrzwi.Clear();
    btLampkaDoorLockOff.Clear();
    for( auto &universal : btUniversals ) {
        universal.Clear();
    }
    btInstrumentLight.Clear();
    btDashboardLight.Clear();
    btTimetableLight.Clear();
    btLampkaWentZaluzje.Clear();
    btLampkaDoorLeft.Clear();
    btLampkaDoorRight.Clear();
    btLampkaDoors.Clear();
    btLampkaDepartureSignal.Clear();
    btLampkaRezerwa.Clear();
    btLampkaBoczniki.Clear();
    btLampkaBocznik1.Clear();
    btLampkaBocznik2.Clear();
    btLampkaBocznik3.Clear();
    btLampkaBocznik4.Clear();
    btLampkaRadiotelefon.Clear();
    btLampkaHamienie.Clear();
    btLampkaBrakingOff.Clear();
    btLampkaED.Clear();
    btLampkaBrakeProfileG.Clear();
    btLampkaBrakeProfileP.Clear();
    btLampkaBrakeProfileR.Clear();
    btLampkaSprezarka.Clear();
    btLampkaSprezarkaB.Clear();
    btLampkaSprezarkaOff.Clear();
    btLampkaSprezarkaBOff.Clear();
    btLampkaFuelPumpOff.Clear();
    btLampkaNapNastHam.Clear();
    btLampkaOporyB.Clear();
    btLampkaStycznB.Clear();
    btLampkaHamowanie1zes.Clear();
    btLampkaHamowanie2zes.Clear();
    btLampkaNadmPrzetwB.Clear();
    btLampkaHVoltageB.Clear();
    btLampkaForward.Clear();
    btLampkaBackward.Clear();
    // light indicators
    btLampkaUpperLight.Clear();
    btLampkaLeftLight.Clear();
    btLampkaRightLight.Clear();
    btLampkaLeftEndLight.Clear();
    btLampkaRightEndLight.Clear();
    btLampkaRearUpperLight.Clear();
    btLampkaRearLeftLight.Clear();
    btLampkaRearRightLight.Clear();
    btLampkaRearLeftEndLight.Clear();
    btLampkaRearRightEndLight.Clear();
    btCabLight.Clear(); // hunter-171012
    // others
    btLampkaMalfunction.Clear();
    btLampkaMalfunctionB.Clear();
    btLampkaMotorBlowers.Clear();
    btLampkaCoolingFans.Clear();
    btLampkaTempomat.Clear();

    ggLeftLightButton.Clear();
    ggRightLightButton.Clear();
    ggUpperLightButton.Clear();
    ggDimHeadlightsButton.Clear();
    ggLeftEndLightButton.Clear();
    ggRightEndLightButton.Clear();
    ggLightsButton.Clear();
    // hunter-230112
    ggRearLeftLightButton.Clear();
    ggRearRightLightButton.Clear();
    ggRearUpperLightButton.Clear();
    ggRearLeftEndLightButton.Clear();
    ggRearRightEndLightButton.Clear();
}

// NOTE: we can get rid of this function once we have per-cab persistent state
void TTrain::set_cab_controls( int const Cab ) {
    // switches
    // battery
    ggBatteryButton.PutValue(
        ( ggBatteryButton.type() == TGaugeType::push ? 0.5f :
          mvOccupied->Battery ? 1.f :
          0.f ) );
    // motor connectors
    ggStLinOffButton.PutValue(
        ( mvControlled->StLinSwitchOff ?
            1.f :
            0.f ) );
    // radio
    if( true == mvOccupied->Radio ) {
        ggRadioButton.PutValue( 1.f );
    }
    ggRadioChannelSelector.PutValue( iRadioChannel - 1 );
    // pantographs
    if( mvOccupied->PantSwitchType != "impulse" ) {
        if( ggPantFrontButton.SubModel ) {
            ggPantFrontButton.PutValue(
                ( mvControlled->PantFrontUp ?
                    1.f :
                    0.f ) );
        }
        if( ggPantFrontButtonOff.SubModel ) {
            ggPantFrontButtonOff.PutValue(
                ( mvControlled->PantFrontUp ?
                    0.f :
                    1.f ) );
        }
        // NOTE: currently we animate the selectable pantograph control for both pantographs
        // TODO: implement actual selection control, and refactor handling this control setup in a separate method
        if( ggPantSelectedButton.SubModel ) {
            ggPantSelectedButton.PutValue(
                ( mvControlled->PantFrontUp ?
                    1.f :
                    0.f ) );
        }
        if( ggPantSelectedDownButton.SubModel ) {
            ggPantSelectedDownButton.PutValue(
                ( mvControlled->PantFrontUp ?
                    0.f :
                    1.f ) );
        }
    }
    if( mvOccupied->PantSwitchType != "impulse" ) {
        if( ggPantRearButton.SubModel ) {
            ggPantRearButton.PutValue(
                ( mvControlled->PantRearUp ?
                    1.f :
                    0.f ) );
        }
        if( ggPantRearButtonOff.SubModel ) {
            ggPantRearButtonOff.PutValue(
                ( mvControlled->PantRearUp ?
                    0.f :
                    1.f ) );
        }
        // NOTE: currently we animate the selectable pantograph control for both pantographs
        // TODO: implement actual selection control, and refactor handling this control setup in a separate method
        if( ggPantSelectedButton.SubModel ) {
            ggPantSelectedButton.PutValue(
                ( mvControlled->PantRearUp ?
                    1.f :
                    0.f ) );
        }
        if( ggPantSelectedDownButton.SubModel ) {
            ggPantSelectedDownButton.PutValue(
                ( mvControlled->PantRearUp ?
                    0.f :
                    1.f ) );
        }
    }
    // auxiliary compressor
    ggPantCompressorValve.PutValue(
        mvControlled->bPantKurek3 ?
            0.f : // default setting is pantographs connected with primary tank
            1.f );
    ggPantCompressorButton.PutValue(
        mvControlled->PantCompFlag ?
            1.f :
            0.f );
    // converter
    if( mvOccupied->ConvSwitchType != "impulse" ) {
        ggConverterButton.PutValue(
            mvControlled->ConverterAllow ?
                1.f :
                0.f );
    }
    ggConverterLocalButton.PutValue(
        mvControlled->ConverterAllowLocal ?
            1.f :
            0.f );
    // compressor
    ggCompressorButton.PutValue(
        mvControlled->CompressorAllow ?
            1.f :
            0.f );
    ggCompressorLocalButton.PutValue(
        mvControlled->CompressorAllowLocal ?
            1.f :
            0.f );
    // motor overload relay threshold / shunt mode
    ggMaxCurrentCtrl.PutValue(
        ( true == mvControlled->ShuntModeAllow ?
            ( true == mvControlled->ShuntMode ?
                1.f :
                0.f ) :
            ( mvControlled->Imax == mvControlled->ImaxHi ?
                1.f :
                0.f ) ) );
    // lights
    ggLightsButton.PutValue( mvOccupied->LightsPos - 1 );

    int const vehicleside =
        ( mvOccupied->ActiveCab == 1 ?
            end::front :
            end::rear );

    if( ( DynamicObject->iLights[ vehicleside ] & light::headlight_left ) != 0 ) {
        ggLeftLightButton.PutValue( 1.f );
    }
    if( ( DynamicObject->iLights[ vehicleside ] & light::headlight_right ) != 0 ) {
        ggRightLightButton.PutValue( 1.f );
    }
    if( ( DynamicObject->iLights[ vehicleside ] & light::headlight_upper ) != 0 ) {
        ggUpperLightButton.PutValue( 1.f );
    }
    if( ( DynamicObject->iLights[ vehicleside ] & light::redmarker_left ) != 0 ) {
        if( ggLeftEndLightButton.SubModel != nullptr ) {
            ggLeftEndLightButton.PutValue( 1.f );
        }
        else {
            ggLeftLightButton.PutValue( -1.f );
        }
    }
    if( ( DynamicObject->iLights[ vehicleside ] & light::redmarker_right ) != 0 ) {
        if( ggRightEndLightButton.SubModel != nullptr ) {
            ggRightEndLightButton.PutValue( 1.f );
        }
        else {
            ggRightLightButton.PutValue( -1.f );
        }
    }
    if( true == DynamicObject->DimHeadlights ) {
        ggDimHeadlightsButton.PutValue( 1.f );
    }
    // cab lights
    if( true == Cabine[Cab].bLight ) {
        ggCabLightButton.PutValue( 1.f );
    }
    if( true == Cabine[Cab].bLightDim ) {
        ggCabLightDimButton.PutValue( 1.f );
    }

    ggInstrumentLightButton.PutValue( (
        InstrumentLightActive ?
            1.f :
            0.f ) );
    ggDashboardLightButton.PutValue( (
        DashboardLightActive ?
            1.f :
            0.f ) );
    ggTimetableLightButton.PutValue( (
        TimetableLightActive ?
            1.f :
            0.f ) );
    // doors permits
    if( ggDoorLeftPermitButton.type() != TGaugeType::push ) {
        ggDoorLeftPermitButton.PutValue( mvOccupied->Doors.instances[ ( mvOccupied->ActiveCab == 1 ? side::left : side::right ) ].open_permit ? 1.f : 0.f );
    }
    if( ggDoorRightPermitButton.type() != TGaugeType::push ) {
        ggDoorRightPermitButton.PutValue( mvOccupied->Doors.instances[ ( mvOccupied->ActiveCab == 1 ? side::right : side::left ) ].open_permit ? 1.f : 0.f );
    }
    ggDoorPermitPresetButton.PutValue( mvOccupied->Doors.permit_preset );
    // door controls
    ggDoorLeftButton.PutValue( mvOccupied->Doors.instances[ ( mvOccupied->ActiveCab == 1 ? side::left : side::right ) ].is_closed ? 0.f : 1.f );
    ggDoorRightButton.PutValue( mvOccupied->Doors.instances[ ( mvOccupied->ActiveCab == 1 ? side::right : side::left ) ].is_closed ? 0.f : 1.f );
    // door lock
    ggDoorSignallingButton.PutValue(
        mvOccupied->Doors.lock_enabled ?
            1.f :
            0.f );
    // heating
    if( ggTrainHeatingButton.type() != TGaugeType::push ) {
        ggTrainHeatingButton.PutValue(
            mvControlled->Heating ?
                1.f :
                0.f );
    }
    // brake acting time
    if( ggBrakeProfileCtrl.SubModel != nullptr ) {
        ggBrakeProfileCtrl.PutValue(
            ( ( mvOccupied->BrakeDelayFlag & bdelay_R ) != 0 ?
                2.f :
                mvOccupied->BrakeDelayFlag - 1 ) );
    }
    if( ggBrakeProfileG.SubModel != nullptr ) {
        ggBrakeProfileG.PutValue(
            mvOccupied->BrakeDelayFlag == bdelay_G ?
                1.f :
                0.f );
    }
    if( ggBrakeProfileR.SubModel != nullptr ) {
        ggBrakeProfileR.PutValue(
            ( mvOccupied->BrakeDelayFlag & bdelay_R ) != 0 ?
                1.f :
                0.f );
    }
	if (ggBrakeOperationModeCtrl.SubModel != nullptr) {
		ggBrakeOperationModeCtrl.PutValue(
			(mvOccupied->BrakeOpModeFlag > 0 ?
				std::log2(mvOccupied->BrakeOpModeFlag) :
				0));
	}
    // alarm chain
    ggAlarmChain.PutValue(
        mvControlled->AlarmChainFlag ?
            1.f :
            0.f );
    // brake signalling
    ggSignallingButton.PutValue(
        mvControlled->Signalling ?
            1.f :
            0.f );
    // multiple-unit current indicator source
    ggNextCurrentButton.PutValue(
        ShowNextCurrent ?
            1.f :
            0.f );
    // water pump
    ggWaterPumpBreakerButton.PutValue(
        mvControlled->WaterPump.breaker ?
            1.f :
            0.f );
    if( ggWaterPumpButton.type() != TGaugeType::push ) {
        ggWaterPumpButton.PutValue(
            mvControlled->WaterPump.is_enabled ?
                1.f :
                0.f );
    }
    // water heater
    ggWaterHeaterBreakerButton.PutValue(
        mvControlled->WaterHeater.breaker ?
            1.f :
            0.f );
    ggWaterHeaterButton.PutValue(
        mvControlled->WaterHeater.is_enabled ?
            1.f :
            0.f );
    ggWaterCircuitsLinkButton.PutValue(
        mvControlled->WaterCircuitsLink ?
            1.f :
            0.f );
    // fuel pump
    if( ggFuelPumpButton.type() != TGaugeType::push ) {
        ggFuelPumpButton.PutValue(
            mvControlled->FuelPump.is_enabled ?
                1.f :
                0.f );
    }
    // oil pump
    if( ggOilPumpButton.type() != TGaugeType::push ) {
        ggOilPumpButton.PutValue(
            mvControlled->OilPump.is_enabled ?
            1.f :
            0.f );
    }
    // traction motor fans
    if( ggMotorBlowersFrontButton.type() != TGaugeType::push ) {
        ggMotorBlowersFrontButton.PutValue(
            mvControlled->MotorBlowers[end::front].is_enabled ?
            1.f :
            0.f );
    }
    if( ggMotorBlowersRearButton.type() != TGaugeType::push ) {
        ggMotorBlowersRearButton.PutValue(
            mvControlled->MotorBlowers[end::rear].is_enabled ?
            1.f :
            0.f );
    }
    if( ggMotorBlowersAllOffButton.type() != TGaugeType::push ) {
        ggMotorBlowersAllOffButton.PutValue(
            ( mvControlled->MotorBlowers[end::front].is_disabled
           || mvControlled->MotorBlowers[ end::front ].is_disabled ) ?
                1.f :
                0.f );
    }
    // tempomat
    if( ggScndCtrlButton.type() != TGaugeType::push ) {
        ggScndCtrlButton.PutValue(
            ( mvControlled->ScndCtrlPos > 0 ) ?
                1.f :
                0.f );
    }
    
    // we reset all indicators, as they're set during the update pass
    // TODO: when cleaning up break setting indicator state into a separate function, so we can reuse it
}

// initializes a button matching provided label. returns: true if the label was found, false otherwise
// TODO: refactor the cabin controls into some sensible structure
bool TTrain::initialize_button(cParser &Parser, std::string const &Label, int const Cabindex) {

    std::unordered_map<std::string, TButton &> const lights = {
        { "i-maxft:", btLampkaMaxSila },
        { "i-maxftt:", btLampkaPrzekrMaxSila },
        { "i-radio:", btLampkaRadio },
        { "i-radiostop:", btLampkaRadioStop },
        { "i-manual_brake:", btLampkaHamulecReczny },
        { "i-door_blocked:", btLampkaBlokadaDrzwi },
        { "i-door_blockedoff:", btLampkaDoorLockOff },
        { "i-slippery:", btLampkaPoslizg },
        { "i-contactors:", btLampkaStyczn },
        { "i-conv_ovld:", btLampkaNadmPrzetw },
        { "i-converter:", btLampkaPrzetw },
        { "i-converteroff:", btLampkaPrzetwOff },
        { "i-converterb:", btLampkaPrzetwB },
        { "i-converterboff:", btLampkaPrzetwBOff },
        { "i-diff_relay:", btLampkaPrzekRozn },
        { "i-diff_relay2:", btLampkaPrzekRoznPom },
        { "i-motor_ovld:", btLampkaNadmSil },
        { "i-train_controll:", btLampkaUkrotnienie },
        { "i-brake_delay_r:", btLampkaHamPosp },
        { "i-mainbreaker:", btLampkaWylSzybki },
        { "i-mainbreakerb:", btLampkaWylSzybkiB },
        { "i-mainbreakeroff:", btLampkaWylSzybkiOff },
        { "i-mainbreakerboff:", btLampkaWylSzybkiBOff },
        { "i-vent_ovld:", btLampkaNadmWent },
        { "i-comp_ovld:", btLampkaNadmSpr },
        { "i-resistors:", btLampkaOpory },
        { "i-no_resistors:", btLampkaBezoporowa },
        { "i-no_resistors_b:", btLampkaBezoporowaB },
        { "i-highcurrent:", btLampkaWysRozr },
        { "i-vent_trim:", btLampkaWentZaluzje },
        { "i-motorblowers:", btLampkaMotorBlowers },
        { "i-coolingfans:", btLampkaCoolingFans },
        { "i-tempomat:", btLampkaTempomat },
        { "i-trainheating:", btLampkaOgrzewanieSkladu },
        { "i-security_aware:", btLampkaCzuwaka },
        { "i-security_cabsignal:", btLampkaSHP },
        { "i-door_left:", btLampkaDoorLeft },
        { "i-door_right:", btLampkaDoorRight },
        { "i-doors:", btLampkaDoors },
        { "i-departure_signal:", btLampkaDepartureSignal },
        { "i-reserve:", btLampkaRezerwa },
        { "i-scnd:", btLampkaBoczniki },
        { "i-scnd1:", btLampkaBocznik1 },
        { "i-scnd2:", btLampkaBocznik2 },
        { "i-scnd3:", btLampkaBocznik3 },
        { "i-scnd4:", btLampkaBocznik4 },
        { "i-braking:", btLampkaHamienie },
        { "i-brakingoff:", btLampkaBrakingOff },
        { "i-dynamicbrake:", btLampkaED },
        { "i-brakeprofileg:", btLampkaBrakeProfileG },
        { "i-brakeprofilep:", btLampkaBrakeProfileP },
        { "i-brakeprofiler:", btLampkaBrakeProfileR },
        { "i-braking-ezt:", btLampkaHamowanie1zes },
        { "i-braking-ezt2:", btLampkaHamowanie2zes },
        { "i-compressor:", btLampkaSprezarka },
        { "i-compressorb:", btLampkaSprezarkaB },
        { "i-compressoroff:", btLampkaSprezarkaOff },
        { "i-compressorboff:", btLampkaSprezarkaBOff },
        { "i-fuelpumpoff:", btLampkaFuelPumpOff },
        { "i-voltbrake:", btLampkaNapNastHam },
        { "i-resistorsb:", btLampkaOporyB },
        { "i-contactorsb:", btLampkaStycznB },
        { "i-conv_ovldb:", btLampkaNadmPrzetwB },
        { "i-hvoltageb:", btLampkaHVoltageB },
        { "i-malfunction:", btLampkaMalfunction },
        { "i-malfunctionb:", btLampkaMalfunctionB },
        { "i-forward:", btLampkaForward },
        { "i-backward:", btLampkaBackward },
        { "i-upperlight:", btLampkaUpperLight },
        { "i-leftlight:", btLampkaLeftLight },
        { "i-rightlight:", btLampkaRightLight },
        { "i-leftend:", btLampkaLeftEndLight },
        { "i-rightend:", btLampkaRightEndLight },
        { "i-rearupperlight:", btLampkaRearUpperLight },
        { "i-rearleftlight:", btLampkaRearLeftLight },
        { "i-rearrightlight:", btLampkaRearRightLight },
        { "i-rearleftend:", btLampkaRearLeftEndLight },
        { "i-rearrightend:",  btLampkaRearRightEndLight },
        { "i-dashboardlight:",  btDashboardLight },
        { "i-timetablelight:",  btTimetableLight },
        { "i-cablight:", btCabLight },
        { "i-universal0:", btUniversals[ 0 ] },
        { "i-universal1:", btUniversals[ 1 ] },
        { "i-universal2:", btUniversals[ 2 ] },
        { "i-universal3:", btUniversals[ 3 ] },
        { "i-universal4:", btUniversals[ 4 ] },
        { "i-universal5:", btUniversals[ 5 ] },
        { "i-universal6:", btUniversals[ 6 ] },
        { "i-universal7:", btUniversals[ 7 ] },
        { "i-universal8:", btUniversals[ 8 ] },
        { "i-universal9:", btUniversals[ 9 ] }
    };
    {
        auto lookup = lights.find( Label );
        if( lookup != lights.end() ) {
            lookup->second.Load( Parser, DynamicObject );
            return true;
        }
    }
    // TODO: move viable dedicated lights to the automatic light array
    std::unordered_map<std::string, bool *> const autolights = {
        { "i-doorpermit_left:",  &mvOccupied->Doors.instances[ ( mvOccupied->ActiveCab == 1 ? side::left : side::right ) ].open_permit },
        { "i-doorpermit_right:", &mvOccupied->Doors.instances[ ( mvOccupied->ActiveCab == 1 ? side::right : side::left ) ].open_permit },
        { "i-doorstep:", &mvOccupied->Doors.step_enabled }
    };
    {
        auto lookup = autolights.find( Label );
        if( lookup != autolights.end() ) {
            auto &button = Cabine[ Cabindex ].Button( -1 ); // pierwsza wolna lampka
            button.Load( Parser, DynamicObject );
            button.AssignBool( lookup->second );
            return true;
        }
    }
    // custom lights
    if( Label == "i-instrumentlight:" ) {
        btInstrumentLight.Load( Parser, DynamicObject );
        InstrumentLightType = 0;
    }
    else if( Label == "i-instrumentlight_m:" ) {
        btInstrumentLight.Load( Parser, DynamicObject );
        InstrumentLightType = 1;
    }
    else if( Label == "i-instrumentlight_c:" ) {
        btInstrumentLight.Load( Parser, DynamicObject );
        InstrumentLightType = 2;
    }
    else if( Label == "i-instrumentlight_a:" ) {
        btInstrumentLight.Load( Parser, DynamicObject );
        InstrumentLightType = 3;
    }
    else if( Label == "i-instrumentlight_l:" ) {
        btInstrumentLight.Load( Parser, DynamicObject );
        InstrumentLightType = 4;
    }
    else if (Label == "i-doors:")
    {
        int i = Parser.getToken<int>() - 1;
        auto &button = Cabine[Cabindex].Button(-1); // pierwsza wolna lampka
        button.Load(Parser, DynamicObject);
        button.AssignBool(bDoors[0] + 3 * i);
    }
    else
    {
        // failed to match the label
        return false;
    }

    return true;
}

// initializes a gauge matching provided label. returns: true if the label was found, false otherwise
// TODO: refactor the cabin controls into some sensible structure
bool TTrain::initialize_gauge(cParser &Parser, std::string const &Label, int const Cabindex) {

    std::unordered_map<std::string, TGauge &> const gauges = {
        { "jointctrl:", ggJointCtrl },
        { "mainctrl:", ggMainCtrl },
        { "scndctrl:", ggScndCtrl },
        { "dirkey:" , ggDirKey },
        { "brakectrl:", ggBrakeCtrl },
        { "localbrake:", ggLocalBrake },
        { "manualbrake:", ggManualBrake },
        { "alarmchain:", ggAlarmChain },
        { "brakeprofile_sw:", ggBrakeProfileCtrl },
        { "brakeprofileg_sw:", ggBrakeProfileG },
        { "brakeprofiler_sw:", ggBrakeProfileR },
		{ "brakeopmode_sw:", ggBrakeOperationModeCtrl },
        { "maxcurrent_sw:", ggMaxCurrentCtrl },
        { "main_off_bt:", ggMainOffButton },
        { "main_on_bt:", ggMainOnButton },
        { "security_reset_bt:", ggSecurityResetButton },
        { "releaser_bt:", ggReleaserButton },
        { "sand_bt:", ggSandButton },
        { "antislip_bt:", ggAntiSlipButton },
        { "horn_bt:", ggHornButton },
        { "hornlow_bt:", ggHornLowButton },
        { "hornhigh_bt:", ggHornHighButton },
        { "whistle_bt:", ggWhistleButton },
		{ "helper_bt:", ggHelperButton },
        { "fuse_bt:", ggFuseButton },
        { "converterfuse_bt:", ggConverterFuseButton },
        { "stlinoff_bt:", ggStLinOffButton },
        { "doorleftpermit_sw:", ggDoorLeftPermitButton },
        { "doorrightpermit_sw:", ggDoorRightPermitButton },
        { "doorpermitpreset_sw:", ggDoorPermitPresetButton },
        { "door_left_sw:", ggDoorLeftButton },
        { "door_right_sw:", ggDoorRightButton },
        { "doorlefton_sw:", ggDoorLeftOnButton },
        { "doorrighton_sw:", ggDoorRightOnButton },
        { "doorleftoff_sw:", ggDoorLeftOffButton },
        { "doorrightoff_sw:", ggDoorRightOffButton },
        { "doorallon_sw:", ggDoorAllOnButton },
        { "dooralloff_sw:", ggDoorAllOffButton },
        { "departure_signal_bt:", ggDepartureSignalButton },
        { "upperlight_sw:", ggUpperLightButton },
        { "leftlight_sw:", ggLeftLightButton },
        { "rightlight_sw:", ggRightLightButton },
        { "dimheadlights_sw:", ggDimHeadlightsButton },
        { "leftend_sw:", ggLeftEndLightButton },
        { "rightend_sw:", ggRightEndLightButton },
        { "lights_sw:", ggLightsButton },
        { "rearupperlight_sw:", ggRearUpperLightButton },
        { "rearleftlight_sw:", ggRearLeftLightButton },
        { "rearrightlight_sw:", ggRearRightLightButton },
        { "rearleftend_sw:", ggRearLeftEndLightButton },
        { "rearrightend_sw:",  ggRearRightEndLightButton },
        { "compressor_sw:", ggCompressorButton },
        { "compressorlocal_sw:", ggCompressorLocalButton },
        { "converter_sw:", ggConverterButton },
        { "converterlocal_sw:", ggConverterLocalButton },
        { "converteroff_sw:", ggConverterOffButton },
        { "main_sw:", ggMainButton },
        { "waterpumpbreaker_sw:", ggWaterPumpBreakerButton },
        { "waterpump_sw:", ggWaterPumpButton },
        { "waterheaterbreaker_sw:", ggWaterHeaterBreakerButton },
        { "waterheater_sw:", ggWaterHeaterButton },
        { "water1tempb:", ggWater1TempB },
        { "watercircuitslink_sw:", ggWaterCircuitsLinkButton },
        { "fuelpump_sw:", ggFuelPumpButton },
        { "oilpump_sw:", ggOilPumpButton },
        { "oilpressb:", ggOilPressB },
        { "motorblowersfront_sw:", ggMotorBlowersFrontButton },
        { "motorblowersrear_sw:", ggMotorBlowersRearButton },
        { "motorblowersalloff_sw:", ggMotorBlowersAllOffButton },
        { "radio_sw:", ggRadioButton },
        { "radiochannel_sw:", ggRadioChannelSelector },
        { "radiochannelprev_sw:", ggRadioChannelPrevious },
        { "radiochannelnext_sw:", ggRadioChannelNext },
        { "radiostop_sw:", ggRadioStop },
        { "radiotest_sw:", ggRadioTest },
        { "pantfront_sw:", ggPantFrontButton },
        { "pantrear_sw:", ggPantRearButton },
        { "pantfrontoff_sw:", ggPantFrontButtonOff },
        { "pantrearoff_sw:", ggPantRearButtonOff },
        { "pantalloff_sw:", ggPantAllDownButton },
        { "pantselected_sw:", ggPantSelectedButton },
        { "pantselectedoff_sw:", ggPantSelectedDownButton },
        { "pantcompressor_sw:", ggPantCompressorButton },
        { "pantcompressorvalve_sw:", ggPantCompressorValve },
        { "trainheating_sw:", ggTrainHeatingButton },
        { "signalling_sw:", ggSignallingButton },
        { "door_signalling_sw:", ggDoorSignallingButton },
        { "nextcurrent_sw:", ggNextCurrentButton },
        { "instrumentlight_sw:", ggInstrumentLightButton },
        { "dashboardlight_sw:", ggDashboardLightButton },
        { "timetablelight_sw:", ggTimetableLightButton },
        { "cablight_sw:", ggCabLightButton },
        { "cablightdim_sw:", ggCabLightDimButton },
        { "battery_sw:", ggBatteryButton },
        { "tempomat_sw:", ggScndCtrlButton },
        { "universal0:", ggUniversals[ 0 ] },
        { "universal1:", ggUniversals[ 1 ] },
        { "universal2:", ggUniversals[ 2 ] },
        { "universal3:", ggUniversals[ 3 ] },
        { "universal4:", ggUniversals[ 4 ] },
        { "universal5:", ggUniversals[ 5 ] },
        { "universal6:", ggUniversals[ 6 ] },
        { "universal7:", ggUniversals[ 7 ] },
        { "universal8:", ggUniversals[ 8 ] },
        { "universal9:", ggUniversals[ 9 ] }
    };
    {
        auto lookup = gauges.find( Label );
        if( lookup != gauges.end() ) {
            lookup->second.Load( Parser, DynamicObject );
            m_controlmapper.insert( lookup->second, lookup->first );
            return true;
        }
    }
    // TODO: move viable dedicated gauges to the automatic array
    std::unordered_map<std::string, bool *> const autoboolgauges = {
        { "doormode_sw:", &mvOccupied->Doors.remote_only },
        { "doorstep_sw:", &mvOccupied->Doors.step_enabled },
        { "coolingfans_sw:", &mvControlled->RVentForceOn }
    };
    {
        auto lookup = autoboolgauges.find( Label );
        if( lookup != autoboolgauges.end() ) {
            auto &gauge = Cabine[ Cabindex ].Gauge( -1 ); // pierwsza wolna lampka
            gauge.Load( Parser, DynamicObject );
            gauge.AssignBool( lookup->second );
            m_controlmapper.insert( gauge, lookup->first );
            return true;
        }
    }

    // ABu 090305: uniwersalne przyciski lub inne rzeczy
    if( Label == "mainctrlact:" ) {
        ggMainCtrlAct.Load( Parser, DynamicObject);
    }
    // SEKCJA WSKAZNIKOW
    else if ((Label == "tachometer:") || (Label == "tachometerb:"))
    {
        // predkosciomierz wskaźnikowy z szarpaniem
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject);
        gauge.AssignFloat(&fTachoVelocityJump);
        // bind tachometer sound location to the meter
        if( dsbHasler.offset() == glm::vec3() ) {
            dsbHasler.offset( gauge.model_offset() );
        }
    }
    else if (Label == "tachometern:")
    {
        // predkosciomierz wskaźnikowy bez szarpania
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject);
        gauge.AssignFloat(&fTachoVelocity);
        // bind tachometer sound location to the meter
        if( dsbHasler.offset() == glm::vec3() ) {
            dsbHasler.offset( gauge.model_offset() );
        }
    }
    else if (Label == "tachometerd:")
    {
        // predkosciomierz cyfrowy
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject);
        gauge.AssignFloat(&fTachoVelocity);
        // bind tachometer sound location to the meter
        if( dsbHasler.offset() == glm::vec3() ) {
            dsbHasler.offset( gauge.model_offset() );
        }
    }
    else if ((Label == "hvcurrent1:") || (Label == "hvcurrent1b:"))
    {
        // 1szy amperomierz
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject);
        gauge.AssignFloat(fHCurrent + 1);
    }
    else if ((Label == "hvcurrent2:") || (Label == "hvcurrent2b:"))
    {
        // 2gi amperomierz
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject);
        gauge.AssignFloat(fHCurrent + 2);
    }
    else if ((Label == "hvcurrent3:") || (Label == "hvcurrent3b:"))
    {
        // 3ci amperomierz
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałska
        gauge.Load(Parser, DynamicObject);
        gauge.AssignFloat(fHCurrent + 3);
    }
    else if ((Label == "hvcurrent:") || (Label == "hvcurrentb:"))
    {
        // amperomierz calkowitego pradu
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject);
        gauge.AssignFloat(fHCurrent);
    }
    else if (Label == "eimscreen:")
    {
        // amperomierz calkowitego pradu
        int i, j;
        Parser.getTokens(2, false);
        Parser >> i >> j;
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject);
        gauge.AssignFloat(&fEIMParams[i][j]);
    }
    else if (Label == "brakes:")
    {
        // amperomierz calkowitego pradu
        int i, j;
        Parser.getTokens(2, false);
        Parser >> i >> j;
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject, 0.1);
        gauge.AssignFloat(&fPress[i - 1][j]);
    }
    else if ((Label == "brakepress:") || (Label == "brakepressb:"))
    {
        // manometr cylindrow hamulcowych
        // Ra 2014-08: przeniesione do TCab
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject, 0.1);
        gauge.AssignDouble(&mvOccupied->BrakePress);
    }
    else if ((Label == "pipepress:") || (Label == "pipepressb:"))
    {
        // manometr przewodu hamulcowego
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject, 0.1);
        gauge.AssignDouble(&mvOccupied->PipePress);
    }
    else if( Label == "scndpress:" ) {
        // manometr przewodu hamulcowego
        auto &gauge = Cabine[ Cabindex ].Gauge( -1 ); // pierwsza wolna gałka
        gauge.Load( Parser, DynamicObject, 0.1 );
        gauge.AssignDouble( &mvOccupied->ScndPipePress );
    }
    else if (Label == "limpipepress:")
    {
        // manometr zbiornika sterujacego zaworu maszynisty
        ggZbS.Load(Parser, DynamicObject, 0.1);
    }
    else if (Label == "cntrlpress:")
    {
        // manometr zbiornika kontrolnego/rorzďż˝du
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject, 0.1);
        gauge.AssignDouble(&mvControlled->PantPress);
    }
    else if ((Label == "compressor:") || (Label == "compressorb:"))
    {
        // manometr sprezarki/zbiornika glownego
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject, 0.1);
        gauge.AssignDouble(&mvOccupied->Compressor);
    }
    else if( Label == "oilpress:" ) {
        // oil pressure
        auto &gauge = Cabine[ Cabindex ].Gauge( -1 ); // pierwsza wolna gałka
        gauge.Load( Parser, DynamicObject );
        gauge.AssignFloat( &mvControlled->OilPump.pressure );
    }
    else if( Label == "oiltemp:" ) {
        // oil temperature
        auto &gauge = Cabine[ Cabindex ].Gauge( -1 ); // pierwsza wolna gałka
        gauge.Load( Parser, DynamicObject );
        gauge.AssignFloat( &mvControlled->dizel_heat.To );
    }
    else if( Label == "water1temp:" ) {
        // main circuit water temperature
        auto &gauge = Cabine[ Cabindex ].Gauge( -1 ); // pierwsza wolna gałka
        gauge.Load( Parser, DynamicObject );
        gauge.AssignFloat( &mvControlled->dizel_heat.temperatura1 );
    }
    else if( Label == "water2temp:" ) {
        // auxiliary circuit water temperature
        auto &gauge = Cabine[ Cabindex ].Gauge( -1 ); // pierwsza wolna gałka
        gauge.Load( Parser, DynamicObject );
        gauge.AssignFloat( &mvControlled->dizel_heat.temperatura2 );
    }
    else if( Label == "pantpress:" ) {
        // pantograph tank pressure
        auto &gauge = Cabine[ Cabindex ].Gauge( -1 ); // pierwsza wolna gałka
        gauge.Load( Parser, DynamicObject, 0.1 );
        gauge.AssignDouble( &mvOccupied->PantPress );
    }
    // yB - dla drugiej sekcji
    else if (Label == "hvbcurrent1:")
    {
        // 1szy amperomierz
        ggI1B.Load(Parser, DynamicObject);
    }
    else if (Label == "hvbcurrent2:")
    {
        // 2gi amperomierz
        ggI2B.Load(Parser, DynamicObject);
    }
    else if (Label == "hvbcurrent3:")
    {
        // 3ci amperomierz
        ggI3B.Load(Parser, DynamicObject);
    }
    else if (Label == "hvbcurrent:")
    {
        // amperomierz calkowitego pradu
        ggItotalB.Load(Parser, DynamicObject);
    }
    //*************************************************************
    else if (Label == "clock:")
    {
        // zegar analogowy
        if (Parser.getToken<std::string>() == "analog")
        {
            if( DynamicObject->mdKabina ) {
                // McZapkie-300302: zegarek
                ggClockSInd.Init( DynamicObject->mdKabina->GetFromName( "ClockShand" ), TGaugeAnimation::gt_Rotate, 1.0 / 60.0 );
                ggClockMInd.Init( DynamicObject->mdKabina->GetFromName( "ClockMhand" ), TGaugeAnimation::gt_Rotate, 1.0 / 60.0 );
                ggClockHInd.Init( DynamicObject->mdKabina->GetFromName( "ClockHhand" ), TGaugeAnimation::gt_Rotate, 1.0 / 12.0 );
            }
        }
    }
    else if( Label == "clock_seconds:" ) {
        ggClockSInd.Load( Parser, DynamicObject );
    }
    else if (Label == "evoltage:")
    {
        // woltomierz napiecia silnikow
        ggEngineVoltage.Load(Parser, DynamicObject);
    }
    else if (Label == "hvoltage:")
    {
        // woltomierz wysokiego napiecia
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject);
        gauge.AssignFloat(&fHVoltage);
    }
    else if (Label == "lvoltage:")
    {
        // woltomierz niskiego napiecia
        ggLVoltage.Load(Parser, DynamicObject);
    }
    else if (Label == "enrot1m:")
    {
        // obrotomierz
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject);
        gauge.AssignFloat(fEngine + 1);
    } // ggEnrot1m.Load(Parser,DynamicObject->mdKabina);
    else if (Label == "enrot2m:")
    {
        // obrotomierz
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject);
        gauge.AssignFloat(fEngine + 2);
    } // ggEnrot2m.Load(Parser,DynamicObject->mdKabina);
    else if (Label == "enrot3m:")
    { // obrotomierz
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject);
        gauge.AssignFloat(fEngine + 3);
    } // ggEnrot3m.Load(Parser,DynamicObject->mdKabina);
    else if (Label == "engageratio:")
    {
        // np. ciśnienie sterownika sprzęgła
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject);
        gauge.AssignDouble(&mvControlled->dizel_engage);
    } // ggEngageRatio.Load(Parser,DynamicObject->mdKabina);
    else if (Label == "maingearstatus:")
    {
        // np. ciśnienie sterownika skrzyni biegów
        ggMainGearStatus.Load(Parser, DynamicObject);
    }
    else if (Label == "ignitionkey:")
    {
        ggIgnitionKey.Load(Parser, DynamicObject);
    }
    else if (Label == "distcounter:")
    {
        // Ra 2014-07: licznik kilometrów
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject);
        gauge.AssignDouble(&mvControlled->DistCounter);
    }
    else if( Label == "shuntmodepower:" ) {
        // shunt mode power slider
        auto &gauge = Cabine[Cabindex].Gauge(-1); // pierwsza wolna gałka
        gauge.Load(Parser, DynamicObject);
        gauge.AssignDouble(&mvControlled->AnPos);
        m_controlmapper.insert( gauge, "shuntmodepower:" );
    }
    else
    {
        // failed to match the label
        return false;
    }

    return true;
}
