481:

Parsowanie dźwięków internal couplerstretch: bufferclamp:
Dźwięki dsbBufferClamp, dsbCouplerDetach, dsbCouplerStretch, dsbCouplerAttach mają wartość domyślną.
Zabezpieczenie na wysyp przy uruchamianiu w wagonie na sprawdzaniu dźwięku buczka shp.

Driver.cpp

@@ -4245,6 +4245,7 @@ bool TController::UpdateSituation(double dt)
                     if ((sSemNext && sSemNext->fVelNext != 0.0) || (iDrivigFlags & moveStopHere)==0)
                     { // jeśli można jechać, to odpalić dźwięk kierownika oraz zamknąć drzwi w
                         // składzie, jeśli nie mamy czekać na sygnał też trzeba odpalić
+						
                         if (iDrivigFlags & moveGuardSignal)
                         { // komunikat od kierownika tu, bo musi być wolna droga i odczekany czas
                             // stania

EU07.bpr

@@ -60,7 +60,7 @@ AutoIncBuild=0
 MajorVer=16
 MinorVer=0
 Release=1173
-Build=480
+Build=481
 Debug=1
 PreRelease=0
 Special=0
@@ -72,7 +72,7 @@ CodePage=1250
 [Version Info Keys]
 CompanyName=EU07 Team
 FileDescription=MaSzyna EU07-424
-FileVersion=16.0.1173.480
+FileVersion=16.0.1173.481
 InternalName=DP+SPKS+asynch+python
 LegalCopyright=
 LegalTrademarks=

Globals.cpp

@@ -49,9 +49,9 @@ double Global::fLuminance = 1.0; // jasno
 int Global::iReCompile = 0; // zwiêkszany, gdy trzeba odœwie¿yæ siatki
 HWND Global::hWnd = NULL; // uchwyt okna
 int Global::iCameraLast = -1;
-AnsiString Global::asRelease = "16.0.1172.480";
+AnsiString Global::asRelease = "16.0.1172.481";
 AnsiString Global::asVersion =
-    "Compilation 2016-08-07, release " + Global::asRelease + "."; // tutaj, bo wysy³any
+    "Compilation 2016-08-24, release " + Global::asRelease + "."; // tutaj, bo wysy³any
 int Global::iViewMode = 0; // co aktualnie widaæ: 0-kabina, 1-latanie, 2-sprzêgi, 3-dokumenty
 int Global::iTextMode = 0; // tryb pracy wyœwietlacza tekstowego
 int Global::iScreenMode[12] = {0, 0, 0, 0, 0, 0,

McZapkie/mtable.pas

@@ -100,7 +100,7 @@ end;
 
 function TTrainParameters.CheckTrainLatency: real;
 begin
-  if (LastStationLatency>1.0) or (LastStationLatency<-1.0) then
+  if (LastStationLatency>1.0) or (LastStationLatency<0) then
    CheckTrainLatency:=LastStationLatency {spoznienie + lub do przodu - z tolerancja 1 min}
   else
    CheckTrainLatency:=0

Train.cpp

@@ -3139,7 +3139,7 @@ bool TTrain::Update()
                     dsbWejscie_na_drugi_uklad->Play(0, 0, 0);
             }
         }
-        // potem dorobic bufory, sprzegi jako RealSound.
+        
         if (TestFlag(mvOccupied->SoundFlag, sound_bufferclamp)) // zderzaki uderzaja o siebie
         {
             if (TestFlag(mvOccupied->SoundFlag, sound_loud))
@@ -4095,6 +4095,8 @@ bool TTrain::Update()
             // if (TestFlag(mvOccupied->SecuritySystem.Status,s_alarm))
             if (TestFlag(mvOccupied->SecuritySystem.Status, s_CAalarm) ||
                 TestFlag(mvOccupied->SecuritySystem.Status, s_SHPalarm))
+            {
+				if(dsbBuzzer)
 				{
                 dsbBuzzer->GetStatus(&stat);
 				if (!(stat & DSBSTATUS_PLAYING))
@@ -4103,7 +4105,10 @@ bool TTrain::Update()
 					Console::BitsSet(1 << 14); // ustawienie bitu 16 na PoKeys
 				}
 				}
+            }
             else
+            {
+				if(dsbBuzzer)
 				{
                 dsbBuzzer->GetStatus(&stat);
 				if (stat & DSBSTATUS_PLAYING)
@@ -4113,10 +4118,13 @@ bool TTrain::Update()
 				}
 				}
             }
+        }
         else // wylaczone
         {
             btLampkaCzuwaka.TurnOff();
             btLampkaSHP.TurnOff();
+			if(dsbBuzzer)
+			{
             dsbBuzzer->GetStatus(&stat);
 			if (stat & DSBSTATUS_PLAYING)
 			{
@@ -4124,6 +4132,7 @@ bool TTrain::Update()
 				Console::BitsClear(1 << 14); // ustawienie bitu 16 na PoKeys
 			}
 			}
+        }
 
         //******************************************
         // przelaczniki
@@ -5014,7 +5023,12 @@ bool TTrain::LoadMMediaFile(AnsiString asFileName)
     //    Parser->LoadStringToParse(asFile);
     Parser->First();
     str = "";
+	//Wartoœci domyœlne by nie wysypywa³o przy wybrakowanych mmd @240816 Stele
     dsbPneumaticSwitch = TSoundsManager::GetFromName("silence1.wav", true);
+	dsbBufferClamp = TSoundsManager::GetFromName("en57_bufferclamp.wav", true);
+	dsbCouplerDetach = TSoundsManager::GetFromName("couplerdetach.wav", true);
+	dsbCouplerStretch = TSoundsManager::GetFromName("en57_couplerstretch.wav", true);
+	dsbCouplerAttach = TSoundsManager::GetFromName("couplerattach.wav", true);
     while ((!Parser->EndOfFile) && (str != AnsiString("internaldata:")))
     {
         str = Parser->GetNextSymbol().LowerCase();
@@ -5109,15 +5123,22 @@ bool TTrain::LoadMMediaFile(AnsiString asFileName)
             {
                 str = Parser->GetNextSymbol().LowerCase();
                 dsbCouplerAttach = TSoundsManager::GetFromName(str.c_str(), true);
-                dsbCouplerStretch = TSoundsManager::GetFromName(
+            }
-                    "en57_couplerstretch.wav", true); // McZapkie-090503: PROWIZORKA!!!
+			else if (str == AnsiString("couplerstretch:")) // laczenie:
+            {
+				str = Parser->GetNextSymbol().LowerCase();
+				dsbCouplerStretch = TSoundsManager::GetFromName(str.c_str(), true); // McZapkie-090503: PROWIZORKA!!! "en57_couplerstretch.wav"
 			}
             else if (str == AnsiString("couplerdetach:")) // rozlaczanie:
             {
                 str = Parser->GetNextSymbol().LowerCase();
                 dsbCouplerDetach = TSoundsManager::GetFromName(str.c_str(), true);
-                dsbBufferClamp = TSoundsManager::GetFromName(
+                
-                    "en57_bufferclamp.wav", true); // McZapkie-090503: PROWIZORKA!!!
+            }
+			else if (str == AnsiString("bufferclamp:")) // laczenie:
+            {
+				str = Parser->GetNextSymbol().LowerCase();
+				dsbBufferClamp = TSoundsManager::GetFromName(str.c_str(), true); // McZapkie-090503: PROWIZORKA!!! "en57_bufferclamp.wav"
 			}
             else if (str == AnsiString("ignition:"))
             { // odpalanie silnika