1 | function ManipBump(X) |
---|
2 | idDevServMainPS1='ans-c05/ei/l-hu640_PS1'; |
---|
3 | idDevServCHE='ans-c05/ei/l-hu640_Corr2'; |
---|
4 | idDevServCHS='ans-c05/ei/l-hu640_corr1'; |
---|
5 | idDevServCVE='ans-c05/ei/l-hu640_corr4'; |
---|
6 | idDevServCVS='ans-c05/ei/l-hu640_corr3'; |
---|
7 | |
---|
8 | devemit = 'ANS-C02/DG/PHC-EMIT'; |
---|
9 | fprintf('%s\n','BUMP[mm] Current[A] EpsZ[nm.rd] EpsX[pm.rd] Couplage[%] SigX[mic] SigZ[mic] TuneX TuneZ') |
---|
10 | PS1=0; |
---|
11 | CVE=0; |
---|
12 | CHE=0; |
---|
13 | CVS=0; |
---|
14 | CHS=0; |
---|
15 | |
---|
16 | idSetCurrentSync(idDevServMainPS1, PS1, 0.3); |
---|
17 | idSetCurrentSync(idDevServCVE, CVE, 0.01); |
---|
18 | idSetCurrentSync(idDevServCHE, CHE, 0.01); |
---|
19 | idSetCurrentSync(idDevServCVS, CVS, 0.01); |
---|
20 | idSetCurrentSync(idDevServCHS, CHS, 0.01); |
---|
21 | |
---|
22 | pause(5); |
---|
23 | EmittanceV=readattribute([devemit '/EmittanceV']); |
---|
24 | EmittanceH=readattribute([devemit '/EmittanceH']); |
---|
25 | Couplage=readattribute([devemit '/Coupling']); |
---|
26 | SigH=readattribute([devemit '/SrcPointSigmaH']); |
---|
27 | SigV=readattribute([devemit '/SrcPointSigmaV']); |
---|
28 | Tune=gettune; |
---|
29 | fprintf('%8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\n',X,PS1,EmittanceV,EmittanceH, Couplage, SigH, SigV,Tune(1),Tune(2)); |
---|
30 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
31 | PS1=-300; |
---|
32 | CVE=-.0383; |
---|
33 | CHE=-.032; |
---|
34 | CVS=-.0143; |
---|
35 | CHS=-.0685; |
---|
36 | |
---|
37 | idSetCurrentSync(idDevServMainPS1, PS1, 0.3); |
---|
38 | idSetCurrentSync(idDevServCVE, CVE, 0.01); |
---|
39 | idSetCurrentSync(idDevServCHE, CHE, 0.01); |
---|
40 | idSetCurrentSync(idDevServCVS, CVS, 0.01); |
---|
41 | idSetCurrentSync(idDevServCHS, CHS, 0.01); |
---|
42 | |
---|
43 | pause(5); |
---|
44 | EmittanceV=readattribute([devemit '/EmittanceV']); |
---|
45 | EmittanceH=readattribute([devemit '/EmittanceH']); |
---|
46 | Couplage=readattribute([devemit '/Coupling']); |
---|
47 | SigH=readattribute([devemit '/SrcPointSigmaH']); |
---|
48 | SigV=readattribute([devemit '/SrcPointSigmaV']); |
---|
49 | Tune=gettune; |
---|
50 | fprintf('%8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\n',X,PS1,EmittanceV,EmittanceH, Couplage, SigH, SigV,Tune(1),Tune(2)); |
---|
51 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
52 | PS1=-600; |
---|
53 | CVE=-.0478; |
---|
54 | CHE=-.0609; |
---|
55 | CVS=-.0072; |
---|
56 | CHS=-.1183; |
---|
57 | |
---|
58 | idSetCurrentSync(idDevServMainPS1, PS1, 0.3); |
---|
59 | idSetCurrentSync(idDevServCVE, CVE, 0.01); |
---|
60 | idSetCurrentSync(idDevServCHE, CHE, 0.01); |
---|
61 | idSetCurrentSync(idDevServCVS, CVS, 0.01); |
---|
62 | idSetCurrentSync(idDevServCHS, CHS, 0.01); |
---|
63 | |
---|
64 | pause(5); |
---|
65 | EmittanceV=readattribute([devemit '/EmittanceV']); |
---|
66 | EmittanceH=readattribute([devemit '/EmittanceH']); |
---|
67 | Couplage=readattribute([devemit '/Coupling']); |
---|
68 | SigH=readattribute([devemit '/SrcPointSigmaH']); |
---|
69 | SigV=readattribute([devemit '/SrcPointSigmaV']); |
---|
70 | Tune=gettune; |
---|
71 | fprintf('%8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\n',X,PS1,EmittanceV,EmittanceH, Couplage, SigH, SigV,Tune(1),Tune(2)); |
---|
72 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
73 | PS1=600; |
---|
74 | CVE=.0645; |
---|
75 | CHE=.0772; |
---|
76 | CVS=.0191; |
---|
77 | CHS=.1609; |
---|
78 | idSetCurrentSync(idDevServMainPS1, PS1, 0.3); |
---|
79 | idSetCurrentSync(idDevServCVE, CVE, 0.01); |
---|
80 | idSetCurrentSync(idDevServCHE, CHE, 0.01); |
---|
81 | idSetCurrentSync(idDevServCVS, CVS, 0.01); |
---|
82 | idSetCurrentSync(idDevServCHS, CHS, 0.01); |
---|
83 | |
---|
84 | pause(5); |
---|
85 | EmittanceV=readattribute([devemit '/EmittanceV']); |
---|
86 | EmittanceH=readattribute([devemit '/EmittanceH']); |
---|
87 | Couplage=readattribute([devemit '/Coupling']); |
---|
88 | SigH=readattribute([devemit '/SrcPointSigmaH']); |
---|
89 | SigV=readattribute([devemit '/SrcPointSigmaV']); |
---|
90 | Tune=gettune; |
---|
91 | fprintf('%8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\n',X,PS1,EmittanceV,EmittanceH, Couplage, SigH, SigV,Tune(1),Tune(2)); |
---|
92 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
93 | PS1=300; |
---|
94 | CVE=.0388; |
---|
95 | CHE=.0285; |
---|
96 | CVS=.0195; |
---|
97 | CHS=.0898; |
---|
98 | |
---|
99 | idSetCurrentSync(idDevServMainPS1, PS1, 0.3); |
---|
100 | idSetCurrentSync(idDevServCVE, CVE, 0.01); |
---|
101 | idSetCurrentSync(idDevServCHE, CHE, 0.01); |
---|
102 | idSetCurrentSync(idDevServCVS, CVS, 0.01); |
---|
103 | idSetCurrentSync(idDevServCHS, CHS, 0.01); |
---|
104 | |
---|
105 | pause(5); |
---|
106 | EmittanceV=readattribute([devemit '/EmittanceV']); |
---|
107 | EmittanceH=readattribute([devemit '/EmittanceH']); |
---|
108 | Couplage=readattribute([devemit '/Coupling']); |
---|
109 | SigH=readattribute([devemit '/SrcPointSigmaH']); |
---|
110 | SigV=readattribute([devemit '/SrcPointSigmaV']); |
---|
111 | Tune=gettune; |
---|
112 | fprintf('%8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\n',X,PS1,EmittanceV,EmittanceH, Couplage, SigH, SigV,Tune(1),Tune(2)); |
---|
113 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
114 | PS1=0; |
---|
115 | CVE=0; |
---|
116 | CHE=0; |
---|
117 | CVS=0; |
---|
118 | CHS=0; |
---|
119 | |
---|
120 | idSetCurrentSync(idDevServMainPS1, 0, 0.3); |
---|
121 | idSetCurrentSync(idDevServCVE, CVE, 0.01); |
---|
122 | idSetCurrentSync(idDevServCHE, CHE, 0.01); |
---|
123 | idSetCurrentSync(idDevServCVS, CVS, 0.01); |
---|
124 | idSetCurrentSync(idDevServCHS, CHS, 0.01); |
---|
125 | |
---|
126 | pause(5); |
---|
127 | EmittanceV=readattribute([devemit '/EmittanceV']); |
---|
128 | EmittanceH=readattribute([devemit '/EmittanceH']); |
---|
129 | Couplage=readattribute([devemit '/Coupling']); |
---|
130 | SigH=readattribute([devemit '/SrcPointSigmaH']); |
---|
131 | SigV=readattribute([devemit '/SrcPointSigmaV']); |
---|
132 | Tune=gettune; |
---|
133 | fprintf('%8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\t %8.4f\n',X,PS1,EmittanceV,EmittanceH, Couplage, SigH, SigV,Tune(1),Tune(2)); |
---|