/[PAMELA software]/quicklook/tracker/flight/macros/FTrkQLook_BASIC.cxx
ViewVC logotype

Diff of /quicklook/tracker/flight/macros/FTrkQLook_BASIC.cxx

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by pam-fi, Wed May 10 10:06:54 2006 UTC revision 1.7 by pam-fi, Thu Jun 8 17:03:57 2006 UTC
# Line 2  Line 2 
2   * FTrkQLook_BASIC.cpp   * FTrkQLook_BASIC.cpp
3   *   *
4   * autor: D.Fedele   * autor: D.Fedele
5   * version 2.0   * version 3.0
6   * Parameters:   * Parameters:
7   *      file - the data file to analyze   *      file - the data file to analyze
8   *      fromevent - first event to analyze   *      fromevent - first event to analyze
# Line 18  Line 18 
18  #include <TGraph.h>  #include <TGraph.h>
19  #include <TStyle.h>  #include <TStyle.h>
20  #include <TTree.h>  #include <TTree.h>
21    #include <TArrow.h>
22  //  //
23  #include <physics/tracker/TrackerEvent.h>  #include <physics/tracker/TrackerEvent.h>
24  #include <PscuHeader.h>  #include <PscuHeader.h>
25  #include <EventHeader.h>  #include <EventHeader.h>
26  #include <RunHeaderEvent.h>  #include <RunHeaderEvent.h>
27    #include <EventCounter.h>
28    #include <PacketType.h>
29  //  //
30    #define MAXSTORAGE 50000
31    
32  void stringcopy(TString& s1, const TString& s2, Int_t from=0, Int_t to=0){      void stringcopy(TString& s1, const TString& s2, Int_t from=0, Int_t to=0){    
33      if ( to == 0 ){      if ( to == 0 ){
# Line 42  void FTrkQLook_BASIC(TString file,Int_t Line 46  void FTrkQLook_BASIC(TString file,Int_t
46    //    //
47    //   obtain information about the data file and select the output dir    //   obtain information about the data file and select the output dir
48    const string filepath=file.Data();    const string filepath=file.Data();
49    Int_t dwpos = filepath.rfind("DW_");    Int_t dwpos = filepath.rfind("/");
50    Int_t dwpos1 = filepath.find(".root");    Int_t dwpos1 = filepath.find(".root");
51    TString fpath=(filepath.c_str());    TString fpath=(filepath.c_str());
52    TString base,ffile ;    TString base,ffile ;
53    stringcopy(ffile,fpath,dwpos,dwpos1);    stringcopy(ffile,fpath,dwpos+1,dwpos1);
54    stringcopy(base,fpath,0,dwpos);    stringcopy(base,fpath,0,dwpos);
55      if(dwpos>0) base+="/";
56    
57    TString out;    TString out;
58    if(outdir.Length()==0){    if(outdir.Length()==0){
# Line 59  void FTrkQLook_BASIC(TString file,Int_t Line 64  void FTrkQLook_BASIC(TString file,Int_t
64    //    //
65    // inizialise the variables and open the file    // inizialise the variables and open the file
66    pamela::tracker::TrackerEvent *te=0;    pamela::tracker::TrackerEvent *te=0;
67    pamela::EventHeader *eh=0,*eH=0;    pamela::EventHeader *eh=0,*eH=0,*ceh=0;
68    pamela::RunHeaderEvent *reh=0;    pamela::RunHeaderEvent *reh=0;
69    pamela::PscuHeader *ph=0,*pH=0;    pamela::PscuHeader *ph=0,*pH=0;
70      pamela::EventCounter *cod=0;
71    
72      pamela::PacketType *pctp=0;
73    
74    TFile *datafile = new TFile(file);    TFile *datafile = new TFile(file);
75    TTree *otr          = (TTree*)datafile->Get("RunHeader");    TTree *otr          = (TTree*)datafile->Get("RunHeader");
# Line 70  void FTrkQLook_BASIC(TString file,Int_t Line 78  void FTrkQLook_BASIC(TString file,Int_t
78    TTree *tr           = (TTree*)datafile->Get("Physics");    TTree *tr           = (TTree*)datafile->Get("Physics");
79    tr->SetBranchAddress("Tracker",&te);    tr->SetBranchAddress("Tracker",&te);
80    tr->SetBranchAddress("Header",&eh);    tr->SetBranchAddress("Header",&eh);
81      TTree *ctr          = (TTree*)datafile->Get("CalibTrk1");
82        ctr->SetBranchAddress("Header",&ceh);
83      
84      Long64_t neventC = ctr->GetEntries();
85    Long64_t nevent = tr->GetEntries();    Long64_t nevent = tr->GetEntries();
86    Long64_t neventH = otr->GetEntries();    Long64_t neventH = otr->GetEntries();
87    Int_t minevent=0;    Int_t minevent=0;
88    Int_t maxevent=0;    Int_t maxevent=0;
89    
90    printf("Number of total events: %lld\nNumber of total header events: %lld\n",nevent,neventH);    printf("Number of total events: %lld\nNumber of total header events: %lld\n",nevent,neventH);
91      printf("Number of calibration events: %lld\n",neventC);
92    
93    if (nevent<=0){    if (nevent<=0){
94      datafile->Close();      datafile->Close();
# Line 113  void FTrkQLook_BASIC(TString file,Int_t Line 124  void FTrkQLook_BASIC(TString file,Int_t
124    //    //
125    // other variables definitions    // other variables definitions
126    stringstream oss,fromfile,isfile;    stringstream oss,fromfile,isfile;
127    const Int_t size=nevent;    //
128    Int_t dsp=0,count=0,trk_cal_us[50];    // information about the RunHeader
129    Double_t perc;    Int_t HOBT[neventH];
130    Double_t yd[size*12], x[size+1];    Int_t trk_cal_us[neventH];
131    Double_t yyd[size+1],yyb[size], xb[size];    for (Int_t vi=0; vi<neventH;vi++){
132    ULong64_t HOBT[50];      HOBT[vi]=0;
133    TGraph *dataletime,*dataletime1;      trk_cal_us[vi]=0;
     
   for (Int_t i=0; i<50;i++){  
     HOBT[i]=0;  
     trk_cal_us[i]=0;  
134    }    }
135      
   //***************************************************************************************  
   // LOOP on each event  
   //***************************************************************************************  
   
136    //    //
137    // information about trk_calib_used    // information about RunHeader
138      Int_t countnboot=1;
139    for (Int_t ev=0; ev<neventH; ev++){    for (Int_t ev=0; ev<neventH; ev++){
140      otr->GetEntry(ev);      otr->GetEntry(ev);
141      pH = eH->GetPscuHeader();      pH = eH->GetPscuHeader();
142      HOBT[ev]= pH->GetOrbitalTime();      HOBT[ev]= pH->GetOrbitalTime();
143      trk_cal_us[ev]=reh->TRK_CALIB_USED;      trk_cal_us[ev]=reh->TRK_CALIB_USED;
144        if((HOBT[ev]<HOBT[ev-1]) && ev>0)
145          countnboot+=1;
146    }    }
147      countnboot+=2*(Int_t)nevent/MAXSTORAGE;
148      //  printf("\ncountnboot=%d\n",countnboot);
149    
150    //    //
151    // information about datalength    // information about calibration OBT
152    x[0]=(Double_t)HOBT[0];    Int_t COBT[neventC];
153    for (Int_t ev=minevent; ev<maxevent; ev++){    for (Int_t vi=0; vi<neventC;vi++){
154      tr->GetEntry(ev);      COBT[vi]=0;
155      ph = eh->GetPscuHeader();    }
156          for (Int_t ev=0; ev<neventC; ev++){
157      x[(ev-minevent)+1]= ph->GetOrbitalTime();      ctr->GetEntry(ev);
158      dsp=0;      pH = ceh->GetPscuHeader();
159      for(Int_t i=0; i<12; i++){      COBT[ev]= pH->GetOrbitalTime();
160        dsp=te->DSPnumber[i]-1;    }
       yd[(ev-minevent)*12+dsp]= te->DATAlength[i];  
     }  
   };  
   datafile->Close();  
   
   
   //****************************************************************************************  
   //Output figure  
   //****************************************************************************************  
     
   TCanvas *DataTimeCanv=new TCanvas("Tracker_Detector_Report_","",900,1200);  
   DataTimeCanv->SetFillColor(10);  
   DataTimeCanv->Range(0,0,100,100);  
   fromfile<<"FTrkQLook_BASIC      File: "<<ffile;  
   isfile<<"DATALENGTH vs. ORBITALTIME ";  
   
   TLatex *t=new TLatex();  
   t->SetTextFont(32);  
   t->SetTextColor(1);  
   t->SetTextAlign(12);  
   t->SetTextSize(0.02);  
   t->DrawLatex(2.,98.7,fromfile.str().c_str());  
   TLatex *t1=new TLatex();  
   t1->SetTextFont(32);  
   t1->SetTextColor(1);  
   t1->SetTextAlign(12);  
   t1->SetTextSize(0.02);  
   t1->DrawLatex(70.,98.7,isfile.str().c_str());  
   fromfile.str("");  
   isfile.str("");  
   
161    
162    //*************************************************************************************    //
163    //book pads and histos    // Style options
   //***************************************************************************************  
164    gStyle->SetLabelSize(0.06,"x");    gStyle->SetLabelSize(0.06,"x");
165    gStyle->SetLabelSize(0.06,"y");    gStyle->SetLabelSize(0.06,"y");
166    gStyle->SetStatFontSize(0.075);    gStyle->SetStatFontSize(0.075);
167    gStyle->SetOptStat(1110);    gStyle->SetOptStat(10);
168    gStyle->SetFillColor(10);      gStyle->SetFillColor(10);  
169    gStyle->SetTitleFontSize(0.1);    gStyle->SetTitleFontSize(0.1);
170      gStyle->SetTitleFillColor(10);
171    gStyle->SetTitleOffset(0.8,"y");    gStyle->SetTitleOffset(0.8,"y");
172    gStyle->SetTitleOffset(0.9,"x");    gStyle->SetTitleOffset(0.9,"x");
173    gStyle->SetTitleSize(0.06,"y");    gStyle->SetTitleSize(0.06,"y");
174    gStyle->SetTitleSize(0.055,"x");    gStyle->SetTitleSize(0.055,"x");
175    
176    TPad *pad[12];          //pad for histos    //***************************************************************************************
177    Double_t posy = 0.95;    // up y-coord - top pads    // LOOP on each event
178    Double_t hpad = 0;   // pad height    //***************************************************************************************
   Double_t posx1=0;          // left  x-coord - pad column  
   Double_t posx0=0;          //       x-coord - column division  
   Double_t wrel = 0;     // relative x size of first sub-column  
   Double_t marg = 0.004;   // margin among pads  
   
   hpad = (posy-marg*11)/6;  
   wrel = (1-marg*4)/2;  
   stringstream title;  
   stringstream hid;  
   
   for(Int_t n = 0; n<12; n++) {  
     if ( (n+1)%2==1 ) {  
       if(n>1) posy = posy-(marg*2+hpad);  
       posx1 = marg;  
       posx0 = posx1 + wrel;  
     }  
     else {  
       posx1 = posx0 + 2*marg;  
       posx0 = posx1 + wrel;  
     }  
179    
180      /* -----------> pad for histograms  */    if (fromevent!=0)
181      pad[n] = new TPad("pad"," ",posx1,posy-hpad,posx0,posy,18,0,0);      printf("\n Scan of events from %i to %i ... \n",minevent,maxevent-1);
182    };                else
183        printf("\n Scan of events from %i to %i ... \n",minevent+1,maxevent);
184        
185    TLine li;  
186    li.SetLineColor(1);    Int_t minev=minevent,maxev=maxevent,hin=0,hfin=0,cin=0,cfin=0;
187    li.SetLineStyle(1);    TPad *pad[12][countnboot];
188    li.SetLineWidth(1);    TGraph *dataletime[12][countnboot],*dataletime1[12][countnboot];
189    //**********************************************************************************    TCanvas *DataTimeCanv[countnboot];
190    // Fill Graphs and Histos    for(Int_t ii=0; ii<countnboot;ii++){
191    //**********************************************************************************      fromfile<<"FTrkQLook_BASIC      File: "<<ffile;
192    stringstream calus;      isfile<<"DATALENGTH vs. OBT   pag"<<ii+1;
193    TLatex *t2=new TLatex();      DataTimeCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
194    t2->SetTextFont(32);      DataTimeCanv[ii]->SetFillColor(10);
195    t2->SetTextColor(1);      DataTimeCanv[ii]->Range(0,0,100,100);
196    t2->SetTextAlign(13);  
197    t2->SetTextSize(0.08);      TLatex *t=new TLatex();
198        t->SetTextFont(32);
199    for (Int_t i=0; i<12 ; i++){      t->SetTextColor(1);
200      perc=0;      t->SetTextAlign(12);
201      count=0;      t->SetTextSize(0.02);
202      yyd[0]=-10000.;      t->DrawLatex(2.,98.7,fromfile.str().c_str());
203      for (Int_t ev=minevent; ev<maxevent; ev++){      TLatex *t1=new TLatex();
204        yyd[(ev-minevent)+1]=yd[12*(ev-minevent)+i];      t1->SetTextFont(32);
205        if(i==6){      t1->SetTextColor(1);
206          if(yyd[(ev-minevent)+1]>1500){      t1->SetTextAlign(12);
207            if(yyd[(ev-minevent)+1]<3075){      t1->SetTextSize(0.02);
208              yyb[count]= yyd[(ev-minevent)+1];      t1->DrawLatex(70.,98.7,isfile.str().c_str());
209              xb[count]= x[(ev-minevent)+1];      fromfile.str("");
210              count++;      isfile.str("");
211            }      
212          }      fromfile<<"D = Default Calibration";
213        isfile<<"O = OnLine Calibration";
214        t->SetTextColor(6);
215        t->SetTextSize(0.018);
216        t->DrawLatex(70.,97.,fromfile.str().c_str());
217        t->SetTextColor(3);
218        t->DrawLatex(70.,96.,isfile.str().c_str());
219        fromfile.str("");
220        isfile.str("");
221    
222        fromfile<<"The green arrow (if present) points out the time of the online calibration";
223        t->DrawLatex(7.,96.,fromfile.str().c_str());
224        fromfile.str("");
225    
226        //*************************************************************************************
227        //book pads and histos
228        //***************************************************************************************
229    
230        
231        Float_t posy = 0.95;    // up y-coord - top pads
232        Float_t hpad = 0;   // pad height
233        Float_t posx1=0;          // left  x-coord - pad column
234        Float_t posx0=0;          //       x-coord - column division
235        Float_t wrel = 0;     // relative x size of first sub-column
236        Float_t marg = 0.004;   // margin among pads
237        
238        hpad = (posy-marg*11)/6;
239        wrel = (1-marg*4)/2;
240        stringstream title;
241        stringstream hid;
242        
243        for(Int_t n = 0; n<12; n++) {
244          if ( (n+1)%2==1 ) {
245            if(n>1) posy = posy-(marg*2+hpad);
246            posx1 = marg;
247            posx0 = posx1 + wrel;
248          }
249          else {
250            posx1 = posx0 + 2*marg;
251            posx0 = posx1 + wrel;
252          }
253          
254          /* -----------> pad for histograms  */
255          oss<<"pad"<<n*100+ii;
256          pad[n][ii]=new TPad(oss.str().c_str()," ",posx1,posy-hpad,posx0,posy,18,0,0);
257          oss.str("");
258        };            
259    
260        TLine li;
261        li.SetLineColor(1);
262        li.SetLineStyle(1);
263        li.SetLineWidth(1);
264    
265        TArrow ar;
266        ar.SetLineColor(3);
267        stringstream calus;
268    
269        TLatex *t2=new TLatex();
270        t2->SetTextFont(32);
271        t2->SetTextColor(1);
272        t2->SetTextAlign(13);
273        t2->SetTextSize(0.08);
274    
275        Int_t i=0;
276        Float_t  x[MAXSTORAGE], xb[MAXSTORAGE];
277        Float_t yyd[MAXSTORAGE][12],yyb[MAXSTORAGE][12];
278        Int_t countbad[12];
279        Float_t perc=0,xMIN=0.,xMAX=0.;
280        for (Int_t n=0; n<12 ; n++)
281          countbad[n]=0;
282    
283        //
284        // obtain values of the datalenght
285        for (Int_t ev=minev; ev<maxevent; ev++){
286          tr->GetEntry(ev);
287          ph = eh->GetPscuHeader();
288          cod = eh->GetCounter();
289          
290          if(ev==minev){
291            if(cod->Get(pctp->CalibTrk1)>0) cin=cod->Get(pctp->CalibTrk1)-1;
292            else cin=cod->Get(pctp->CalibTrk1);
293            if(cin==cfin-1) cin+=1;
294    
295            if(cod->Get(pctp->RunHeader)>0) hin=cod->Get(pctp->RunHeader)-1;
296            else hin=cod->Get(pctp->RunHeader);
297            if(hin==hfin-1) hin+=1;
298          }
299    
300          if(ev==maxevent-1) maxev=maxevent-1;
301    
302          if((ph->GetOrbitalTime()<x[ev-minev-1] && ev-minev!=0) || ev-minev==MAXSTORAGE){
303            maxev=ev;
304            break;
305        }        }
306        else{        else{
307          if(yyd[(ev-minevent)+1]>750){          cfin=cod->Get(pctp->CalibTrk1);
308            if(yyd[(ev-minevent)+1]<3075){          hfin=cod->Get(pctp->RunHeader);
309              yyb[count]= yyd[(ev-minevent)+1];          x[(ev-minev)]= ph->GetOrbitalTime();
310              xb[count]= x[(ev-minevent)+1];          i=0;
311              count++;        
312            for (Int_t n=0; n<12 ; n++){
313              yyb[countbad[n]][i]=0;
314              xb[countbad[n]]= 0;
315            
316              i=te->DSPnumber[n]-1;
317            
318              yyd[(ev-minev)][i]=te->DATAlength[n];
319              if(i==6){
320                if(yyd[(ev-minev)][i]>1500){
321                  if(yyd[(ev-minev)][i]<3075){
322                    yyb[countbad[i]][i]= yyd[(ev-minev)][i];
323                    xb[countbad[i]]= x[(ev-minev)];
324                    countbad[i]+=1;
325                  }
326                }
327              }
328              else{
329                if(yyd[(ev-minev)][i]>750){
330                  if(yyd[(ev-minev)][i]<3075){
331                    yyb[countbad[i]][i]= yyd[(ev-minev)][i];
332                    xb[countbad[i]]= x[(ev-minev)];
333                    countbad[i]+=1;
334                  }
335                }
336            }            }
337          }          }
338        }        }
339      }      }
340            
341      if((maxevent-minevent)>100) perc=(count*100)/(maxevent-minevent);      //
342      else perc=(count*10)/(maxevent-minevent);      // define limit for the Xaxis of the graphs
343    
344        xMAX=x[maxev-minev-1]+(x[maxev-minev-1]-x[0])/10;
345        if(xMAX>1000000) xMIN=x[0]-(x[maxev-minev-1]-x[0])/10;
346        if(xMAX<1000000 || xMIN<0) xMIN=0.;      
347            
348        
349        //
350        // Draw Histos
351        for (Int_t i=0; i<12 ; i++){
352        
353          Float_t y[maxev-minev],yb[maxev-minev];
354          for(Int_t v=0;v<maxev-minev;v++){
355            y[v]=yyd[v][i];
356            yb[v]=yyb[v][i];
357          }
358          
359          if(xMAX<1000000){
360            x[maxev-minev-1]=0.;
361            y[maxev-minev-1]=0.;
362          }
363    
364          if((maxev-minev)>1000){
365            perc=(countbad[i]*100)/(maxev-minev);
366            if(perc>10) pad[i][ii]->SetFillColor(2);
367            else  pad[i][ii]->SetFillColor(10);
368          }
369          else{
370            if(countbad[i]>=100) pad[i][ii]->SetFillColor(2);
371            else pad[i][ii]->SetFillColor(10);
372          }
373    
374          oss<<"DSP  "<<i+1;
375          DataTimeCanv[ii]->cd();
376          pad[i][ii]->SetFrameFillColor(10);
377          pad[i][ii]->Draw();
378          pad[i][ii]->cd();
379          dataletime[i][ii]= new TGraph((maxev-minev),x,y);
380          dataletime[i][ii]->SetTitle(oss.str().c_str());
381          dataletime[i][ii]->GetXaxis()->SetTitle("OBT (ms)");
382          dataletime[i][ii]->GetXaxis()->CenterTitle();
383          dataletime[i][ii]->GetXaxis()->SetRangeUser(xMIN,xMAX);
384          dataletime[i][ii]->GetYaxis()->SetTitle("datalength (Word 13 bit)");
385          dataletime[i][ii]->GetYaxis()->CenterTitle();
386          if(i==6) dataletime[i][ii]->GetYaxis()->SetRangeUser(0,4500);
387          else dataletime[i][ii]->GetYaxis()->SetRangeUser(0,4000);
388          dataletime[i][ii]->SetMarkerStyle(21);
389          if((maxev-minev)<50) dataletime[i][ii]->SetMarkerSize(0.5);
390          else dataletime[i][ii]->SetMarkerSize(0.3);
391          dataletime[i][ii]->SetMarkerColor(4);
392          dataletime[i][ii]->Draw("ap");
393    
394    
395          if((maxev-minev)>1000 && perc>10){
396            dataletime1[i][ii]= new TGraph(countbad[i],xb,yb);
397            dataletime1[i][ii]->SetMarkerStyle(21);
398            if((maxev-minev)<50) dataletime1[i][ii]->SetMarkerSize(0.5);
399            else dataletime1[i][ii]->SetMarkerSize(0.3);
400            dataletime1[i][ii]->SetMarkerColor(2);
401            dataletime1[i][ii]->Draw("psame");
402          }
403          else if((maxev-minev)<1000 && countbad[i]>=100){
404            dataletime1[i][ii]= new TGraph(countbad[i],xb,yb);
405            dataletime1[i][ii]->SetMarkerStyle(21);
406            if((maxev-minev)<50) dataletime1[i][ii]->SetMarkerSize(0.5);
407            else dataletime1[i][ii]->SetMarkerSize(0.3);
408            dataletime1[i][ii]->SetMarkerColor(2);
409            dataletime1[i][ii]->Draw("psame");
410          }
411          li.SetLineColor(1);
412          li.SetLineStyle(1);
413          li.SetLineWidth(1);
414          if(i!=6) li.DrawLine(xMIN,750,xMAX,750);
415          else li.DrawLine(xMIN,1500,xMAX,1500);
416          li.DrawLine(xMIN,3075,xMAX,3075);
417    
     Double_t min,max;  
     if((maxevent-minevent)<100){  
       min=x[0];  
       max=x[size]*1.0001;  
     }  
     else{  
       min=x[0];  
       max=x[size-1]*1.0005;  
     }  
     oss<<"DSP  "<<i+1;  
     DataTimeCanv->cd();  
     if(perc>1) pad[i]->SetFillColor(2);  
     else  pad[i]->SetFillColor(10);  
     pad[i]->SetFrameFillColor(10);  
     pad[i]->Draw();  
     pad[i]->cd();  
     dataletime= new TGraph((maxevent-minevent)+1,x,yyd);  
     dataletime->SetTitle(oss.str().c_str());  
     dataletime->GetXaxis()->SetTitle("OBT (ms)");  
     dataletime->GetXaxis()->CenterTitle();  
     dataletime->GetXaxis()->SetRangeUser(min,max);  
     dataletime->GetYaxis()->SetTitle("datalength (Word 13 bit)");  
     dataletime->GetYaxis()->CenterTitle();  
     dataletime->GetYaxis()->SetRangeUser(0,3500);  
     dataletime->SetMarkerStyle(21);  
     if((maxevent-minevent)<50) dataletime->SetMarkerSize(0.5);  
     else dataletime->SetMarkerSize(0.3);  
     dataletime->SetMarkerColor(1);  
     dataletime->Draw("ap");  
     if(perc>1){  
       dataletime1= new TGraph(count,xb,yyb);  
       dataletime1->SetMarkerStyle(21);  
       if((maxevent-minevent)<50) dataletime1->SetMarkerSize(0.5);  
       else dataletime1->SetMarkerSize(0.3);  
       dataletime1->SetMarkerColor(2);  
       dataletime1->Draw("psame");  
     }  
     li.SetLineColor(1);  
     li.SetLineStyle(1);  
     li.SetLineWidth(1);  
     if(i!=6) li.DrawLine(min,750,max,750);  
     else li.DrawLine(min,1500,max,1500);  
     li.DrawLine(min,3075,max,3075);  
     for(Int_t j=0;j<neventH;j++){  
418        li.SetLineColor(12);        li.SetLineColor(12);
419        li.SetLineStyle(4);        li.SetLineStyle(4);
420        li.SetLineWidth(1);        li.SetLineWidth(1);
421        li.DrawLine(HOBT[j],0.,HOBT[j],3500.);        for(Int_t j=hin;j<hfin;j++){
422        if(trk_cal_us[j]==104){          if(i==6)  li.DrawLine(HOBT[j],0.,HOBT[j],4500.);
423          calus<<"D";          else li.DrawLine(HOBT[j],0.,HOBT[j],4000.);
424          t2->SetTextColor(6);          if(trk_cal_us[j]==104){
425          t2->DrawLatex(HOBT[j],3350.,calus.str().c_str());            calus<<"D";
426          calus.str("");            t2->SetTextColor(6);
427        }            if(i==6)  t2->DrawLatex(HOBT[j],4350.,calus.str().c_str());
428        else{            else t2->DrawLatex(HOBT[j],3850.,calus.str().c_str());
429          calus<<trk_cal_us[j];            calus.str("");
430          t2->SetTextColor(3);          }      
431          t2->DrawLatex(HOBT[j],3350.,calus.str().c_str());          else{
432          calus.str("");            calus<<"O";
433              t2->SetTextColor(3);
434              if(i==6) t2->DrawLatex(HOBT[j],4350.,calus.str().c_str());
435              else t2->DrawLatex(HOBT[j],3850.,calus.str().c_str());
436              calus.str("");
437            }
438          }
439          for(Int_t j=cin;j<cfin;j++){
440            if(i==6)  ar.DrawArrow(COBT[j],1700.,COBT[j],2700.,0.01,"<");
441            else ar.DrawArrow(COBT[j],1000.,COBT[j],2000.,0.01,"<");
442        }        }
443                
444          oss.str("");
445          DataTimeCanv[ii]->Update();
446      }      }
447      oss.str("");    
448    };      minev=maxev;
449          if(maxev==maxevent-1) {
450    DataTimeCanv->Update();        countnboot=ii+1;
451          break;
452        }
453      }
454    printf("... end of packets. \n");    printf("... end of packets. \n");
455    
456    //*************************************************************************    //*************************************************************************
457    // Save output Files    // Save output Files
458    //*************************************************************************    //*************************************************************************
459    stringstream out1;    stringstream nom1,nom2,nom3;
460    
461      for(Int_t fl=0;fl<countnboot;fl++){
462        if(countnboot==1){
463          nom1<<ffile<<"_FTrkQLook_BASIC."<<outfile.Data();
464          DataTimeCanv[fl]->Print(out+nom1.str().c_str());
465          nom1.str("");
466        }
467    
468        if(countnboot>=2){
469          if(!strcmp(outfile.Data(),"ps") || !strcmp(outfile.Data(),"pdf")){
470            nom1.str("");
471            nom2.str("");
472            nom3.str("");
473            nom1<<ffile<<"_FTrkQLook_BASIC.ps(";
474            nom2<<ffile<<"_FTrkQLook_BASIC.ps";
475            nom3<<ffile<<"_FTrkQLook_BASIC.ps)";
476            if(fl==0) DataTimeCanv[fl]->Print(out+nom1.str().c_str(),"portrait");
477            else if(fl==countnboot-1) DataTimeCanv[fl]->Print(out+nom3.str().c_str(),"portrait");
478            else DataTimeCanv[fl]->Print(out+nom2.str().c_str(),"portrait");
479            
480          }
481          else{
482            nom1.str("");
483            nom1<<ffile<<"_FTrkQLook_BASIC-pag"<<fl+1<<"."<<outfile.Data();
484            DataTimeCanv[fl]->Print(out+nom1.str().c_str());
485          }
486        }
487      }
488        
489    out1<<ffile<<"_FTrkQLook_BASIC."<<outfile.Data();    //
490    DataTimeCanv->Print(out+out1.str().c_str());    // Convert ps to pdf if required
491    out1.str("");    if(!strcmp(outfile.Data(),"pdf") && countnboot>=2){
492        stringstream com;
493        com<<"ps2pdf13 "<<out<<ffile<<"_FTrkQLook_BASIC.ps "<<out<<ffile<<"_FTrkQLook_BASIC.pdf";
494        system(com.str().c_str());
495        printf("\n---> ps file converted in pdf format!\n");
496        com.str("");
497        com<<"rm -f "<<out<<ffile<<"_FTrkQLook_BASIC.ps";
498        system(com.str().c_str());
499        printf("---> ps file removed!\n\n");
500        com.str("");
501       }    
502        
503      datafile->Close();
504    gROOT->Reset();    gROOT->Reset();
505    return;    return;
506  }  }
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.7
  ViewVC Help
Powered by ViewVC 1.1.23