on Fotovoltaico#Watt do
 oled,3,5,[VAR#3#D2.0]
 if [VAR#3]>=10
  let 4, %v4%/%v3%
  TaskValueSet 5,1,[VAR#4]
  SendToHTTP 192.168.0.100,8080,/json.htm?type=command&param=udevice&idx=19&nvalue=0&svalue=[PowerUsed#watt#F];0
  SendToHTTP 192.168.0.100,8080,/json.htm?type=command&param=udevice&idx=18&nvalue=0&svalue=[VAR#4#F];0
  oled,8,12,[VAR#4#D4.0]
  let,5,([VAR#4#F]-[PowerUsed#watt#F])
    SendToHTTP 192.168.0.100,8080,/json.htm?type=command&param=udevice&idx=29&nvalue=0&svalue=[VAR#5#F];0
  if [VAR#5]>0
    oled,6,1,Esubero    [VAR#5#D4.0]
  else
    oled,6,1,Esubero    ----
  endif
  let 4,[Fotovoltaico#Watt]
  oled,5,12,[Fotovoltaico#Watt#D4.0]
  Let,3,1
 else
  Let,3,[VAR#3]+1
  let 4,[VAR#4]+[Fotovoltaico#Watt]
  oled,5,12,[Fotovoltaico#Watt#D4.0]
 endif
endon