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

Pullback change from Quokka 2014-09-09

Browse Source
This commit is contained in:
Douglas Clowes
2014-09-09 16:56:29 +10:00
parent d0d2b38177
commit b127f49b33
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
site_ansto/instrument/config/environment/temperature/sct_lakeshore_340.tcl
View File

@ -989,6 +989,8 @@ proc sendCmd {tc_root nextState cmd {idx ""}} {
set sensorValue $tc_root/sensor/sensorValue$whichSensor set sensorValue $tc_root/sensor/sensorValue$whichSensor
if {$whichCtrlLoop <= 2} { if {$whichCtrlLoop <= 2} {
set nodename $tc_root/sensor/setpoint$whichCtrlLoop set nodename $tc_root/sensor/setpoint$whichCtrlLoop
hset $tc_root/control/tolerance1 1
hset $tc_root/control/tolerance2 1
hset $nodename [hval $sensorValue] hset $nodename [hval $sensorValue]
hsetprop $nodename driving 0 hsetprop $nodename driving 0
} }