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

Configures hipadaba paths and scripts for platypus.

Browse Source 
r1274 | ffr | 2006-11-10 14:30:18 +1100 (Fri, 10 Nov 2006) | 2 lines
This commit is contained in:
Ferdi Franceschini
2006-11-10 14:30:18 +11:00
committed by Douglas Clowes
parent acb8819f8e
commit ab9f76c964
1 changed files with 57 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

57
site_ansto/instrument/reflectometer/hipadaba_configuration.tcl Normal file
View File

@@ -0,0 +1,57 @@
# $Revision: 1.1 $
# $Date: 2006-11-10 03:30:18 $
# Author: Ferdi Franceschini (ffr@ansto.gov.au)
# Last revision by: $Author: ffr $
# Defines hashes which map motor names to arrays
source hpaths.tcl
#TODO What we really want are duplicates of the SICS Motor and
# MakeConfigurableMotor commands which
foreach hp $hpaths { hmake $hp spy none }
makeHdbMotor $motor_hpath(s1up) s1up s1up
makeHdbMotor $motor_hpath(s1lo) s1lo s1lo
makeHdbMotor $motor_hpath(s1le) s1le s1le
makeHdbMotor $motor_hpath(s1ri) s1ri s1ri
makeHdbVirtMotor $motor_hpath(s1vg) s1vg s1vg
makeHdbVirtMotor $motor_hpath(s1vo) s1vo s1vo
makeHdbVirtMotor $motor_hpath(s1hg) s1hg s1hg
makeHdbVirtMotor $motor_hpath(s1ho) s1ho s1ho
makeHdbMotor $motor_hpath(s2up) s2up s2up
makeHdbMotor $motor_hpath(s2lo) s2lo s2lo
makeHdbMotor $motor_hpath(s2le) s2le s2le
makeHdbMotor $motor_hpath(s2ri) s2ri s2ri
makeHdbVirtMotor $motor_hpath(s2vg) s2vg s2vg
makeHdbVirtMotor $motor_hpath(s2vo) s2vo s2vo
makeHdbVirtMotor $motor_hpath(s2hg) s2hg s2hg
makeHdbVirtMotor $motor_hpath(s2ho) s2ho s2ho
makeHdbMotor $motor_hpath(s3up) s3up s3up
makeHdbMotor $motor_hpath(s3lo) s3lo s3lo
makeHdbMotor $motor_hpath(s3le) s3le s3le
makeHdbMotor $motor_hpath(s3ri) s3ri s3ri
makeHdbVirtMotor $motor_hpath(s3vg) s3vg s3vg
makeHdbVirtMotor $motor_hpath(s3vo) s3vo s3vo
makeHdbVirtMotor $motor_hpath(s3hg) s3hg s3hg
makeHdbVirtMotor $motor_hpath(s3ho) s3ho s3ho
makeHdbMotor $motor_hpath(st3vt) st3vt st3vt
makeHdbMotor $motor_hpath(s4up) s4up s4up
makeHdbMotor $motor_hpath(s4lo) s4lo s4lo
makeHdbMotor $motor_hpath(s4le) s4le s4le
makeHdbMotor $motor_hpath(s4ri) s4ri s4ri
makeHdbVirtMotor $motor_hpath(s4vg) s4vg s4vg
makeHdbVirtMotor $motor_hpath(s4vo) s4vo s4vo
makeHdbVirtMotor $motor_hpath(s4hg) s4hg s4hg
makeHdbVirtMotor $motor_hpath(s4ho) s4ho s4ho
makeHdbMotor $motor_hpath(st4vt) st4vt st4vt
makeHdbMotor $motor_hpath(say) say say
makeHdbMotor $motor_hpath(sax) sax sax
makeHdbMotor $motor_hpath(sath) sath sath
makeHdbMotor $motor_hpath(saphi) saphi saphi
makeHdbMotor $motor_hpath(dsyvt) dsyvt dsyvt
makeHdbMotor $motor_hpath(deyvt) deyvt deyvt