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

Updated kowari for new hdb and nexus code.

Browse Source 
r2100 | ffr | 2007-07-22 15:58:52 +1000 (Sun, 22 Jul 2007) | 2 lines
This commit is contained in:
Ferdi Franceschini
2007-07-22 15:58:52 +10:00
committed by Douglas Clowes
parent 8770acc191
commit 2494fa6ad3
9 changed files with 144 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

33
site_ansto/instrument/rsd/kowari_configuration.tcl
View File

@@ -1,10 +1,11 @@
# $Revision: 1.5 $
# $Date: 2007-05-07 05:30:02 $
# $Revision: 1.6 $
# $Date: 2007-07-22 05:58:51 $
# Author: Ferdi Franceschini (ffr@ansto.gov.au)
# Last revision by: $Author: ffr $
# Required by server_config.tcl
VarMake Instrument Text Internal
sicslist setatt Instrument privilege internal
Instrument kowari
Instrument lock
@@ -16,12 +17,10 @@ source server_config.tcl
########################################
# INSTRUMENT SPECIFIC CONFIGURATION
set hmm_mode normal
#set hmm_mode normal
fileeval $cfPath(motors)/motor_configuration.tcl
########
fileeval $cfPath(plc)/plc.tcl
fileeval $cfPath(counter)/counter.tcl
fileeval $cfPath(hmm)/hmm_configuration.tcl
@@ -30,7 +29,12 @@ fileeval $cfPath(scan)/scan.tcl
source $cfPath(hipadaba)/hipadaba_configuration.tcl
source gumxml.tcl
MakeStateMon hmscan
#::histogram_memory::setmode pulser
#::histogram_memory::setmode calibration
::histogram_memory::setmode normal
#::histogram_memory::hmm_initialize
::histogram_memory::hmm_setup transparent 0 3 oat_nyc_eff oat_nxc_eff oat_ntc_eff
hmm_start 0
VarMake detector_active_height_mm Float User
detector_active_height_mm 200.0
@@ -54,5 +58,22 @@ detector_type lock
detector_description This detects Kowaris
detector_description lock
MakeStateMon hmscan
proc instrument_set_sobj_attributes {} {
motor_set_sobj_attributes
::utility::set_motor_attributes
::utility::set_histomem_attributes
::utility::set_sobj_attributes
::counter::set_sobj_attributes
::nexus::set_sobj_attributes
::histogram_memory::set_sobj_attributes
## TODO move the following to the new ansto gumxml.tcl
sicslist setatt getgumtreexml privilege internal
}
instrument_set_sobj_attributes
buildHDB instrument_dictionary
#buildHDB [instname]_dictionary
fileeval extraconfig.tcl