81 lines
1.6 KiB
Tcl
81 lines
1.6 KiB
Tcl
# This must be loaded by motor_configuration.tcl
|
|
|
|
#
|
|
# Home value for Eulerian cradle
|
|
#
|
|
#
|
|
set eom_Home 23165406
|
|
set ephi_Home 6647676
|
|
set echi_Home 8919336
|
|
|
|
# Sample Tilt 1, euler omega stage -> exchange with ssw further down
|
|
Motor eom $motor_driver_type [params \
|
|
asyncqueue mc4\
|
|
axis F\
|
|
units degrees\
|
|
hardlowerlim -390\
|
|
hardupperlim 390\
|
|
maxSpeed 1\
|
|
maxAccel 1\
|
|
maxDecel 1\
|
|
stepsPerX -25000\
|
|
absEnc 1\
|
|
absEncHome $eom_Home\
|
|
cntsPerX 8192]
|
|
eom speed 1
|
|
eom softlowerlim -390
|
|
eom softupperlim 390
|
|
eom home 0
|
|
eom movecount $move_count
|
|
eom precision 0.01
|
|
eom part sample
|
|
eom long_name eom
|
|
|
|
# Sample Tilt 2, euler chi stage -> EC1
|
|
Motor echi $motor_driver_type [params \
|
|
asyncqueue mc2\
|
|
axis G\
|
|
units degrees\
|
|
hardlowerlim -390\
|
|
hardupperlim 390\
|
|
maxSpeed 5\
|
|
maxAccel 3\
|
|
maxDecel 3\
|
|
stepsPerX [expr -25000 ]\
|
|
absEnc 1\
|
|
absEncHome $echi_Home\
|
|
cntsPerX [expr 8192 ] ]
|
|
echi softlowerlim -10
|
|
echi softupperlim 90
|
|
echi home 0
|
|
echi speed 3
|
|
echi movecount $move_count
|
|
echi precision 0.01
|
|
echi part sample
|
|
echi long_name echi
|
|
|
|
# Sample Tilt 2, euler phi stage -> EC2
|
|
Motor ephi $motor_driver_type [params \
|
|
asyncqueue mc4\
|
|
axis G\
|
|
units degrees\
|
|
hardlowerlim -400\
|
|
hardupperlim 400\
|
|
maxSpeed 3\
|
|
maxAccel 1\
|
|
maxDecel 1\
|
|
stepsPerX [expr -25000.0/2.0]\
|
|
absEnc 1\
|
|
absEncHome $ephi_Home\
|
|
cntsPerX [expr -8192.0/2.0]]
|
|
setHomeandRange -motor ephi -home 0 -lowrange 400 -uprange 400
|
|
ephi softlowerlim -400
|
|
ephi softupperlim 400
|
|
ephi home 0
|
|
ephi speed 3
|
|
ephi movecount $move_count
|
|
ephi precision 0.01
|
|
ephi part sample
|
|
ephi long_name ephi
|
|
|