quokka environment.tcl
Added a /sample/temperature node which links to the sensor reading for the ls340 on the 11T magnet sct_julabo_lh45.tcl Fixed regression which stopped tc1 interface from being linked into sample group. r2942 | ffr | 2010-05-28 16:32:28 +1000 (Fri, 28 May 2010) | 6 lines
This commit is contained in:
committed by
Douglas Clowes
parent
3d5d94c1dd
commit
01dcc14d5a
@@ -311,9 +311,6 @@ namespace eval ::scobj::lh45 {
|
||||
$sct_controller poll $scobj_hpath/lh45_state 5 halt read
|
||||
}
|
||||
|
||||
::scobj::hinitprops $tempobj
|
||||
hsetprop $scobj_hpath klass NXenvironment
|
||||
::scobj::set_required_props $scobj_hpath
|
||||
foreach {rootpath hpath klass priv} "
|
||||
$scobj_hpath sensor NXsensor spy
|
||||
$scobj_hpath sensor/value sensor user
|
||||
|
||||
@@ -17,7 +17,14 @@ switch $envtemp {
|
||||
"11TMagnet" {
|
||||
puts "Configuring 11TMagnet"
|
||||
::environment::temperature::add_ls340 tc1 137.157.202.85 1
|
||||
::utility::macro::getset float temperature {} {
|
||||
return [sicsmsgfmt [hval /sample/tc1_cntrl/sensora/value]]
|
||||
}
|
||||
sicslist setatt temperature long_name temperature
|
||||
sicslist setatt temperature klass sample
|
||||
sicslist setatt temperature units K
|
||||
tc1 controlsensor sensorA
|
||||
|
||||
}
|
||||
default {
|
||||
clientput "No temperature controller configured"
|
||||
|
||||
Reference in New Issue
Block a user