l:0 ! So that >take phase does not wait for answers set logic%auto_measurement = T !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! CESRV script for beam size measurement using sextupoles ! 9-setting, 6k cu, K2 scan for a single sextupole ! 24 February 2023 jac ! ! Usage: CesrV>call k2scan_9settings_6k.cesrv ! Sextupole indices are 8-10, 12-45, 47, 52, 54-89, 91 ! ! Remember to restore the current PMBINJ set at the beginning and ! end of this script. !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! ! Lock the DTT (>tt_lock_acq) ! !==================================================================== ! Reduce Xwindow size plot mag 0.8 ! Use vetoes from model using clipping veto phase 3 11 12 19 72 81 84 101 109 veto cbar 6 13 18 19 20 26 29 30 34 35 39 41 45 52 53 55 63 65 78 84 92 102 105 106 110 138 veto orbit 6 12 113 19 26 29 30 39 50 55 63 78 92 101 105 107 109 138 ! Make sure we are in default condx spawn rest csr 168237 pause 20 ! Take a phase measurement with default sextupole settings !take p Sextupole [1] defaultcu !plot orbit bot !sc ! Setting 1 spawn fff vxputn csr_sext_cur [1] [1] -24000 pause 30 !settle time. Check with fff vxgetn csr_sext_cur. take p Sextupole [1] -24000cu take p Sextupole [1] -24000cu take p Sextupole [1] -24000cu plot orbit bot sc spawn source /home/critten/ms_sextupoles/take_TBT.sh pause 3 ! Setting 2 spawn fff vxputn csr_sext_cur [1] [1] -18000 pause 20 !settle time. Check with fff vxgetn csr_sext_cur. take p Sextupole [1] -18000cu take p Sextupole [1] -18000cu take p Sextupole [1] -18000cu plot orbit bot sc spawn source /home/critten/ms_sextupoles/take_TBT.sh pause 3 ! Setting 3 spawn fff vxputn csr_sext_cur [1] [1] -12000 pause 20 !settle time. Check with fff vxgetn csr_sext_cur. take p Sextupole [1] -12000cu take p Sextupole [1] -12000cu take p Sextupole [1] -12000cu plot orbit bot sc spawn source /home/critten/ms_sextupoles/take_TBT.sh pause 3 ! Setting 4 spawn fff vxputn csr_sext_cur [1] [1] -6000 pause 20 !settle time. Check with fff vxgetn csr_sext_cur. take p Sextupole [1] -6000cu take p Sextupole [1] -6000cu take p Sextupole [1] -6000cu plot orbit bot sc spawn source /home/critten/ms_sextupoles/take_TBT.sh pause 3 ! Setting 5 spawn fff vxputn csr_sext_cur [1] [1] 0 pause 20 !settle time. Check with fff vxgetn csr_sext_cur. take p Sextupole [1] 0cu take p Sextupole [1] 0cu take p Sextupole [1] 0cu plot orbit bot sc spawn source /home/critten/ms_sextupoles/take_TBT.sh pause 3 ! Setting 6 spawn fff vxputn csr_sext_cur [1] [1] 6000 pause 20 !settle time. Check with fff vxgetn csr_sext_cur. take p Sextupole [1] 6000cu take p Sextupole [1] 6000cu take p Sextupole [1] 6000cu plot orbit bot sc spawn source /home/critten/ms_sextupoles/take_TBT.sh pause 3 ! Setting 7 spawn fff vxputn csr_sext_cur [1] [1] 12000 pause 20 !settle time. Check with fff vxgetn csr_sext_cur. take p Sextupole [1] 12000cu take p Sextupole [1] 12000cu take p Sextupole [1] 12000cu plot orbit bot sc spawn source /home/critten/ms_sextupoles/take_TBT.sh pause 3 ! Setting 8 spawn fff vxputn csr_sext_cur [1] [1] 18000 pause 20 !settle time. Check with fff vxgetn csr_sext_cur. take p Sextupole [1] 18000cu take p Sextupole [1] 18000cu take p Sextupole [1] 18000cu spawn source /home/critten/ms_sextupoles/take_TBT.sh pause 3 ! Setting 9 spawn fff vxputn csr_sext_cur [1] [1] 24000 pause 20 !settle time. Check with fff vxgetn csr_sext_cur. take p Sextupole [1] 24000cu take p Sextupole [1] 24000cu take p Sextupole [1] 24000cu plot orbit bot sc spawn source /home/critten/ms_sextupoles/take_TBT.sh pause 3 ! Restore sextupole save set values spawn rest csr 168237