/[PAMELA software]/eventviewer/flight/src/FEVpamevcontrol.cpp
ViewVC logotype

Contents of /eventviewer/flight/src/FEVpamevcontrol.cpp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.5 - (show annotations) (download)
Thu Nov 8 11:05:35 2007 UTC (17 years, 3 months ago) by mocchiut
Branch: MAIN
Changes since 1.4: +58 -24 lines
Bugs fixed and new features implemented - now can only work with PamLevel2 'AUTO' version

1 #include <math.h>
2 #include <stdio.h>
3 #include <iostream>
4 #include <iomanip>
5 #include <fstream>
6 #include <sstream>
7 #if (__GNUC__ == 3) && (__GNUC_MINOR__ == 2)
8 char* operator+( std::streampos&, char* );
9 #endif
10 //
11 #include <TObjectTable.h>
12 #include <TGClient.h>
13 #include <TGButton.h>
14 #include <TGComboBox.h>
15 #include <TGLabel.h>
16 #include <TGTextEntry.h>
17 #include <TGFrame.h>
18 #include <TGButtonGroup.h>
19 #include <TGProgressBar.h>
20 #include <TGMsgBox.h>
21 #include <TGComboBox.h>
22 #include <TTree.h>
23 #include <TClassEdit.h>
24 #include <TObject.h>
25 #include <TList.h>
26 #include <TSystem.h>
27 #include <TSystemDirectory.h>
28 #include <TString.h>
29 #include <TFile.h>
30 #include <TClass.h>
31 #include <TCanvas.h>
32 #include <TH1.h>
33 #include <TH1F.h>
34 #include <TH2D.h>
35 #include <TLatex.h>
36 #include <TPad.h>
37 #include <TPaveLabel.h>
38 #include <TLine.h>
39 #include <TPolyLine.h>
40 #include <TChain.h>
41 #include <TApplication.h>
42 #include <TVirtualX.h>
43 #include <TGClient.h>
44 #include <TGWindow.h>
45 #include <TEllipse.h>
46 #include <TArrow.h>
47 #include <TStyle.h>
48 //
49 #include <PamLevel2.h>
50 //
51 #include <FEVpamevcontrol.h>
52 //
53 ClassImp(PAMevcontrol);
54 ClassImp(CalorimeterCalibration);
55 //
56
57 using namespace std;
58
59 void stringcopy(TString& s1, const TString& s2, Int_t from=0, Int_t to=0){
60 if ( to == 0 ){
61 Int_t t2length = s2.Length();
62 s1 = "";
63 to = t2length;
64 };
65 for (Int_t i = from; i<to; i++){
66 s1.Append(s2[i],1);
67 };
68 }
69
70 void stringappend(TString& s1, const TString& s2){
71 Int_t t2length = s2.Length();
72 for (Int_t i = 0; i<t2length; i++){
73 s1.Append(s2[i],1);
74 };
75 }
76
77 CalorimeterCalibration::CalorimeterCalibration() {
78 fname = "dw_000000_000.dat";
79 status = 0;
80 for (Int_t i=0; i<2;i++){
81 for (Int_t j=0; j<22;j++){
82 for (Int_t m=0; m<96;m++){
83 mip[i][j][m] = 0.;
84 ermip[i][j][m] = 0.;
85 chi2[i][j][m] = 0.;
86 ndf[i][j][m] = 0.;
87 mask[i][j][m] = 0.;
88 for (Int_t a = 0; a < 4 ; a++){
89 fp[a][i][j][m] = 0.;
90 fpe[a][i][j][m] = 0.;
91 };
92 };
93 };
94 };
95 };
96
97 PAMevcontrol::PAMevcontrol(const TGWindow *p,UInt_t w,UInt_t h,Variables & var, Levels &level, TCanvas &figure) : TGMainFrame(p, w, h){
98 //
99 SetCleanup(kDeepCleanup);
100 DontCallClose();
101 Connect("CloseWindow()","PAMevcontrol",this,"Terminate()");
102 //
103 clev = &level;
104 cvar = &var;
105 thefigure = &figure;
106 //
107 cframe1 = new TGCompositeFrame(this, 280, 40, kVerticalFrame);
108 TGCompositeFrame *cframe2 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);
109 TGCompositeFrame *cframe3 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);
110 TGCompositeFrame *cframe4 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);
111 TGCompositeFrame *cframe5 = new TGCompositeFrame(this, 280, 60, kVerticalFrame);
112 gf = new TGGroupFrame(cframe1, "Detectors");
113 TGGroupFrame *gf2 = new TGGroupFrame(cframe5, "Appearance");
114 TGGroupFrame *inputf = new TGGroupFrame(cframe2, "Input");
115 TGGroupFrame *jumpf = new TGGroupFrame(cframe3, "Jump to");
116 TGGroupFrame *savef = new TGGroupFrame(cframe4, "Save figure as");
117 //
118 TGHorizontalFrame *htexts = new TGHorizontalFrame(savef,400,800);
119 TGHorizontalFrame *htextsl = new TGHorizontalFrame(cframe4,400,800);
120 TGHorizontalFrame *htext = new TGHorizontalFrame(inputf,400,800);
121 TGHorizontalFrame *htext2 = new TGHorizontalFrame(inputf,400,800);
122 TGHorizontalFrame *htext3 = new TGHorizontalFrame(jumpf,400,800);
123 TGHorizontalFrame *htext4 = new TGHorizontalFrame(jumpf,400,80);
124 TGHorizontalFrame *hframe = new TGHorizontalFrame(this,400,800);
125 for (Int_t fr=0; fr<12; fr++) hframedec[fr] = new TGHorizontalFrame(gf, 7, 7);
126 TGHorizontalFrame *hframe3 = new TGHorizontalFrame(gf2, 280, 40);
127 TGHorizontalFrame *hframe4 = new TGHorizontalFrame(gf2,280,10);
128 TGVerticalFrame *hframe5 = new TGVerticalFrame(hframe4, 280, 40);
129 TGHorizontalFrame *hfrprog = new TGHorizontalFrame(this,400,800);
130 //
131 TGTextEntry *fText = new TGTextEntry(htext, new TGTextBuffer(20),-1);
132 fText->SetText(cvar->thefilename.Data());
133 TGTextButton *Load = new TGTextButton(htext,"Load");
134 Load->Connect("Pressed()","TGTextEntry",fText,"ReturnPressed()");
135 fText->Connect("ReturnPressed()", "PAMevcontrol", this,"SetFilename()");
136 fText->Connect("TabPressed()", "PAMevcontrol", this,"CompleteText()");
137 htext->AddFrame(fText, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY, 0, 5, 5, 5));
138 htext->AddFrame(Load, new TGLayoutHints(kLHintsCenterX,0,5,5,5));
139 inputf->AddFrame(new TGLabel(inputf, new TGHotString("Filename:")));
140 inputf->AddFrame(htext, new TGLayoutHints(kLHintsExpandX));
141 //
142 fText2 = new TGTextEntry(htext2, new TGTextBuffer(20),-1);
143 fText2->SetText(cvar->thefilter.Data());
144 TGTextButton *Load2 = new TGTextButton(htext2,"Load");
145 Load2->Connect("Clicked()","TGTextEntry",fText2,"ReturnPressed()");
146 Load2->SetToolTipText("Clear box and click to unload file");
147 fText2->Connect("ReturnPressed()", "PAMevcontrol", this,"SetFilter()");
148 fText2->Connect("TabPressed()", "PAMevcontrol", this,"CompleteText()");
149 htext2->AddFrame(fText2, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY, 0, 5, 5, 5));
150 htext2->AddFrame(Load2, new TGLayoutHints(kLHintsCenterX,0,5,5,5));
151 inputf->AddFrame(new TGLabel(inputf, new TGHotString("Selection file:")));
152 inputf->AddFrame(htext2, new TGLayoutHints(kLHintsExpandX));
153 //
154 cframe2->AddFrame(inputf,new TGLayoutHints(kLHintsExpandX,5,5,5,5));
155 //
156 //
157 //
158 fComboDec = new TGComboBox(gf, 98);
159 fComboDec->AddEntry(" - Select Detector -", 11);
160 fComboDec->AddEntry("PSCU - ORB", 0);
161 fComboDec->AddEntry("Run", 1);
162 fComboDec->AddEntry("Trigger", 2);
163 fComboDec->AddEntry("ToF", 3);
164 fComboDec->AddEntry("Tracker", 4);
165 fComboDec->AddEntry("Anticounter", 5);
166 fComboDec->AddEntry("Calorimeter", 6);
167 fComboDec->AddEntry("S4", 7);
168 fComboDec->AddEntry("ND", 8);
169 fComboDec->AddEntry("Software info", 9);
170 fComboDec->AddEntry("ALL", 10);
171 fComboDec->Select(11);
172 fComboDec->Resize(150,23);
173 gf->AddFrame(fComboDec, new TGLayoutHints(kLHintsCenterY | kLHintsExpandX| kLHintsLeft, 5, 7, 7, 7));
174 fComboDec->Connect("Selected(Int_t)","PAMevcontrol",this,"refreshdec(Int_t)");
175 //
176 // PSCU/Orbital
177 //
178 fshoworb = new TGTextButton(hframedec[0], "Show Data");
179 fshoworb->Connect("Clicked()","PAMevcontrol", this,"showorbdata()");
180 if ( !cvar->ORB ) fshoworb->SetState(kButtonDisabled);
181 hframedec[0]->AddFrame(fshoworb, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,5,5,5));
182 //
183 // RUN
184 //
185 fshowrun = new TGTextButton(hframedec[1], "Show Data");
186 fshowrun->Connect("Clicked()","PAMevcontrol", this,"showrundata()");
187 if ( !cvar->RUN ) fshoworb->SetState(kButtonDisabled);
188 hframedec[1]->AddFrame(fshowrun, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,5,5,5));
189 //
190 // Trigger
191 //
192 fshowtrg = new TGTextButton(hframedec[2], "Show Data");
193 fshowtrg->Connect("Clicked()","PAMevcontrol", this,"showtrgdata()");
194 if ( !cvar->TRG ) fshowtrg->SetState(kButtonDisabled);
195 hframedec[2]->AddFrame(fshowtrg, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,5,5,5));
196 //
197 // TOF
198 //
199 fchktof = new TGCheckButton(hframedec[3], "Show");
200 fchktof->Connect("Clicked()","PAMevcontrol", this,"chktof()");
201 if ( cvar->TOF ) fchktof->SetState(kButtonDown);
202 hframedec[3]->AddFrame(fchktof, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
203 fshowtof = new TGTextButton(hframedec[3], "Show Data");
204 fshowtof->Connect("Clicked()","PAMevcontrol", this,"showtofdata()");
205 if ( !cvar->TOF ) fshowtof->SetState(kButtonDisabled);
206 hframedec[3]->AddFrame(fshowtof, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,2,5,5,5));
207 //
208 // Tracker
209 //
210 fchktrk = new TGCheckButton(hframedec[4], "Show");
211 fchktrk->Connect("Clicked()","PAMevcontrol",this,"chktrk()");
212 if ( cvar->TRK ) fchktrk->SetState(kButtonDown);
213 hframedec[4]->AddFrame(fchktrk, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
214 fshowtrk = new TGTextButton(hframedec[4], "Show Data");
215 fshowtrk->Connect("Clicked()","PAMevcontrol", this,"showtrkdata()");
216 if ( !cvar->TRK ) fshowtrk->SetState(kButtonDisabled);
217 hframedec[4]->AddFrame(fshowtrk, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,2,5,5,5));
218 //
219 // AC
220 //
221 fchkac = new TGCheckButton(hframedec[5], "Show");
222 fchkac->Connect("Clicked()","PAMevcontrol", this,"chkac()");
223 if ( cvar->AC ) fchkac->SetState(kButtonDown);
224 hframedec[5]->AddFrame(fchkac, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
225 fshowac = new TGTextButton(hframedec[5], "Show Data");
226 fshowac->Connect("Clicked()","PAMevcontrol", this,"showacdata()");
227 if ( !cvar->AC ) fshowac->SetState(kButtonDisabled);
228 hframedec[5]->AddFrame(fshowac, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,2,5,5,5));
229 //
230 // Calorimeter
231 //
232 fchkcalo = new TGCheckButton(hframedec[6], "Show");
233 fchkcalo->Connect("Clicked()","PAMevcontrol",this,"chkcalo()");
234 if ( cvar->CALO ) fchkcalo->SetState(kButtonDown);
235 hframedec[6]->AddFrame(fchkcalo, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
236 fchkcalost = new TGCheckButton(hframedec[6], "Track");
237 fchkcalost->Connect("Clicked()","PAMevcontrol",this,"chkcalost()");
238 if ( cvar->CALO ) fchkcalost->SetState(kButtonUp);
239 hframedec[6]->AddFrame(fchkcalost, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,2,2,5,5));
240 fshowcal = new TGTextButton(hframedec[6], "Show Data");
241 fshowcal->Connect("Clicked()","PAMevcontrol", this,"showcaldata()");
242 if ( !cvar->CALO ) fshowcal->SetState(kButtonDisabled);
243 hframedec[6]->AddFrame(fshowcal, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,2,5,5,5));
244 //
245 // S4
246 //
247 fchks4 = new TGCheckButton(hframedec[7], "Show");
248 fchks4->Connect("Clicked()","PAMevcontrol",this,"chks4()");
249 if ( cvar->S4 ) fchks4->SetState(kButtonDown);
250 hframedec[7]->AddFrame(fchks4, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
251 fshows4 = new TGTextButton(hframedec[7], "Show Data");
252 fshows4->Connect("Clicked()","PAMevcontrol", this,"shows4data()");
253 if ( !cvar->S4 ) fshows4->SetState(kButtonDisabled);
254 hframedec[7]->AddFrame(fshows4, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,2,5,5,5));
255 //
256 // ND
257 //
258 fchknd = new TGCheckButton(hframedec[8], "Show");
259 fchknd->Connect("Clicked()","PAMevcontrol",this,"chknd()");
260 if ( cvar->ND ) fchknd->SetState(kButtonDown);
261 hframedec[8]->AddFrame(fchknd, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
262 fshownd = new TGTextButton(hframedec[8], "Show Data");
263 fshownd->Connect("Clicked()","PAMevcontrol", this,"shownddata()");
264 if ( !cvar->ND ) fshownd->SetState(kButtonDisabled);
265 hframedec[8]->AddFrame(fshownd, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,2,5,5,5));
266 //
267 // Software infos
268 //
269 fshowsi = new TGTextButton(hframedec[9], "Show Data");
270 fshowsi->Connect("Clicked()","PAMevcontrol", this,"showsidata()");
271 if ( !cvar->RUN ) fshoworb->SetState(kButtonDisabled);
272 hframedec[9]->AddFrame(fshoworb, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
273 //
274 // All data
275 //
276 fshowall = new TGTextButton(hframedec[10], "Show Data");
277 fshowall->Connect("Clicked()","PAMevcontrol", this,"showalldata()");
278 hframedec[10]->AddFrame(fshowall, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,5,5,5));
279 //
280 // for (Int_t fr=0; fr<11; fr++) gf->AddFrame(hframedec[fr], new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,1,1,1,1));
281 //
282 gf->AddFrame(hframedec[11], new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,5,17,17));
283 //
284 // for (Int_t fr=0; fr<11; fr++) gf->AddFrame(hframedec[fr],new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,0,5,5,5));
285 // gf->GetLayoutManager()->SetPadBottom(5);
286 // gf->MapSubwindows();
287 //
288 fchkinfo = new TGCheckButton(hframe3, "Infos");
289 fchkinfo->Connect("Clicked()","PAMevcontrol",this,"chkinfo()");
290 if ( cvar->INFOS ) fchkinfo->SetState(kButtonDown);
291 hframe3->AddFrame(fchkinfo, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,0,5,5,5));
292 //
293 fchknames = new TGCheckButton(hframe3, "Names");
294 fchknames->Connect("Clicked()","PAMevcontrol",this,"chknames()");
295 if ( cvar->VINFOS ) fchknames->SetState(kButtonDown);
296 hframe3->AddFrame(fchknames, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,5,5,5));
297 fchkpalette = new TGCheckButton(hframe3, "Palette");
298 fchkpalette->Connect("Clicked()","PAMevcontrol",this,"chkpalette()");
299 if ( cvar->PALETTE) fchkpalette->SetState(kButtonDown);
300 hframe3->AddFrame(fchkpalette, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,10,5,5,5));
301 gf2->AddFrame(hframe3, new TGLayoutHints(kLHintsExpandX));
302 //
303 TGVButtonGroup *group = new TGVButtonGroup(hframe4);
304 bwc0 = new TGRadioButton(group, "Colour");
305 bwc1 = new TGRadioButton(group, "B/W");
306 if ( cvar->bw ){
307 bwc1->SetState(kButtonDown);
308 } else {
309 bwc0->SetState(kButtonDown);
310 };
311 bwc0->Connect("Pressed()", "PAMevcontrol",this,"radiocolor()");
312 bwc1->Connect("Pressed()", "PAMevcontrol",this,"radiobw()");
313 hframe4->AddFrame(group,new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
314 //
315 //
316 // ftrks4 = new TGCheckButton(hframe5, "Track in S4/ND");
317 // ftrks4->Connect("Clicked()","PAMevcontrol",this,"radiotrack()");
318 // if ( cvar->tracknds4) ftrks4->SetState(kButtonDown);
319 // hframe5->AddFrame(ftrks4, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,2,5,5));
320
321 fgetl0 = new TGTextButton(hframe5, "Get L0 file");
322 fgetl0->Connect("Clicked()","PAMevcontrol", this,"getl0file()");
323 hframe5->AddFrame(fgetl0, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,5,5,5,5));
324
325 ffl0 = new TGCheckButton(hframe5, "Force RAW");
326 ffl0->Connect("Clicked()","PAMevcontrol",this,"forcel0()");
327 if ( cvar->fl0 ) ffl0->SetState(kButtonDown);
328 if ( !cvar->fl0 ) ffl0->SetState(kButtonUp);
329 hframe5->AddFrame(ffl0, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,2,5,5,5));
330 //
331 hframe4->AddFrame(hframe5, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,10,5,5,5));
332 gf2->AddFrame(hframe4, new TGLayoutHints(kLHintsExpandX));
333 //
334 cframe1->AddFrame(gf, new TGLayoutHints(kLHintsExpandX,5,5,5,5));
335 // cframe1->Resize(280,10);
336 // cframe1->GetLayoutManager()->SetDefaultHeight(5);
337 // MapWindow();
338 //
339 cframe5->AddFrame(gf2, new TGLayoutHints(kLHintsExpandX,5,5,5,5));
340 //
341 TGHButtonGroup *jgroup = new TGHButtonGroup(htext4);
342 jbwc0 = new TGRadioButton(jgroup, "packet ");
343 jbwc1 = new TGRadioButton(jgroup, "progressive");
344 jbwc1->SetState(kButtonDown);
345 jbwc0->Connect("Pressed()", "PAMevcontrol",this,"radioevent()");
346 jbwc1->Connect("Pressed()", "PAMevcontrol",this,"radioprog()");
347 htext4->AddFrame(jgroup,new TGLayoutHints(kLHintsExpandX,1,1,0,0));
348 //
349 TGTextEntry *fText3 = new TGTextEntry(htext3, new TGTextBuffer(6),-1);
350 TGTextButton *Jump = new TGTextButton(htext3,"go");
351 Jump->Connect("Clicked()","TGTextEntry",fText3,"ReturnPressed()");
352 fText3->Connect("ReturnPressed()", "PAMevcontrol", this,"jumpto()");
353 htext3->AddFrame(new TGLabel(htext3, new TGHotString("number")), new TGLayoutHints(kLHintsExpandX,0,0,1,1));
354 htext3->AddFrame(fText3, new TGLayoutHints(kLHintsExpandX, 0, 8, 0, 0));
355 htext3->AddFrame(Jump, new TGLayoutHints(kLHintsExpandX,0,0,0,0));
356 jumpf->AddFrame(htext4, new TGLayoutHints(kLHintsExpandX,0,0,1,1)); //
357 jumpf->AddFrame(htext3, new TGLayoutHints(kLHintsExpandX,0,0,0,1)); //
358 //
359 cframe3->AddFrame(jumpf,new TGLayoutHints(kLHintsExpandX,5,5,5,5));
360 //
361 fText4 = new TGTextEntry(htexts, new TGTextBuffer(18),-1);
362 TGTextButton *save = new TGTextButton(htextsl,"save");
363 save->Connect("Clicked()","TGTextEntry",fText4,"ReturnPressed()");
364 fText4->Connect("ReturnPressed()", "PAMevcontrol", this,"saveas()");
365 fText4->Connect("TabPressed()", "PAMevcontrol", this,"CompleteText()");
366 htexts->AddFrame(fText4, new TGLayoutHints(kLHintsExpandX, 0, 8, 1, 1));
367 //
368 fCombo = new TGComboBox(htexts, 98);
369 fCombo->AddEntry(".ps", 0);
370 fCombo->AddEntry(".eps", 1);
371 fCombo->AddEntry(".gif", 2);
372 fCombo->AddEntry(".jpg", 3);
373 fCombo->AddEntry(".tiff", 4);
374 fCombo->AddEntry(".xpm", 5);
375 fCombo->AddEntry(".pdf", 6);
376 fCombo->AddEntry(".xml", 7);
377 fCombo->AddEntry(".png", 8);
378 fCombo->AddEntry(".svg", 9);
379 fCombo->AddEntry(".root", 10);
380 fCombo->AddEntry(".C", 11);
381 fCombo->Select(0);
382 fCombo->Resize(50,23);
383 // htexts->AddFrame(fCombo, new TGLayoutHints(kLHintsCenterX | kLHintsTop | kLHintsLeft | kLHintsCenterY | kLHintsExpandX, 0, 8, 1, 1));
384 htexts->AddFrame(fCombo, new TGLayoutHints(kLHintsExpandY | kLHintsExpandY| kLHintsRight, 2, 2, 2, 1));
385 //
386 htextsl->AddFrame(save, new TGLayoutHints(kLHintsExpandX,0,0,2,1));
387 savef->AddFrame(htexts, new TGLayoutHints(kLHintsExpandX,0,0,2,5));
388 // savef->AddFrame(htextsl, new TGLayoutHints(kLHintsExpandX,5,2,5,2));
389 savef->AddFrame(htextsl, new TGLayoutHints(kLHintsExpandX,8,0,5,2));
390 //
391 cframe4->AddFrame(savef,new TGLayoutHints(kLHintsExpandX,5,5,5,5));
392 //
393 fHProg1 = new TGHProgressBar(hfrprog, TGProgressBar::kFancy, 260);
394 fHProg1->SetBarColor("green");
395 fHProg1->ShowPosition();
396 hfrprog->AddFrame(fHProg1, new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY | kLHintsExpandX,5,5,5,5));
397 //
398 //
399 TGTextButton *prev = new TGTextButton(hframe,"< &Back");
400 prev->Connect("Clicked()","PAMevcontrol",this,"prev()");
401 hframe->AddFrame(prev, new TGLayoutHints(kLHintsCenterX | kLHintsExpandX,5,5,3,4));
402 //
403 TGTextButton *exit = new TGTextButton(hframe,"E&xit");//,"gApplication->Terminate(0)");
404 exit->Connect("Clicked()","PAMevcontrol",this,"Terminate()");
405 exit->SetToolTipText("Quit the event viewer");
406 hframe->AddFrame(exit, new TGLayoutHints(kLHintsCenterX | kLHintsExpandX,5,5,3,4));
407 //
408 bstop = new TGTextButton(hframe,"&Stop");
409 bstop->Connect("Clicked()","PAMevcontrol",this,"stop()");
410 hframe->AddFrame(bstop, new TGLayoutHints(kLHintsCenterX | kLHintsExpandX,5,5,3,4));
411 bstop->SetState(kButtonDisabled);
412 //
413 TGTextButton *next = new TGTextButton(hframe,"&Next >");
414 next->Connect("Clicked()","PAMevcontrol",this,"next()");
415 hframe->AddFrame(next, new TGLayoutHints(kLHintsCenterX | kLHintsExpandX,5,5,3,4));
416 //
417 //
418 // AddFrame(htext, new TGLayoutHints(kLHintsExpandX,2,2,15,1));
419 AddFrame(cframe2, new TGLayoutHints(kLHintsExpandX,1,1,1,1));
420 AddFrame(cframe1, new TGLayoutHints(kLHintsExpandX,1,1,1,1));
421 AddFrame(cframe5, new TGLayoutHints(kLHintsExpandX,1,1,1,1));
422 AddFrame(cframe3, new TGLayoutHints(kLHintsExpandX,1,1,1,1));
423 AddFrame(cframe4, new TGLayoutHints(kLHintsExpandX,1,1,1,1));
424 AddFrame(hfrprog, new TGLayoutHints(kLHintsExpandX,1,1,1,1));
425 AddFrame(hframe, new TGLayoutHints(kLHintsExpandX,1,1,1,1));
426 // Set a name to the main frame
427 SetWindowName("PAMELA Event Viewer control panel");
428 // Map all subwindows of main frame
429 MapSubwindows();
430 // Initialize the layout algorithm
431 Resize(GetDefaultSize());
432 // Map main frame
433 MapWindow();
434 //
435 gf->HideFrame(hframedec[11]);
436 for (Int_t fr=0; fr<11; fr++){
437 gf->AddFrame(hframedec[fr],new TGLayoutHints(kLHintsTop | kLHintsLeft | kLHintsCenterY|kLHintsExpandX,0,5,5,5));
438 gf->HideFrame(hframedec[fr]);
439 };
440 gf->MapSubwindows();
441 //
442 }
443
444 void PAMevcontrol::DIALOG(Int_t ty, TString warn){
445 //
446 // ty = 0 -> INFO, ty = 1 -> WARNING, ty = 3 -> ERROR
447 //
448 Int_t retval;
449 TString title;
450 EMsgBoxIcon mb_icon = kMBIconStop;
451 if ( ty == 0 ){
452 title="INFO";
453 mb_icon = kMBIconAsterisk;
454 };
455 if ( ty == 1 ){
456 title="WARNING!";
457 mb_icon = kMBIconExclamation;
458 };
459 if ( ty == 2 ){
460 title="ERROR!!";
461 mb_icon = kMBIconStop;
462 };
463 new TGMsgBox(gClient->GetRoot(), this, title.Data(), warn.Data(), mb_icon, kMBOk, &retval);
464 }
465
466 void PAMevcontrol::refreshdec(Int_t n){
467 //
468 for (Int_t i=0; i<11; i++){
469 gf->HideFrame(hframedec[i]);
470 };
471 //
472 if ( n < 11 ){
473 gf->ShowFrame(hframedec[n]);
474 };
475 };
476
477
478 void PAMevcontrol::showorbdata(){
479 cvar->showorb = !cvar->showorb;
480 if ( !cvar->showorb ) fshoworb->SetText("Show Data");
481 if ( cvar->showorb ) fshoworb->SetText("Hide Data");
482 // printf("orb \n");
483 };
484
485 void PAMevcontrol::showtrgdata(){
486 cvar->showtrg = !cvar->showtrg;
487 if ( !cvar->showtrg ) fshowtrg->SetText("Show Data");
488 if ( cvar->showtrg ) fshowtrg->SetText("Hide Data");
489 // printf("trg \n");
490 };
491
492 void PAMevcontrol::showrundata(){
493 cvar->showrun = !cvar->showrun;
494 if ( !cvar->showrun ) fshowrun->SetText("Show Data");
495 if ( cvar->showrun ) fshowrun->SetText("Hide Data");
496 // printf("run \n");
497 };
498
499 void PAMevcontrol::showcaldata(){
500 cvar->showcal = !cvar->showcal;
501 if ( !cvar->showcal ) fshowcal->SetText("Show Data");
502 if ( cvar->showcal ) fshowcal->SetText("Hide Data");
503 // printf("cal \n");
504 };
505
506 void PAMevcontrol::chkcalost(){
507 if ( cvar->CALOT ) {
508 cvar->CALOT = 0;
509 } else {
510 cvar->CALOT = 1;
511 };
512 cvar->i--;
513 cvar->nevents = 0;
514 cvar->firstevno = 0;
515 cvar->lastevno = 0;
516 cvar->refresh = true;
517 };
518
519 void PAMevcontrol::showtrkdata(){
520 cvar->showtrk = !cvar->showtrk;
521 if ( !cvar->showtrk ) fshowtrk->SetText("Show Data");
522 if ( cvar->showtrk ) fshowtrk->SetText("Hide Data");
523 // printf("trk \n");
524 };
525
526 void PAMevcontrol::showtofdata(){
527 cvar->showtof = !cvar->showtof;
528 if ( !cvar->showtof ) fshowtof->SetText("Show Data");
529 if ( cvar->showtof ) fshowtof->SetText("Hide Data");
530 // printf("tof \n");
531 };
532
533 void PAMevcontrol::showacdata(){
534 cvar->showac = !cvar->showac;
535 if ( !cvar->showac ) fshowac->SetText("Show Data");
536 if ( cvar->showac ) fshowac->SetText("Hide Data");
537 // printf("ac \n");
538 };
539
540 void PAMevcontrol::shownddata(){
541 cvar->shownd = !cvar->shownd;
542 if ( !cvar->shownd ) fshownd->SetText("Show Data");
543 if ( cvar->shownd ) fshownd->SetText("Hide Data");
544 // printf("nd \n");
545 };
546
547 void PAMevcontrol::shows4data(){
548 cvar->shows4 = !cvar->shows4;
549 if ( !cvar->shows4 ) fshows4->SetText("Show Data");
550 if ( cvar->shows4 ) fshows4->SetText("Hide Data");
551 // printf("s4 \n");
552 };
553
554 void PAMevcontrol::showsidata(){
555 cvar->showsi = !cvar->showsi;
556 if ( !cvar->showsi ) fshowsi->SetText("Show Data");
557 if ( cvar->showsi ) fshowsi->SetText("Hide Data");
558 // printf("si \n");
559 };
560
561 void PAMevcontrol::showalldata(){
562 cvar->showall = !cvar->showall;
563 if ( !cvar->showall ) fshowall->SetText("Show Data");
564 if ( cvar->showall ) fshowall->SetText("Hide Data");
565 // printf("all \n");
566 };
567
568 void PAMevcontrol::SetFilename() {
569 TGTextEntry *entry = (TGTextEntry*)gTQSender;
570 TString text = entry->GetText();
571 cvar->thefilename=text.Data();
572 cvar->nevents = 0;
573 cvar->firstevno = 0;
574 cvar->lastevno = 0;
575 if ( cvar->fl0 ) {
576 cvar->fl0 = false;
577 ffl0->SetState(kButtonUp);
578 };
579 cvar->restart = true;
580 cvar->waitforever = false;
581 }
582
583 void PAMevcontrol::getl0file() {
584 //
585 TString host = "mysql://localhost/pamelaprod";
586 TString user = "anonymous";
587 TString psw = "";
588 const char *pamdbhost=gSystem->Getenv("PAM_DBHOST");
589 const char *pamdbuser=gSystem->Getenv("PAM_DBUSER");
590 const char *pamdbpsw=gSystem->Getenv("PAM_DBPSW");
591 if ( !pamdbhost ) pamdbhost = "";
592 if ( !pamdbuser ) pamdbuser = "";
593 if ( !pamdbpsw ) pamdbpsw = "";
594 if ( strcmp(pamdbhost,"") ) host = pamdbhost;
595 if ( strcmp(pamdbuser,"") ) user = pamdbuser;
596 if ( strcmp(pamdbpsw,"") ) psw = pamdbpsw;
597 cout<<"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"<<endl;
598 cout<<"Connecting to DB"<<endl;
599 cout<<"HOST "<<host<<endl;
600 cout<<"USER "<<user<<endl;
601 cout<<"PSW "<<psw<<endl;
602 cout<<"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"<<endl;
603 TSQLServer *dbc = TSQLServer::Connect(host.Data(),user.Data(),psw.Data());
604 if( dbc && dbc->IsConnected() ){
605 //
606 // Starting from level2
607 //
608 if ( clev->file == 2 ){
609 GL_ROOT glroot = GL_ROOT();
610 if( !glroot.Query_GL_ROOT(cvar->idroot,dbc) ){
611 //
612 cvar->thefilename= glroot.PATH + glroot.NAME;
613 cvar->nevents = 0;
614 cvar->firstevno = 0;
615 cvar->lastevno = 0;
616 if ( cvar->fl0 ) {
617 cvar->fl0 = false;
618 ffl0->SetState(kButtonUp);
619 };
620 cvar->restart = true;
621 cvar->waitforever = false;
622 //
623 if ( cvar->thefilter != "" ){
624 cvar->thefilter="";
625 cvar->selex = true;
626 };
627 cvar->i = -(cvar->EVF + cvar->i -1);
628 //cvar->refresh = true;
629 // cvar->file = 0;
630 //
631 } else {
632 stringstream warning;
633 warning.str("");
634 warning << " Problems getting Level0 file ";
635 DIALOG(2,warning.str().c_str());
636 };
637 } else {
638 //
639 // starting from L0
640 //
641 stringstream warning;
642 warning.str("");
643 warning << " Not yet implemented ";
644 DIALOG(2,warning.str().c_str());
645 };
646 //
647 } else {
648 stringstream warning;
649 warning.str("");
650 warning << " Problems connectiong to DB! ";
651 DIALOG(2,warning.str().c_str());
652 };
653 dbc->Close();
654 };
655
656 void PAMevcontrol::CheckLevel() {
657 if ( clev->file == 2 ){
658 ffl0->SetState(kButtonDisabled);
659 // if ( !cvar->tracknds4 ) {
660 // ftrks4->SetState(kButtonUp);
661 // } else {
662 // ftrks4->SetState(kButtonDown);
663 // };
664 } else {
665 //ftrks4->SetState(kButtonDisabled);
666 if ( !cvar->fl0 ) {
667 ffl0->SetState(kButtonUp);
668 } else {
669 ffl0->SetState(kButtonDown);
670 };
671 };
672 if ( clev->file == 2 ){
673 fgetl0->SetText("Get L0 file");
674 } else {
675 fgetl0->SetText("Get L2 file");
676 };
677 }
678
679 void PAMevcontrol::SetSearching() {
680 bstop->SetState(kButtonUp);
681 };
682
683 void PAMevcontrol::StopSearching() {
684 bstop->SetState(kButtonDisabled);
685 };
686
687 void PAMevcontrol::RefreshButtons() {
688 if ( cvar->jumprog ){
689 jbwc1->SetState(kButtonDown);
690 } else {
691 jbwc0->SetState(kButtonDown);
692 };
693 if ( cvar->fl0 ){
694 ffl0->SetState(kButtonDown);
695 } else {
696 ffl0->SetState(kButtonUp);
697 };
698 // if ( cvar->tracknds4) ftrks4->SetState(kButtonDown);
699 if ( cvar->bw ){
700 bwc1->SetState(kButtonDown);
701 } else {
702 bwc0->SetState(kButtonDown);
703 };
704 if ( cvar->PALETTE) fchkpalette->SetState(kButtonDown); else fchkpalette->SetState(kButtonUp);
705 if ( cvar->VINFOS ) fchknames->SetState(kButtonDown); else fchknames->SetState(kButtonUp);
706 if ( cvar->INFOS ) fchkinfo->SetState(kButtonDown); else fchkinfo->SetState(kButtonUp);
707 //
708 if ( cvar->CALOT ) fchkcalost->SetState(kButtonDown); else fchkcalost->SetState(kButtonUp);
709 if ( cvar->CALO ){
710 fchkcalo->SetState(kButtonDown);
711 fshowcal->SetState(kButtonUp);
712 } else {
713 fchkcalo->SetState(kButtonUp);
714 fchkcalost->SetState(kButtonDisabled);
715 fshowcal->SetState(kButtonDisabled);
716 };
717 //
718 if ( cvar->ND ){
719 fchknd->SetState(kButtonDown);
720 fshownd->SetState(kButtonUp);
721 } else {
722 fchknd->SetState(kButtonUp);
723 fshownd->SetState(kButtonDisabled);
724 };
725 //
726 if ( cvar->S4 ){
727 fchks4->SetState(kButtonDown);
728 fshows4->SetState(kButtonUp);
729 } else {
730 fchks4->SetState(kButtonUp);
731 fshows4->SetState(kButtonDisabled);
732 };
733 //
734 if ( cvar->TRK ){
735 fchktrk->SetState(kButtonDown);
736 fshowtrk->SetState(kButtonUp);
737 } else {
738 fchktrk->SetState(kButtonUp);
739 fshowtrk->SetState(kButtonDisabled);
740 }
741 //
742 if ( cvar->AC ){
743 fchkac->SetState(kButtonDown);
744 fshowac->SetState(kButtonUp);
745 } else {
746 fchkac->SetState(kButtonUp);
747 fshowac->SetState(kButtonDisabled);
748 };
749 //
750 if ( cvar->TOF ){
751 fchktof->SetState(kButtonDown);
752 fshowtof->SetState(kButtonUp);
753 } else {
754 fchktof->SetState(kButtonUp);
755 fshowtof->SetState(kButtonDisabled);
756 };
757 //
758 CheckLevel();
759 //
760 };
761
762 void PAMevcontrol::SetFilter() {
763 TGTextEntry *entry = (TGTextEntry*)gTQSender;
764 TString text = entry->GetText();
765 cvar->thefilter=text.Data();
766 cvar->i--;
767 cvar->selex = true;
768 cvar->nevents = 0;
769 cvar->firstevno = 0;
770 cvar->lastevno = 0;
771 cvar->refresh = true;
772 }
773
774 void PAMevcontrol::CompleteText() {
775 TGTextEntry *entry = (TGTextEntry*)gTQSender;
776 TString text = entry->GetText();
777 Int_t curspos = entry->GetCursorPosition();
778 Int_t ncurspos = 0;
779 TString textrem;
780 stringcopy(textrem,text,curspos,text.Length());
781 text.Resize(curspos);
782 if ( !strcmp(text.Data(),"") ) {
783 stringstream ntext;
784 ntext.str("");
785 ntext << gSystem->ExpandPathName("$HOME");
786 text = ntext.str().c_str();
787 curspos=ntext.str().length();
788 };
789 char *test = gSystem->ExpandPathName(text.Data());
790 const char *dir = gSystem->DirName(test);
791 const char *base = gSystem->BaseName(test);
792 TString lbase = base;
793 Int_t lenbase = lbase.Length();
794 TSystemDirectory *tsd = new TSystemDirectory("",dir);
795 TSystemFile *file;
796 TList *lsmatch = new TList;
797 Int_t numf = 0;
798 Int_t numgo = 0;
799 Int_t charmac = 0;
800 TString tbase;
801 Int_t k = 0;
802 stringstream newtext;
803 TSystemFile *mfile;
804 TSystemFile nfile;
805 TList *lsf = new TList;
806 const char *ctbase;
807 if ( !tsd->GetListOfFiles() ){
808 gVirtualX->Bell(0);
809 goto end;
810 };
811 lsf = tsd->GetListOfFiles();
812 file = (TSystemFile*)lsf->First();
813 //
814 while( (TSystemFile*)lsf->After(file) ){
815 numf++;
816 file = (TSystemFile*)lsf->After(file);
817 if ( !strncmp(file->GetName(),base,lenbase) ){
818 numgo++;
819 lsmatch->AddLast(file);
820 const char *ctbase = file->GetName();
821 tbase = ctbase;
822 charmac = tbase.Length();
823 };
824 };
825 newtext.str("");
826 if ( numgo > 0 ){
827 mfile = (TSystemFile*)lsmatch->First();
828 ctbase = mfile->GetName();
829 while ( (!strcmp(ctbase,"..") || !strcmp(ctbase,".")) && (TSystemFile*)lsmatch->After(mfile) ) {
830 mfile = (TSystemFile*)lsmatch->After(mfile);
831 ctbase = mfile->GetName();
832 };
833 tbase = ctbase;
834 base = ctbase;
835 charmac = tbase.Length();;
836 while( (TSystemFile*)lsmatch->After(mfile) ){
837 mfile = (TSystemFile*)lsmatch->After(mfile);
838 ctbase = mfile->GetName();
839 while ( (!strcmp(ctbase,"..") || !strcmp(ctbase,".")) && (TSystemFile*)lsmatch->After(mfile) ) {
840 mfile = (TSystemFile*)lsmatch->After(mfile);
841 ctbase = mfile->GetName();
842 };
843 tbase = ctbase;
844 k = 0;
845 for ( Int_t i=lenbase; i<=tbase.Length(); i++){
846 if ( !strncmp(tbase.Data(),base,i) && strcmp(tbase.Data(),base) ){
847 k = i;
848 };
849 };
850 if ( k <= charmac){
851 charmac = k;
852 };
853 };
854 gVirtualX->Bell(0);
855 };
856 if ( !charmac ) {
857 gVirtualX->Bell(0);
858 goto end;
859 };
860 tbase.Resize(charmac);
861 if ( !strcmp(dir,"") || !strcmp(dir,"/") ){
862 newtext << "/" << tbase.Data();
863 } else {
864 newtext << dir << "/" << tbase.Data();
865 };
866 nfile = TSystemFile(tbase.Data(),dir);
867 if ( nfile.IsDirectory() && numgo == 1 ) newtext << "/";
868 ncurspos = newtext.str().length();
869 if ( textrem.Length() ) newtext << textrem.Data();
870 entry->SetText(newtext.str().c_str());
871 entry->SetCursorPosition(ncurspos);
872 end:
873 lsf->Clear();
874 lsmatch->Clear();
875 }
876
877 void PAMevcontrol::saveas() {
878 TString text = fText4->GetText();
879 Int_t sel=fCombo->GetSelected();
880 TString ty;
881 switch (sel){
882 case (0):
883 ty = ".ps";
884 break;
885 case (1):
886 ty = ".eps";
887 break;
888 case (2):
889 ty = ".gif";
890 break;
891 case (3):
892 ty = ".jpg";
893 break;
894 case (4):
895 ty = ".tiff";
896 break;
897 case (5):
898 ty = ".xpm";
899 break;
900 case (6):
901 ty = ".pdf";
902 break;
903 case (7):
904 ty = ".xml";
905 break;
906 case (8):
907 ty = ".png";
908 break;
909 case (9):
910 ty = ".svg";
911 break;
912 case (10):
913 ty = ".root";
914 break;
915 case (11):
916 ty = ".C";
917 break;
918 };
919 if ( sel == 0 ) ty = ".ps";
920 stringstream name;
921 if ( strcmp(text.Data(),"") ){
922 name.str("");
923 name << text.Data();
924 name << ty.Data();
925 thefigure->SaveAs(name.str().c_str());
926 name.str("");
927 name << " Saved as ";
928 name << text.Data();
929 name << ty.Data();
930 DIALOG(0,name.str().c_str());
931 printf(" Saved as %s%s \n",text.Data(),ty.Data());
932 };
933 }
934
935 void PAMevcontrol::increment(float val) {
936 fHProg1->Reset();
937 fHProg1->SetPosition(val);
938 gSystem->ProcessEvents();
939 }
940
941 void PAMevcontrol::forcel0() {
942 cvar->fl0 = !cvar->fl0;
943 cvar->alrforc = false;
944 cvar->i--;
945 cvar->nevents = 0;
946 cvar->firstevno = 0;
947 cvar->lastevno = 0;
948 cvar->refresh = true;
949 }
950
951 void PAMevcontrol::clearselfi(){
952 fText2->SetText("");
953 }
954
955 void PAMevcontrol::upgrnamfi(){
956 fText4->SetText(cvar->svas.Data());
957 fText4->SetCursorPosition(fText4->GetMaxLength());
958 }
959
960 void PAMevcontrol::jumpto() {
961 TGTextEntry *entry = (TGTextEntry*)gTQSender;
962 TString text = entry->GetText();
963 Int_t j;
964 j = atoi(text.Data());
965 if ( cvar->jumprog ){
966 if ( j < 1 || j > cvar->nevents ) {
967 printf("\n You can choose between 1 and %i \n",(int)cvar->nevents);
968 stringstream warning;
969 warning.str("");
970 warning << "You can choose between 1 and ";
971 warning << (int)cvar->nevents;
972 DIALOG(1,warning.str().c_str());
973 } else {
974 stringstream warning;
975 // warning.str("");
976 // warning << "Jumping to progressive number ";
977 // warning << j;
978 // DIALOG(0,warning.str().c_str());
979 printf("\n Jumping to progressive number %i\n\n",j);
980 cvar->i = j-2;
981 cvar->goon = true;
982 SetSearching();
983 };
984 } else {
985 if ( j < cvar->firstevno || j > cvar->lastevno ) {
986 printf("\n You can choose between %i and %i \n",cvar->firstevno,cvar->lastevno);
987 stringstream warning;
988 warning.str("");
989 warning << "You can choose between ";
990 warning << cvar->firstevno;
991 warning << " and ";
992 warning << cvar->lastevno;
993 DIALOG(1,warning.str().c_str());
994 } else {
995 // stringstream warning;
996 // warning.str("");
997 // warning << "Jumping to event number ";
998 // warning << j;
999 // DIALOG(0,warning.str().c_str());
1000 printf("\n Jumping to packet number %i\n\n",j);
1001 cvar->jumpto = j;
1002 cvar->jumpen = true;
1003 cvar->goon = true;
1004 SetSearching();
1005 };
1006 };
1007 entry->SetText("");
1008 }
1009
1010 void PAMevcontrol::radioevent() {
1011 cvar->jumprog = false;
1012 }
1013
1014 void PAMevcontrol::radioprog() {
1015 cvar->jumprog = true;
1016 }
1017
1018 void PAMevcontrol::radiocolor() {
1019 if ( !cvar->goon ){
1020 if ( cvar->bw ) {
1021 cvar->bw = 0;
1022 cvar->i--;
1023 cvar->goon = true;
1024 };
1025 };
1026 }
1027
1028 void PAMevcontrol::radiobw() {
1029 if ( !cvar->goon ){
1030 if ( !cvar->bw ) {
1031 cvar->bw = 1;
1032 cvar->i--;
1033 cvar->goon = true;
1034 };
1035 };
1036 }
1037
1038 void PAMevcontrol::radiotrack() {
1039 if ( cvar->tracknds4 ) {
1040 cvar->tracknds4 = 0;
1041 } else {
1042 cvar->tracknds4 = 1;
1043 };
1044 cvar->i--;
1045 cvar->goon = true;
1046 }
1047
1048 void PAMevcontrol::chktof() {
1049 if ( cvar->TOF ) {
1050 cvar->TOF = 0;
1051 } else {
1052 cvar->TOF = 1;
1053 };
1054 cvar->i--;
1055 cvar->nevents = 0;
1056 cvar->firstevno = 0;
1057 cvar->lastevno = 0;
1058 cvar->refresh = true;
1059 }
1060
1061 void PAMevcontrol::chkac() {
1062 if ( cvar->AC ) {
1063 cvar->AC = 0;
1064 } else {
1065 cvar->AC = 1;
1066 };
1067 cvar->i--;
1068 cvar->nevents = 0;
1069 cvar->firstevno = 0;
1070 cvar->lastevno = 0;
1071 cvar->refresh = true;
1072 }
1073
1074 void PAMevcontrol::chktrk() {
1075 if ( cvar->TRK ) {
1076 cvar->TRK = 0;
1077 } else {
1078 cvar->TRK = 1;
1079 };
1080 cvar->i--;
1081 cvar->nevents = 0;
1082 cvar->firstevno = 0;
1083 cvar->lastevno = 0;
1084 cvar->refresh = true;
1085 }
1086
1087 void PAMevcontrol::chkcalo() {
1088 if ( cvar->CALO ) {
1089 cvar->CALO = 0;
1090 } else {
1091 cvar->CALO = 1;
1092 };
1093 cvar->i--;
1094 cvar->nevents = 0;
1095 cvar->firstevno = 0;
1096 cvar->lastevno = 0;
1097 cvar->refresh = true;
1098 }
1099
1100 void PAMevcontrol::chks4() {
1101 if ( cvar->S4 ) {
1102 cvar->S4 = 0;
1103 } else {
1104 cvar->S4 = 1;
1105 };
1106 cvar->i--;
1107 cvar->nevents = 0;
1108 cvar->firstevno = 0;
1109 cvar->lastevno = 0;
1110 cvar->refresh = true;
1111 }
1112
1113 void PAMevcontrol::chknd() {
1114 if ( cvar->ND ) {
1115 cvar->ND = 0;
1116 } else {
1117 cvar->ND = 1;
1118 };
1119 cvar->i--;
1120 cvar->nevents = 0;
1121 cvar->firstevno = 0;
1122 cvar->lastevno = 0;
1123 cvar->refresh = true;
1124 }
1125
1126 void PAMevcontrol::chkinfo() {
1127 if ( cvar->INFOS ) {
1128 cvar->INFOS = 0;
1129 } else {
1130 cvar->INFOS = 1;
1131 };
1132 cvar->i--;
1133 cvar->goon = true;
1134 }
1135
1136 void PAMevcontrol::chknames() {
1137 if ( cvar->VINFOS ) {
1138 cvar->VINFOS = 0;
1139 } else {
1140 cvar->VINFOS = 1;
1141 };
1142 cvar->i--;
1143 cvar->goon = true;
1144 }
1145
1146 void PAMevcontrol::chkpalette() {
1147 if ( cvar->PALETTE ) {
1148 cvar->PALETTE = 0;
1149 } else {
1150 cvar->PALETTE = 1;
1151 };
1152 cvar->i--;
1153 cvar->goon = true;
1154 }
1155
1156 void PAMevcontrol::next() {
1157 SetSearching();
1158 if ( cvar->i == cvar->nevents-1 ) {
1159 printf("This is the last event, you can't go forward! \n");
1160 DIALOG(1,"This is the last event!");
1161 } else {
1162 cvar->goon = true;
1163 cvar->doflag = 1;
1164 };
1165 }
1166
1167 void PAMevcontrol::stop() {
1168 DIALOG(1,"Stop searching");
1169 cvar->doflag = 3;
1170 }
1171
1172 void PAMevcontrol::prev() {
1173 SetSearching();
1174 if ( cvar->i > 0 ) {
1175 printf("WARNING: going backward!\n\n");
1176 cvar->doflag = 2;
1177 cvar->goon = true;
1178 } else {
1179 printf("This is the first event, you can't go backward! \n");
1180 DIALOG(1,"This is the first event!");
1181 };
1182 }
1183
1184 void PAMevcontrol::Terminate() {
1185 gSystem->ProcessEvents();
1186 gApplication->Terminate(0);
1187 }
1188
1189 PAMevcontrol::~PAMevcontrol() {
1190 // Clean up used widgets: frames, buttons, layouthints
1191 Cleanup();
1192 delete this;
1193 }

  ViewVC Help
Powered by ViewVC 1.1.23