linse/sea
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

shorten pipe pump

Browse Source 
start second phase already when V6 is at 50
This commit is contained in:
zolliker
2022-11-07 14:08:34 +01:00
parent 6a3d92a631
commit 87f2769b29
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
tcl/drivers/dil12.tcl
View File

@ -796,13 +796,13 @@ proc dil12::autostep {phase init} {
}
dil12::check_cool_button
if {[result dil p1] < [hvali [sct]/p1low] && [result dil g1] < 5 &&
[result dil p2] < [hvali [sct]/p2low] && [result dil v6pos] > 99} {
[result dil p2] < [hvali [sct]/p2low] && [result dil v6pos] > 50} {
if {[sct pumptime] == 0} {
dil12::openvalves v5a v2a v7 v2 v1 v6 v5 v3 vb_open
dil v4a 1
sct pumptime [expr [DoubleTime] + 105]
dil12::msg "pump for 2 more minutes"
} elseif {[DoubleTime] > [sct pumptime]} {
} elseif {[DoubleTime] > [sct pumptime] && [result dil v6pos] > 99} {
# do not check for vb/vm here, as the user already might manipulate the valves
dil12::openvalves v1 v6 v3 v5
dil v4a 0