on lucealba1 do
 TaskvalueSet,5,1,%eventvalue1%
endon

on lucealba2 do
 TaskvalueSet,5,2,%eventvalue1%
endon

on lucetramonto1 do
  TaskvalueSet,5,3,%eventvalue1%
endon

on lucetramonto2 do
 TaskvalueSet,5,4,%eventvalue1%
endon

on durataalba1 do
  TaskvalueSet,7,1,%eventvalue1%
endon

on durataalba2 do
  TaskvalueSet,7,2,%eventvalue1%
endon

on duratatramonto1 do
  TaskvalueSet,7,3,%eventvalue1%
endon

on duratatramonto2 do
  TaskvalueSet,7,4,%eventvalue1%
endon

on aprizonauno do
   gpio,4,1
   gpio,14,1
endon

on aprizonadue do
   gpio,5,1
   gpio,15,1
endon

on chiudizonauno do
   gpio,4,0
   gpio,14,0
endon

on chiudizonadue do
   gpio,5,0
   gpio,15,0
endon