1 | function BBAgui_last(arg1,arg2) |
---|
2 | |
---|
3 | %% PARAMETRES DES PANELS:Dimensions |
---|
4 | fontsize=12; |
---|
5 | hradio=12; |
---|
6 | lradio=50; |
---|
7 | espV=10; |
---|
8 | espH=10; |
---|
9 | OffNone=20; |
---|
10 | |
---|
11 | %Panels "Qi" (pour servir des paramÚtres) |
---|
12 | lpanel=10*(lradio+espH/4)+OffNone+espH; |
---|
13 | mult=1; |
---|
14 | hpanel=mult*hradio+(mult+1)*espV+fontsize; |
---|
15 | hpospan=hpanel+espV; |
---|
16 | |
---|
17 | %Panel "ALL QP" |
---|
18 | lpanQP=2*(lradio+espH); |
---|
19 | hpanQP=2*hradio+2*espV+fontsize; |
---|
20 | |
---|
21 | %Panel "Plane" |
---|
22 | lpanPlane=2*(lradio+espH); |
---|
23 | hpanPlane= hpanQP; |
---|
24 | % checkbox: "Horizontal" |
---|
25 | lHrz=lradio+20; |
---|
26 | hHrz=hradio; |
---|
27 | |
---|
28 | |
---|
29 | % checkbox: "Vertical" |
---|
30 | lVert=lradio+10; |
---|
31 | hVert=hradio; |
---|
32 | |
---|
33 | |
---|
34 | %Panel "Method" |
---|
35 | lpanMeth=2.5*(lradio+espH); |
---|
36 | hpanMeth= hpanQP; |
---|
37 | |
---|
38 | % checkbox: "M.E.C." |
---|
39 | lMec=lradio+20 ; |
---|
40 | hMec=hradio; |
---|
41 | |
---|
42 | |
---|
43 | % checkbox: "BMP4CM" |
---|
44 | lBmp4cm=lradio+30; |
---|
45 | hBmp4cm=hradio; |
---|
46 | |
---|
47 | %Figure |
---|
48 | largeurFig=1.8*(10*(lradio+espH)+4*espH);%10*80+2*20; |
---|
49 | hauteurFig=20*hradio+32*espV+10*fontsize+10*espV+hpanQP+espV+fontsize; |
---|
50 | |
---|
51 | %Plot |
---|
52 | lPlot=largeurFig-lpanel-200; |
---|
53 | hPlot=0.4*hauteurFig; |
---|
54 | |
---|
55 | |
---|
56 | %pour les sextu |
---|
57 | larSp=largeurFig-lpanel-30; |
---|
58 | HautSp=2*hpanel+espV; |
---|
59 | |
---|
60 | |
---|
61 | % Zone de texte: Qp en cours de mesure |
---|
62 | lQpMes1= 6.5*lradio; |
---|
63 | hQpMes1=2*hradio; |
---|
64 | |
---|
65 | |
---|
66 | % Zone de texte BPM: utilisé |
---|
67 | lBpm=2*lradio+20; |
---|
68 | hBpm=2*hradio; |
---|
69 | |
---|
70 | % Zone de texte BPM: utilisé |
---|
71 | lcor=2*lradio+20; |
---|
72 | hcor=2*hradio; |
---|
73 | |
---|
74 | % Zone de texte: Qp mesuré précedemment |
---|
75 | lQpMes0= lBpm; |
---|
76 | hQpMes0= hBpm; |
---|
77 | |
---|
78 | % Zone de texte heure de la mesure précédente |
---|
79 | lClock=5*lradio;%+2*espH; |
---|
80 | hClock=hBpm; |
---|
81 | |
---|
82 | |
---|
83 | |
---|
84 | %Zone de texte:valeur offset BPM |
---|
85 | loff= 5*lradio; |
---|
86 | hoff=2*hradio; |
---|
87 | |
---|
88 | |
---|
89 | %Zone de texte:RMS Fit |
---|
90 | lrms= 11*lradio; |
---|
91 | hrms=2*hradio; |
---|
92 | |
---|
93 | %Zone de texte:Name File |
---|
94 | lfich=11*lradio; |
---|
95 | hfich=2*hradio; |
---|
96 | |
---|
97 | % Pushbutton pour lancer le BBA |
---|
98 | lBBA=3*lradio; |
---|
99 | hBBA=3*hradio; |
---|
100 | |
---|
101 | lmanu=1.2*lradio; |
---|
102 | hmanu=2*espV; |
---|
103 | |
---|
104 | lnbCor=lradio; |
---|
105 | hnbCor=2*espV; |
---|
106 | |
---|
107 | lStCor=lradio; |
---|
108 | hStCor=2*espV; |
---|
109 | |
---|
110 | lOffCor=lradio; |
---|
111 | hOffCor=2*espV; |
---|
112 | |
---|
113 | lDelais=lradio; |
---|
114 | hDelais=2*espV; |
---|
115 | |
---|
116 | lStQp=lradio; |
---|
117 | hStQp=2*espV; |
---|
118 | |
---|
119 | lWhCor=lradio; |
---|
120 | hWhCor=2*espV; |
---|
121 | |
---|
122 | |
---|
123 | %% PARAMETRES DES PANELS: Positions |
---|
124 | |
---|
125 | hposrad=(hpanPlane-fontsize-hradio)/2; |
---|
126 | |
---|
127 | %Panel "ALL QP" |
---|
128 | HposQp=10; |
---|
129 | VposQp=hauteurFig-hpanQP-10; |
---|
130 | |
---|
131 | %Panel "Plane" |
---|
132 | HposPlane=lpanQP+(lpanel-lpanQP-lpanMeth)/2-lpanPlane/2; |
---|
133 | VposPlane=hauteurFig-hpanPlane-10; |
---|
134 | |
---|
135 | % checkbox: "Horizontal" |
---|
136 | HHrz= 5; |
---|
137 | VHrz=hposrad; |
---|
138 | |
---|
139 | |
---|
140 | % checkbox: "Vertical" |
---|
141 | HVert=5+1*(lradio+espH)+10; |
---|
142 | VVert=hposrad; |
---|
143 | |
---|
144 | |
---|
145 | %Panel "Method" |
---|
146 | %HposMeth=HposPlane+espH+lpanPlane; |
---|
147 | HposMeth=10+lpanel-lpanMeth;%HposQp+10*(lradio+espH)+OffNone-lpanMeth; |
---|
148 | VposMeth=hauteurFig-hpanMeth-10; |
---|
149 | |
---|
150 | % checkbox: "M.E.C." |
---|
151 | HMec=5; |
---|
152 | VMec=hposrad; |
---|
153 | |
---|
154 | |
---|
155 | % checkbox: "BMP4CM" |
---|
156 | HBmp4cm=5+1.5*(lradio+espH)-20; |
---|
157 | VBmp4cm=hposrad; |
---|
158 | |
---|
159 | |
---|
160 | |
---|
161 | |
---|
162 | |
---|
163 | %pour les sextu |
---|
164 | HposSp=lpanel+20; |
---|
165 | VposSp=VposMeth-2*espV-hpanel-hpospan;%hauteurFig-4*(hpanel+espV) |
---|
166 | |
---|
167 | |
---|
168 | %Plot |
---|
169 | HposPlot=lpanel+(largeurFig-lpanel)/2-lPlot/2+espH; |
---|
170 | VposPlot=hauteurFig/2-125; |
---|
171 | |
---|
172 | % Zone de texte Qp en cours de mesure |
---|
173 | HQpMes1=lpanel+(largeurFig-lpanel)/2-lQpMes1/2;%+2*espH; |
---|
174 | VQpMes1=hauteurFig-5*espV; |
---|
175 | |
---|
176 | % Zone de texte BPM: utilisé |
---|
177 | HBpm=lpanel+(largeurFig-lpanel)/2+espH+lcor/2; |
---|
178 | VBpm=13*hposrad; |
---|
179 | |
---|
180 | % Zone de texte COR: utilisé |
---|
181 | Hcor=lpanel+(largeurFig-lpanel)/2-lcor/2; |
---|
182 | Vcor=13*hposrad; |
---|
183 | |
---|
184 | % Zone de texte Qp mesuré précedemment |
---|
185 | HQpMes0=lpanel+(largeurFig-lpanel)/2-lQpMes0-espH-lcor/2;%+2*espH; |
---|
186 | VQpMes0=VBpm; |
---|
187 | |
---|
188 | % Zone de texte heure de la mesure précédente |
---|
189 | HClock=lpanel+(largeurFig-lpanel)/2-lClock/2;%+lcor/2+lBpm+2*espH;%+2*espH; |
---|
190 | VClock=VBpm+hClock+espV; |
---|
191 | |
---|
192 | %Zone de texte:valeur offset BPM |
---|
193 | Hoff=lpanel+(largeurFig-lpanel)/2-loff/2; |
---|
194 | Voff=10*hposrad; |
---|
195 | |
---|
196 | %Zone de texte:RMS Fit |
---|
197 | Hrms=lpanel+(largeurFig-lpanel)/2-lrms/2; |
---|
198 | Vrms=hauteurFig-6*espV-hQpMes1; |
---|
199 | |
---|
200 | %Zone de texte:Name File |
---|
201 | Hfich=lpanel+(largeurFig-lpanel)/2-lfich/2; |
---|
202 | Vfich=hauteurFig-7*espV-2*hrms; |
---|
203 | |
---|
204 | % Pushbutton pour lancer le BBA |
---|
205 | HBBA=lpanel+(largeurFig-lpanel)/2-lBBA/2; |
---|
206 | VBBA=50; |
---|
207 | |
---|
208 | |
---|
209 | Hmanu=largeurFig-1.1*lradio-espV; |
---|
210 | Vmanu=150; |
---|
211 | |
---|
212 | HnbCor=largeurFig-lradio-espV; |
---|
213 | VnbCor=125; |
---|
214 | |
---|
215 | |
---|
216 | HStCor=largeurFig-lradio-espV; |
---|
217 | VStCor=100; |
---|
218 | |
---|
219 | HOffCor=largeurFig-lradio-espV; |
---|
220 | VOffCor=75; |
---|
221 | |
---|
222 | HDelais=largeurFig-lradio-espV; |
---|
223 | VDelais=50; |
---|
224 | |
---|
225 | HStQp=largeurFig-lradio-espV; |
---|
226 | VStQp=25; |
---|
227 | |
---|
228 | HWhCor1=largeurFig-3*(lradio-espV)-espV; |
---|
229 | VWhCor1=25; |
---|
230 | |
---|
231 | HWhCor2=largeurFig-4*(lradio-espV)-2*espV; |
---|
232 | VWhCor2=25; |
---|
233 | %%5+2*(lradio+espH)+10 |
---|
234 | |
---|
235 | |
---|
236 | %%5+2*(lradio+espH)+10 |
---|
237 | |
---|
238 | |
---|
239 | if nargin<1 %Créer l'IHM |
---|
240 | |
---|
241 | for i=1:10 |
---|
242 | QuadFamilyList(i)=cellstr(strcat('Q',num2str(i))); |
---|
243 | end |
---|
244 | |
---|
245 | % ParamÚtres des éléments de l'IHM |
---|
246 | |
---|
247 | %% FIGURE |
---|
248 | figCol=[0.93,0.75,0.51]; |
---|
249 | f = figure( 'Visible','on',... |
---|
250 | 'Units','pixels',... |
---|
251 | 'Position',[100,100,largeurFig,hauteurFig],... |
---|
252 | 'HandleVisibility','on',... |
---|
253 | 'Name','B.B.A. -> Offsets Hunting',... |
---|
254 | 'Tag','Ola',... |
---|
255 | 'Color',[0.93,0.75,0.51]); |
---|
256 | %% |
---|
257 | %% AXE = Plots |
---|
258 | Hb=axes('Parent',f); |
---|
259 | set(Hb,'Units','pixels'); |
---|
260 | set(Hb,'Tag','merit_Plot'); |
---|
261 | |
---|
262 | get(Hb,'Tag'); |
---|
263 | % alors=get(Hb,'Position') |
---|
264 | set(Hb,'Position',[HposPlot VposPlot lPlot hPlot]); |
---|
265 | |
---|
266 | ze=[0 0];ord2=[0 0];ord1=[0 0]; |
---|
267 | CorCons=[0 0];BpmRes=[0 0];merit(:,1)=[0 0];merit(:,2)=[0 0]; |
---|
268 | center=0; y1=[-1 1];x1=[-1 1];offs=0;y2=[-2 2]; |
---|
269 | hold on |
---|
270 | [Bx1,Hb1,Hb2]=plotyy(Hb,ze,ord2,ze,ord1,'plot'); |
---|
271 | set(Bx1(1),'Tag','axe_calc_bpm'); |
---|
272 | set(Bx1(2),'Tag','axe_calc_merit'); |
---|
273 | set(Hb1,'Tag','calc_bpm'); |
---|
274 | set(Hb2,'Tag','calc_merit'); |
---|
275 | |
---|
276 | set(Hb1,'Color','black','LineStyle','-.');%,'LineStyle','--') |
---|
277 | set(Hb2,'Color','black','LineStyle','-.'); |
---|
278 | %set(Bx1(1),'YLim',y1); |
---|
279 | %set(Bx1(2),'YLim',y2); |
---|
280 | axis(Bx1(1),'off'); |
---|
281 | axis(Bx1(2),'off'); |
---|
282 | |
---|
283 | [Ax1,Ha1,Ha2]=plotyy(Hb,CorCons,BpmRes,merit(:,1),merit(:,2) ,'plot'); |
---|
284 | set(Ax1(1),'Tag','axe_mes_bpm'); |
---|
285 | set(Ax1(2),'Tag','axe_mes_merit'); |
---|
286 | set(Ha1,'Tag','mes_bpm'); |
---|
287 | set(Ha2,'Tag','mes_merit'); |
---|
288 | |
---|
289 | set(Ha1,'Marker','x','Color','blue');%,'LineStyle','--') |
---|
290 | set(Ha2,'Marker','x','Color','red'); |
---|
291 | |
---|
292 | %x1=get(Ax1(1),'XLim'); |
---|
293 | %set(Ax1,'Visible','off'); |
---|
294 | %set(Ax1(1),'YLim',y1); |
---|
295 | %set(Ax1(2),'YLim',y2); |
---|
296 | axis(Ax1(1),'on') |
---|
297 | axis(Ax1(2),'on'); |
---|
298 | %set(Ax1(1),'YLim',y1,'YColor','blue'); |
---|
299 | %set(Ax1(2),'YLim',y2,'YColor','red'); |
---|
300 | set(Ax1(1),'YColor','blue'); |
---|
301 | set(Ax1(2),'YColor','red'); |
---|
302 | |
---|
303 | set(get(Ax1(1),'XLabel'),'String','COR Value (amps)'); |
---|
304 | set(get(Ax1(1),'YLabel'),'String','(mm)'); |
---|
305 | set(get(Ax1(2),'YLabel'),'String','(mm^2)'); |
---|
306 | |
---|
307 | pl1=plot(Hb,[center center],[-1 0],'k','LineStyle','-.'); |
---|
308 | pl2=plot(Hb,[-1 center],[offs offs],'k','LineStyle','-.'); |
---|
309 | pl3=plot(Hb,center,offs,'ko'); |
---|
310 | set(pl1,'Tag','loc_off1'); |
---|
311 | set(pl2,'Tag','loc_off2'); |
---|
312 | set(pl3,'Tag','loc_off3'); |
---|
313 | drawnow |
---|
314 | hold off |
---|
315 | |
---|
316 | % [Ax1,Ha1,Ha2]=plotyy(Hb,[1 3 9],[4 5 8],[4 7 12],[1 2 3]) |
---|
317 | % set(Ha1,'Marker','x','Color','blue'); |
---|
318 | % set(Ha2,'Marker','x','Color','red'); |
---|
319 | % hold on |
---|
320 | % axis(Ax1,'off') |
---|
321 | % [Bx1,Hb1,Hb2]=plotyy(Hb,[12 20 45],[4 10 -6],[0 2 41],[1 -20 3]) |
---|
322 | % axis(Bx1,'on') |
---|
323 | % hold off |
---|
324 | |
---|
325 | |
---|
326 | % f2=uipanel( 'Parent',f,'BackgroundColor',[0.93,0.75,0.51],... |
---|
327 | % 'Visible','on',... |
---|
328 | % 'Units','pixels',... |
---|
329 | % 'Position',[0,0,lpanel+20,hauteurFig],... |
---|
330 | % 'HandleVisibility','on',... |
---|
331 | % 'Visible','on'); |
---|
332 | |
---|
333 | |
---|
334 | %% |
---|
335 | Hdecale=lradio+espH; |
---|
336 | % radio bouton manuel ou auto |
---|
337 | radManu=uicontrol('Parent',f,... |
---|
338 | 'BackgroundColor',[1,0,0],... |
---|
339 | 'Style','radiobutton',... |
---|
340 | 'String', 'Manual',... |
---|
341 | 'Units','pixels',... |
---|
342 | 'Callback', 'BBAgui_last(''manu'')',... |
---|
343 | 'Tag', 'radio_manu',... |
---|
344 | 'Value',0,... |
---|
345 | 'Position',[Hmanu Vmanu lmanu hmanu]); |
---|
346 | |
---|
347 | edNbCor=uicontrol('Parent',f,... |
---|
348 | 'BackgroundColor',[1 1 1],... |
---|
349 | 'Style','edit',... |
---|
350 | 'String', '13',... |
---|
351 | 'Units','pixels',... |
---|
352 | 'Callback', '',... |
---|
353 | 'Tag', 'edit_nbCor',... |
---|
354 | 'Value',0,... |
---|
355 | 'Position',[HnbCor VnbCor lnbCor hnbCor]); |
---|
356 | |
---|
357 | edStepCor=uicontrol('Parent',f,... |
---|
358 | 'BackgroundColor',[1 1 1],... |
---|
359 | 'Style','edit',... |
---|
360 | 'String', '0.1',... |
---|
361 | 'Units','pixels',... |
---|
362 | 'Callback', '',... |
---|
363 | 'Tag', 'edit_StCor',... |
---|
364 | 'Value',0,... |
---|
365 | 'Position',[HStCor VStCor lStCor hStCor]); |
---|
366 | |
---|
367 | edOffCor=uicontrol('Parent',f,... |
---|
368 | 'BackgroundColor',[1 1 1],... |
---|
369 | 'Style','edit',... |
---|
370 | 'String', '0',... |
---|
371 | 'Units','pixels',... |
---|
372 | 'Callback', '',... |
---|
373 | 'Tag', 'edit_OffCor',... |
---|
374 | 'Value',0,... |
---|
375 | 'Position',[HOffCor VOffCor lOffCor hOffCor]); |
---|
376 | |
---|
377 | edDelais=uicontrol('Parent',f,... |
---|
378 | 'BackgroundColor',[1 1 1],... |
---|
379 | 'Style','edit',... |
---|
380 | 'String', '4',... |
---|
381 | 'Units','pixels',... |
---|
382 | 'Callback', '',... |
---|
383 | 'Tag', 'edit_Delais',... |
---|
384 | 'Value',0,... |
---|
385 | 'Position',[HDelais VDelais lDelais hDelais]); |
---|
386 | |
---|
387 | edStQp=uicontrol('Parent',f,... |
---|
388 | 'BackgroundColor',[1 1 1],... |
---|
389 | 'Style','edit',... |
---|
390 | 'String', '1.75',... |
---|
391 | 'Units','pixels',... |
---|
392 | 'Callback', '',... |
---|
393 | 'Tag', 'edit_StQp',... |
---|
394 | 'Value',0,... |
---|
395 | 'Position',[HStQp VStQp lStQp hStQp]); |
---|
396 | |
---|
397 | edWhCor=uicontrol('Parent',f,... |
---|
398 | 'BackgroundColor',[1 1 1],... |
---|
399 | 'Style','edit',... |
---|
400 | 'String', '1',... |
---|
401 | 'Units','pixels',... |
---|
402 | 'Callback', '',... |
---|
403 | 'Tag', 'edit_WhCor',... |
---|
404 | 'Value',0,... |
---|
405 | 'Position',[HWhCor2 VWhCor2 lStQp hStQp]); |
---|
406 | |
---|
407 | %% |
---|
408 | textNbCor=uicontrol('Parent',f,... |
---|
409 | 'BackgroundColor',figCol,... |
---|
410 | 'Style','text',... |
---|
411 | 'FontSize',12,... |
---|
412 | 'String', 'nb Cor',... |
---|
413 | 'Units','pixels',... |
---|
414 | 'Callback', '',... |
---|
415 | 'Tag', 'text_nbCor',... |
---|
416 | 'Value',0,... |
---|
417 | 'Position',[HnbCor-Hdecale VnbCor lnbCor hnbCor]); |
---|
418 | |
---|
419 | textStepCor=uicontrol('Parent',f,... |
---|
420 | 'BackgroundColor',figCol,... |
---|
421 | 'Style','text',... |
---|
422 | 'FontSize',12,... |
---|
423 | 'String', 'Step Cor',... |
---|
424 | 'Units','pixels',... |
---|
425 | 'Callback', '',... |
---|
426 | 'Tag', 'text_StCor',... |
---|
427 | 'Value',0,... |
---|
428 | 'Position',[HStCor-Hdecale VStCor lStCor hStCor]); |
---|
429 | |
---|
430 | textOffCor=uicontrol('Parent',f,... |
---|
431 | 'BackgroundColor',figCol,... |
---|
432 | 'Style','text',... |
---|
433 | 'FontSize',12,... |
---|
434 | 'String', 'Offs Cor',... |
---|
435 | 'Units','pixels',... |
---|
436 | 'Callback', '',... |
---|
437 | 'Tag', 'text_OffCor',... |
---|
438 | 'Value',0,... |
---|
439 | 'Position',[HOffCor-Hdecale VOffCor lOffCor hOffCor]); |
---|
440 | |
---|
441 | textDelais=uicontrol('Parent',f,... |
---|
442 | 'BackgroundColor',figCol,... |
---|
443 | 'Style','text',... |
---|
444 | 'FontSize',12,... |
---|
445 | 'String', 'Delai',... |
---|
446 | 'Units','pixels',... |
---|
447 | 'Callback', '',... |
---|
448 | 'Tag', 'text_Delais',... |
---|
449 | 'Value',0,... |
---|
450 | 'Position',[HDelais-Hdecale VDelais lDelais hDelais]); |
---|
451 | |
---|
452 | textStQp=uicontrol('Parent',f,... |
---|
453 | 'BackgroundColor',figCol,... |
---|
454 | 'Style','text',... |
---|
455 | 'FontSize',12,... |
---|
456 | 'String', 'Step Qp',... |
---|
457 | 'Units','pixels',... |
---|
458 | 'Callback', '',... |
---|
459 | 'Tag', 'text_StQp',... |
---|
460 | 'Value',0,... |
---|
461 | 'Position',[HStQp-Hdecale VStQp lStQp hStQp]); |
---|
462 | |
---|
463 | textWhCor=uicontrol('Parent',f,... |
---|
464 | 'BackgroundColor',figCol,... |
---|
465 | 'Style','text',... |
---|
466 | 'FontSize',12,... |
---|
467 | 'String', 'Choix Cor',... |
---|
468 | 'Units','pixels',... |
---|
469 | 'Callback', '',... |
---|
470 | 'Tag', 'text_WhCor',... |
---|
471 | 'Value',0,... |
---|
472 | 'Position',[HWhCor2-Hdecale-espV VWhCor2 1.2*lWhCor hWhCor]); |
---|
473 | |
---|
474 | |
---|
475 | %% % PANEL pour sélectionner ou désélectionner tous les Qp |
---|
476 | QpCol=[0.63,0.8,0.35]; |
---|
477 | |
---|
478 | AllQP=uipanel('Parent',f,... |
---|
479 | 'BackgroundColor',QpCol,...%[0,0.9,0.9] |
---|
480 | 'FontUnits','pixels',... |
---|
481 | 'FontWeight','bold',... |
---|
482 | 'FontSize',fontsize,... |
---|
483 | 'Title','ALL QP',... |
---|
484 | 'FontSize',12,... |
---|
485 | 'Units','pixels',... |
---|
486 | 'Position',[HposQp VposQp lpanQP hpanQP],... |
---|
487 | 'Visible','on'); |
---|
488 | |
---|
489 | |
---|
490 | hposrad=(hpanQP-fontsize-hradio)/2; |
---|
491 | |
---|
492 | % radio button 'ALL' |
---|
493 | radAll=uicontrol('Parent',AllQP,... |
---|
494 | 'BackgroundColor',QpCol,... |
---|
495 | 'Style','radiobutton',... |
---|
496 | 'String', 'ALL',... |
---|
497 | 'Units','pixels',... |
---|
498 | 'Callback', 'BBAgui_last(''typeAll'')',... |
---|
499 | 'Tag', 'radio_All',... |
---|
500 | 'Value',0,... |
---|
501 | 'Position',[5 hposrad lradio hradio]); |
---|
502 | |
---|
503 | % radio button 'None' |
---|
504 | radNone=uicontrol('Parent',AllQP,... |
---|
505 | 'BackgroundColor',QpCol,... |
---|
506 | 'Style','radiobutton',... |
---|
507 | 'String', 'None',... |
---|
508 | 'Units','pixels',... |
---|
509 | 'Callback', 'BBAgui_last(''typeNone'')',... |
---|
510 | 'Tag', 'radio_None',... |
---|
511 | 'Value',0,... |
---|
512 | 'Position',[5+lradio+espH/4 hposrad lradio hradio]); |
---|
513 | |
---|
514 | |
---|
515 | |
---|
516 | %% % PANEL pour sélectionner le plan de BBA |
---|
517 | PlCol=[1,0.8,0]; |
---|
518 | panPlane=uipanel('Parent',f,... |
---|
519 | 'BackgroundColor',PlCol,... |
---|
520 | 'FontUnits','pixels',... |
---|
521 | 'FontWeight','bold',... |
---|
522 | 'FontSize',fontsize,... |
---|
523 | 'Title','Plane',... |
---|
524 | 'Units','pixels',... |
---|
525 | 'Position',[HposPlane VposPlane lpanPlane+20 hpanPlane],... |
---|
526 | 'Visible','on'); |
---|
527 | |
---|
528 | hposrad=(hpanPlane-fontsize-hradio)/2; |
---|
529 | % radAll=uicontrol('Parent',panPlane,...%[0.2,1,0] |
---|
530 | % 'BackgroundColor',PlCol,... |
---|
531 | % 'Style','radiobutton',... |
---|
532 | % 'String', 'Both',... |
---|
533 | % 'Units','pixels',... |
---|
534 | % 'Callback', '',... |
---|
535 | % 'Tag', 'radioP_All_Plane',... |
---|
536 | % 'Value',0,... |
---|
537 | % 'Position',[5 hposrad lradio hradio]); |
---|
538 | |
---|
539 | ckb_Hrz=uicontrol('Parent',panPlane,... |
---|
540 | 'BackgroundColor',PlCol,... |
---|
541 | 'Style','checkbox',... |
---|
542 | 'String', 'Horizontal',... |
---|
543 | 'Units','pixels',... |
---|
544 | 'Callback','BBAgui_last(''check'')',... |
---|
545 | 'Tag', 'ckboxP_Hrz',... |
---|
546 | 'Value',0,... |
---|
547 | 'Position',[HHrz VHrz lHrz hHrz]); |
---|
548 | |
---|
549 | ckb_Vert=uicontrol('Parent',panPlane,... |
---|
550 | 'BackgroundColor',PlCol,... |
---|
551 | 'Style','checkbox',... |
---|
552 | 'String', 'Vertical',... |
---|
553 | 'Units','pixels',... |
---|
554 | 'Callback', 'BBAgui_last(''check'')',... |
---|
555 | 'Tag', 'ckboxP_Vert',... |
---|
556 | 'Value',0,... |
---|
557 | 'Position',[HVert VVert lVert hVert]); |
---|
558 | |
---|
559 | %% % PANEL pour sélectionner la méthode de BBA |
---|
560 | |
---|
561 | MetCol=[0.8,0.5,0.5]; |
---|
562 | panMeth=uipanel('Parent',f,... |
---|
563 | 'BackgroundColor',MetCol,...%[1,0.8,0] |
---|
564 | 'FontUnits','pixels',... |
---|
565 | 'FontWeight','bold',... |
---|
566 | 'FontSize',fontsize,... |
---|
567 | 'Title','Method',... |
---|
568 | 'FontSize',12,... |
---|
569 | 'Units','pixels',... |
---|
570 | 'Position',[HposMeth-10 VposMeth lpanMeth+10 hpanMeth],... |
---|
571 | 'Visible','on'); |
---|
572 | |
---|
573 | |
---|
574 | % radAll_Meth=uicontrol('Parent',panMeth,... |
---|
575 | % 'BackgroundColor',MetCol,... |
---|
576 | % 'Style','radiobutton',... |
---|
577 | % 'String', 'Both',... |
---|
578 | % 'Units','pixels',... |
---|
579 | % 'Callback', '',... |
---|
580 | % 'Tag', 'radioM_All_Meth',... |
---|
581 | % 'Value',0,... |
---|
582 | % 'Position',[5 hposrad lradio hradio]); |
---|
583 | |
---|
584 | ckb_mec=uicontrol('Parent',panMeth,... |
---|
585 | 'BackgroundColor',MetCol,... |
---|
586 | 'Style','checkbox',... |
---|
587 | 'String', 'M.E.C.',... |
---|
588 | 'Units','pixels',... |
---|
589 | 'Callback', '',... |
---|
590 | 'Tag', 'ckboxM_MEC',... |
---|
591 | 'Value',0,... |
---|
592 | 'Position',[HMec VMec lMec hMec]); |
---|
593 | |
---|
594 | ckb_bmp=uicontrol('Parent',panMeth,... |
---|
595 | 'BackgroundColor',MetCol,... |
---|
596 | 'Style','checkbox',... |
---|
597 | 'String', 'Bump 4 CM',... |
---|
598 | 'Units','pixels',... |
---|
599 | 'Callback', '',... |
---|
600 | 'Tag', 'ckboxM_BMP4CM',... |
---|
601 | 'Value',0,... |
---|
602 | 'Position',[HBmp4cm VBmp4cm lBmp4cm hBmp4cm]); |
---|
603 | |
---|
604 | |
---|
605 | |
---|
606 | %% Panel pour les sextupoles |
---|
607 | % SpCol=[0.63,0.8,0.35]; |
---|
608 | % panSp=uipanel('Parent',f,... |
---|
609 | % 'BackgroundColor',SpCol,...%[1,0.8,0] |
---|
610 | % 'FontUnits','pixels',... |
---|
611 | % 'FontWeight','bold',... |
---|
612 | % 'FontSize',fontsize,... |
---|
613 | % 'Title','Sextu',... |
---|
614 | % 'FontSize',12,... |
---|
615 | % 'Units','pixels',... |
---|
616 | % 'Position',[HposSp VposSp larSp HautSp],... |
---|
617 | % 'Visible','on'); |
---|
618 | |
---|
619 | |
---|
620 | %% Bouton pour lancer le BBA |
---|
621 | ActCol=[0.93,0.8,0.2]; |
---|
622 | |
---|
623 | PushAction=uicontrol('Parent',f,... |
---|
624 | 'BackgroundColor',ActCol,... |
---|
625 | 'Style','pushbutton',... |
---|
626 | 'String', 'ACTION',... |
---|
627 | 'Units','pixels',... |
---|
628 | 'Callback', 'BBAgui_last(''action'')',... |
---|
629 | 'Tag', 'push_Act',... |
---|
630 | 'Value',0,... |
---|
631 | 'Position',[HBBA VBBA lBBA hBBA]); |
---|
632 | %% Zone de texte pour afficher le quadrupole en cours de mesure |
---|
633 | |
---|
634 | TxtQp1=uicontrol( 'Parent',f,...%[0.2,1,0] |
---|
635 | 'BackgroundColor',[1,1,1],... |
---|
636 | 'Style','text',... |
---|
637 | 'FontSize',16,... |
---|
638 | 'String','Qp [cell elt]',... |
---|
639 | 'Units','pixels',... |
---|
640 | 'Callback', '',... |
---|
641 | 'Tag', 'edit_work1',... |
---|
642 | 'Position',[HQpMes1 VQpMes1 lQpMes1 hQpMes1]); |
---|
643 | |
---|
644 | |
---|
645 | |
---|
646 | %% Zone de texte pour afficher le quadrupole mesuré précedemment |
---|
647 | |
---|
648 | TxtQp0=uicontrol( 'Parent',f,...%[0.2,1,0] |
---|
649 | 'BackgroundColor',[1,1,1],... |
---|
650 | 'Style','text',... |
---|
651 | 'FontSize',16,... |
---|
652 | 'String','Qp [cell elt]',... |
---|
653 | 'Units','pixels',... |
---|
654 | 'Callback', '',... |
---|
655 | 'Tag', 'edit_work0',... |
---|
656 | 'Position',[HQpMes0 VQpMes0 lQpMes0 hQpMes0]); |
---|
657 | |
---|
658 | %% Zone de texte pour afficher le BPM utilisé |
---|
659 | |
---|
660 | TxtBpm=uicontrol( 'Parent',f,...%[0.2,1,0] |
---|
661 | 'BackgroundColor',[1,1,1],... |
---|
662 | 'Style','text',... |
---|
663 | 'FontSize',16,... |
---|
664 | 'String', 'BPM',... |
---|
665 | 'Units','pixels',... |
---|
666 | 'Callback', '',... |
---|
667 | 'Tag', 'edit_BPM',... |
---|
668 | 'Position',[HBpm VBpm lBpm hBpm]); |
---|
669 | |
---|
670 | %% Zone de texte pour afficher le COR utilisé |
---|
671 | |
---|
672 | TxtBpm=uicontrol( 'Parent',f,...%[0.2,1,0] |
---|
673 | 'BackgroundColor',[1,1,1],... |
---|
674 | 'Style','text',... |
---|
675 | 'FontSize',16,... |
---|
676 | 'String', 'COR',... |
---|
677 | 'Units','pixels',... |
---|
678 | 'Callback', '',... |
---|
679 | 'Tag', 'edit_COR',... |
---|
680 | 'Position',[Hcor Vcor lcor hcor]); |
---|
681 | |
---|
682 | %% Zone de texte pour afficher l'heure de la mesure précédente |
---|
683 | |
---|
684 | TxtClock=uicontrol( 'Parent',f,...%[0.2,1,0] |
---|
685 | 'BackgroundColor',figCol,... |
---|
686 | 'Style','text',... |
---|
687 | 'FontSize',16,... |
---|
688 | 'String', 'Clock',... |
---|
689 | 'Units','pixels',... |
---|
690 | 'Callback', '',... |
---|
691 | 'Tag', 'edit_Clock',... |
---|
692 | 'Position',[HClock VClock lClock hClock]); |
---|
693 | |
---|
694 | %% Zone de texte pour afficher la valeur de l'offset BPM |
---|
695 | |
---|
696 | TxtOf=uicontrol( 'Parent',f,...%[0.2,1,0] |
---|
697 | 'BackgroundColor',[1,1,1],... |
---|
698 | 'Style','text',... |
---|
699 | 'FontSize',16,... |
---|
700 | 'FontWeight','bold',... |
---|
701 | 'String', 'Offset BPM',... |
---|
702 | 'Units','pixels',... |
---|
703 | 'Callback', '',... |
---|
704 | 'Tag', 'edit_offset',... |
---|
705 | 'Position',[Hoff Voff loff hoff]); |
---|
706 | |
---|
707 | %% Zone de texte pour la qualité du FIT |
---|
708 | |
---|
709 | TxtFit=uicontrol( 'Parent',f,...%[0.2,1,0] |
---|
710 | 'BackgroundColor',[1,1,1],... |
---|
711 | 'Style','text',... |
---|
712 | 'FontSize',14,... |
---|
713 | 'FontWeight','bold',... |
---|
714 | 'String', 'RMS Fit',... |
---|
715 | 'Units','pixels',... |
---|
716 | 'Callback', '',... |
---|
717 | 'Tag', 'edit_RMS',... |
---|
718 | 'Position',[Hrms Vrms lrms hrms]); |
---|
719 | |
---|
720 | %% Zone de texte pour le nom du fichier |
---|
721 | TxtFile=uicontrol( 'Parent',f,...%[0.2,1,0] |
---|
722 | 'BackgroundColor',[1,1,1],... |
---|
723 | 'Style','text',... |
---|
724 | 'FontSize',12,... |
---|
725 | 'FontWeight','bold',... |
---|
726 | 'String', 'Name File',... |
---|
727 | 'Units','pixels',... |
---|
728 | 'Callback', '',... |
---|
729 | 'Tag', 'edit_File',... |
---|
730 | 'Position',[Hfich Vfich lfich hfich]); |
---|
731 | |
---|
732 | %% Boucle pour créer les 160 checkbox, les 10 panels et les radiobutton associés |
---|
733 | incr=0; |
---|
734 | multpos=0; |
---|
735 | hpospan=0; |
---|
736 | for i=1:10%10 |
---|
737 | QuadDevList=getlist(char(QuadFamilyList(i))); |
---|
738 | long=length(QuadDevList); |
---|
739 | TitleOffset=0; |
---|
740 | |
---|
741 | if long == 8 |
---|
742 | mult=1; |
---|
743 | elseif long == 16 |
---|
744 | mult=2; |
---|
745 | elseif long==24 |
---|
746 | mult=3; |
---|
747 | end |
---|
748 | |
---|
749 | multpos=multpos+mult; |
---|
750 | |
---|
751 | hpanel=mult*hradio+(mult+1)*espV+fontsize; |
---|
752 | %lpanel=10*(lradio+espH)+OffNone; |
---|
753 | hpospan=hpospan+hpanel+espV; |
---|
754 | % 10 Panel 'Qi' |
---|
755 | hp(i) = uipanel('Parent',f,... |
---|
756 | 'BackgroundColor',QpCol,... |
---|
757 | 'FontUnits','pixels',... |
---|
758 | 'FontWeight','bold',... |
---|
759 | 'FontSize',fontsize,... |
---|
760 | 'Title',char(QuadFamilyList(i)),... |
---|
761 | 'FontSize',12,... |
---|
762 | 'Units','pixels',... |
---|
763 | 'Position',[10 hauteurFig-hpanQP-espV-hpospan-10 lpanel hpanel],... |
---|
764 | 'Visible','on'); |
---|
765 | |
---|
766 | NameQuadFamAll=['All ' char(QuadFamilyList(i))]; |
---|
767 | NameRadioAll=['radioQ_All_' char(QuadFamilyList(i))]; |
---|
768 | |
---|
769 | NameQuadFamNone=['None ' char(QuadFamilyList(i))]; |
---|
770 | NameRadioNone=['radioQ_None_' char(QuadFamilyList(i))]; |
---|
771 | |
---|
772 | hposrad=(hpanel-fontsize-hradio)/2; |
---|
773 | |
---|
774 | % 10 radio button pour sélectionner les Qp par familles |
---|
775 | radAll(i)=uicontrol('Parent',hp(i),... |
---|
776 | 'BackgroundColor',QpCol,... |
---|
777 | 'Style','radiobutton',... |
---|
778 | 'String', NameQuadFamAll,... |
---|
779 | 'Units','pixels',... |
---|
780 | 'Callback', 'BBAgui_last(''familyAll'')',... |
---|
781 | 'Tag', NameRadioAll,... |
---|
782 | 'Value',0,... |
---|
783 | 'Position',[5 hposrad lradio+5 hradio]); |
---|
784 | |
---|
785 | % 10 radio button pour désélectionner par familles |
---|
786 | radNone(i)=uicontrol('Parent',hp(i),... |
---|
787 | 'BackgroundColor',QpCol,... |
---|
788 | 'Style','radiobutton',... |
---|
789 | 'String', NameQuadFamNone,... |
---|
790 | 'Units','pixels',... |
---|
791 | 'Callback', 'BBAgui_last(''familyNone'')',... |
---|
792 | 'Tag', NameRadioNone,... |
---|
793 | 'Value',0,... |
---|
794 | 'Position',[5+lradio+espH/4 hposrad lradio+OffNone hradio]); |
---|
795 | |
---|
796 | %% Boucle des checkbox |
---|
797 | for j=1:length(QuadDevList) |
---|
798 | QuadFamTot(j+incr)=QuadFamilyList(i); |
---|
799 | QuadDevTot(j+incr,:)=QuadDevList(j,:); |
---|
800 | ValueList(j+incr)=0; |
---|
801 | |
---|
802 | |
---|
803 | NameQuadDev=char(['[' num2str(QuadDevList(j,1)) '_' num2str(QuadDevList(j,2)) ']']); |
---|
804 | NameControl=['ckbox_' char(QuadFamilyList(i)) '_' num2str(QuadDevList(j,1)) '_' num2str(QuadDevList(j,2))]; |
---|
805 | if j>0 & j<=8 |
---|
806 | valjH=j; |
---|
807 | valjV=1; |
---|
808 | elseif j>8 & j<=16 |
---|
809 | valjH=j-8; |
---|
810 | valjV=2; |
---|
811 | elseif j>16 & j<=24 |
---|
812 | valjH=j-16; |
---|
813 | valjV=3; |
---|
814 | end |
---|
815 | % N=8,16 or 24 pour sélectionner les Qp individuellement |
---|
816 | cont(i,j)=uicontrol('Parent',hp(i),... |
---|
817 | 'BackgroundColor',QpCol,... |
---|
818 | 'Style','checkbox',... |
---|
819 | 'String', NameQuadDev,... |
---|
820 | 'Units','pixels',... |
---|
821 | 'Callback', 'BBAgui_last(''check'')' ,...%'BBAgui_last(''Ncheck'')' |
---|
822 | 'Tag', NameControl,... |
---|
823 | 'Value',ValueList(j+incr),... |
---|
824 | 'Position',[(valjH+1)*(lradio+espH/4)+OffNone hpanel-(valjV)*(hradio+espV)-espV lradio hradio]); |
---|
825 | %'Position',[0 0-0.3*(j-1) 0.1 .1]); |
---|
826 | end |
---|
827 | %% |
---|
828 | incr=incr+length(QuadDevList); |
---|
829 | |
---|
830 | end |
---|
831 | |
---|
832 | delete('guy*.mat') |
---|
833 | save('guytrydata1.mat','QuadFamTot','QuadDevTot') |
---|
834 | set(f,'Visible','on'); |
---|
835 | |
---|
836 | |
---|
837 | %% Conditions sur les checkbox "[i j]" |
---|
838 | |
---|
839 | elseif strcmpi(arg1,'manu') % bouton manuel/auto |
---|
840 | |
---|
841 | autom=findobj('Style','radiobutton','-and','-regexp','Tag','radio_manu'); |
---|
842 | etat=get(autom,'Value'); |
---|
843 | if etat==1 |
---|
844 | set(autom,'Backgroundcolor',[0,1,0]); |
---|
845 | elseif etat==0 |
---|
846 | set(autom,'Backgroundcolor',[1,0,0]); |
---|
847 | end |
---|
848 | %% |
---|
849 | elseif strcmpi(arg1,'action') % ressortir les checkbox cochees |
---|
850 | %delete('guytrydata2.mat') |
---|
851 | clear list h lista; |
---|
852 | % disp('ok!!') |
---|
853 | f=findobj('Tag','Ola'); |
---|
854 | set(f,'Visible','on'); |
---|
855 | h=findobj('Style','checkbox','-and','-regexp','Tag','Q'); |
---|
856 | |
---|
857 | length(h); |
---|
858 | k=1; |
---|
859 | for i=1:length(h) |
---|
860 | list(i)=get(h(i),'Value'); |
---|
861 | lista(i)=cellstr(get(h(i),'Tag')); |
---|
862 | IDQuad=char(lista(i)); |
---|
863 | if list(i)==1 |
---|
864 | indstr=findstr(IDQuad,'_'); |
---|
865 | family(k)=cellstr(IDQuad(indstr(1)+1:indstr(2)-1)); |
---|
866 | cellule(k)=str2num(IDQuad(indstr(2)+1:indstr(3)-1)); |
---|
867 | element(k)=str2num(IDQuad(indstr(3)+1:length(IDQuad))); |
---|
868 | QpDevList(k,1)=cellule(k); |
---|
869 | QpDevList(k,2)=element(k); |
---|
870 | k=k+1; |
---|
871 | end |
---|
872 | |
---|
873 | end |
---|
874 | sum(list); |
---|
875 | list; |
---|
876 | lista; |
---|
877 | length(list); |
---|
878 | %connaitre la méthode utilisée |
---|
879 | clear list1 h1 lista1 MetList; |
---|
880 | f1=findobj('Tag','Ola'); |
---|
881 | h1=findobj('Style','checkbox','-and','-regexp','Tag','ckboxM'); |
---|
882 | MetList=cellstr('bad'); |
---|
883 | varMet=0; |
---|
884 | for u=1:length(h1) |
---|
885 | list1(u)=get(h1(u),'Value'); |
---|
886 | lista1(u)=cellstr(get(h1(u),'Tag')); |
---|
887 | IDMeth=char(lista1(u)); |
---|
888 | if list1(u)==1 |
---|
889 | varMet=varMet+1; |
---|
890 | indstr=findstr(IDMeth,'_'); |
---|
891 | MetList(varMet)=cellstr(IDMeth(indstr+1:length(IDMeth))); |
---|
892 | end |
---|
893 | end |
---|
894 | if strcmpi(char(MetList(1)),'bad'); |
---|
895 | MetList(1,:)=cellstr('MEC'); |
---|
896 | hp=findobj('-and','Style','checkbox','-and','-regexp','Tag','ckboxM_MEC'); |
---|
897 | set(hp,'Value',1); |
---|
898 | end |
---|
899 | |
---|
900 | %connaitre les plans utilisés |
---|
901 | clear list2 h2 lista2 PlaneList0; |
---|
902 | f=findobj('Tag','Ola'); |
---|
903 | h2=findobj('-and','Style','checkbox','-and','-regexp','Tag','ckboxP'); |
---|
904 | PlaneList0=-1; |
---|
905 | varPl=0; |
---|
906 | for v=1:length(h2) |
---|
907 | list2(v)=get(h2(v),'Value'); |
---|
908 | lista2(v)=cellstr(get(h2(v),'Tag')); |
---|
909 | IDPlane=char(lista2(v)); |
---|
910 | if list2(v)==1 |
---|
911 | varPl=varPl+1; |
---|
912 | indstr=findstr(IDPlane,'_'); |
---|
913 | PlaneList(varPl)=IDPlane(indstr+1); |
---|
914 | if PlaneList(varPl)=='H' |
---|
915 | PlaneList0(varPl)=1; |
---|
916 | elseif PlaneList(varPl)=='V' |
---|
917 | PlaneList0(varPl)=2; |
---|
918 | end |
---|
919 | end |
---|
920 | end |
---|
921 | %if length(PlaneList0)>1 |
---|
922 | % PlaneList0=0; |
---|
923 | if PlaneList0(1)<0 |
---|
924 | PlaneList0=1; |
---|
925 | hp=findobj('-and','Style','checkbox','-and','-regexp','Tag','ckboxP_H'); |
---|
926 | set(hp,'Value',1); |
---|
927 | end |
---|
928 | |
---|
929 | %% |
---|
930 | % Lancement du programme BBA |
---|
931 | %Hb=findobj('Tag','merit_Plot'); |
---|
932 | %chHb=get(gca,'Children') |
---|
933 | |
---|
934 | |
---|
935 | %while ~isempty(chHb) |
---|
936 | %chHb=get(Hb,'Children') |
---|
937 | |
---|
938 | |
---|
939 | %pause(1) |
---|
940 | %cla(chHb(1)) |
---|
941 | %cla(chHb(2)) |
---|
942 | % cla(chHb(3)) |
---|
943 | % cla(chHb(4)) |
---|
944 | % cla(chHb(5)) |
---|
945 | |
---|
946 | |
---|
947 | %end |
---|
948 | %cla(Bx1(2)) |
---|
949 | %cla(Ax1(1)) |
---|
950 | %cla(Ax1(2)) |
---|
951 | |
---|
952 | G1=findobj('Tag','Ola'); |
---|
953 | child_handles = get(G1,'Children'); |
---|
954 | %get(child_handles,'Type'); |
---|
955 | G1=findobj('Tag','merit_Plot'); |
---|
956 | set(G1,'NextPlot','replace'); |
---|
957 | hold off |
---|
958 | pause(5) |
---|
959 | format long |
---|
960 | PlaneList0; |
---|
961 | MetList; |
---|
962 | family; |
---|
963 | cellule; |
---|
964 | element; |
---|
965 | QpDevList; |
---|
966 | longElem=size(element); |
---|
967 | indice=10; %indice permet de numeroter les figures |
---|
968 | for w=1:length(family) |
---|
969 | %indice=indice+1; |
---|
970 | for loop=1:length(PlaneList0) |
---|
971 | if PlaneList0(loop)==1 |
---|
972 | TextBpm='BPMx'; |
---|
973 | TextDel=char('Delta_X='); |
---|
974 | TextCor='HCOR'; |
---|
975 | elseif PlaneList0(loop)==2 |
---|
976 | TextDel=char('Delta_Z='); |
---|
977 | TextBpm='BPMz'; |
---|
978 | TextCor='VCOR'; |
---|
979 | end |
---|
980 | |
---|
981 | |
---|
982 | pause(1); |
---|
983 | danow= datestr(now); |
---|
984 | %clear Ax1 Bx1 Ha1 Ha2 Hb1 Hb2 |
---|
985 | |
---|
986 | % écriture dans les zones de texte |
---|
987 | f=findobj('Style','text','-and','-regexp','Tag','edit_work1'); |
---|
988 | TextQp1=char([char(family(w)) ' [' num2str(QpDevList(w,1)) ' ' num2str(QpDevList(w,2)) '] @ ' danow]); |
---|
989 | set(f,'String',TextQp1); |
---|
990 | |
---|
991 | %recherche de paramÚtres |
---|
992 | %Automatisation |
---|
993 | autom=findobj('Style','radiobutton','-and','-regexp','Tag','radio_manu'); |
---|
994 | etat=get(autom,'Value'); |
---|
995 | if etat==1 |
---|
996 | maxloop=1; |
---|
997 | elseif etat==0 |
---|
998 | maxloop=2; |
---|
999 | nbDeltaCor=3; |
---|
1000 | OffCor=0; |
---|
1001 | StepCor=1.2; |
---|
1002 | Delais=2.5; |
---|
1003 | StepQp=2.5; |
---|
1004 | end |
---|
1005 | |
---|
1006 | |
---|
1007 | |
---|
1008 | for t=1:maxloop |
---|
1009 | autom=findobj('Style','radiobutton','-and','-regexp','Tag','radio_manu'); |
---|
1010 | etat=get(autom,'Value'); |
---|
1011 | if etat==1 |
---|
1012 | set(autom,'Backgroundcolor',[0,1,0]); |
---|
1013 | ed1=findobj('Style','edit','-and','-regexp','Tag','edit_nbCor'); |
---|
1014 | nbDeltaCor=str2num(get(ed1,'String')); |
---|
1015 | |
---|
1016 | ed2=findobj('Style','edit','-and','-regexp','Tag','edit_StCor'); |
---|
1017 | StepCor=str2num(get(ed2,'String')); |
---|
1018 | |
---|
1019 | ed3=findobj('Style','edit','-and','-regexp','Tag','edit_OffCor'); |
---|
1020 | OffCor=str2num(get(ed3,'String')); |
---|
1021 | |
---|
1022 | ed4=findobj('Style','edit','-and','-regexp','Tag','edit_Delais'); |
---|
1023 | Delais=str2num(get(ed4,'String')); |
---|
1024 | |
---|
1025 | ed5=findobj('Style','edit','-and','-regexp','Tag','edit_StQp'); |
---|
1026 | StepQp=str2num(get(ed5,'String')); |
---|
1027 | |
---|
1028 | else |
---|
1029 | set(autom,'Backgroundcolor',[1,0,0]) |
---|
1030 | ed1=findobj('Style','edit','-and','-regexp','Tag','edit_nbCor'); |
---|
1031 | TextnbDeltaCor=num2str(nbDeltaCor); |
---|
1032 | set(ed1,'String',TextnbDeltaCor); |
---|
1033 | |
---|
1034 | ed2=findobj('Style','edit','-and','-regexp','Tag','edit_StCor'); |
---|
1035 | TextStepCor=num2str(StepCor); |
---|
1036 | set(ed2,'String',TextStepCor); |
---|
1037 | |
---|
1038 | ed3=findobj('Style','edit','-and','-regexp','Tag','edit_OffCor'); |
---|
1039 | TextOffCor=num2str(OffCor); |
---|
1040 | set(ed3,'String',TextOffCor); |
---|
1041 | |
---|
1042 | ed4=findobj('Style','edit','-and','-regexp','Tag','edit_Delais'); |
---|
1043 | TextDelais=num2str(Delais); |
---|
1044 | set(ed4,'String',TextDelais); |
---|
1045 | |
---|
1046 | ed5=findobj('Style','edit','-and','-regexp','Tag','edit_StQp'); |
---|
1047 | TextStepQp=num2str(StepQp); |
---|
1048 | set(ed5,'String',TextStepQp); |
---|
1049 | end |
---|
1050 | ed6=findobj('Style','edit','-and','-regexp','Tag','edit_WhCor'); |
---|
1051 | CorNumber=str2num(get(ed6,'String')); |
---|
1052 | |
---|
1053 | %edit_WhCor |
---|
1054 | |
---|
1055 | drawnow |
---|
1056 | [merit,CorCons,BpmRes,offs,OffsCor,center,ze,ord1,ord2,BpmDevRes,CorDevRes,iniCor,rmsFit,NameFile,NameFilePNG] = ... |
---|
1057 | bba_last(family(w),QpDevList(w,:), PlaneList0(loop),char(MetList),nbDeltaCor,StepCor,OffCor,Delais,StepQp,CorNumber); |
---|
1058 | %center |
---|
1059 | |
---|
1060 | % G1=findobj('Tag','merit_Plot'); |
---|
1061 | % axes(G1); |
---|
1062 | % cla |
---|
1063 | % G1=findobj('Tag','Ola'); |
---|
1064 | |
---|
1065 | % load('resu.mat') |
---|
1066 | % trace_bba.m |
---|
1067 | |
---|
1068 | %CorCons=CorCons-iniCor; |
---|
1069 | %CorCons=CorCons-iniCor; |
---|
1070 | %center=center-iniCor; |
---|
1071 | |
---|
1072 | droite=polyfit(CorCons,BpmRes,1); |
---|
1073 | %BpmDevRes=[1 5]; |
---|
1074 | |
---|
1075 | TextCor1=char([TextCor ' [' num2str(CorDevRes(1,1)) ' ' num2str(CorDevRes(1,2)) ']']); |
---|
1076 | f=findobj('Style','text','-and','-regexp','Tag','edit_COR'); |
---|
1077 | %TextOff2=char(['RMS Fit: ' Textrms ' mm^2']); |
---|
1078 | set(f,'String',TextCor1); |
---|
1079 | |
---|
1080 | Textrms=num2str(round(rmsFit*10000000)/10000000); |
---|
1081 | Delta1=merit(1,2); |
---|
1082 | Delta2=merit(length(merit),2); |
---|
1083 | TextDelta1=num2str(round(Delta1*100000)/100000); |
---|
1084 | TextDelta2=num2str(round(Delta2*100000)/100000); |
---|
1085 | f=findobj('Style','text','-and','-regexp','Tag','edit_RMS'); |
---|
1086 | TextOff2=char(['RMS Fit: ' Textrms ' mm^2 | Min: ' TextDelta1 ' mm^2 | Max: ' TextDelta2 ' mm^2']); |
---|
1087 | set(f,'String',TextOff2); |
---|
1088 | |
---|
1089 | f=findobj('Style','text','-and','-regexp','Tag','edit_File'); |
---|
1090 | TextOff3=char([NameFile]); |
---|
1091 | set(f,'String',TextOff3); |
---|
1092 | |
---|
1093 | f=findobj('Style','text','-and','-regexp','Tag','edit_offset'); |
---|
1094 | TextOff1=char(['Offset ' TextBpm]); |
---|
1095 | set(f,'String',TextOff1); |
---|
1096 | |
---|
1097 | f=findobj('Style','text','-and','-regexp','Tag','edit_BPM'); |
---|
1098 | TextOff2=char([TextBpm ' [' num2str(BpmDevRes(1,1)) ' ' num2str(BpmDevRes(1,2)) ']'] ); |
---|
1099 | set(f,'String',TextOff2); |
---|
1100 | |
---|
1101 | f=findobj('Style','text','-and','-regexp','Tag','edit_work0'); |
---|
1102 | TextQp0=char([char(family(w)) ' [' num2str(QpDevList(w,1)) ' ' num2str(QpDevList(w,2)) ']']);% @ ' danow(13:length(danow))]); |
---|
1103 | set(f,'String',TextQp0); |
---|
1104 | |
---|
1105 | f=findobj('Style','text','-and','-regexp','Tag','edit_Clock'); |
---|
1106 | TextClock=char(danow);% @ ' danow(13:length(danow))]); |
---|
1107 | set(f,'String',TextClock); |
---|
1108 | clear x1 y1 y2 |
---|
1109 | |
---|
1110 | |
---|
1111 | x1=[min(CorCons)-0.1-iniCor max(CorCons)+0.1-iniCor]; |
---|
1112 | deltay11=max(BpmRes)-min(BpmRes); |
---|
1113 | y11=[min(BpmRes) max(BpmRes)]; |
---|
1114 | y12=[min(ord2) max(ord2)]; |
---|
1115 | y1=[min([y11(1) y12(1)])-0.01*deltay11 max([y11(2) y12(2)])+0.01*deltay11]; |
---|
1116 | |
---|
1117 | deltay21=max(merit(:,2))-min(merit(:,2)); |
---|
1118 | y21=[min(merit(:,2)) max(merit(:,2))]; |
---|
1119 | y22=[min(ord1) max(ord1)]; |
---|
1120 | y2=[min([y21(1) y22(1)])-0.01*deltay21 max([y21(2) y22(2)])+0.01*deltay21]; |
---|
1121 | G1=findobj('Tag','Ola');%,'-and','Tag','merit_Plot') |
---|
1122 | drawnow |
---|
1123 | Hb=findobj('Parent',G1,'-and','Tag','merit_Plot'); |
---|
1124 | %cla(Hb) |
---|
1125 | %hold(Hb,'off') |
---|
1126 | %Hb=findobj('Parent',G1,'-and','Tag','merit_Plot') |
---|
1127 | |
---|
1128 | %pl3=plot(Hb,center,offs,'Marker','o','Color','black'); |
---|
1129 | %Hb=findobj('Parent',G1,'-and','Tag','merit_Plot') |
---|
1130 | % hold(Hb,'on') |
---|
1131 | %Hb=findobj('Parent',G1,'-and','Tag','merit_Plot') |
---|
1132 | %Hb=axes('Parent',f) |
---|
1133 | set(Hb,'Units','pixels'); |
---|
1134 | %hold on |
---|
1135 | alors=get(Hb,'Position'); |
---|
1136 | %set(Hb,'Position',[900 520 550 400]); |
---|
1137 | set(Hb,'Color','w'); |
---|
1138 | |
---|
1139 | %[Bx1,Hb1,Hb2]=plotyy(Hb,ze,ord2,ze,ord1,'plot'); |
---|
1140 | Bx11=findobj('Tag','axe_calc_bpm'); |
---|
1141 | set(Bx11,'YLim',y1); |
---|
1142 | set(Bx11,'XLim',x1); |
---|
1143 | |
---|
1144 | Bx12=findobj('Tag','axe_calc_merit'); |
---|
1145 | set(Bx12,'XLim',x1); |
---|
1146 | set(Bx12,'YLim',y2); |
---|
1147 | |
---|
1148 | Hb1=findobj('Tag','calc_bpm'); |
---|
1149 | set(Hb1,'XData',ze-iniCor,'YData',ord2); |
---|
1150 | Hb2=findobj('Tag','calc_merit'); |
---|
1151 | set(Hb2,'XData',ze-iniCor,'YData',ord1); |
---|
1152 | |
---|
1153 | |
---|
1154 | drawnow |
---|
1155 | G1=findobj('Tag','Ola'); |
---|
1156 | |
---|
1157 | |
---|
1158 | drawnow |
---|
1159 | % [Ax1,Ha1,Ha2]=plotyy(Hb,CorCons,BpmRes,merit(:,1),merit(:,2) ,'plot');%,'Marker','x','Color','red') |
---|
1160 | %refreshdata(Ax1) |
---|
1161 | Ax11=findobj('Tag','axe_mes_bpm'); |
---|
1162 | set(Ax11,'XLim',x1); |
---|
1163 | set(Ax11,'YLim',y1); |
---|
1164 | |
---|
1165 | |
---|
1166 | Ax12=findobj('Tag','axe_mes_merit'); |
---|
1167 | set(Ax12,'XLim',x1); |
---|
1168 | set(Ax12,'YLim',y2); |
---|
1169 | |
---|
1170 | |
---|
1171 | Ha1=findobj('Tag','mes_bpm'); |
---|
1172 | set(Ha1,'XData',CorCons-iniCor,'YData',BpmRes); |
---|
1173 | |
---|
1174 | Ha2=findobj('Tag','mes_merit'); |
---|
1175 | set(Ha2,'XData',merit(:,1)-iniCor,'YData',merit(:,2)); |
---|
1176 | |
---|
1177 | drawnow |
---|
1178 | |
---|
1179 | ploRes1=findobj('Tag','loc_off1'); |
---|
1180 | ploRes2=findobj('Tag','loc_off2'); |
---|
1181 | ploRes3=findobj('Tag','loc_off3'); |
---|
1182 | set(ploRes1,'XData',[center-iniCor center-iniCor],'YData',[y1(1) offs]); |
---|
1183 | set(ploRes2,'XData',[x1(1) center-iniCor],'YData',[offs offs]); |
---|
1184 | set(ploRes3,'XData',center-iniCor,'YData',offs); |
---|
1185 | disp(merit(:,2)) |
---|
1186 | % % set(Ha1,'Marker','x','Color','blue');%,'LineStyle','--') |
---|
1187 | % % set(Ha2,'Marker','x','Color','red'); |
---|
1188 | % % |
---|
1189 | % % x1=get(Ax1(1),'XLim'); |
---|
1190 | % % %set(Ax1,'Visible','off'); |
---|
1191 | %set(Ax11,'YLim',y1); |
---|
1192 | %set(Ax12,'YLim',y2); |
---|
1193 | %set(Ax11,'XLim',x1); |
---|
1194 | %set(Ax12,'XLim',x1); |
---|
1195 | % axis(Ax11,'on') |
---|
1196 | % axis(Ax12,'on'); |
---|
1197 | % % set(Ax1(1),'YLim',y1,'YColor','blue'); |
---|
1198 | % % set(Ax1(2),'YLim',y2,'YColor','red'); |
---|
1199 | % % if w==1 |
---|
1200 | % % set(get(Ax1(1),'XLabel'),'String','COR Value (amps)'); |
---|
1201 | % % set(get(Ax1(1),'YLabel'),'String','(mm)'); |
---|
1202 | % % set(get(Ax1(2),'YLabel'),'String','(mm^2)'); |
---|
1203 | % % end |
---|
1204 | |
---|
1205 | %pl1=plot(Hb,[center center],[y1(1) offs],'k',[x1(1) center],[offs offs],'k',center,offs,'ko','LineStyle','-.'); |
---|
1206 | % G1=findobj('Tag','Ola'); |
---|
1207 | % child_handles = get(G1,'Children'); |
---|
1208 | % get(child_handles,'Type'); |
---|
1209 | %pl2=plot(Hb,[x1(1) center],[offs offs],'Color','black','LineStyle','-.'); |
---|
1210 | %pl3=plot(Hb,center,offs,'Marker','o','Color','black');%,text(center,offs,'\leftarrow ',... |
---|
1211 | |
---|
1212 | |
---|
1213 | %'HorizontalAlignment','left')) |
---|
1214 | %axis(pl1,'off'); |
---|
1215 | %axis(pl2,'off'); |
---|
1216 | %axis(pl3,'off'); |
---|
1217 | |
---|
1218 | %set(pl1 ,'Color','black','LineStyle','-.'); |
---|
1219 | %set(pl2 ,'Color','black','LineStyle','-.'); |
---|
1220 | |
---|
1221 | |
---|
1222 | |
---|
1223 | %set(pl1,'YLim',y1); |
---|
1224 | %set(pl2,'YLim',y1); |
---|
1225 | %set(pl3,'YLim',y1); |
---|
1226 | |
---|
1227 | %xlabel('COR Value (amps)') |
---|
1228 | %ylabel(Bx1(1),'(mm)') |
---|
1229 | %ylabel(Bx1(2),'(merit)') |
---|
1230 | drawnow; |
---|
1231 | % hold off |
---|
1232 | pause(2) |
---|
1233 | Hb=findobj('Tag','merit_Plot'); |
---|
1234 | |
---|
1235 | |
---|
1236 | |
---|
1237 | drawnow |
---|
1238 | f=findobj('Style','text','-and','-regexp','Tag','edit_offset'); |
---|
1239 | offs1=round(100000*offs)/100; |
---|
1240 | TextOff=char([TextDel num2str(offs1) ' µm']); |
---|
1241 | set(f,'String',TextOff); |
---|
1242 | %plot(Hb,[4 7 12],[1 2 3]) |
---|
1243 | drawnow |
---|
1244 | testmerit=(merit(1,2)+merit(length(merit),2)); |
---|
1245 | |
---|
1246 | mult=(0.01/testmerit)^(1/4); |
---|
1247 | DeltaCorMax=nbDeltaCor*StepCor*mult; |
---|
1248 | nbDeltaCor=13; |
---|
1249 | StepCor=DeltaCorMax/(nbDeltaCor-1); |
---|
1250 | OffCor=OffsCor; |
---|
1251 | StepQp=StepQp*mult; |
---|
1252 | |
---|
1253 | TextQp0=char([char(family(w)) ' [' num2str(QpDevList(w,1)) ' ' num2str(QpDevList(w,2)) ']']); |
---|
1254 | disp(TextQp0) |
---|
1255 | |
---|
1256 | TextOff2=char([TextBpm ' [' num2str(BpmDevRes(1,1)) ' ' num2str(BpmDevRes(1,2)) ']'] ); |
---|
1257 | disp(TextOff2) |
---|
1258 | |
---|
1259 | TextOff=char([TextDel num2str(offs1) ' µm']); |
---|
1260 | disp(TextOff) |
---|
1261 | |
---|
1262 | TextCor1=char([TextCor ' [' num2str(CorDevRes(1,1)) ' ' num2str(CorDevRes(1,2)) ']']); |
---|
1263 | disp(TextCor1) |
---|
1264 | |
---|
1265 | end |
---|
1266 | |
---|
1267 | |
---|
1268 | end |
---|
1269 | %f=findobj('Tag','Ola'); |
---|
1270 | %saveas(f,NameFilePNG,'png') |
---|
1271 | end |
---|
1272 | |
---|
1273 | %% |
---|
1274 | elseif strcmpi(arg1,'check') |
---|
1275 | |
---|
1276 | |
---|
1277 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
1278 | % Exclusion entre checkbox=1 et None=1 |
---|
1279 | hNone=findobj('Style','radiobutton','-and','-regexp','Tag','None'); |
---|
1280 | set(hNone,'Value',0); |
---|
1281 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
1282 | %save('guytrydata2.mat','list','family','cellule','element'); |
---|
1283 | %axes(handles.offset); |
---|
1284 | %axes('Position',[600 200 300 100]); |
---|
1285 | |
---|
1286 | |
---|
1287 | %% Conditions sur les boutons radio "radioQ_Qi" |
---|
1288 | elseif strcmpi(arg1,'familyAll') | strcmpi(arg1,'familyNone') |
---|
1289 | disp('c bon') |
---|
1290 | familyType(arg1); |
---|
1291 | BBAgui_last('check'); |
---|
1292 | |
---|
1293 | %% Conditions sur le bouton radio "radio_ALL" |
---|
1294 | elseif strcmpi(arg1,'typeAll') | strcmpi(arg1,'typeNone') |
---|
1295 | disp('c bon') |
---|
1296 | familyType(arg1); |
---|
1297 | whi=['family' arg1(5:length(arg1))]; |
---|
1298 | BBAgui_last(whi); |
---|
1299 | |
---|
1300 | %elseif strcmpi(arg1,'tex') |
---|
1301 | |
---|
1302 | end |
---|
1303 | %% |
---|
1304 | |
---|
1305 | end |
---|
1306 | |
---|
1307 | |
---|
1308 | |
---|
1309 | |
---|
1310 | %% fonction qui permet de gérer à la fois les radioboutons "radioQ_Qi" et "radio_ALL" |
---|
1311 | function familyType(tor) |
---|
1312 | %type=tor(7:length(tor)) |
---|
1313 | disp('%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%') |
---|
1314 | tor; |
---|
1315 | strmatch('family',tor); |
---|
1316 | cas=~isempty(strmatch('family',tor)); |
---|
1317 | |
---|
1318 | if cas==1 %family |
---|
1319 | prefix='radioQ_'; |
---|
1320 | type=tor(7:length(tor)); |
---|
1321 | button1='ckbox_'; |
---|
1322 | button2=''; |
---|
1323 | index=2; |
---|
1324 | button3='_'; |
---|
1325 | style='checkbox'; |
---|
1326 | else%total |
---|
1327 | prefix='radio_'; |
---|
1328 | type=tor(5:length(tor)); |
---|
1329 | button1='radioQ_'; |
---|
1330 | button2=[type '_']; |
---|
1331 | button3=''; |
---|
1332 | style='radiobutton'; |
---|
1333 | index=1; |
---|
1334 | end |
---|
1335 | |
---|
1336 | if strcmpi(type,'All'); |
---|
1337 | type1='All'; |
---|
1338 | type0='None'; |
---|
1339 | val=1; |
---|
1340 | else |
---|
1341 | type1='None'; |
---|
1342 | type0='All'; |
---|
1343 | val=0; |
---|
1344 | button1='ckbox_'; |
---|
1345 | button2=''; |
---|
1346 | index=2; |
---|
1347 | button3='_'; |
---|
1348 | style='checkbox'; |
---|
1349 | end |
---|
1350 | objTagTot0=['radio_' type0]; |
---|
1351 | hobjectTot0=findobj('Style','radiobutton','-and','Tag',objTagTot0); |
---|
1352 | set(hobjectTot0,'Value',val); |
---|
1353 | |
---|
1354 | objTagFam1=['radioQ_' type1]; |
---|
1355 | hobjectFam1=findobj('Style','radiobutton','-and','-regexp','Tag',objTagFam1); |
---|
1356 | |
---|
1357 | objTagFam0=['radioQ_' type0]; |
---|
1358 | hobjectFam0=findobj('Style','radiobutton','-and','-regexp','Tag',objTagFam0); |
---|
1359 | k=1; |
---|
1360 | |
---|
1361 | for i=1:length(hobjectFam1) |
---|
1362 | if cas==1 |
---|
1363 | list(i)=get(hobjectFam1(i),'Value'); |
---|
1364 | else |
---|
1365 | list(i)=1; |
---|
1366 | end |
---|
1367 | lista(i)=cellstr(get(hobjectFam1(i),'Tag')); |
---|
1368 | IDFam=char(lista(i)); |
---|
1369 | if list(i)==1 |
---|
1370 | indstr=findstr(IDFam,'Q'); |
---|
1371 | family(k)=cellstr(IDFam(indstr(2):length(IDFam))); |
---|
1372 | |
---|
1373 | TagFind=[button1 button2 char(family(k)) button3]; |
---|
1374 | TagFindRad=['radioQ_' type0 '_' char(family(k))]; |
---|
1375 | |
---|
1376 | chkb=findobj('Style',style,'-and','-regexp','Tag',TagFind); |
---|
1377 | radQ=findobj('Style','radiobutton','-and','-regexp','Tag',TagFindRad); |
---|
1378 | set(radQ,'Value',0); |
---|
1379 | for j=1:length(chkb) |
---|
1380 | set(chkb(j),'Value',val); |
---|
1381 | end |
---|
1382 | k=k+1; |
---|
1383 | end |
---|
1384 | |
---|
1385 | end |
---|
1386 | end |
---|
1387 | % elseif strcmpi(arg1,'familyNone') %en fct des radiobuton All Qi cochï¿œs, cocher les checkbox des familles Qi |
---|
1388 | % f=findobj('Name','Ola'); |
---|
1389 | % |
---|
1390 | % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
1391 | % % Exclusion entre radioQ_Qi=1 et radio_None=1 |
---|
1392 | % hAll=findobj('Style','radiobutton','-and','Tag','radio_ALL'); |
---|
1393 | % set(hAll,'Value',0); |
---|
1394 | % hNoneFam=findobj('Style','radiobutton','-and','-regexp','Tag','radioQ_None') |
---|
1395 | % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%nteger (element number) in the RING |
---|
1396 | % hNoneFam=findobj('Style','radiobutton','-and','-regexp','Tag','radioQ_None'); |
---|
1397 | % hAllFam =findobj('Style','radiobutton','-and','-regexp','Tag','radioQ_All'); |
---|
1398 | % %hAllFam=findobj('Style','radiobutton','-and','-regexp','Tag','radioQ_All'); |
---|
1399 | % length(hAllFam); |
---|
1400 | % k=1; |
---|
1401 | % for i=1:length(hNoneFam) |
---|
1402 | % list(i)=get(hNoneFam(i),'Value'); |
---|
1403 | % lista(i)=cellstr(get(hNoneFam(i),'Tag')); |
---|
1404 | % IDFam=char(lista(i)); |
---|
1405 | % if list(i)==1 |
---|
1406 | % indstr=findstr(IDFam,'Q'); |
---|
1407 | % family(k)=cellstr(IDFam(indstr(2):length(IDFam))); |
---|
1408 | % TagFind=['ckbox_' char(family(k)) '_']; |
---|
1409 | % TagFindRad=['radioQ_All_' char(family(k))]; |
---|
1410 | % |
---|
1411 | % chkb=findobj('Style','checkbox','-and','-regexp','Tag',TagFind); |
---|
1412 | % radQ=findobj('Style','radiobutton','-and','-regexp','Tag',TagFindRad); |
---|
1413 | % %radAll=findobj('Style','radiobutton','-and','-regexp','Tag','radio_ALL'); |
---|
1414 | % %set(radAll,'Value',0); |
---|
1415 | % set(radQ,'Value',0) |
---|
1416 | % for j=1:length(chkb) |
---|
1417 | % set(chkb(j),'Value',0); |
---|
1418 | % end |
---|
1419 | % |
---|
1420 | % %cellule(k)=str2num(IDQuad(indstr(2)+1:indstr(3)-1)); |
---|
1421 | % %element(k)=str2num(IDQuad(indstr(3)+1:length(IDQuad))); |
---|
1422 | % k=k+1; |
---|
1423 | % end |
---|
1424 | % |
---|
1425 | % end |
---|