34 lines
890 B
Tcl
34 lines
890 B
Tcl
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 left\
|
|
ss1ho offset slits/1/horizontal left\
|
|
ss1vg gap slits/1/vertical top\
|
|
ss1vo offset slits/1/vertical top\
|
|
ss2hg gap slits/2/horizontal left\
|
|
ss2ho offset slits/2/horizontal left\
|
|
ss2vg gap slits/2/vertical top\
|
|
ss2vo offset slits/2/vertical top\
|
|
ss3hg gap slits/3/horizontal left\
|
|
ss3ho offset slits/3/horizontal left\
|
|
ss3vg gap slits/3/vertical top\
|
|
ss3vo offset slits/3/vertical top\
|
|
ss4hg gap slits/4/horizontal left\
|
|
ss4ho offset slits/4/horizontal left\
|
|
ss4vg gap slits/4/vertical top\
|
|
ss4vo offset slits/4/vertical top]
|
|
|