'##############
'Articulation script
'##############

'----------------------
'	Init
'----------------------

{macro:articulation_init}

' Setzen der Initial-Quietschlautstärke
	-2 (S.L.articulation_0_alpha_volume) (S.L.articulation_0_beta_volume)

{end}

'----------------------
'	Frame
'----------------------

{macro:articulation_frame}

'Berechnung der Drehwinkeländerung pro Timegap
'Hochachse:
(L.L.articulation_0_alpha) (L.L.articulation_0_alpha_last) - (S.L.articulation_0_alpha_speed) (F.L.articulation_0_alpha_pitchcurve) (S.L.articulation_0_alpha_pitch)
(L.L.articulation_0_alpha) (S.L.articulation_0_alpha_last)

'Querachse:
(L.L.articulation_0_beta) (L.L.articulation_0_beta_last) - (S.L.articulation_0_beta_speed) (F.L.articulation_0_beta_pitchcurve) (S.L.articulation_0_beta_pitch)
(L.L.articulation_0_beta) (S.L.articulation_0_beta_last)


'Bestimmen der Gesamtlautstärke je nach Wagennummer und Fahrzeugalter:
(L.L.articulation_0_alpha_volume) -1.5 <
{if}
	(L.$.number) $StrToFloat 1000 * sin (L.S.Year) (C.L.articulation_baujahr) - 15 / + 1 min (S.L.articulation_0_alpha_volume)
	(L.$.number) $StrToFloat 900 * sin (L.S.Year) (C.L.articulation_baujahr) - 15 / + 1 min (S.L.articulation_0_beta_volume)
{endif}



'Knickschutz-Sound und Eingreifen in die Motorsteuerung
(L.L.elec_busbar_main)
{if}

	(L.L.articulation_0_alpha) 70.0 > (L.L.articulation_0_alpha) -70.0 < || (S.L.articulation_knickschutz_warning)


'Eingreifen der Haltestellenbremse bei noch größerem Knickwinkel im Rückwärtsgang
	(L.L.articulation_0_alpha) 70.0 > (L.L.articulation_0_alpha) -70.0 < || (L.L.antrieb_getr_aktugang)

{else}
	0 (S.L.articulation_knickschutz_warning)
{endif}

{end}
