add Pelican

r3106 | jgn | 2011-04-20 12:09:49 +1000 (Wed, 20 Apr 2011) | 1 line
This commit is contained in:
Jing Chen
2011-04-20 12:09:49 +10:00
committed by Douglas Clowes
parent 8b1d0103f4
commit 3f6a01d405

View File

@@ -35,24 +35,6 @@ if {$sim_mode == "true"} {
MakeAsyncQueue mc4 DMC2280 $dmc2280_controller4(host) $dmc2280_controller4(port)
}
# Beam stop gearing and signs (BS1=largest)
# 4,5 160:1
# 1,2,3 110:1
# MOTS need 400 steps per rev = 50000 steps per rev
#set bs_steps_per_rev 50000.0
#set bs1gear 160
#set bs2gear 160
#set bs3gear 110
#set bs4gear 110
#set bs5gear 110
#set bs45_gear 110.0
#set bs123_gear 160.0
#set bs45_gear 160.0
#set bs123_gear 110.0
#set bs125sign -1
#set bs34sign 1
#Measured absolute encoder reading at home position
set samchi_Home 7808328
set samphi_Home 7675008
@@ -68,71 +50,7 @@ set apx_Home 12965422
set apz_Home 7500000
set att_Home 24782942
set bsx_Home 7578346
set bsz_Home 10568857
set bs1_Home 21298
set bs2_Home 9942
set bs3_Home 30928
set bs4_Home 22111
set bs5_Home 14558
set bs6_Home 27251
set bs_cntsPerX [expr 32768.0/360.0]
set bs_stepsPerX [expr -25000.0*160.0/360.0]
set pol_Home 7500000
#HERE ARE THE LATEST VALUES
set pent_Home 8146159
# Guide Positions Mirrotron ffr 2009-07-18
set pc1_Guide 7995952
set pc1_Polarizer 7723328
set pc2_Guide 7459329
set pc2_Polarizer 7186701
set pc3_Guide 8440904
set pc4_Guide 6161076
set pc5_Guide 7856254
set pc6_Guide 8800665
set pc7_Guide 24167224
set pc8_Guide 8302146
set pc9_Guide 7851820
set pc10_Guide 25977227
#lens
set pc10_Lens 26196301
#lens_and_prism
set pc10_LensandPrism 25729419
set pc3_Aperture 8304893
set pc4_Aperture 6029466
set pc5_Aperture 7728755
set pc6_Aperture 8663189
set pc7_Aperture 24036241
set pc8_Aperture 8169931
set pc9_Aperture 7718840
set pc10_Aperture 25835335
set pc1_Home $pc1_Guide
set pc2_Home $pc2_Guide
set pc3_Home $pc3_Guide
set pc4_Home $pc4_Guide
set pc5_Home $pc5_Guide
set pc6_Home $pc6_Guide
set pc7_Home $pc7_Guide
set pc8_Home $pc8_Guide
set pc9_Home $pc9_Guide
set pc10_Home $pc10_Guide
set pc1_Empty [expr ($pc1_Guide + $pc1_Polarizer)/2]
set pc2_Empty [expr ($pc2_Guide + $pc2_Polarizer)/2]
set pc3_Empty [expr (2 * $pc3_Guide) - $pc3_Aperture]
set pc4_Empty [expr (2 * $pc4_Guide) - $pc4_Aperture]
set pc5_Empty [expr (2 * $pc5_Guide) - $pc5_Aperture]
set pc6_Empty [expr (2 * $pc6_Guide) - $pc6_Aperture]
set pc7_Empty [expr (2 * $pc7_Guide) - $pc7_Aperture]
set pc8_Empty [expr (2 * $pc8_Guide) - $pc8_Aperture]
set pc9_Empty [expr (2 * $pc9_Guide) - $pc9_Aperture]
set pc10_Empty [expr (2 * $pc10_Guide) - $pc10_Aperture]
#Measured or computed step/count rates for collimator translation
set coll_StepsPerX [expr -25000.0/6.0]