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

Configuration directories mostly copied from Platypus Reflectometer

Browse Source 
r2049 | dcl | 2007-07-09 15:24:03 +1000 (Mon, 09 Jul 2007) | 2 lines
This commit is contained in:
Douglas Clowes
2007-07-09 15:24:03 +10:00
parent 802dbe3e88
commit 47f31054aa
5 changed files with 94 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
site_ansto/instrument/sans/config/hipadaba/hipadaba_configuration.tcl Normal file
View File

@@ -0,0 +1 @@
source $cfPath(hipadaba)/common_hipadaba_configuration.tcl

33
site_ansto/instrument/sans/config/hipadaba/hpaths.tcl Normal file
View File

@@ -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]]

8
site_ansto/instrument/sans/config/scan/scan.tcl Normal file
View File

@@ -0,0 +1,8 @@
namespace eval scancommand {
proc init {} {
}
proc commands_hpath_setup {parent} {
}
proc graphics_hpath_setup {parent} {
}
}

30
site_ansto/instrument/sans/config/velsel/velsel.tcl Normal file
View File

@@ -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

22
site_ansto/instrument/sans/util/dmc2280/troubleshoot_setup.tcl Normal file
View File

@@ -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"