diff --git a/site_ansto/instrument/sans/config/hipadaba/hipadaba_configuration.tcl b/site_ansto/instrument/sans/config/hipadaba/hipadaba_configuration.tcl new file mode 100644 index 00000000..eae0fc03 --- /dev/null +++ b/site_ansto/instrument/sans/config/hipadaba/hipadaba_configuration.tcl @@ -0,0 +1 @@ +source $cfPath(hipadaba)/common_hipadaba_configuration.tcl diff --git a/site_ansto/instrument/sans/config/hipadaba/hpaths.tcl b/site_ansto/instrument/sans/config/hipadaba/hpaths.tcl new file mode 100644 index 00000000..142374a0 --- /dev/null +++ b/site_ansto/instrument/sans/config/hipadaba/hpaths.tcl @@ -0,0 +1,33 @@ +set hpaths [list experiment ] + +# Maps devices (eg motors) to hipadaba paths. +# obj name path +set motor_hpath [list \ +aperture slits \ +attenuator attenuator \ +collimator collimator \ +detector detector \ +polarizer polarizer \ +sample sample ] + + +# Configurable virtual motors +# obj name path master_obj +set cvirtmotor_hpath [list \ +ss1hg gap slits/1/horizontal [list left right]\ +ss1ho offset slits/1/horizontal [list left right]\ +ss1vg gap slits/1/vertical [list upper lower]\ +ss1vo offset slits/1/vertical [list upper lower]\ +ss2hg gap slits/2/horizontal [list left right]\ +ss2ho offset slits/2/horizontal [list left right]\ +ss2vg gap slits/2/vertical [list upper lower]\ +ss2vo offset slits/2/vertical [list upper lower]\ +ss3hg gap slits/3/horizontal [list left right]\ +ss3ho offset slits/3/horizontal [list left right]\ +ss3vg gap slits/3/vertical [list upper lower]\ +ss3vo offset slits/3/vertical [list upper lower]\ +ss4hg gap slits/4/horizontal [list left right]\ +ss4ho offset slits/4/horizontal [list left right]\ +ss4vg gap slits/4/vertical [list upper lower]\ +ss4vo offset slits/4/vertical [list upper lower]] + diff --git a/site_ansto/instrument/sans/config/scan/scan.tcl b/site_ansto/instrument/sans/config/scan/scan.tcl new file mode 100644 index 00000000..3e716b42 --- /dev/null +++ b/site_ansto/instrument/sans/config/scan/scan.tcl @@ -0,0 +1,8 @@ +namespace eval scancommand { + proc init {} { + } + proc commands_hpath_setup {parent} { + } + proc graphics_hpath_setup {parent} { + } +} diff --git a/site_ansto/instrument/sans/config/velsel/velsel.tcl b/site_ansto/instrument/sans/config/velsel/velsel.tcl new file mode 100644 index 00000000..78b9d1b9 --- /dev/null +++ b/site_ansto/instrument/sans/config/velsel/velsel.tcl @@ -0,0 +1,30 @@ +#START SERVER CONFIGURATION SECTION +set sicsroot /usr/local/sics +source dmc2280_util.tcl +source server_config.tcl +#END SERVER CONFIGURATION SECTION + +######################################## +# INSTRUMENT SPECIFIC CONFIGURATION +VarMake Instrument Text Internal +Instrument Quokka +Instrument lock + +# Chopper NCS013 communications +set velsel_controller(host) 137.157.202.70 +set velsel_controller(port) 10000 +set velsel_controller(user) NVS +set velsel_controller(password) NVS + + +# Velocity Selector +MakeTCPSelector velsel [params \ + Host $velsel_controller(host) \ + Port $velsel_controller(port) \ + User $velsel_controller(user) \ + Password $velsel_controller(password) \ +] + +velsel add 3600 4900 +velsel add 7800 10500 +velsel add 30000 30000 diff --git a/site_ansto/instrument/sans/util/dmc2280/troubleshoot_setup.tcl b/site_ansto/instrument/sans/util/dmc2280/troubleshoot_setup.tcl new file mode 100644 index 00000000..d5966ed8 --- /dev/null +++ b/site_ansto/instrument/sans/util/dmc2280/troubleshoot_setup.tcl @@ -0,0 +1,22 @@ +# Platypus troubleshooter setup + +# $Revision: 1.1 $ +# $Date: 2007-07-09 05:24:03 $ +# Author: Ferdi Franceschini (ffr@ansto.gov.au) +# Last revision by $Author: dcl $ + +set configFileName "motor_configuration.tcl" + +# These subroutines should be installed on the controllers +set contSubs(dmc2280_controller1) "#AUTO #LIMSWI #SOLCTRL #TCPERR" +set contSubs(dmc2280_controller2) "#AUTO #LIMSWI #SOLCTRL #TCPERR" +set contSubs(dmc2280_controller3) "#AUTO #HOME #LOOPER #RES #TCPERR" +set contSubs(dmc2280_controller4) "#AUTO #HOME #LIMSWI #LOOPER #TCPERR" + + +# These threads should be running on the controllers. +set contThreads(dmc2280_controller1) "0" +set contThreads(dmc2280_controller2) "0" +set contThreads(dmc2280_controller3) "0" +set contThreads(dmc2280_controller4) "0" +