// Przejazd niestrzeżony z krzyżem św. Andrzeja - Siecool / Całkowo
// (p1) nazwa przejazdu, 
// (p2) (p3) (p4) polozenie,
// (p5) rotacja, 
// (p6) nazwa odcinka izolowanego na przejezdzie

origin (p2) (p3) (p4)
rotate 0 (p5) 0

node -1 0 (p1)_state memcell 0.1 0.1 0.1 otwarty 0 0 none endmemcell
event (p1)_zamkniety updatevalues 1.0 (p1)_state zamkniety * * endevent
event (p1)_otwarty updatevalues 1.0 (p1)_state otwarty * * endevent

// eventy dla wzajemnej wymienności przejazdów przy tych samych eventach w torach - dotyczą tarczy ostrzegawczej przejazdowej
node -1 0 (p1)_crossing_mem memcell 0 0 0 SetVelocity -1 -1 none endmemcell
event (p1)_crossing_info getvalues 1.0 (p1)_crossing_mem endevent

event (p1)_crossing_info_vmax updatevalues 1.0 (p1)_crossing_mem SetVelocity -1 -1 endevent
//event (p1)_crossing_info_v20 updatevalues 1.0 (p1)_crossing_mem SectionVelocity 20 0 endevent
event (p1)_crossing_info_v20 updatevalues 1.0 (p1)_crossing_mem SetVelocity -1 -1 endevent	// SectionVelocity nie dziala prawidłowo

// wpisywanie informacji o tym ze przejazd zostal zamkniety:
//--- zatrzymywanie pojazdow drogowych 
event (p1)R_slow updatevalues 0.0 (p1)R_syg_mem SetVelocity 0.1 0.1 endevent
event (p1)L_slow updatevalues 0.0 (p1)L_syg_mem SetVelocity 0.1 0.1 endevent

event (p1)R_stop updatevalues 5.0 (p1)R_syg_mem SetVelocity 0 0 endevent
event (p1)L_stop updatevalues 5.0 (p1)L_syg_mem SetVelocity 0 0 endevent

//wpisywanie informacji o tym ze przejazd zostal otwarty:
event (p1)R_go updatevalues 1.0 (p1)R_syg_mem SetVelocity -1 -1 endevent
event (p1)L_go updatevalues 1.0 (p1)L_syg_mem SetVelocity -1 -1 endevent

// globalne procedury sterujace:
//--- zamykanie przejazdu - musi byc podpiete jako event1 do torow (z kazdego kierunku) daleko przed przejazdem 
event (p1)_zamykaj multiple 0.0 none (p1)_zamykaj_licz (p1)R_slow (p1)L_slow (p1)R_stop (p1)L_stop (p1)_zamkniety endevent
event (p1)_zamykaj_licz addvalues 0.0 (p1)_state * 1 * endevent

// eventy dla wzajemnej wymienności przejazdów przy tych samych eventach w torach
event (p1)_zamykaj1 multiple 0.0 none (p1)_zamykaj endevent
event (p1)_zamykaj1n multiple 0.0 none (p1)_zamykaj endevent
event (p1)_zamykaj2 multiple 0.0 none (p1)_zamykaj endevent
event (p1)_zamykaj2n multiple 0.0 none (p1)_zamykaj endevent

//---otwieranie przejazdu - zdarzenia musza byc podpiete jako event1 do torow tuz za przejazdem (dla kazdego kierunku)
event (p6):free multiple 1.0 (p1)_state (p1)R_go (p1)L_go condition memcompare * 0 * endevent
event (p1)_otwieraj multiple 5.0 none (p1)R_go (p1)L_go (p1)_otwarty endevent
event (p1)_pojechal addvalues 0 (p1)_state * -1 * endevent

rotate 0 0 0
endorigin