34 lines
953 B
Tcl
34 lines
953 B
Tcl
set hpaths [list experiment ]
|
|
|
|
# Maps devices (eg motors) to hipadaba paths.
|
|
# obj name path
|
|
set motor_hpath [list \
|
|
aperture aperture \
|
|
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/one/horizontal left\
|
|
ss1ho offset /slits/one/horizontal left\
|
|
ss1vg gap /slits/one/vertical top\
|
|
ss1vo offset /slits/one/vertical top\
|
|
ss2hg gap /slits/two/horizontal left\
|
|
ss2ho offset /slits/two/horizontal left\
|
|
ss2vg gap /slits/two/vertical top\
|
|
ss2vo offset /slits/two/vertical top\
|
|
ss3hg gap /slits/three/horizontal left\
|
|
ss3ho offset /slits/three/horizontal left\
|
|
ss3vg gap /slits/three/vertical top\
|
|
ss3vo offset /slits/three/vertical top\
|
|
ss4hg gap /slits/four/horizontal left\
|
|
ss4ho offset /slits/four/horizontal left\
|
|
ss4vg gap /slits/four/vertical top\
|
|
ss4vo offset /slits/four/vertical top]
|
|
|