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

Added new hdb/nexus support.

Browse Source 
r2126 | ffr | 2007-08-16 16:46:12 +1000 (Thu, 16 Aug 2007) | 2 lines
This commit is contained in:
Ferdi Franceschini
2007-08-16 16:46:12 +10:00
committed by Douglas Clowes
parent 091dc0d2d2
commit 5c9b53efbc
4 changed files with 25 additions and 51 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
site_ansto/instrument/hipd/wombat_configuration.tcl
View File

@@ -1,10 +1,10 @@
# $Revision: 1.16 $
# $Date: 2007-05-08 05:01:16 $
# $Revision: 1.17 $
# $Date: 2007-08-16 06:46:12 $
# Author: Ferdi Franceschini (ffr@ansto.gov.au)
# Last revision by: $Author: ffr $
# Required by server_config.tcl
VarMake Instrument Text Internal
VarMake Instrument Text Internal
Instrument wombat
Instrument lock
@@ -12,6 +12,9 @@ Instrument lock
source util/dmc2280/dmc2280_util.tcl
source sics_ports.tcl
source server_config.tcl
VarMake deg_per_rad Float Internal
deg_per_rad 57.29577951308232
deg_per_rad lock
#END SERVER CONFIGURATION SECTION
########################################
@@ -31,29 +34,20 @@ fileeval $cfPath(nexus)/nxscripts.tcl
fileeval $cfPath(scan)/scan.tcl
source $cfPath(hipadaba)/hipadaba_configuration.tcl
source gumxml.tcl
#::histogram_memory::setmode pulser
#::histogram_memory::setmode calibration
::histogram_memory::setmode normal
::histogram_memory::hmm_initialize
::histogram_memory::hmm_setup transparent 7000000 3 stitch_nyc stitch_nxc oat_ntc_eff
hmm_start 0
::histogram_memory::setmode normal
::histogram_memory::initialize
MakeStateMon hmscan
VarMake detector_layout Text Mugger
detector_layout cylinder
VarMake detector_radius_mm Int User
detector_radius_mm 700.0
VarMake detector_angle_deg Float User
detector_angle_deg 120.0
VarMake deg_per_rad Float Internal
deg_per_rad 57.29577951308232
deg_per_rad lock
VarMake detector_angle_rad Float User
detector_angle_rad [expr [SplitReply [detector_angle_deg]]/[SplitReply [deg_per_rad]] ]
VarMake detector_active_height_mm Float User
detector_active_height_mm 200.0
VarMake crystal_type Text User
VarMake crystal_wavelength_A Float User
@@ -85,4 +79,7 @@ detector_type lock
detector_description 8 curved multiwire segments
detector_description lock
fileeval extraconfig.tcl
MakeStateMon hmscan
server_set_sobj_attributes
buildHDB instrument_dictionary
fileeval extraconfig.tcl