proc fixheater {} {
  if {[catch {hval /tt/set/reg}]} {
     set mout2 [silent 0 hgetpropval /tt/set/power last_htr]
     hsetprop /tt/set @manual_out $mout2
     set mout1 [silent 0 hgetpropval /tt/setvti/power last_htr]
     hsetprop /tt/setvti @manual_out $mout1
     tt set [silent 0 hgetpropval /tt/set last_target]
     tt setvti [silent 0 hgetpropval /tt/setvti last_target]
  } else {
     set htr [silent 0 hgetpropval /tt/set/power htr]
     if {$htr} {
       hsetprop /tt/set/power last_htr $htr
     }
     set htr [silent 0 hgetpropval /tt/setvti/power htr]
     if {$htr} {
       hsetprop /tt/setvti/power last_htr $htr
     }
  }
}

publishLazy fixheater