|
entry_ch0 ;alle Lampen benutzen denselben Code! entry_ch1 entry_ch2 entry_ch3 DEFSWITCH 8 ;Schalter 8 für alle Lampen
wait4on ;warten auf "Schalter ein": HALTSOFF ;bleibt "aus" solange switch auf "off" LIGHTOFF 30 ;aus lassen für min. 300ms flicker RNDDLY 150 ;delay 0 bis 1,5s JSOFF wait4on ;falls Schalter inzwischen wieder "aus": Licht aus! RNDJMP 64,turn_on ;etwa 50% Chance für's Zünden! RNDBRT 10,40,2 ;min. 20 ms Aufblitzen bei niedriger Helligkeit RNDDLY 20 ;zusätzliches delay bis max. 200 ms LIGHTOFF 0 ;aus JUMP flicker ;neuer Startversuch
turn_on LIGHTON 0 ;"Ein" -> volle Helligkeit HALTSON ;bleibt an, solange switch = "on" P_RESET
|
|