on Clock#Time=All,**:** do
  if %syshour%=[var#1] and %sysmin%=[var#2] and [Modo#manuale]=0
     TaskValueSet,3,3,[var#21]
   lcd,3,1,'Auto : [Modo#soglia]°C'
   lcd,3,15,'%syshour_0%:%sysmin_0% '
   TaskValueSet,3,4,1
   TaskValueSet,3,2,[var#21]
 endif

  if %syshour%=[var#3] and %sysmin%=[var#4]
      if [Modo#manuale]=0
         TaskValueSet,3,3,[var#22]
         lcd,3,1,'Auto : [Modo#soglia]°C'
         lcd,3,15,'%syshour_0%:%sysmin_0% '
      endif
    TaskValueSet,3,4,2
    TaskValueSet,3,2,[var#22]
  endif

  if %syshour%=[var#5] and %sysmin%=[var#6]
    if [Modo#manuale]=0
       TaskValueSet,3,3,[var#23]
       lcd,3,1,'Auto : [Modo#soglia]°C'
       lcd,3,15,'%syshour_0%:%sysmin_0% '
    endif   
   TaskValueSet,3,4,3
   TaskValueSet,3,2,[var#23]
  endif

  if %syshour%=[var#7] and %sysmin%=[var#8]
     if [Modo#manuale]=0
        TaskValueSet,3,3,[var#24]
        lcd,3,1,'Auto : [Modo#soglia]°C'
        lcd,3,15,'%syshour_0%:%sysmin_0% '
      endif
   TaskValueSet,3,4,4
   TaskValueSet,3,2,[var#24]
  endif

  if %syshour%=[var#9] and %sysmin%=[var#10]
     if [Modo#manuale]=0
       TaskValueSet,3,3,[var#25]
       lcd,3,1,'Auto : [Modo#soglia]°C'
       lcd,3,15,'%syshour_0%:%sysmin_0% '
      endif
   TaskValueSet,3,4,5
  TaskValueSet,3,2,[var#25]
  endif

  if %syshour%=[var#11] and %sysmin%=[var#12]
      if [Modo#manuale]=0 
         TaskValueSet,3,3,[var#26]
      lcd,3,1,'Auto : [Modo#soglia]°C'
      lcd,3,15,'%syshour_0%:%sysmin_0% '
      endif
   TaskValueSet,3,4,6
    TaskValueSet,3,2,[var#26]
  endif
// controllo temperature 

  if [clima#temp] < [Modo#soglia] and [var#30]=0
      gpio,12,0
      lcd,4,1,'caldaia ACCESA '
      let,30,1
 
  elseif [clima#temp] >= [Modo#soglia] and [var#30]=1
      gpio,12,1
      lcd,4,1,'caldaia SPENTA '
      let,30,0

   endif
   lcd,2,1,'T:[clima#temp]°C rH:[clima#umid]%'
   lcd,1,1,'_%sysday_0%/%sysmonth_0%/%sysyears%__%syshour_0%:%sysmin_0%__t[Modo#tempo]'

endon