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

add flow ctrl hysteresis

Browse Source 
with automatic nv, do not open nv before value is above
0.5 * (flowmax + flowstd)
This commit is contained in:
zolliker
2023-10-24 13:16:22 +02:00
parent 5c5f0d3ef7
commit b54a51def2
1 changed files with 11 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
tcl/startup/flow_ctrl.tcl
View File

@ -30,7 +30,17 @@ proc flow::loop {difget flowget flowset path flowstd flowlim} {
set flowtarget $setval set flowtarget $setval
} }
putIntoLimits flowtarget $flowstd $flowlim putIntoLimits flowtarget $flowstd $flowlim
hupdate $path/flowtarget $flowtarget set suppress_auto [silent 0 sct suppress_auto]
if {$suppress_auto || $flowtarget > ($flowstd + $flowlim) * 0.5} {
sct suppress_auto 0
hupdate $path/flowtarget $flowtarget
} else {
if {$flowtarget < $flowstd + 0.1} {
sct suppress_auto 1
} else {
hupdate $path/flowtarget $flowtarget
}
}
} }
proc flow::bufferPut {path name var value} { proc flow::bufferPut {path name var value} {