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

Update slit motor configuration

Browse Source 
r1346 | dcl | 2006-12-04 14:23:09 +1100 (Mon, 04 Dec 2006) | 2 lines
This commit is contained in:
Douglas Clowes
2006-12-04 14:23:09 +11:00
parent 602a1a5f1b
commit 887deff526
1 changed files with 32 additions and 32 deletions
Download Patch File Download Diff File Expand all files Collapse all files

64
site_ansto/instrument/hrpd/motor_configuration.tcl
View File

@@ -306,7 +306,7 @@ set horSlitUpRange 25
#mr speed 1
#mr precision 0.01
Motor ss1u DMC2280 [params \
Motor ss1r DMC2280 [params \
host $dmc2280_controller3(host)\
port $dmc2280_controller3(port)\
axis E\
@@ -314,11 +314,11 @@ Motor ss1u DMC2280 [params \
maxSpeed 1\
maxAccel 1\
maxDecel 1\
stepsPerX -20125\
motorHome 2100893]
setHomeandRange -motor ss1u -home 0 -lowrange $vertSlitLowRange -uprange $vertSlitUpRange
stepsPerX -20180\
motorHome 592406]
setHomeandRange -motor ss1r -home 0 -lowrange $horSlitLowRange -uprange $horSlitUpRange
Motor ss1d DMC2280 [params \
Motor ss1l DMC2280 [params \
host $dmc2280_controller3(host)\
port $dmc2280_controller3(port)\
axis F\
@@ -326,11 +326,11 @@ Motor ss1d DMC2280 [params \
maxSpeed 1\
maxAccel 1\
maxDecel 1\
stepsPerX -20125\
motorHome 2100893]
setHomeandRange -motor ss1d -home 0 -lowrange $vertSlitLowRange -uprange $vertSlitUpRange
stepsPerX -20180\
motorHome 592406]
setHomeandRange -motor ss1l -home 0 -lowrange $horSlitLowRange -uprange $horSlitUpRange
Motor ss1r DMC2280 [params \
Motor ss1u DMC2280 [params \
host $dmc2280_controller3(host)\
port $dmc2280_controller3(port)\
axis G\
@@ -338,11 +338,11 @@ Motor ss1r DMC2280 [params \
maxSpeed 1\
maxAccel 1\
maxDecel 1\
stepsPerX -20125\
motorHome 592406]
setHomeandRange -motor ss1r -home 0 -lowrange $horSlitLowRange -uprange $horSlitUpRange
stepsPerX -20180\
motorHome 2189530]
setHomeandRange -motor ss1u -home 0 -lowrange $vertSlitLowRange -uprange $vertSlitUpRange
Motor ss1l DMC2280 [params \
Motor ss1d DMC2280 [params \
host $dmc2280_controller3(host)\
port $dmc2280_controller3(port)\
axis H\
@@ -350,9 +350,9 @@ Motor ss1l DMC2280 [params \
maxSpeed 1\
maxAccel 1\
maxDecel 1\
stepsPerX -20125\
motorHome 592406]
setHomeandRange -motor ss1l -home 0 -lowrange $horSlitLowRange -uprange $horSlitUpRange
stepsPerX -20180\
motorHome 2189530]
setHomeandRange -motor ss1d -home 0 -lowrange $vertSlitLowRange -uprange $vertSlitUpRange
############################
# Motor Controller 4
@@ -389,7 +389,7 @@ setHomeandRange -motor ss1l -home 0 -lowrange $horSlitLowRange -uprange $horSli
# cntsPerX xxxx]
#setHomeandRange -motor echi -home 0 -lowrange 180 -uprange 180
Motor ss2u DMC2280 [params \
Motor ss2r DMC2280 [params \
host $dmc2280_controller4(host)\
port $dmc2280_controller4(port)\
axis E\
@@ -397,11 +397,11 @@ Motor ss2u DMC2280 [params \
maxSpeed 1\
maxAccel 1\
maxDecel 1\
stepsPerX -20125\
motorHome 2053148]
setHomeandRange -motor ss2u -home 0 -lowrange $vertSlitLowRange -uprange $vertSlitUpRange
stepsPerX -20180\
motorHome 530188]
setHomeandRange -motor ss2r -home 0 -lowrange $horSlitLowRange -uprange $horSlitUpRange
Motor ss2d DMC2280 [params \
Motor ss2l DMC2280 [params \
host $dmc2280_controller4(host)\
port $dmc2280_controller4(port)\
axis F\
@@ -409,11 +409,11 @@ Motor ss2d DMC2280 [params \
maxSpeed 1\
maxAccel 1\
maxDecel 1\
stepsPerX -20125\
motorHome 2053148]
setHomeandRange -motor ss2d -home 0 -lowrange $vertSlitLowRange -uprange $vertSlitUpRange
stepsPerX -20180\
motorHome 530188]
setHomeandRange -motor ss2l -home 0 -lowrange $horSlitLowRange -uprange $horSlitUpRange
Motor ss2r DMC2280 [params \
Motor ss2u DMC2280 [params \
host $dmc2280_controller4(host)\
port $dmc2280_controller4(port)\
axis G\
@@ -421,11 +421,11 @@ Motor ss2r DMC2280 [params \
maxSpeed 1\
maxAccel 1\
maxDecel 1\
stepsPerX -20125\
motorHome 530188]
setHomeandRange -motor ss2r -home 0 -lowrange $horSlitLowRange -uprange $horSlitUpRange
stepsPerX -20180\
motorHome 2053148]
setHomeandRange -motor ss2u -home 0 -lowrange $vertSlitLowRange -uprange $vertSlitUpRange
Motor ss2l DMC2280 [params \
Motor ss2d DMC2280 [params \
host $dmc2280_controller4(host)\
port $dmc2280_controller4(port)\
axis H\
@@ -433,9 +433,9 @@ Motor ss2l DMC2280 [params \
maxSpeed 1\
maxAccel 1\
maxDecel 1\
stepsPerX -20125\
motorHome 530188]
setHomeandRange -motor ss2l -home 0 -lowrange $horSlitLowRange -uprange $horSlitUpRange
stepsPerX -20180\
motorHome 2053148]
setHomeandRange -motor ss2d -home 0 -lowrange $vertSlitLowRange -uprange $vertSlitUpRange
proc mthGet {} { return [expr [SplitReply [mtth]]/2.0]}
proc mthSet {val} { return "mtth=[SplitReply [mtth]]"}