Add some configuration files which might be useful later.

site_ansto/instrument/emu/config/INSTCFCOMMON.TXT

@@ -0,0 +1,17 @@
+config/source
+config/anticollider
+config/plc
+config/counter
+config/hipadaba
+config/hmm/hmm_configuration_common_1.tcl
+config/hmm/hmm_object.tcl
+config/scan
+config/nexus
+config/commands
+config/motors
+config/environment/
+config/environment/he3
+config/environment/magneticField
+config/environment/pressure
+config/environment/temperature
+config/motors

site_ansto/instrument/emu/config/anticollider/anticollider.tcl

@@ -0,0 +1,4 @@
+fileeval $cfPath(anticollider)/anticollider_common.tcl
+
+::anticollider::loadscript acscript.txt
+

site_ansto/instrument/emu/config/commands/commands.tcl

@@ -0,0 +1 @@
+source $cfPath(commands)/commands_common.tcl

site_ansto/instrument/emu/config/counter/counter.tcl

@@ -0,0 +1,32 @@
+source $cfPath(counter)/counter_common_1.tcl
+
+## TODO Put all the counter macros in the counter namespace
+namespace eval counter {
+  variable isc_numchannels
+  variable isc_monitor_address
+  variable isc_portlist
+  variable isc_beam_monitor_list
+  proc set_sobj_attributes {} {
+  }
+}
+
+proc ::counter::isc_initialize {} {
+  if [catch {
+    variable isc_numchannels
+    variable isc_monitor_address
+    variable isc_portlist
+
+    dict for {k v} $::MONITOR_HOSTPORT {
+      lappend monlist $k
+      lappend hostlist [dict get $v HOST]
+      lappend isc_portlist [dict get $v PORT]
+    }
+    variable isc_beam_monitor_list $monlist
+    set isc_monitor_address [lindex $hostlist 0]
+    set isc_numchannels [llength $isc_beam_monitor_list]
+    ::counter::ic_initialize MONITOR_SOURCE "HISTOGRAM_SERVER"
+  } message ] {
+    if {$::errorCode=="NONE"} {return $message}
+    return -code error "$message"
+  }
+}

site_ansto/instrument/emu/config/plc/plc.tcl

@@ -0,0 +1,7 @@
+set sim_mode [SplitReply [plc_simulation]]
+if {$sim_mode == "false"} {
+  MakeAsyncQueue plc_chan SafetyPLC [dict get $::PLC_HOSTPORT HOST] [dict get $::PLC_HOSTPORT PORT]
+  MakeSafetyPLC plc plc_chan 0
+}
+source $cfPath(plc)/plc_common_1.tcl
+

site_ansto/instrument/emu/config/scan/scan.tcl

@@ -0,0 +1,6 @@
+source $cfPath(scan)/scan_common_1.tcl
+proc ::scan::pre_hmm_scan_prepare {} {}
+
+proc ::scan::isc_initialize {} {
+  ::scan::ic_initialize
+}