'#############################################################################################################
'LAWO Infotainment Version: "Busverkehr Rheinland" / Stand: 29.02.2020
'#############################################################################################################

'Innenanzeige
'Haltewunsch
'Werbung
'Haltestellenverlauf

'Revision History:

'- Christian Rolle		29.09.2017		created from scratch
'- Christian Rolle		24.02.2018		Anpassungen neue Innenanzeige
'- J-Productions		    23.09.2018		Anpassungen an C2 bzw AVG
'- J-Productions		    29.02.2020		BVR-Anpassung (Spezifische Funktionen)

{macro:Infotainment_init}

	10 (S.L.Innenanzeige_Werbung_Timer)

{end}

{macro:Infotainment_frame}

'#############################################################################################################
'Werbeeinheit Zusammenfassung
'#############################################################################################################	

(L.L.elec_busbar_main)
{if}
'Timer
	(L.L.Monitor_Wechseltimer) (L.S.Timegap) + (S.L.Monitor_Wechseltimer)
	
	(L.L.Monitor_Wechseltimer) 0 >=
	(L.L.Monitor_Wechseltimer) 20 <= &&
	{if}
		1 (S.L.Monitor_KeineWerbung) 0 (S.L.Monitor_Werbung) 
	{else}
		(L.L.Monitor_Wechseltimer) 0 >=
		(L.L.Monitor_Wechseltimer) 28 <= &&
		{if}
		0 (S.L.Monitor_KeineWerbung) 1 (S.L.Monitor_Werbung) 
		{else}
			0 (S.L.Monitor_Wechseltimer)
		{endif}
	{endif}
{else}
	0 (S.L.Monitor_Wechseltimer) (S.L.Monitor_KeineWerbung) (S.L.Monitor_Werbung)
{endif}

'#############################################################################################################	
'Erweiterte Fahrgastinfos anzeigen (Datum,Uhr,etc.)
'#############################################################################################################	

'Uhrzeit:
	(L.S.Time) 3600 / s0 trunc s1 "02" $IntToStrEnh (S.$.Uhrzeit_stunde) 
	(L.S.Time) 3600 / s0 trunc s1 l0 l1 - 60 * "02" $IntToStrEnh (S.$.Uhrzeit_Minute)
	"" (L.$.Uhrzeit_stunde) ":" $+ (L.$.Uhrzeit_Minute) $+ (S.$.Monitor_Uhrzeit)

'Datum:
'	(L.S.Day) "02" $IntToStrEnh "." $+ (L.S.Month) "02" $IntToStrEnh $+ "." $+ (L.S.Year) $IntToStr $+ (S.$.Monitor_Datum)
'Auskommentiert  da keine Funktion diesen String nutzt. (FPS-Sparend)

'#############################################################################################################	
'Verbleibende Haltestellen vom IVU übernehmen und 1:1 an den Monitor übergeben
'#############################################################################################################	

(L.L.elec_busbar_main)
{if}
	" " (L.$.IVU_freier_Port_02) (S.$.Monitor_Halt_1)
	{endif}
	" " (L.$.IVU_freier_Port_03) (S.$.Monitor_Halt_2)
	{endif}
	" " (L.$.IVU_freier_Port_04) (S.$.Monitor_Halt_3)
	{endif}
	" " (L.$.IVU_freier_Port_05) (S.$.Monitor_Halt_4)
	{endif}
	" " (L.$.IVU_freier_Port_09) (S.$.Monitor_Linie)
	{endif}
	" " (L.$.IVU_freier_Port_10) (S.$.Monitor_Ziel_ZZ1)
	{endif}	
	
'Befehl auskommentiert da "Zielerkennung Oben" dafür verantwortlich ist.
'	"  " (L.$.Matrix_TerminusL1) $RemoveSpaces $+ (S.$.Monitor_Ziel)
'	{endif}

'#############################################################################################################
'Zielerkennung Oben (Feld Schwarz)
'#############################################################################################################	

(L.L.elec_busbar_main)
{if}
    (L.$.Matrix_TerminusL1) $length 0 >
    (L.$.Matrix_TerminusL2) $length 0 = &&
    {if}
	(L.$.Matrix_TerminusL1) (S.$.Monitor_Ziel_Einzeilig)
	"" (S.$.Monitor_Ziel_ZZ1) (S.$.Monitor_Ziel_ZZ2)
    {endif}

    (L.$.Matrix_TerminusL1) $length 0 >
    (L.$.Matrix_TerminusL2) $length 0 > &&
    {if}
	"" (S.$.Monitor_Ziel_Einzeilig)
	(L.$.Matrix_TerminusL1) (S.$.Monitor_Ziel_ZZ1)
	(L.$.Matrix_TerminusL2) (S.$.Monitor_Ziel_ZZ2)
    {endif}
	
	
	S.$.IVU_freier_Port_09
	
	
	
'#############################################################################################################	
'Haltewunsch 3Sek Blinkend anzeigen
'#############################################################################################################		

(L.L.elec_busbar_main)
{if}
	(L.L.haltewunsch)
	{if}
		(L.L.haltewunsch_blink_timer) (L.S.Timegap) + (S.L.haltewunsch_blink_timer) s2
		l2 1.5 <=
		{if}
			1 (S.L.TFT_haltewunsch)
		{else}
			l2 3 >=
			{if}
				0 (S.L.haltewunsch_blink_timer)
			{endif}
				
			0 (S.L.TFT_haltewunsch)
		{endif}
	{else}
		0 (S.L.TFT_haltewunsch)
	{endif}
{endif}

'#############################################################################################################		
{else}
	"Innenanzeige_off.dds" (S.$.Innenanzeige_Wechsel)
	"Innenanzeigenwerbung\Werbung_off.dds" (S.$.Innenanzeige_Werbung)
	10 (S.L.Innenanzeige_Werbung_Timer)
	0  (S.L.Monitor_KeineWerbung) (S.L.Monitor_Werbung)
	"" (S.$.Monitor_Halt_1) (S.$.Monitor_Halt_2) (S.$.Monitor_Halt_3) (S.$.Monitor_Halt_4) (S.$.Monitor_Uhrzeit) (S.$.Monitor_Linie) (S.$.Monitor_Ziel) (S.$.Monitor_Halt_5) (S.$.Monitor_Ziel_ZZ1) (S.$.Monitor_Ziel_ZZ2) (S.$.Monitor_Ziel_Einzeilig)
{endif}	
{end}