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

Regenerate SCT drivers

Browse Source
This commit is contained in:
Douglas Clowes
2014-11-13 12:40:18 +11:00
parent 23bd45061b
commit 674fae9115
13 changed files with 13 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
site_ansto/instrument/config/environment/magneticField/sct_tsi_smc.tcl
View File

@ -89,7 +89,7 @@ proc ::scobj::tsi_smc::checkstatus {tc_root} {
if {[hpropexists [sct] simulated] && [sct simulated] == "true"} {
set pv "${sp}"
hupdateif ${tc_root}/[sct driveable] ${sp}
}
} else {
set pv "[hval ${tc_root}/[sct driveable]]"
}
if { abs(${pv} - ${sp}) <= [sct tolerance] } {

2
site_ansto/instrument/config/environment/sct_hiden_xcs.tcl
View File

@ -89,7 +89,7 @@ proc ::scobj::hiden_xcs::checkstatus {tc_root} {
if {[hpropexists [sct] simulated] && [sct simulated] == "true"} {
set pv "${sp}"
hupdateif ${tc_root}/[sct driveable] ${sp}
}
} else {
set pv "[hval ${tc_root}/[sct driveable]]"
}
if { abs(${pv} - ${sp}) <= [sct tolerance] } {

2
site_ansto/instrument/config/environment/sct_huber_pilot.tcl
View File

@ -92,7 +92,7 @@ proc ::scobj::huber_pilot::checkstatus {tc_root} {
if {[hpropexists [sct] simulated] && [sct simulated] == "true"} {
set pv "${sp}"
hupdateif ${tc_root}/[sct driveable] ${sp}
}
} else {
set pv "[hval ${tc_root}/[sct driveable]]"
}
if { abs(${pv} - ${sp}) <= [sct tolerance] } {

2
site_ansto/instrument/config/environment/sct_knauer_pump.tcl
View File

@ -586,7 +586,7 @@ proc ::scobj::knauer_pump::volume_checkstatus {tc_root} {
if {[hpropexists [sct] simulated] && [sct simulated] == "true"} {
set pv "${sp}"
hupdateif ${tc_root}/[sct driveable] ${sp}
}
} else {
set pv "[hval ${tc_root}/[sct driveable]]"
}
if { abs(${pv} - ${sp}) <= [sct tolerance] } {

2
site_ansto/instrument/config/environment/sct_nhq_200.tcl
View File

@ -89,7 +89,7 @@ proc ::scobj::nhq_200::checkstatus {tc_root} {
if {[hpropexists [sct] simulated] && [sct simulated] == "true"} {
set pv "${sp}"
hupdateif ${tc_root}/[sct driveable] ${sp}
}
} else {
set pv "[hval ${tc_root}/[sct driveable]]"
}
if { abs(${pv} - ${sp}) <= [sct tolerance] } {

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

@ -89,7 +89,7 @@ proc ::scobj::julabo_lh45_gen::checkstatus {tc_root} {
if {[hpropexists [sct] simulated] && [sct simulated] == "true"} {
set pv "${sp}"
hupdateif ${tc_root}/[sct driveable] ${sp}
}
} else {
set pv "[hval ${tc_root}/[sct driveable]]"
}
if { abs(${pv} - ${sp}) <= [sct tolerance] } {

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

@ -89,7 +89,7 @@ proc ::scobj::mercury_base::checkstatus {tc_root} {
if {[hpropexists [sct] simulated] && [sct simulated] == "true"} {
set pv "${sp}"
hupdateif ${tc_root}/[sct driveable] ${sp}
}
} else {
set pv "[hval ${tc_root}/[sct driveable]]"
}
if { abs(${pv} - ${sp}) <= [sct tolerance] } {

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

@ -89,7 +89,7 @@ proc ::scobj::mercury_pres::checkstatus {tc_root} {
if {[hpropexists [sct] simulated] && [sct simulated] == "true"} {
set pv "${sp}"
hupdateif ${tc_root}/[sct driveable] ${sp}
}
} else {
set pv "[hval ${tc_root}/[sct driveable]]"
}
if { abs(${pv} - ${sp}) <= [sct tolerance] } {

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

@ -89,7 +89,7 @@ proc ::scobj::mercury_scpi::checkstatus {tc_root} {
if {[hpropexists [sct] simulated] && [sct simulated] == "true"} {
set pv "${sp}"
hupdateif ${tc_root}/[sct driveable] ${sp}
}
} else {
set pv "[hval ${tc_root}/[sct driveable]]"
}
if { abs(${pv} - ${sp}) <= [sct tolerance] } {

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

@ -89,7 +89,7 @@ proc ::scobj::mercury_temp::checkstatus {tc_root} {
if {[hpropexists [sct] simulated] && [sct simulated] == "true"} {
set pv "${sp}"
hupdateif ${tc_root}/[sct driveable] ${sp}
}
} else {
set pv "[hval ${tc_root}/[sct driveable]]"
}
if { abs(${pv} - ${sp}) <= [sct tolerance] } {

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

@ -89,7 +89,7 @@ proc ::scobj::mercury_valve::checkstatus {tc_root} {
if {[hpropexists [sct] simulated] && [sct simulated] == "true"} {
set pv "${sp}"
hupdateif ${tc_root}/[sct driveable] ${sp}
}
} else {
set pv "[hval ${tc_root}/[sct driveable]]"
}
if { abs(${pv} - ${sp}) <= [sct tolerance] } {

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

@ -128,7 +128,7 @@ proc ::scobj::pfeiffer_hg::checkstatus {tc_root} {
if {[hpropexists [sct] simulated] && [sct simulated] == "true"} {
set pv "${sp}"
hupdateif ${tc_root}/[sct driveable] ${sp}
}
} else {
set pv "[hval ${tc_root}/[sct driveable]]"
}
if { abs(${pv} - ${sp}) <= [sct tolerance] } {

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

@ -89,7 +89,7 @@ proc ::scobj::west_6100::checkstatus {tc_root} {
if {[hpropexists [sct] simulated] && [sct simulated] == "true"} {
set pv "${sp}"
hupdateif ${tc_root}/[sct driveable] ${sp}
}
} else {
set pv "[hval ${tc_root}/[sct driveable]]"
}
if { abs(${pv} - ${sp}) <= [sct tolerance] } {