18 lines
548 B
Tcl
18 lines
548 B
Tcl
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 "das1-[SplitReply [instrument]]" port "30000" ]
|
|
}
|
|
|
|
source $cfPath(counter)/counter_common_1.tcl
|
|
unset sim_mode
|
|
|
|
## TODO Put all the counter macros in the counter namespace
|
|
namespace eval counter {
|
|
proc set_sobj_attributes {} {
|
|
}
|
|
}
|