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

Add a beam monitor counter to Koala

Browse Source 
r2628 | dcl | 2008-06-12 17:21:40 +1000 (Thu, 12 Jun 2008) | 2 lines
This commit is contained in:
Douglas Clowes
2008-06-12 17:21:40 +10:00
parent 4a88bf6fc1
commit 1795e07504
2 changed files with 22 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
site_ansto/instrument/qld/counter.tcl Executable file
View File

@@ -0,0 +1,19 @@
set sim_mode "true"
#set sim_mode [SplitReply [counter_simulation]]
if {$sim_mode == "true"} {
MakeCounter bm SIM 0.0;
} else {
# Make and configure an ANSTO beam monitor counter.
# This must be sourced before the hmm_configuration.tcl until we separate the scan setup from the hmm setup
MakeCounter bm anstomonitor [ params host "137.157.204.65" port "33000" ]
}
#source $cfPath(counter)/counter_common_1.tcl
bm SetExponent 0
sicslist setatt bm privilege internalunset sim_mode
## TODO Put all the counter macros in the counter namespace
namespace eval counter {
proc set_sobj_attributes {} {
}
}

5
site_ansto/instrument/qld/koala_configuration.tcl
View File

@@ -1,5 +1,5 @@
# $Revision: 1.4 $ # $Revision: 1.5 $
# $Date: 2006-11-19 23:42:42 $ # $Date: 2008-06-12 07:21:40 $
# Author: Ferdi Franceschini (ffr@ansto.gov.au) # Author: Ferdi Franceschini (ffr@ansto.gov.au)
# Last revision by: $Author: dcl $ # Last revision by: $Author: dcl $
@@ -20,5 +20,6 @@ Instrument lock
fileeval motor_configuration.tcl fileeval motor_configuration.tcl
fileeval counter.tcl
source gen_hipadaba.tcl source gen_hipadaba.tcl
fileeval extraconfig.tcl fileeval extraconfig.tcl