on Pir_Sensor#Pir=1 do
if [LDR#Analog]>1000 AND [Saturday#Inhibit]=0
Publish RGB/0017F169/color/set,200,200,200
Publish RGB/0017F169/brightness/set,200
endif
endon
on Pir_Sensor#Pir=0 do
if [LDR#Analog]>1000 AND [Saturday#Inhibit]=0
Publish RGB/0017F169/state/set,OFF
endif
endon