1 | function twiss_excel |
---|
2 | %execute spear3 init |
---|
3 | %load Optics structure from GetTwiss2 |
---|
4 | %load bpm and cor structures |
---|
5 | %dump bpm and cor structures to EXCEL |
---|
6 | |
---|
7 | clear bpm cor |
---|
8 | spear3init; %set up middleware and run sp3v81f deck |
---|
9 | global THERING |
---|
10 | Optics = GetTwiss2(THERING,0,1:length(THERING)); %load structure with optical parameters |
---|
11 | Optics; %show what Optics contains |
---|
12 | ATindx=ATIndex(THERING); %AATindx has indices for each family |
---|
13 | |
---|
14 | ibpm=ATindx.BPM; %select BPMs |
---|
15 | bpm.name =Optics.name(ibpm,:); |
---|
16 | bpm.name =getfamilydata('BPMx','CommonNames'); |
---|
17 | bpm.status =getfamilydata('BPMx','Status'); |
---|
18 | bpm.s =Optics.s(ibpm); |
---|
19 | bpm.phix =Optics.phix(ibpm); |
---|
20 | bpm.betax =Optics.betax(ibpm); |
---|
21 | bpm.alfax =Optics.alfax(ibpm); |
---|
22 | bpm.etax =Optics.etax(ibpm); |
---|
23 | bpm.phiy =Optics.phiy(ibpm); |
---|
24 | bpm.betay =Optics.betay(ibpm); |
---|
25 | bpm.alfay =Optics.alfay(ibpm); |
---|
26 | struct2excel(bpm) |
---|
27 | |
---|
28 | icor=ATindx.COR; %select CORs |
---|
29 | cor.name =Optics.name(icor,:); |
---|
30 | cor.x_name =getfamilydata('HCM','CommonNames'); |
---|
31 | cor.x_status=getfamilydata('HCM','Status'); |
---|
32 | cor.y_name =getfamilydata('VCM','CommonNames'); |
---|
33 | cor.y_status=getfamilydata('VCM','Status'); |
---|
34 | cor.s =Optics.s(icor); |
---|
35 | cor.phix =Optics.phix(icor); |
---|
36 | cor.betax =Optics.betax(icor); |
---|
37 | cor.alfax =Optics.alfax(icor); |
---|
38 | cor.etax =Optics.etax(icor); |
---|
39 | cor.phiy =Optics.phiy(icor); |
---|
40 | cor.betay =Optics.betay(icor); |
---|
41 | cor.alfay =Optics.alfay(icor); |
---|
42 | struct2excel(cor) |
---|