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