// tarcza manewrowa ksztaltowa
//Autor: Rbach (TRS) Konwersja: Stele
// (p1) - nazwa, (p2)(p3)(p4) - lokacja, (p5) rotacja, (p6) - symbol tarczy
// dodanie dowiązania do sąsiedniego semafora - (p7) - Siecool / Całkowo

origin (p2) (p3) (p4)
rotate 0 (p5) 0
// model tarczy manewrowej:
node 1500 0 (p1)_mk1 model 0 0 0 180 pkp/tmk_4m.t3d tabl/(p6) lights 3 1 0 endmodel
rotate 0 0 0
endorigin

// zdarzena tarczy świetlnej do połączenia z semaforem kształtowym współpracującym z Tm
// w torze umieścić tylko odczyt komórki semafora, bo dwie komórki nie będą działać
event (p1)_ms1 multiple 0.0 none 
	(p1)_anim_ms1
	(p1)_sem_info_stop 
	(p1)_sem_m1n
	(p1)_dzwiek
endevent

event (p1)_ms2 multiple 0.0 none 
	(p1)_anim_ms2
	(p1)_sem_info_man 
	(p1)_sem_m2n
	(p1)_dzwiek
endevent

event (p1)_m40 multiple 0.0 none
	(p1)_anim_ms2
	(p1)_sem_info_m40
	(p1)_sem_m2n
	(p1)_dzwiek
endevent

//dzwiek
node 50 0 (p1)_dzwiek sound (p2) (p3) (p4) zwr_naped-1.wav endsound
event (p1)_dzwiek sound 0.0 (p1)_dzwiek 1 endevent

// zdarzena zasadnicze - usunąć po zmianie w scenerii Całkowo Orlen!
event (p1)_m1 multiple 0.0 none (p1)_ms1 endevent
event (p1)_m2 multiple 0.0 none (p1)_ms2 endevent

//wpis do komórki
node -1 0 (p1)_sem_mem memcell (p2) (p3) (p4) ShuntVelocity 0.0 0.0 none endmemcell

//zdarzenia okreslajace predkosc przy tym semaforze:
event (p1)_sem_info_stop updatevalues 0.0 (p7)_sem_mem ShuntVelocity 0 0 condition memcompare ShuntVelocity * * endevent
event (p1)_sem_info_man updatevalues 1.0 (p7)_sem_mem ShuntVelocity 25 0 endevent
event (p1)_sem_info_m40 updatevalues 1.0 (p7)_sem_mem ShuntVelocity 40 0 endevent
event (p1)_s1 updatevalues 1.0 (p7)_sem_mem SetVelocity 0 0 endevent //gdy Tm jest zamiast semafora

// zmiana obrazu tarczy
event (p1)_anim_ms1 multiple 0 none
	(p1)_anim_ms1_1
	(p1)_anim_ms1_2
	(p1)_anim_ms1_3
	(p1)_anim_ms1_4
	(p1)_anim_ms1_5
	(p1)_anim_ms1_6
endevent
event (p1)_anim_ms1_1 animation 0 (p1)_mk1 rotate tarcza 0 0 0 90 endevent
event (p1)_anim_ms1_2 animation 0 (p1)_mk1 rotate ciegno_gorne 0 0 0 91.34 endevent
event (p1)_anim_ms1_3 animation 0 (p1)_mk1 rotate lacznik 0 0 0 102.14 endevent
event (p1)_anim_ms1_4 animation 0 (p1)_mk1 rotate dzwignia_hakowa 0 0 0 52.86 endevent
event (p1)_anim_ms1_5 animation 0 (p1)_mk1 rotate przeslona 0 0 0 54.035 endevent
event (p1)_anim_ms1_6 animation 0 (p1)_mk1 translate ciegno_dolne 0 0 0 0.08 endevent

event (p1)_anim_ms2 multiple 0 none
	(p1)_anim_ms2_1
	(p1)_anim_ms2_2
	(p1)_anim_ms2_3
	(p1)_anim_ms2_4
	(p1)_anim_ms2_5
	(p1)_anim_ms2_6
endevent
event (p1)_anim_ms2_1 animation 0 (p1)_mk1 rotate tarcza -90 0 0 90 endevent
event (p1)_anim_ms2_2 animation 0 (p1)_mk1 rotate ciegno_gorne 91.34 0 0 91.34 endevent
event (p1)_anim_ms2_3 animation 0 (p1)_mk1 rotate lacznik 102.14 0 0 102.14 endevent
event (p1)_anim_ms2_4 animation 0 (p1)_mk1 rotate dzwignia_hakowa 0 52.86 0 52.86 endevent
event (p1)_anim_ms2_5 animation 0 (p1)_mk1 rotate przeslona 0 -54.035 0 54.035 endevent
event (p1)_anim_ms2_6 animation 0 (p1)_mk1 translate ciegno_dolne 0 0 -0.08 0.08 endevent


//podświetlenie nocne
event (p1)_sem_m1n lights 0.5 (p1)_mk1 -1 1 0 endevent
event (p1)_sem_m2n lights 0.5 (p1)_mk1 -1 0 1 endevent

event (p1)_dzienny lights 0.0 (p1)_mk1 0 -1 -1 endevent //dzienne
event (p1)_nocny lights 0.0 (p1)_mk1 1 -1 -1 endevent //nocne
event (p1)_auto lights 0.0 (p1)_mk1 3 -1 -1 endevent //autmatycznie

//odczyt z pamieci:
event (p1)_sem_info getvalues 1.0 (p7)_sem_mem endevent

