# Segnale di protezione ad una luce # Aspetti consentiti: # R via impedita # G o V via libera # # # # # # Aspect: red IconE: rE.xpm IconW: rW.xpm IconN: rN.xpm IconS: rS.xpm Action: stop Aspect: yellow IconE: yE.xpm IconW: yW.xpm IconN: yN.xpm IconS: yS.xpm Action: proceed Aspect: green IconE: gE.xpm IconW: gW.xpm IconN: gN.xpm IconS: gS.xpm Action: proceed OnInit: .aspect = red end OnCleared: if .aspect = red if next.aspect = red .aspect = yellow else .aspect = green end end end OnUpdate: if .aspect = red return end if next.aspect = red .aspect = yellow else .aspect = green end end end