'########################################
'#                                      #
'#              MAIN SCRIPT             #
'#                                      #
'#    MAN Standarddoppeldecker SD200    #
'#                                      #
'#             Bauart SD85              #
'#                                      #
'########################################

'(c) 10.08.2009 Marcel Kuhnt, Rüdiger Hülsmann

'Script Version: 1.0
'Omsi release: 1.0


'Revision History:
'- Marcel Kuhnt		10.08.2009	Added Revision History
'- Marcel Kuhnt		30.11.2010	Bugfix: press [D] in AI mode if motor running but neutral

'------------------------------------------------------------------------------------------


'######################
'	Hauptteil
'######################

{init}
	(M.L.engine_Init)
	(M.L.Antrieb_Init)
	(M.L.Elec_Init)
	(M.L.Door_Init)
	(M.L.wiper_init)
	(M.L.lights_init)
	(M.L.bremse_init)
	(M.L.cockpit_init)
	(M.L.heizung_init)
	(M.L.Matrix_init)
	(M.L.Collision_Init)
	(M.L.IVU_Ticketbox_init)
	(M.L.VDV_init)
'	(M.L.articulation_init)
	
	
	
{end}

{frame}
	(M.L.Engine_Frame)
	(M.L.Antrieb_Frame)
	(M.L.Elec_Frame)
	(M.L.Door_frame)
	(M.L.cockpit_frame)
	(M.L.lights_frame)
	(M.L.wiper_frame)
	(M.L.Auspuff_Frame)
	(M.L.bremse_frame)
	(M.L.klappern_frame)
	(M.L.FF_frame)
	(M.L.rain_frame)
	(M.L.dirt_frame)
	(M.L.sound_volume_frame)
	(M.L.heizung_frame)
	(M.L.Matrix_frame)
	(M.L.wimpel_frame)
	(M.L.ekran_karta_frame)
	(M.L.cashdesk_frame)
	(M.L.IVU_Ticketbox_frame)
	

		
	(M.L.VDV_Frame)
'	(M.L.articulation_frame)

'	Possible Manual Error fixing

'	EDC Clear
	(L.L.vdv_error_edc_active)
	(L.L.elec_busbar_main) 0 = &&
	(L.L.engine_n) 0 = &&
	{if}
		(C.L.Fehlertoleranz) (L.L.wearlifespan) * random (S.L.EDC_Error_dist)
	{endif}

'	Door Clear
	(L.L.Door_Error_Count) (C.L.Tuerfehlertoleranz) (L.L.wearlifespan) * >
	(L.L.elec_busbar_main) 0 = &&
	{if}
		(C.L.Tuerfehlertoleranz) (L.L.wearlifespan) * random (S.L.Door_Error_Count)
	{endif}

'	Retarder Clear
	(L.L.vdv_error_retarder_active)
	(L.L.elec_busbar_main) 0 = &&
	(L.L.engine_n) 0 = &&
	{if}
		(C.L.Fehlertoleranz) (L.L.wearlifespan) * random (S.L.Retarder_Error_dist)
	{endif}
	
'Gerbox clear

	(L.L.vdv_error_gearbox_active)
	(L.L.elec_busbar_main) 0 = &&
	(L.L.engine_n) 0 = &&
	{if}
		(C.L.Fehlertoleranz) (L.L.wearlifespan) * random (S.L.Gear_Error_dist)
	{endif}
	
' ecas clear
	
	(L.L.vdv_error_ecas_active)
	(L.L.elec_busbar_main) 0 = &&
	(L.L.engine_n) 0 = &&
	{if}
		(C.L.Fehlertoleranz) (L.L.wearlifespan) * random (S.L.ECAS_Error_dist)
	{endif}
	
' ebs clear
	
	(L.L.vdv_error_EBS_active)
	(L.L.elec_busbar_main) 0 = &&
	(L.L.engine_n) 0 = &&
	{if}
		(C.L.Fehlertoleranz) (L.L.wearlifespan) * random (S.L.EBS_Error_dist)
	{endif}


'setvary na czystym

(C.L.Tuerfehlertoleranz)
{if}
	(L.L.vehicle_spawned_time) (L.S.Timegap) + 2 min (S.L.vehicle_spawned_time)
{endif}

(L.L.vehicle_spawned_time) 1 >
{if}
	(L.L.klima_stara) 0 =
	(L.L.klima_nowa) 0 = &&
	(L.L.drl) 0 = &&
	(L.L.komin) 0 = &&
	(L.L.komin_wydech) 0 = &&
	(L.L.podloga_wcieta) 0 = &&
	(L.L.podloga_okragla) 0 = &&
	(L.L.reczny_retarder) 0 = &&
	(L.L.alarm_wtrakcie) 0 = &&
	(L.L.alarm_przed) 0 = &&
	(L.L.lusterko_podzielone) 0 = &&
	(L.L.lusterko_dodatkowe) 0 = &&
	(L.L.przyciski_zf) 0 = &&
	(L.L.brak_kabiny) 0 = &&
	(L.L.kolpaki) 0 = &&
	(L.L.okragle_przyciski_stop) 0 = &&
	(L.L.klima_kier_spheros) 0 = &&
	(L.L.klima_kier_konvekta) 0 = &&
	(L.L.klima_kier_sutrak) 0 = &&
	(L.L.wyswietlacze_klapkowe) 0 = &&
	(L.L.wiatrolapy_nowe) 0 = &&
	(L.L.alarm_przy_polowce) 0 = &&
	(L.L.brak_lampek_drzwi) 0 = &&
	(L.L.lusterka_duze) 0 = &&
	(L.L.drzwi) 0 = &&
	(L.L.dodatki_actia) 0 = &&
	(L.L.szczotki) 0 = &&
	(L.L.fotokomorka) 0 = &&
	(L.L.siedzenia) 0 = &&
	(L.L.fap_rpm) 0 = &&
	(L.L.foto_w_pierwszych) 0 = &&
	(L.L.brak_cg_w_pierwszych) 0 = &&
	(L.L.nowy_sufit) 0 = &&
	(L.L.Osw_zew) 0 = &&
	{if}
		(C.L.Euro_4)
		{if}
			0 (S.L.klima_stara)
			0 (S.L.klima_nowa)
			0 (S.L.drl)
			1 (S.L.komin)
			0 (S.L.komin_wydech)
			0 (S.L.podloga_wcieta)
			1 (S.L.podloga_okragla)
			1 (S.L.reczny_retarder)
			1 (S.L.alarm_wtrakcie)
			0 (S.L.alarm_przed)
			0 (S.L.lusterko_podzielone)
			0 (S.L.lusterko_dodatkowe)
			0 (S.L.przyciski_zf)
			1 (S.L.brak_kabiny)
			0 (S.L.kolpaki)
			0 (S.L.okragle_przyciski_stop)
			1 (S.L.klima_kier_spheros)
			0 (S.L.klima_kier_konvekta)
			0 (S.L.klima_kier_sutrak)
			1 (S.L.wyswietlacze_klapkowe)
			0 (S.L.wiatrolapy_nowe)
			0 (S.L.alarm_przy_polowce)
			0 (S.L.brak_lampek_drzwi)
			0 (S.L.lusterka_duze)
			3 (S.L.drzwi)
			0 (S.L.dodatki_actia)
			0 (S.L.szczotki)
			0 (S.L.fotokomorka)
			0 (S.L.siedzenia)
			1 (S.L.fap_rpm)
			0 (S.L.foto_w_pierwszych)
			1 (S.L.brak_cg_w_pierwszych)
			0 (S.L.nowy_sufit)
			0 (S.L.Osw_zew)
		{else}
			(C.L.Euro_6)
			(C.L.Euro_6_cummins) ||
			{if}
				0 (S.L.klima_stara)
				1 (S.L.klima_nowa)
				0 (S.L.drl)
				0 (S.L.komin)
				0 (S.L.komin_wydech)
				1 (S.L.podloga_wcieta)
				0 (S.L.podloga_okragla)
				1 (S.L.reczny_retarder)
				1 (S.L.alarm_wtrakcie)
				1 (S.L.alarm_przed)
				0 (S.L.lusterko_podzielone)
				0 (S.L.lusterko_dodatkowe)
				0 (S.L.przyciski_zf)
				0 (S.L.brak_kabiny)
				0 (S.L.kolpaki)
				1 (S.L.okragle_przyciski_stop)
				0 (S.L.klima_kier_spheros)
				0 (S.L.klima_kier_konvekta)
				1 (S.L.klima_kier_sutrak)
				0 (S.L.wyswietlacze_klapkowe)
				1 (S.L.wiatrolapy_nowe)
				1 (S.L.alarm_przy_polowce)
				0 (S.L.brak_lampek_drzwi)
				1 (S.L.lusterka_duze)
				1 (S.L.drzwi)
				1 (S.L.dodatki_actia)
				1 (S.L.szczotki)
				1 (S.L.fotokomorka)
				1 (S.L.siedzenia)
				0 (S.L.fap_rpm)
				0 (S.L.foto_w_pierwszych)
				0 (S.L.brak_cg_w_pierwszych)
				1 (S.L.nowy_sufit)
				1 (S.L.Osw_zew)
			{else}
				1 (S.L.klima_stara)
				0 (S.L.klima_nowa)
				1 (S.L.drl)
				1 (S.L.komin)
				1 (S.L.komin_wydech)
				0 (S.L.podloga_wcieta)
				1 (S.L.podloga_okragla)
				1 (S.L.reczny_retarder)
				1 (S.L.alarm_wtrakcie)
				1 (S.L.alarm_przed)
				1 (S.L.lusterko_podzielone)
				1 (S.L.lusterko_dodatkowe)
				0 (S.L.przyciski_zf)
				0 (S.L.brak_kabiny)
				0 (S.L.kolpaki)
				1 (S.L.okragle_przyciski_stop)
				0 (S.L.klima_kier_spheros)
				1 (S.L.klima_kier_konvekta)
				0 (S.L.klima_kier_sutrak)
				0 (S.L.wyswietlacze_klapkowe)
				1 (S.L.wiatrolapy_nowe)
				0 (S.L.alarm_przy_polowce)
				0 (S.L.brak_lampek_drzwi)
				0 (S.L.lusterka_duze)
				0 (S.L.drzwi)
				1 (S.L.dodatki_actia)
				2 (S.L.szczotki)
				0 (S.L.fotokomorka)
				0 (S.L.siedzenia)
				1 (S.L.fap_rpm)
				0 (S.L.foto_w_pierwszych)
				0 (S.L.brak_cg_w_pierwszych)
				1 (S.L.nowy_sufit)
				1 (S.L.Osw_zew)
			{endif}
		{endif}
	{endif}

	
'Wlasciwosci setvarow

	(L.L.komin_wydech)
	{if}
		1 (S.L.komin)
	{endif}

		(L.L.Euro_6) (L.L.komin) && (S.L.KOMIN_E6)
		(L.L.Euro_6_cummins) (L.L.komin) && (S.L.KOMIN_E6_CUMMINS)
		(L.L.Euro_6) ! (L.L.Euro_6_cummins) ! && (L.L.komin) && (S.L.KOMIN_EEV)

	(L.L.podloga_okragla)
	(L.L.podloga_wcieta) &&
	{if}
		0 (S.L.podloga_wcieta)
	{endif}
	
	(L.L.lusterko_podzielone)
	(L.L.lusterka_duze) ! &&
	{if}
		1 (S.L.lusterko_podzielone_zezwolono)
	{else}
		0 (S.L.lusterko_podzielone_zezwolono)
	{endif}
	
	(L.L.lusterko_podzielone) !
	(L.L.lusterka_duze) ! &&
	{if}
		1 (S.L.lusterko_niepodzielone_zezwolono)
	{else}
		0 (S.L.lusterko_niepodzielone_zezwolono)
	{endif}
	
	(L.L.klima_stara) 0 =
	(L.L.klima_nowa) 0 = &&
	{if}

		(L.L.Klimatyzator) 0 =
		{if}
			0 (S.L.klima_stara)
			0 (S.L.klima_nowa)
		{else}
			(L.L.Klimatyzator) 1 =
			{if}
				1 (S.L.klima_stara)
				0 (S.L.klima_nowa)
			{else}
				(L.L.Klimatyzator) 2 =
				{if}
					0 (S.L.klima_stara)
					1 (S.L.klima_nowa)
				{endif}
			{endif}
		{endif}
	{endif}
	
	(L.L.Nowy_sufit)
	(L.L.klima_stara) &&
	{if}
		1 (S.L.klima_stara_nowy_sufit)
	{else}
		0 (S.L.klima_stara_nowy_sufit)
	{endif}
	
	(L.L.Nowy_sufit)
	(L.L.klima_nowa) &&
	{if}
		1 (S.L.klima_nowa_nowy_sufit)
	{else}
		0 (S.L.klima_nowa_nowy_sufit)
	{endif}
	
	
	

	(L.L.klima_nowa) !
	(L.L.klima_stara) ! &&
	{if}
		1 (S.L.brak_klimy)
	{else}	
		0 (S.L.brak_klimy)
	{endif}
		
	(L.L.zf)
	{if}
		1 (S.L.przyciski_zf)
	{endif}
	
	(L.L.klima_kier_spheros)
	(L.L.klima_kier_konvekta) &&
	{if}
		0 (S.L.klima_kier_spheros)
	{endif}
	
	(C.L.Euro_4)
	(S.L.Euro_4)
	
	(C.L.Euro_6)
	(S.L.Euro_6)
	
	(C.L.Euro_6_cummins)
	(S.L.Euro_6_cummins)
	
	(L.L.Euro_6) 0 =
	(L.L.Euro_6_cummins) 0 = &&
	(L.L.Euro_4) 0 = &&
	(S.L.EEV)
	
{endif}	
	
	(L.L.DRL) 0 =
	{if}
		0 (S.L.DRL_light) (S.L.DRL_E6Light)
	{else}
		(L.L.DRL) 1 =
		{if}
			(L.L.elec_Busbar_main)
			(L.L.engine_n) 300 > &&
			(L.L.cp_schluessel_rot) 0.2 < &&
			{if}
				1 (S.L.DRL_light)
			{else}
				0 (S.L.DRL_light)
			{endif}
		{else}
			(L.L.DRL) 2 =
			{if}
				(L.L.elec_Busbar_main)
				(L.L.engine_n) 300 > &&
				(L.L.cp_schluessel_rot) 0.2 < &&
				{if}
					1 (S.L.DRL_E6Light)
				{else}
					0 (S.L.DRL_E6Light)
				{endif}
			{endif}
		{endif}
	{endif}
	
	(L.L.Euro_6)
	(L.L.Euro_6_cummins) ||
	{if}
		(L.L.DRL)
		{if}
			(L.L.elec_Busbar_main)
			(L.L.engine_n) 300 > &&
			(L.L.cp_schluessel_rot) 0.2 < &&
			{if}
				1 (S.L.DRL_light)
			{else}
				0 (S.L.DRL_light)
			{endif}
		{else}
			(L.L.elec_Busbar_main)
			(L.L.engine_n) 300 > &&
			(L.L.cp_schluessel_rot) 0.2 < &&
			{if}
				1 (S.L.DRL_E6Light)
			{else}
				0 (S.L.DRL_E6Light)
			{endif}
		{endif}
	{endif}


'AI:

	(L.L.AI_Engine) 0.5 >
	(L.L.engine_on) 0.5 <
	(L.L.antrieb_getr_gangvorwahl) 4 = ! ||
	&&
	{if}
		0 (S.L.bremse_feststell_sw) (S.L.bremse_feststell)
		1 (S.L.engine_injection_on) (S.L.elec_busbar_main_sw)
		400 (S.L.engine_n)
		4 (S.L.antrieb_getr_gangvorwahl)
		1 (S.L.engine_on)
		0.4 (S.L.cp_key_rot)
		900000 (S.L.bremse_p_tank01) (S.L.bremse_p_tank02) (S.L.bremse_p_tank03) (S.L.bremse_p_tank04) (S.L.bremse_p_leitung01) (S.L.bremse_p_leitung02)
		400000 (S.L.bremse_p_balg_0_R) (S.L.bremse_p_balg_0_L) (S.L.bremse_p_balg_1_R) (S.L.bremse_p_balg_1_L) 
		(T.L.ev_engine_ingnition)
	{endif}

	(L.L.AI_Engine) -0.5 <
	(L.L.engine_on) 0.5 >
	&&
	{if}
		0 (S.L.engine_on)
		0 (S.L.engine_injection_on)
		1 (S.L.bremse_feststell_sw) (S.L.bremse_feststell)
		0.2 (S.L.cp_key_rot)
		(T.L.ev_engineshutdown)
	{endif}

	(L.L.AI)
	{if}
		(L.L.Brake) (C.L.max_bremskraft) * (S.L.Brakeforce)
	{endif}





{end}

'----------------------------------
'Crash:

{trigger:collision}
	(M.L.Collision_Trigger)
{end}


'----------------------------------
'malfunction reset:


{trigger:malfunction_reset}
	1.0 (S.L.elec_V_battery)
	(M.L.Collision_Malfunction_Reset)
	(C.L.Fehlertoleranz) (L.L.wearlifespan) * random (S.L.EBS_Error_dist)
	(C.L.Fehlertoleranz) (L.L.wearlifespan) * random (S.L.Retarder_Error_dist)
	(C.L.Fehlertoleranz) (L.L.wearlifespan) * random (S.L.Gear_Error_dist)
	(C.L.Fehlertoleranz) (L.L.wearlifespan) * random (S.L.ECAS_Error_dist)
	(C.L.Fehlertoleranz) (L.L.wearlifespan) * random (S.L.EDC_Error_dist)
	(C.L.Fehlertoleranz) (L.L.wearlifespan) * random (S.L.Battery_Error_dist)
	(C.L.Tuerfehlertoleranz) (L.L.wearlifespan) * random (S.L.Door_Error_Count)
'	60 (S.L.engine_temperature)
{end}