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

Merged new hdb and nexus code.

Browse Source 
r2099 | ffr | 2007-07-22 15:23:41 +1000 (Sun, 22 Jul 2007) | 2 lines
This commit is contained in:
Ferdi Franceschini
2007-07-22 15:23:41 +10:00
committed by Douglas Clowes
parent 4e407d0a73
commit 8770acc191
37 changed files with 2404 additions and 645 deletions
Download Patch File Download Diff File Expand all files Collapse all files

37
site_ansto/instrument/sans/quokka_configuration.tcl
View File

@@ -1,11 +1,12 @@
# $Revision: 1.1 $
# $Date: 2007-07-09 05:24:46 $
# $Revision: 1.2 $
# $Date: 2007-07-22 05:23:40 $
# Author: Ferdi Franceschini (ffr@ansto.gov.au)
# Last revision by: $Author: dcl $
# Last revision by: $Author: ffr $
# Required by server_config.tcl
VarMake Instrument Text Internal
Instrument Quokka
VarMake Instrument Text Internal
sicslist setatt Instrument privilege internal
Instrument quokka
Instrument lock
#START SERVER CONFIGURATION SECTION
@@ -19,7 +20,6 @@ source server_config.tcl
fileeval $cfPath(velsel)/velsel.tcl
fileeval $cfPath(motors)/motor_configuration.tcl
#fileeval gen_hipadaba.tcl
fileeval $cfPath(plc)/plc.tcl
fileeval $cfPath(counter)/counter.tcl
@@ -29,6 +29,29 @@ fileeval $cfPath(scan)/scan.tcl
source $cfPath(hipadaba)/hipadaba_configuration.tcl
source gumxml.tcl
MakeStateMon
#::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
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