on Lettura#Valore do

  if [Lettura#Valore]<[luce#tramonto1] and [valvola#tramontouno]=0
      event,annaffiatramonto1
      TaskValueSet,6,3,1
   endif

   if [Lettura#Valore]>[luce#tramonto1] and [valvola#tramontouno]=1
      TaskValueSet,6,3,0
   endif

   if [Lettura#Valore]<[luce#tramonto2] and [valvola#tramontodue]=0
      event,annaffiatramonto2
      TaskValueSet,6,4,1
   endif

   if [Lettura#Valore]>[luce#tramonto2] and [valvola#tramontodue]=1
      TaskValueSet,6,4,0
   endif

//--------------------------------------------------------------

   if [Lettura#Valore]>[luce#alba1] and [valvola#albauno]=0
      event,annaffiaalba1
      TaskValueSet,6,1,1
   endif

   if [Lettura#Valore]<[luce#alba1] and [valvola#albauno]=1
      TaskValueSet,6,1,0
   endif

   if [Lettura#Valore]>[luce#alba2] and [valvola#albadue]=0
      event,annaffiaalba2
      TaskValueSet,6,2,1
   endif

   if [Lettura#Valore]<[luce#alba2] and [valvola#albadue]=1
      TaskValueSet,6,2,0
   endif
endon

on annaffiaalba1 do
   if [durata#albauno]>0
     TimerSet,1,[durata#albauno]
     gpio,4,1
     gpio,12,1
    endif
endon

on annaffiaalba2 do
 if [durata#albadue]>0
   TimerSet,2,[durata#albadue]
   gpio,5,1
   gpio,13,1
  endif
endon

on annaffiatramonto1 do
   if [durata#tramontouno]>0
     TimerSet,3,[durata#tramontouno]
     gpio,4,1
     gpio,12,1
    endif
endon


on annaffiatramonto2 do
 if [durata#tramontodue]>0
   TimerSet,4,[durata#tramontodue]
   gpio,5,1
   gpio,13,1
  endif
endon

on Rules#Timer=1 do
    gpio,4,0
    gpio,12,0
endon

on Rules#Timer=2 do
    gpio,5,0
    gpio,13,0
endon

on Rules#Timer=3 do
    gpio,4,0
    gpio,12,0
endon

on Rules#Timer=4 do
    gpio,5,0
    gpio,13,0
endon