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

bm_addnxscanentry is now more dynamic. It sets nexus dictionary variables for the scan variable attributes.

Browse Source 
r1697 | ffr | 2007-03-22 18:19:56 +1100 (Thu, 22 Mar 2007) | 2 lines
This commit is contained in:
Ferdi Franceschini
2007-03-22 18:19:56 +11:00
committed by Douglas Clowes
parent 6ca1c328b6
commit bfa6c2f887
1 changed files with 17 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
site_ansto/instrument/config/nexus/nxscripts_common_1.tcl
View File

@@ -106,16 +106,19 @@ putcrystal $nxobj
putmonitor $nxobj putmonitor $nxobj
putsample $nxobj putsample $nxobj
set scanVar_value [string trim [lindex [split [$scanVariable] =] 1]] set scanVar_value [string trim [lindex [split [$scanVariable] =] 1]]
$nxobj putfloat $scanVariable $scanVar_value $nxobj updatedictvar scanvar_name $scanVariable
$nxobj updatedictvar scanvar_units [SplitReply [$scanVariable units]]
$nxobj updatedictvar scanvar_longname $scanVariable
$nxobj putfloat scanvar $scanVar_value
$nxobj putfloat scanstep $scanVarStep
# Add thetamin and stth to tharr(i) # Add thetamin and stth to tharr(i)
# $nxobj puttext dtype He-3 position sensitive detector, tube active length=335+/-5mm, tube diameter=25.4 +/- 0.8mm # $nxobj puttext dtype He-3 position sensitive detector, tube active length=335+/-5mm, tube diameter=25.4 +/- 0.8mm
# $nxobj puttext ddesc 128 He-3 proportional counter detector tubes (GE Energy Reuter Stokes Inc. item=RS-P4-0814-217) # $nxobj puttext ddesc 128 He-3 proportional counter detector tubes (GE Energy Reuter Stokes Inc. item=RS-P4-0814-217)
# $nxobj putfloat dradius $dradius # $nxobj putfloat dradius $dradius
$nxobj puttext estart $start_time $nxobj puttext estart $start_time
#TODO add dtype ddesc
$nxobj puttext dlayout point $nxobj puttext dlayout point
$nxobj makelink scandata mdata $nxobj makelink scandata mdata
$nxobj makelink scanvar $scanVariable
$nxobj putfloat scanstep $scanVarStep
$nxobj puttext eend [sicstime]; $nxobj puttext eend [sicstime];
} }