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

Change limits and tolerance

Browse Source 
r3149 | dcl | 2011-05-20 10:25:05 +1000 (Fri, 20 May 2011) | 1 line
This commit is contained in:
Douglas Clowes
2011-05-20 10:25:05 +10:00
parent f0ac8f82d9
commit df6f44a2ac
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
site_ansto/instrument/config/environment/temperature/sct_rvasm2.tcl
View File

@@ -387,7 +387,7 @@ debug_log "rdVisc [sct] [sct result]"
set rslt [scan $data "DR%6x%4x%6x%2x%4x%2x" the_t the_c the_v the_e the_s the_r] set rslt [scan $data "DR%6x%4x%6x%2x%4x%2x" the_t the_c the_v the_e the_s the_r]
debug_log "scan result rslt=$rslt, the_t=$the_t , the_c=$the_c , the_v=$the_v , the_e=$the_e , the_s=$the_s , the_r=$the_r" debug_log "scan result rslt=$rslt, the_t=$the_t , the_c=$the_c , the_v=$the_v , the_e=$the_e , the_s=$the_s , the_r=$the_r"
if {$rslt == 6} { if {$rslt == 6} {
# TODO handle test start # handle test start
if {$the_r != 0} { if {$the_r != 0} {
sct test_time [clock seconds] sct test_time [clock seconds]
set file_name [hval $tc_root/profile] set file_name [hval $tc_root/profile]
@@ -955,7 +955,7 @@ proc createNode {scobj_hpath sct_controller cmdGroup varName readable writable\
} }
hsetprop $scobj_hpath/sensor/value lowerlimit 0 hsetprop $scobj_hpath/sensor/value lowerlimit 0
hsetprop $scobj_hpath/sensor/value upperlimit 500 hsetprop $scobj_hpath/sensor/value upperlimit 140
hsetprop $scobj_hpath/sensor/value units "C" hsetprop $scobj_hpath/sensor/value units "C"
hfactory $scobj_hpath/apply_tolerance plain user int hfactory $scobj_hpath/apply_tolerance plain user int
@@ -993,7 +993,7 @@ proc createNode {scobj_hpath sct_controller cmdGroup varName readable writable\
hfactory $scobj_hpath/upperlimit plain mugger float hfactory $scobj_hpath/upperlimit plain mugger float
hsetprop $scobj_hpath/upperlimit units "C" hsetprop $scobj_hpath/upperlimit units "C"
hset $scobj_hpath/upperlimit 500 hset $scobj_hpath/upperlimit 140
hfactory $scobj_hpath/emon plain spy none hfactory $scobj_hpath/emon plain spy none
hfactory $scobj_hpath/emon/monmode plain user text hfactory $scobj_hpath/emon/monmode plain user text
@@ -1052,7 +1052,7 @@ proc createNode {scobj_hpath sct_controller cmdGroup varName readable writable\
# @param IP, the IP address of the device, this can be a hostname, (eg ca5-kowari) # @param IP, the IP address of the device, this can be a hostname, (eg ca5-kowari)
# @param port, the IP protocol port number of the device (502 for modbus) # @param port, the IP protocol port number of the device (502 for modbus)
# @param _tol (optional), this is the initial tolerance setting # @param _tol (optional), this is the initial tolerance setting
proc add_newport_rva {name IP port {_tol 5.0}} { proc add_newport_rva {name IP port {_tol 1.0}} {
set fd [open "/tmp/newport_rva.log" a] set fd [open "/tmp/newport_rva.log" a]
if {[SplitReply [environment_simulation]]=="false"} { if {[SplitReply [environment_simulation]]=="false"} {
puts $fd "makesctcontroller sct_${name} newport ${IP}:$port" puts $fd "makesctcontroller sct_${name} newport ${IP}:$port"