diff --git a/tcl/drivers/hepump.tcl b/tcl/drivers/hepump.tcl index 5f0a952..1cdeb09 100644 --- a/tcl/drivers/hepump.tcl +++ b/tcl/drivers/hepump.tcl @@ -400,9 +400,10 @@ proc hepump::get_auto {} { if {$auto && $oldeco != 2} { set eco [sctval [sct parent]/eco] set lim [sctval [sct parent]/eco_t_lim 7] - if {[silent 10 hval /tt/target] < $lim && [silent 10 hval /tt] < 2 * $lim} { + set target [silent [silent $lim hval /tt/target] hval /tt/set/reg] + if {$target < $lim && [silent $lim hval /tt] < 2 * $lim} { set ecoset 0 - } elseif {[silent 10 hval /tt/target] > $lim || [silent 10 hval /tt] > 3 * $lim} { + } elseif {$target > $lim || [silent $lim hval /tt] > 3 * $lim} { set ecoset 1 } else { set ecoset $eco