on System#Boot then
  print('Heizkurvenkorrektur Testprogramm Version 1.1 vom 4.5.2024');
  #Clock = 0;
  #Check = 0;
  setTimer(10,20);
end


on timer=10 then
  print('Voreinstellung Heizkurven Eckparameter fuer Z1');
  @SetCurves = concat('{zone1:{heat:{target:{high:36}}}}');
  @SetCurves = concat('{zone1:{heat:{target:{low:26}}}}');

  print('Sichere Werte aus TOP29 in TOP82 und TOP30 in TOP83');
  @SetCurves = concat('{zone2:{heat:{target:{high:', @Z1_Heat_Curve_Target_High_Temp, '}}}}');
  @SetCurves = concat('{zone2:{heat:{target:{low:', @Z1_Heat_Curve_Target_Low_Temp, '}}}}');
  settimer(11,10);
end


on timer=11 then
  settimer(11,60);
  print('Minutencheck');
  print('Aktuelle Vorgabe: ', @Z1_Water_Target_Temp, ' C mit ', @Z1_Heat_Request_Temp, ' Grad Boni.');
  #Clock = #Clock + 1;
  #Check = #Check + 1;

  if #Clock >= 600 then
    #Clock = -600;
  end

  if #Check >= 60 then
    if #Clock > 0 then
      print('VL Soll upshift + 1 auf ', @Z1_Water_Target_Temp + 1);
      @SetCurves = concat('{zone1:{heat:{target:{high:', @Z1_Heat_Curve_Target_High_Temp + 1 ,',low:', @Z1_Heat_Curve_Target_Low_Temp + 1,'}}}}');
      print('SetCurves ={zone1:{heat:{target:{high:', @Z1_Heat_Curve_Target_High_Temp + 1 ,',low:', @Z1_Heat_Curve_Target_Low_Temp + 1,'}}}}');

    end

    if #Clock < 0 then
      print('VL Soll downshift - 1 auf ', @Z1_Water_Target_Temp - 1);
      @SetCurves = concat('{zone1:{heat:{target:{high:', @Z1_Heat_Curve_Target_High_Temp - 1 ,',low:', @Z1_Heat_Curve_Target_Low_Temp - 1,'}}}}');
      print('SetCurves ={zone1:{heat:{target:{high:', @Z1_Heat_Curve_Target_High_Temp - 1,',low:', @Z1_Heat_Curve_Target_Low_Temp - 1,'}}}}');
    end

    #Check = 0;
  end

end