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

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

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

revision 1.6 by pam-fi, Thu Jun 8 10:33:53 2006 UTC revision 1.18 by pam-fi, Mon Oct 2 13:05:39 2006 UTC
# Line 1  Line 1 
1  /**  /**
2   * FTrkQLook_EXPERT   * FTrkQLook_EXPERT.cxx
3   *   *
4   * autor: D.Fedele   * autor: D.Fedele
5   * version 2.0   * version v1r14
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 19  Line 19 
19  #include <TLatex.h>  #include <TLatex.h>
20  #include <TCanvas.h>  #include <TCanvas.h>
21  #include <TGraph.h>  #include <TGraph.h>
22    #include <TFile.h>
23  #include <TTree.h>  #include <TTree.h>
24  #include <TStyle.h>  #include <TStyle.h>
25  //  //
# Line 29  Line 30 
30  #include <TrkAlarmEvent.h>  #include <TrkAlarmEvent.h>
31  #include <tsbt/TsbTRecord.h>  #include <tsbt/TsbTRecord.h>
32  #include <tsbt/TsbTEvent.h>  #include <tsbt/TsbTEvent.h>
33    #include <tsbb/TsbBRecord.h>
34    #include <tsbb/TsbBEvent.h>
35  #include <EventCounter.h>  #include <EventCounter.h>
36  #include <PacketType.h>  #include <PacketType.h>
37  //  //
38  #define MAXSTORAGE 50000  #define MAXSTORAGE 50000
39    
 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);  
   };  
 };  
   
   
40  void FTrkQLook_EXPERT(TString file,Int_t fromevent,Int_t toevent, TString outdir, TString outfile)  void FTrkQLook_EXPERT(TString file,Int_t fromevent,Int_t toevent, TString outdir, TString outfile)
41  {  {
42    //    //
43    //   obtain information about the data file and select the output dir    //   obtain information about the data file and select the output dir
44    const string filepath=file.Data();    Int_t dwpos = file.Last('/');
45    Int_t dwpos = filepath.rfind("/");    Int_t dwpos1 = file.Last('.');
   Int_t dwpos1 = filepath.find(".root");  
   TString fpath=(filepath.c_str());  
46    TString base,ffile ;    TString base,ffile ;
47    stringcopy(ffile,fpath,dwpos+1,dwpos1);    ffile=file(dwpos+1,dwpos1-(dwpos+1));
48    stringcopy(base,fpath,0,dwpos);    if(dwpos>0) base=file(0,dwpos);
   if(dwpos>0) base+="/";  
49    
50    TString out;    TString out;
51    if(outdir.Length()==0){    if(outdir.Length()==0){
# Line 65  void FTrkQLook_EXPERT(TString file,Int_t Line 53  void FTrkQLook_EXPERT(TString file,Int_t
53    }else{    }else{
54      out = outdir;      out = outdir;
55    }    }
56      if(out.Last('/')+1<out.Length()) out+="/";
57    
58    //    //
59    // inizialise the variables and open the file    // inizialise the variables and open the file
60    pamela::TsbTEvent  *event = 0;    pamela::TsbTEvent  *event = 0;
61    pamela::TsbTRecord *record = 0;    pamela::TsbTRecord *record = 0;
62      pamela::TsbBEvent  *Bevent = 0;
63      pamela::TsbBRecord *Brecord = 0;
64    pamela::tracker::TrackerEvent *te=0;    pamela::tracker::TrackerEvent *te=0;
65    pamela::EventHeader *eh=0,*aleh=0,*eH=0,*eT=0;    pamela::EventHeader *eh=0,*aleh=0,*eH=0,*eT=0,*eB=0;
66    pamela::PscuHeader *ph=0,*pH=0;    pamela::PscuHeader *ph=0,*pH=0;
67    pamela::TrkAlarmEvent *al=0;    pamela::TrkAlarmEvent *al=0;
68    pamela::RunHeaderEvent *reh=0;    pamela::RunHeaderEvent *reh=0;
# Line 80  void FTrkQLook_EXPERT(TString file,Int_t Line 71  void FTrkQLook_EXPERT(TString file,Int_t
71    pamela::PacketType *pctp=0;    pamela::PacketType *pctp=0;
72    
73    TFile *datafile = new TFile(file);    TFile *datafile = new TFile(file);
74      if ( !datafile ){
75        printf("No data file, exiting...\n");
76        return;
77      }
78    
79    TTree *tree = (TTree*)datafile->Get("TsbT");    TTree *tree = (TTree*)datafile->Get("TsbT");
80    tree->SetBranchAddress("TsbT",&event);    tree->SetBranchAddress("TsbT",&event);
81    tree->SetBranchAddress("Header",&eT);    tree->SetBranchAddress("Header",&eT);
82    
83      TTree *Btree = (TTree*)datafile->Get("TsbB");
84      Btree->SetBranchAddress("TsbB",&Bevent);
85      Btree->SetBranchAddress("Header",&eB);
86    
87    TTree *altr = (TTree*)datafile->Get("TrkAlarm");    TTree *altr = (TTree*)datafile->Get("TrkAlarm");
88    altr->SetBranchAddress("TrkAlarm",&al);    altr->SetBranchAddress("TrkAlarm",&al);
89    altr->SetBranchAddress("Header",&aleh);    altr->SetBranchAddress("Header",&aleh);
# Line 100  void FTrkQLook_EXPERT(TString file,Int_t Line 99  void FTrkQLook_EXPERT(TString file,Int_t
99    Long64_t nevent = tr->GetEntries();    Long64_t nevent = tr->GetEntries();
100    Long64_t neventH = otr->GetEntries();    Long64_t neventH = otr->GetEntries();
101    Long64_t tnevent = tree->GetEntries();    Long64_t tnevent = tree->GetEntries();
102      Long64_t bnevent = Btree->GetEntries();
103    Long64_t alnevent = altr->GetEntries();    Long64_t alnevent = altr->GetEntries();
104    Int_t minevent=0;    Int_t minevent=0;
105    Int_t maxevent=0;    Int_t maxevent=0;
# Line 107  void FTrkQLook_EXPERT(TString file,Int_t Line 107  void FTrkQLook_EXPERT(TString file,Int_t
107    printf("Number of total events: %lld\n",nevent);    printf("Number of total events: %lld\n",nevent);
108    printf("Number of header events: %lld\n",neventH);    printf("Number of header events: %lld\n",neventH);
109    printf("Number of TsbT events: %lld\n",tnevent);    printf("Number of TsbT events: %lld\n",tnevent);
110      printf("Number of TsbB events: %lld\n",bnevent);
111    printf("Number of TrkAlarm packet events: %lld\n",alnevent);    printf("Number of TrkAlarm packet events: %lld\n",alnevent);
112    
113    if (nevent<=0){    if (nevent<=0){
# Line 135  void FTrkQLook_EXPERT(TString file,Int_t Line 136  void FTrkQLook_EXPERT(TString file,Int_t
136      } else if (toevent > nevent) {              } else if (toevent > nevent) {        
137        maxevent = nevent;        maxevent = nevent;
138      } else {            } else {      
139        maxevent = toevent+1;          maxevent = nevent;  
140      }      }
141      nevent=maxevent-minevent ;      nevent=maxevent-minevent ;
142    }    }
143    
144    Long64_t obt=0;    //
145    const Int_t sizeH=neventH;    // information about the RunHeader
146    ULong64_t HOBT[sizeH];    ULong64_t HOBT[neventH];
147    Int_t trk_cal_us[sizeH],countrun=1;    Int_t trk_cal_us[neventH];
148    for (Int_t vi=0; vi<sizeH;vi++){    Int_t countnboot=1;
149      for (Int_t vi=0; vi<neventH;vi++){
150      HOBT[vi]=0;      HOBT[vi]=0;
151      trk_cal_us[vi]=0;      trk_cal_us[vi]=0;
152    }    }
# Line 153  void FTrkQLook_EXPERT(TString file,Int_t Line 155  void FTrkQLook_EXPERT(TString file,Int_t
155      pH = eH->GetPscuHeader();      pH = eH->GetPscuHeader();
156      HOBT[ev]= pH->GetOrbitalTime();      HOBT[ev]= pH->GetOrbitalTime();
157      trk_cal_us[ev]=reh->TRK_CALIB_USED;      trk_cal_us[ev]=reh->TRK_CALIB_USED;
158  //     if((HOBT[ev]<HOBT[ev-1]) && ev>0)      if((HOBT[ev]<HOBT[ev-1]) && ev>0)
159  //       countrun+=1;        countnboot+=1;
     //   printf("\n%lld\t\tcountrun=%d\n",HOBT[ev],countrun);  
160    }    }
161      countnboot+=(Int_t)(2*nevent/MAXSTORAGE);
162      //   printf("\ncountnboot=%d\n",countnboot);
163      
164    //    //
165    // other variables definitions    // other variables definitions
166    stringstream oss1,oss2,oss3,oss4,fromfile,isfile,tit;    stringstream oss1,oss2,oss3,oss4,fromfile,isfile,tit;
# Line 173  void FTrkQLook_EXPERT(TString file,Int_t Line 176  void FTrkQLook_EXPERT(TString file,Int_t
176      maxsize+=tmpSize;      maxsize+=tmpSize;
177    }    }
178    const Int_t tsize=maxsize;    const Int_t tsize=maxsize;
179    Int_t tempt[tsize][5],xt[tsize], tempt_tmp[tsize];    Int_t tempt[tsize][5];
180      ULong64_t xt[tsize];
181    
182      Int_t cntpgtemp=1,cntpgdat=0,cntpgmag=0;
183    //    //
184    // information about the temperatures    // information about the temperatures
185    for (Int_t ev=0; ev<tnevent; ev++){    for (Int_t ev=0; ev<tnevent; ev++){
# Line 181  void FTrkQLook_EXPERT(TString file,Int_t Line 187  void FTrkQLook_EXPERT(TString file,Int_t
187      tmpSize = event->Records->GetEntries();      tmpSize = event->Records->GetEntries();
188      for (Int_t j = 0; j < tmpSize; j++){      for (Int_t j = 0; j < tmpSize; j++){
189        record = (pamela::TsbTRecord*)event->Records->At(j);        record = (pamela::TsbTRecord*)event->Records->At(j);
190        xt[siztmp]=record->RECORD_OBT;  //0.051*record->RECORD_OBT;        xt[siztmp]=record->RECORD_OBT;
191        if((xt[siztmp]<xt[siztmp-1]) && siztmp>0)        if((xt[siztmp]<xt[siztmp-1]) && siztmp>0)
192          countrun+=1;          cntpgtemp+=1;
193                
194        for (Int_t z = 0; z < 5; z++){        for (Int_t z = 0; z < 5; z++){
195          tempt[siztmp][z] = record->TEMPERATURES[z+1];              tempt[siztmp][z] = record->TEMPERATURES[z+1];    
# Line 191  void FTrkQLook_EXPERT(TString file,Int_t Line 197  void FTrkQLook_EXPERT(TString file,Int_t
197        siztmp++;        siztmp++;
198      }      }
199    }    }
200  //   printf("\ncountrun=%d\n",countrun);    
201    countrun+=(Int_t)nevent/30000;    //
202      // information about the entries for the magnetic field
203      if(bnevent>0) cntpgmag=1;
204      maxsize=0;
205      for (Int_t ev=0; ev<bnevent; ev++){
206        Btree->GetEntry(ev);
207        tmpSize = Bevent->Records->GetEntries();
208        maxsize+=tmpSize;
209      }
210      const Int_t bsize=maxsize;
211      Int_t magt[bsize][5];
212      ULong64_t xb[bsize];
213      siztmp=0;
214      //
215      // information about the magnetic field
216      for (Int_t ev=0; ev<bnevent; ev++){
217        Btree->GetEntry(ev);
218        tmpSize = Bevent->Records->GetEntries();
219        for (Int_t j = 0; j < tmpSize; j++){
220          Brecord = (pamela::TsbBRecord*)Bevent->Records->At(j);
221          xb[siztmp]=Brecord->RECORD_OBT;
222          if((xb[siztmp]<xb[siztmp-1]) && siztmp>0)
223            cntpgmag+=1;
224          for (Int_t z = 0; z < 5; z++){
225            magt[siztmp][z] = Brecord->B_FIELD[z+1];    
226          }
227          siztmp++;
228        }
229      }
230        
231    //    //
232    // open the output text files for the alarms    // open the output text files for the alarms
# Line 212  void FTrkQLook_EXPERT(TString file,Int_t Line 246  void FTrkQLook_EXPERT(TString file,Int_t
246    // write the file for the TrkAlarm packet    // write the file for the TrkAlarm packet
247    if(alnevent==0) alarm1 <<endl<< "------>  NO ALARM!!! <-------"<< endl;    if(alnevent==0) alarm1 <<endl<< "------>  NO ALARM!!! <-------"<< endl;
248    else{    else{
249        Long64_t obt=0;
250      for (Int_t ev=0; ev<alnevent; ev++){      for (Int_t ev=0; ev<alnevent; ev++){
251        altr->GetEntry(ev);        altr->GetEntry(ev);
252        ph = aleh->GetPscuHeader();        ph = aleh->GetPscuHeader();
# Line 227  void FTrkQLook_EXPERT(TString file,Int_t Line 262  void FTrkQLook_EXPERT(TString file,Int_t
262        alarm1 << "================================================="<< endl<<endl;        alarm1 << "================================================="<< endl<<endl;
263                    
264        alarm1 << "Alarm variables (range 0-1)"<<endl;        alarm1 << "Alarm variables (range 0-1)"<<endl;
265        alarm1 << " ALARM[1]= 0x"<< hex << (Int_t)al->ALARM[1]<<endl;        alarm1 << " ALARM[1]= 0x"<< hex << (Int_t)al->ALARM[0]<<endl;
266        alarm1 << " ALARM[2]= 0x"<< (Int_t)al->ALARM[2]<<endl;        alarm1 << " ALARM[2]= 0x"<< (Int_t)al->ALARM[1]<<endl;
267        alarm1 << " CmdDuringTrig= 0x"<< (Int_t)al->CmdDuringTrig<<endl;        alarm1 << " CmdDuringTrig= 0x"<< (Int_t)al->CmdDuringTrig<<endl;
268        alarm1 << " FinalCheck= 0x"<< (Int_t)al->FinalCheck<<endl;        alarm1 << " FinalCheck= 0x"<< (Int_t)al->FinalCheck<<endl;
269        alarm1 << " FlashData= 0x"<< (Int_t)al->FlashData<<endl;        alarm1 << " FlashData= 0x"<< (Int_t)al->FlashData<<endl;
# Line 269  void FTrkQLook_EXPERT(TString file,Int_t Line 304  void FTrkQLook_EXPERT(TString file,Int_t
304      }      }
305    }    }
306    
307      //
308      // Set Style options
309    gStyle->SetLabelSize(0.05,"x");    gStyle->SetLabelSize(0.05,"x");
310    gStyle->SetLabelSize(0.06,"y");    gStyle->SetLabelSize(0.06,"y");
311    gStyle->SetStatFontSize(0.075);    gStyle->SetStatFontSize(0.075);
# Line 283  void FTrkQLook_EXPERT(TString file,Int_t Line 319  void FTrkQLook_EXPERT(TString file,Int_t
319    gStyle->SetTitleSize(0.06,"y");    gStyle->SetTitleSize(0.06,"y");
320    gStyle->SetTitleSize(0.055,"x");    gStyle->SetTitleSize(0.055,"x");
321    
322    //*************************************************************************************    //
323      //book pads and histos    // Define output canvas, histos and graphs
324      //***************************************************************************************    TCanvas *CompTimeCanv[countnboot],*EventNumCanv[countnboot],*TempCanv[cntpgtemp],*BfieldCanv[cntpgmag];
   
   TCanvas *CompTimeCanv[countrun],*EventNumCanv[countrun],*TempCanv[countrun];  
325    TCanvas *IlluminaCanv,*LandauCanv1,*LandauCanv2,*LandauCanv3;    TCanvas *IlluminaCanv,*LandauCanv1,*LandauCanv2,*LandauCanv3;
326    
327    TH1F *landau1[12],*landau2[12],*landau3[12],*illuminazione[12];    TH1F *landau1[12],*landau2[12],*landau3[12],*illuminazione[12];
328    TPad *pad1[12],*pad2[12],*pad3[12],*pad4[12],*pad5[12],*pad6[5];    TGraph *comprtime[12][countnboot],*temp[5][cntpgtemp],*tempw[5][cntpgtemp],*eventnumb[countnboot],*mag[5][cntpgmag];
329      TPad *pad1[12],*pad2[12],*pad3[12],*pad4[12],*pad5[12],*pad6[5],*pad7[5];
330    
331    for(Int_t n = 0; n<12; n++) {    for(Int_t n = 0; n<12; n++) {
332    
# Line 317  void FTrkQLook_EXPERT(TString file,Int_t Line 352  void FTrkQLook_EXPERT(TString file,Int_t
352    };                };            
353        
354    
   
355    //***************************************************************************************    //***************************************************************************************
356    // LOOP on each event    // LOOP on each event
357    //***************************************************************************************    //***************************************************************************************
# Line 330  void FTrkQLook_EXPERT(TString file,Int_t Line 364  void FTrkQLook_EXPERT(TString file,Int_t
364    TLatex *t=new TLatex();    TLatex *t=new TLatex();
365    TLatex *t1=new TLatex();    TLatex *t1=new TLatex();
366    
367    Int_t cntpgtemp=0,cntpgdat=0;    
368    Int_t minev=minevent,maxev=maxevent,countTEMP=0;    Int_t minev=minevent,maxev=maxevent,countTEMP=0,countMAG=0;
369    TGraph *comprtime[12][countrun],*temp[5][countrun],*eventnumb[countrun];    ULong_t countALARMx=0,countALARMy=0;
370    
371    for(Int_t ii=0; ii<countrun;ii++){    //
372      // Fill temperature graphs
373      for(Int_t ii=0; ii<cntpgtemp;ii++){
374      //****************************************************************************************      //****************************************************************************************
375      //Output figures --- Fifth sheet:      //Temperature Output Pages
376      //****************************************************************************************      //****************************************************************************************
377      fromfile.str("");      fromfile.str("");
378      fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;      fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;
# Line 356  void FTrkQLook_EXPERT(TString file,Int_t Line 392  void FTrkQLook_EXPERT(TString file,Int_t
392      t1->SetTextSize(0.02);      t1->SetTextSize(0.02);
393      t1->DrawLatex(78.,98.7,isfile.str().c_str());      t1->DrawLatex(78.,98.7,isfile.str().c_str());
394      isfile.str("");      isfile.str("");
395        t1->SetTextSize(0.025);
396        t1->SetTextColor(196);
397        isfile<<"--> Values at 28.5^{o}C (if presents) correspond";
398        t1->DrawLatex(50.,22.,isfile.str().c_str());
399        isfile.str("");
400        isfile<<"    to wrong readings ( > 100^{o}C) of the Tsb";
401        t1->DrawLatex(50.,19.,isfile.str().c_str());
402        isfile.str("");
403        isfile<<"--> Values at 25.5^{o}C (if presents) correspond";
404        t1->DrawLatex(50.,12.,isfile.str().c_str());
405        isfile.str("");
406        isfile<<"    to wrong readings ( < 0^{o}C) of the Tsb";
407        t1->DrawLatex(50.,9.,isfile.str().c_str());
408        isfile.str("");
409        
410      Float_t tposy = 0.95;    // up y-coord - top pads      Float_t tposy = 0.95;    // up y-coord - top pads
411      Float_t thpad = 0;   // pad height      Float_t thpad = 0;   // pad height
# Line 381  void FTrkQLook_EXPERT(TString file,Int_t Line 431  void FTrkQLook_EXPERT(TString file,Int_t
431        /* -----------> pad for histograms  */        /* -----------> pad for histograms  */
432        pad6[i] = new TPad("pad6"," ",tposx1,tposy-thpad,tposx0,tposy,18,0,0);        pad6[i] = new TPad("pad6"," ",tposx1,tposy-thpad,tposx0,tposy,18,0,0);
433    
434        Int_t v=0,xt_tmp[tsize];        Int_t v=0,vv=0;
435          Double_t xt_tmp[tsize], tempt_tmp[tsize];
436          Double_t xt_tmpw[tsize], tempt_tmpw[tsize];
437        for (Int_t ev=countTEMP; ev<tsize; ev++){        for (Int_t ev=countTEMP; ev<tsize; ev++){
438                
439          if(ev==tsize-1 && i==4) countTEMP=tsize-1;          if(ev==tsize-1 && i==4 && ii==cntpgtemp-1) countTEMP=tsize-1;
440          if(xt[ev]<xt[ev-1] && ev>countTEMP){          if(xt[ev]<xt[ev-1] && ev>countTEMP){
441            if(i==4) countTEMP=ev;            if(i==4) countTEMP=ev;
442            break;            break;
443          }          }
444          else{          else{
445            if(tempt[ev][i]!=65535){              tempt_tmp[v]=(Double_t)((Int_t)(((3.3*tempt[ev][i]/4096)-0.586)/0.0231));
446              tempt_tmp[v]=(Int_t)(((3.3*tempt[ev][i]/4096)-0.586)/0.0231);              if(tempt_tmp[v]>100) {
447              if(tempt_tmp[v]>0) xt_tmp[v++]=xt[ev];                tempt_tmp[v]=28.5;
448            }                tempt_tmpw[vv]=28.5;
449                  xt_tmpw[vv++]=(Double_t)xt[ev];
450                }
451                else if(tempt_tmp[v]<0){
452                  tempt_tmp[v]=25.5;
453                  tempt_tmpw[vv]=25.5;
454                  xt_tmpw[vv++]=(Double_t)xt[ev];
455                }
456                xt_tmp[v++]=(Double_t)xt[ev];
457          }          }
458        }        }
459        TempCanv[ii]->cd();        TempCanv[ii]->cd();
# Line 403  void FTrkQLook_EXPERT(TString file,Int_t Line 463  void FTrkQLook_EXPERT(TString file,Int_t
463        pad6[i]->cd();        pad6[i]->cd();
464        temp[i][ii]= new TGraph(v,xt_tmp,tempt_tmp);        temp[i][ii]= new TGraph(v,xt_tmp,tempt_tmp);
465        temp[i][ii]->SetTitle(tit.str().c_str());        temp[i][ii]->SetTitle(tit.str().c_str());
466          if(v==1) temp[i][ii]->GetXaxis()->SetNdivisions(502,kTRUE);
467        temp[i][ii]->GetXaxis()->SetLabelSize(0.04);        temp[i][ii]->GetXaxis()->SetLabelSize(0.04);
468        temp[i][ii]->GetXaxis()->SetTitleSize(0.04);        temp[i][ii]->GetXaxis()->SetTitleSize(0.04);
469        temp[i][ii]->GetXaxis()->SetTitle("OBT (ms)");        temp[i][ii]->GetXaxis()->SetTitle("OBT (ms)");
# Line 418  void FTrkQLook_EXPERT(TString file,Int_t Line 479  void FTrkQLook_EXPERT(TString file,Int_t
479        temp[i][ii]->SetMarkerSize(0.2);        temp[i][ii]->SetMarkerSize(0.2);
480        temp[i][ii]->Draw("ap");        temp[i][ii]->Draw("ap");
481        tit.str("");        tit.str("");
482          if(vv>0){
483            tempw[i][ii]= new TGraph(vv,xt_tmpw,tempt_tmpw);
484            tempw[i][ii]->SetMarkerStyle(21);
485            tempw[i][ii]->SetMarkerSize(0.2);
486            tempw[i][ii]->SetMarkerColor(196);
487            tempw[i][ii]->Draw("samep");
488          }
489        TempCanv[ii]->Update();        TempCanv[ii]->Update();
490            
491                
492      }      }
493      if(countTEMP==tsize-1){      if(countTEMP==tsize-1 && ii==cntpgtemp-1){
       cntpgtemp=ii+1;  
494        break;        break;
495      }      }
496    }    }
497    
498      //
499      // Fill magnetic field graphs
500      for(Int_t ii=0; ii<cntpgmag;ii++){
501        //****************************************************************************************
502        //Magnetic Field Output Pages
503        //****************************************************************************************
504        fromfile.str("");
505        fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;
506        isfile<<"Magnetic Axial Field vs OBT   pag"<<ii+1;
507        BfieldCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
508        BfieldCanv[ii]->SetFillColor(10);
509        BfieldCanv[ii]->Range(0,0,100,100);
510        
511        t->SetTextFont(32);
512        t->SetTextColor(1);
513        t->SetTextAlign(12);
514        t->SetTextSize(0.02);
515        t->DrawLatex(2.,98.7,fromfile.str().c_str());
516        t1->SetTextFont(32);
517        t1->SetTextColor(1);
518        t1->SetTextAlign(12);
519        t1->SetTextSize(0.02);
520        t1->DrawLatex(70.,98.7,isfile.str().c_str());
521        isfile.str("");
522      
523        TLine li;
524        li.SetLineStyle(1);
525        li.SetLineWidth(1);
526        li.SetLineColor(190);
527        t1->SetTextColor(190);
528        t1->SetTextSize(0.04);
529        
530        Float_t tposy = 0.95;    // up y-coord - top pads
531        Float_t thpad = 0;   // pad height
532        Float_t tposx1=0;          // left  x-coord - pad column
533        Float_t tposx0=0;          //       x-coord - column division
534        Float_t twrel = 0;     // relative x size of first sub-column
535        Float_t tmarg = 0.004;   // margin among pads
536      
537        thpad = (tposy-tmarg*5)/3;
538        twrel = (1-tmarg*4)/2;
539        
540        for(Int_t i=0; i<5; i++){
541          if ( (i+1)%2==1 ) {
542            if(i>1) tposy = tposy-(tmarg*2+thpad);
543            tposx1 = tmarg;
544            tposx0 = tposx1 + twrel;
545          }
546          else {
547            tposx1 = tposx0 + 2*tmarg;
548            tposx0 = tposx1 + twrel;
549          }
550          
551          /* -----------> pad for histograms  */
552          pad7[i] = new TPad("pad7"," ",tposx1,tposy-thpad,tposx0,tposy,18,0,0);
553          
554          Int_t v=0;
555          Double_t xb_tmp[bsize], magt_tmp[bsize];
556          for (Int_t ev=countMAG; ev<bsize; ev++){
557            
558            if(ev==bsize-1 && i==4 && ii==cntpgmag-1) countMAG=bsize-1;
559            if(xb[ev]<xb[ev-1] && ev>countMAG){
560              if(i==4) countMAG=ev;
561              break;
562            }
563            else{
564              magt_tmp[v]=(Double_t)magt[ev][i];
565              xb_tmp[v++]=(Double_t)xb[ev];
566            }
567          }
568          BfieldCanv[ii]->cd();
569          tit<<"B"<<i+5<<" (magnetic module "<<i+1<<")";
570          pad7[i]->SetFillColor(10);
571          pad7[i]->Draw();
572          pad7[i]->cd();
573          mag[i][ii]= new TGraph(v,xb_tmp,magt_tmp);
574          mag[i][ii]->SetTitle(tit.str().c_str());
575          mag[i][ii]->GetXaxis()->SetNdivisions(502,kTRUE);
576          mag[i][ii]->GetXaxis()->SetLabelSize(0.04);
577          mag[i][ii]->GetXaxis()->SetTitleSize(0.04);
578          mag[i][ii]->GetXaxis()->SetTitle("OBT (ms)");
579          mag[i][ii]->GetXaxis()->CenterTitle();
580          mag[i][ii]->GetXaxis()->SetTitleOffset(0.85);
581          if(i!=4) mag[i][ii]->GetYaxis()->SetRangeUser(2047,2058);
582          else mag[i][ii]->GetYaxis()->SetRangeUser(2060,2067);
583          mag[i][ii]->GetYaxis()->SetTitleOffset(1.2);
584          mag[i][ii]->GetYaxis()->SetLabelOffset(0.001);
585          mag[i][ii]->GetYaxis()->SetLabelSize(0.03);
586          mag[i][ii]->GetYaxis()->SetTitleSize(0.04);
587          mag[i][ii]->GetYaxis()->SetTitle("Magnetic Field (au)");
588          mag[i][ii]->GetYaxis()->CenterTitle();
589          mag[i][ii]->SetMarkerStyle(21);
590          mag[i][ii]->SetMarkerSize(0.4);
591          mag[i][ii]->Draw("ap");
592          Double_t min=0.,max=0,xlat=0.;
593          min=mag[i][ii]->GetXaxis()->GetXmin();
594          max=mag[i][ii]->GetXaxis()->GetXmax();
595          xlat=min+(max-min)/2;
596          stringstream mi,ma;
597          mi<<"minimum recorded value";
598          ma<<"maximum recorded value";
599          t->SetTextSize(0.1);
600          switch(i){
601            case 0:
602              li.DrawLine(min,2054.,max,2054.);
603              li.DrawLine(min,2048.,max,2048.);
604              t1->DrawLatex(xlat,2054.3,ma.str().c_str());
605              t1->DrawLatex(xlat,2047.7,mi.str().c_str());  
606              break;
607    
608            case 1:
609              li.DrawLine(min,2055.,max,2055.);
610              li.DrawLine(min,2050.,max,2050.);
611              t1->DrawLatex(xlat,2055.3,ma.str().c_str());
612              t1->DrawLatex(xlat,2049.7,mi.str().c_str());
613              break;
614    
615            case 2:
616              li.DrawLine(min,2056.,max,2056.);
617              li.DrawLine(min,2051.,max,2051.);
618              t1->DrawLatex(xlat,2056.3,ma.str().c_str());
619              t1->DrawLatex(xlat,2050.7,mi.str().c_str());
620              break;
621          
622            case 3:
623              li.DrawLine(min,2057.,max,2057.);
624              li.DrawLine(min,2052.,max,2052.);
625              t1->DrawLatex(xlat,2057.3,ma.str().c_str());
626              t1->DrawLatex(xlat,2051.7,mi.str().c_str());
627              break;
628    
629            case 4:
630              li.DrawLine(min,2066.,max,2066.);
631              li.DrawLine(min,2061.,max,2061.);
632              t1->DrawLatex(xlat,2066.15,ma.str().c_str());
633              t1->DrawLatex(xlat,2060.85,mi.str().c_str());
634              break;
635    
636    for(Int_t ii=0; ii<countrun;ii++){        }
637      TPaveText *pt1;        BfieldCanv[ii]->Update();
638      TPad *pt,*pt0;         //pad for histos        tit.str("");
639        }
640        if(countMAG==bsize-1 && ii==cntpgmag-1){
641          break;
642        }
643      }
644        
     ofstream warning(out + "warning.txt",ios::out);  
645    
646      //
647      // Fill compressiontime and eventnumber graphs and DSP warnings
648      for(Int_t ii=0; ii<countnboot;ii++){
649        TPad *pt;         //pad for histos
650      
651      //****************************************************************************************      //****************************************************************************************
652      //Output figures --- First sheet:      //COMPRESSIONTIME vs. OBT Output Pages
653      //****************************************************************************************      //****************************************************************************************
654      fromfile.str("");      fromfile.str("");
655      fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;      fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;
# Line 456  void FTrkQLook_EXPERT(TString file,Int_t Line 670  void FTrkQLook_EXPERT(TString file,Int_t
670      isfile.str("");      isfile.str("");
671    
672      //****************************************************************************************      //****************************************************************************************
673      //Output figures --- Second sheet:      //DSP EVENT NUMBER Output Pages
674      //****************************************************************************************      //****************************************************************************************
675    
676      isfile<<"WARNINGS on DSP EVENT NUMBER   pag"<<ii+1;      isfile<<"DSP EVENT NUMBER vs. OBT   pag"<<ii+1;
677      EventNumCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);      EventNumCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
678      EventNumCanv[ii]->SetFillColor(10);      EventNumCanv[ii]->SetFillColor(10);
679      EventNumCanv[ii]->Range(0,0,100,100);      EventNumCanv[ii]->Range(0,0,100,100);
# Line 472  void FTrkQLook_EXPERT(TString file,Int_t Line 686  void FTrkQLook_EXPERT(TString file,Int_t
686      t1->SetTextColor(1);      t1->SetTextColor(1);
687      t1->SetTextAlign(12);      t1->SetTextAlign(12);
688      t1->SetTextSize(0.02);      t1->SetTextSize(0.02);
689      t1->DrawLatex(65.,98.7,isfile.str().c_str());      t1->DrawLatex(62.,98.7,isfile.str().c_str());
690      isfile.str("");      isfile.str("");
691    
692      Float_t posy = 0.95;    // up y-coord - top pads      Float_t posy = 0.95;    // up y-coord - top pads
# Line 504  void FTrkQLook_EXPERT(TString file,Int_t Line 718  void FTrkQLook_EXPERT(TString file,Int_t
718        pad4[n] = new TPad("pad4"," ",posx1,posy-hpad,posx0,posy,18,0,0);        pad4[n] = new TPad("pad4"," ",posx1,posy-hpad,posx0,posy,18,0,0);
719        pad5[n] = new TPad("pad5"," ",posx1,posy-hpad,posx0,posy,18,0,0);        pad5[n] = new TPad("pad5"," ",posx1,posy-hpad,posx0,posy,18,0,0);
720      }      }
     //**********************************************************************************  
     // Fill Graphs and Histos  
     //**********************************************************************************  
721        
722      //      //
723      // information about the tracker data      // Obtain information about the tracker data
724      Int_t warning_dspnumber=0;      // and fill graphs and histos
725      Float_t x[MAXSTORAGE];  
726        Int_t al=0;
727        Double_t x[MAXSTORAGE];
728      Float_t yc[MAXSTORAGE][12];      Float_t yc[MAXSTORAGE][12];
729      Float_t eventint[MAXSTORAGE];      Double_t eventint[MAXSTORAGE];
730        Int_t eventn[12];
731        
732      for (Int_t ev=minev; ev<maxevent; ev++){      for (Int_t ev=minev; ev<maxevent; ev++){
733        tr->GetEntry(ev);        tr->GetEntry(ev);
734        ph = eh->GetPscuHeader();        ph = eh->GetPscuHeader();
735        cod = eh->GetCounter();        cod = eh->GetCounter();
736        
737    
738        if(ev==maxevent-1) maxev=maxevent-1;        if(ev==maxevent-1) maxev=maxevent-1;
739    
740        if((ph->GetOrbitalTime()<x[ev-minev-1] && ev-minev!=0) || ev-minev==MAXSTORAGE){        if((ph->GetOrbitalTime()<x[ev-minev-1] && ev-minev!=0) || ev-minev==MAXSTORAGE){
# Line 532  void FTrkQLook_EXPERT(TString file,Int_t Line 747  void FTrkQLook_EXPERT(TString file,Int_t
747                    
748          Int_t dsp=0;          Int_t dsp=0;
749          for(Int_t i=0; i<12; i++){          for(Int_t i=0; i<12; i++){
750              if(te->DSPnumber[i]<1 || te->DSPnumber[i]>12) {
751                ALARM=1;
752                break;
753              }
754    
755            dsp=te->DSPnumber[i]-1;            dsp=te->DSPnumber[i]-1;
756            yc[(ev-minev)][dsp]= 0.051*te->compressiontime[i];            yc[(ev-minev)][dsp]= 0.051*te->compressiontime[i];
757              
758              //
759              // Fill Cluster Signal and Lighting of the view histos
760            for(Int_t j=0;j<3;j++){            for(Int_t j=0;j<3;j++){
761              if(te->signcluster[i][j]!=0){              if(te->signcluster[i][j]!=0){
762                if((te->addrcluster[i][j]>6 && te->addrcluster[i][j]<505) ||(te->addrcluster[i][j]>518 && te->addrcluster[i][j]<1018)){                if((te->addrcluster[i][j]>6 && te->addrcluster[i][j]<505) ||(te->addrcluster[i][j]>518 && te->addrcluster[i][j]<1018)){
# Line 544  void FTrkQLook_EXPERT(TString file,Int_t Line 766  void FTrkQLook_EXPERT(TString file,Int_t
766            }            }
767            if(trk_cal_us[cod->Get(pctp->RunHeader)]!=104){            if(trk_cal_us[cod->Get(pctp->RunHeader)]!=104){
768              if(!(dsp%2)){              if(!(dsp%2)){
769                //              if((te->addrcluster[i][0]>6 && te->addrcluster[i][0]<505) ||(te->addrcluster[i][0]>518 && te->addrcluster[i][0]<1018))                if(te->signcluster[i][0]!=0) landau1[dsp]->Fill((Float_t)(1024.-te->signcluster[i][0]));
770                  if(te->signcluster[i][0]!=0) landau1[dsp]->Fill((Float_t)(1024.-te->signcluster[i][0]));                if(te->signcluster[i][1]!=0) landau2[dsp]->Fill((Float_t)(1024.-te->signcluster[i][1]));
771                  //      if((te->addrcluster[i][1]>6 && te->addrcluster[i][1]<505) ||(te->addrcluster[i][1]>518 && te->addrcluster[i][1]<1018))                if(te->signcluster[i][2]!=0) landau3[dsp]->Fill((Float_t)(1024.-te->signcluster[i][2]));
                 if(te->signcluster[i][1]!=0) landau2[dsp]->Fill((Float_t)(1024.-te->signcluster[i][1]));  
                 // if((te->addrcluster[i][2]>6 && te->addrcluster[i][2]<505) ||(te->addrcluster[i][2]>518 && te->addrcluster[i][2]<1018))  
                 if(te->signcluster[i][2]!=0) landau3[dsp]->Fill((Float_t)(1024.-te->signcluster[i][2]));  
772              }              }
773              else{              else{
774                // if((te->addrcluster[i][0]>6 && te->addrcluster[i][0]<505) ||(te->addrcluster[i][0]>518 && te->addrcluster[i][0]<1018))                if(te->signcluster[i][0]!=0) landau1[dsp]->Fill((Float_t)te->signcluster[i][0]);
775                  if(te->signcluster[i][0]!=0) landau1[dsp]->Fill((Float_t)te->signcluster[i][0]);                if(te->signcluster[i][1]!=0) landau2[dsp]->Fill((Float_t)te->signcluster[i][1]);
776                  // if((te->addrcluster[i][1]>6 && te->addrcluster[i][1]<505) ||(te->addrcluster[i][1]>518 && te->addrcluster[i][1]<1018))                if(te->signcluster[i][2]!=0) landau3[dsp]->Fill((Float_t)te->signcluster[i][2]);
                 if(te->signcluster[i][1]!=0) landau2[dsp]->Fill((Float_t)te->signcluster[i][1]);  
                 //      if((te->addrcluster[i][2]>6 && te->addrcluster[i][2]<505) ||(te->addrcluster[i][2]>518 && te->addrcluster[i][2]<1018))  
                 if(te->signcluster[i][2]!=0) landau3[dsp]->Fill((Float_t)te->signcluster[i][2]);  
777              }              }
778            }            }
779    
# Line 567  void FTrkQLook_EXPERT(TString file,Int_t Line 783  void FTrkQLook_EXPERT(TString file,Int_t
783              WARNING[i] = 1; // DSP warning              WARNING[i] = 1; // DSP warning
784            };            };
785    
786            if(te->alarm[i]!=0){ // hardware alarm            if(dsp%2==0 && te->alarm[i]!=0){ // hardware alarm
787              ALARM = 1;              if(countALARMy==0)
788                  ALARM = 1;
789                countALARMy+=1;
790              };
791    
792              if(dsp%2==1 && te->alarm[i]!=0){ // hardware alarm
793                if(countALARMx==0)
794                  ALARM = 1;
795                countALARMx+=1;
796            };            };
797                
798            //**************************************************************************************            //**************************************************************************************
799            // warning for internal number            // warning for internal number
800            //**************************************************************************************            //**************************************************************************************
801            if(i<=10){            if(ev==minev && i<=10 && te->eventn[i]!=te->eventn[i+1]) ALARM=1;
802              if(te->eventn[i]!=te->eventn[i+1]){            if((ev-minev)>=1 && eventn[i]+1!=te->eventn[i] && te->eventn[i]!=1) ALARM=1;
               warning_dspnumber++;  
               warning<< "==> WARNING!!    Check entry "<< ev<<" (DSP "<<dsp<<")" <<endl<<  
                 "eventn["<<i<<"]= "<<te->eventn[i]<<"!= eventn["<<i+1<<"]= "<< te->eventn[i+1]<<endl;  
             }  
             else  
               eventint[(ev-minev)]=te->eventn[0];  
           }  
803          }          }
804            eventint[(ev-minev)]=te->eventn[0];
805    
         if(ev<=maxevent-1){  
   
           if((ev-minev)>=1 && eventint[(ev-minev)]!=eventint[(ev-minev)-1]+1 && eventint[(ev-minev)]!=1){  
             warning_dspnumber++;  
             warning<< "==> WARNING!!    Check entry "<< ev<<endl<<  
               " DSP event num.= "<< eventint[(ev-minev)]<<  
               " is different from (previus+1) ="<<eventint[(ev-minev)-1]+1 <<"\n"<<endl;  
           }  
         }  
         
806          //********************************************************************************************          //********************************************************************************************
807          // file ALARM          // file DSP warning
808          //********************************************************************************************          //********************************************************************************************
809    
810          if(ALARM==1) {            if(ALARM==1) {  
811              al=1;
812            alarm <<endl<< "================================================="<< endl;            alarm <<endl<< "================================================="<< endl;
813            alarm << "PSCU-Pkt N. "<< ph->GetCounter() ;            alarm << "PSCU-Pkt N. "<< ph->GetCounter() ;
814            alarm << " - OBT "<< ph->GetOrbitalTime() << " ms"<<endl;            alarm << " - OBT "<< ph->GetOrbitalTime() << " ms"<<endl;
815            alarm << "(ROOT-tree entry "<<ev<<")"<<endl;            alarm << "Total events "<<nevent<<endl;
816              alarm << "(ROOT-tree entry "<<ev<<" in page "<<ii+1<<" )"<<endl;
817            alarm << "================================================="<< endl;            alarm << "================================================="<< endl;
818                        
819            alarm << " DSPn";            alarm << " DSPn";
820            alarm << " Event";            alarm << " Counter";
821              alarm << " previous";
822            alarm << " Words";            alarm << " Words";
823            alarm << " crc";            alarm << " crc";
824            alarm << "  FC";            alarm << "  FC";
# Line 620  void FTrkQLook_EXPERT(TString file,Int_t Line 831  void FTrkQLook_EXPERT(TString file,Int_t
831                        
832            for(Int_t i=0; i<12 ; i++){            for(Int_t i=0; i<12 ; i++){
833              alarm.width(5); alarm << te->DSPnumber[i];              alarm.width(5); alarm << te->DSPnumber[i];
834              alarm.width(6); alarm << te->eventn[i];              alarm.width(8); alarm << te->eventn[i];
835                alarm.width(8); alarm << eventn[i];
836              alarm.width(6); alarm << te->DATAlength[i];              alarm.width(6); alarm << te->DATAlength[i];
837              alarm.width(4); alarm << te->crc[i];              alarm.width(4); alarm << te->crc[i];
838              alarm.width(4); alarm << te->fc[i];              alarm.width(4); alarm << te->fc[i];
# Line 635  void FTrkQLook_EXPERT(TString file,Int_t Line 847  void FTrkQLook_EXPERT(TString file,Int_t
847              alarm    << endl;              alarm    << endl;
848            }            }
849          }          }
850            for(Int_t i=0; i<12 ; i++)
851              eventn[i]=te->eventn[i];
852          }
853        }
854        if(al==0) alarm << endl<< "Page "<<ii+1<< ": ------>  NO ALARM!!! <-------"<<endl;
855        if(maxev==maxevent-1) {
856          if(countALARMy!=0){
857            if(countALARMy%6!=0) alarm << endl<<endl<< "***** "<<countALARMy/6+1 <<" events with hardware alarm in Y-view *****"<<endl;
858            else alarm << endl<<endl<< "***** "<<countALARMy/6 <<" events with hardware alarm in Y-view *****"<<endl;
859          }
860          if(countALARMx!=0){
861            if(countALARMx%6!=0) alarm << endl<<endl<< "***** "<<countALARMx/6+1 <<" events with hardware alarm in X-view *****"<<endl;
862            else alarm << endl<<endl<< "***** "<<countALARMx/6 <<" events with hardware alarm in X-view *****"<<endl;
863        }        }
864      }      }
     if(ALARM==0) alarm << endl<< "------>  NO ALARM!!! <-------"<<endl;  
     if(warning_dspnumber==0) warning<<"NONE"<<endl;  
865    
866        //
867        // Draw the graphs
868      for (Int_t i=0; i<12 ; i++){      for (Int_t i=0; i<12 ; i++){
869        Float_t yyc[maxev-minev];        Double_t yyc[maxev-minev];
870        for (Int_t v=0; v<maxev-minev; v++){        for (Int_t v=0; v<maxev-minev; v++){
871          yyc[v]=yc[v][i];          yyc[v]=yc[v][i];
872        }        }
# Line 658  void FTrkQLook_EXPERT(TString file,Int_t Line 883  void FTrkQLook_EXPERT(TString file,Int_t
883        comprtime[i][ii]->GetXaxis()->CenterTitle();        comprtime[i][ii]->GetXaxis()->CenterTitle();
884        comprtime[i][ii]->GetYaxis()->SetTitle("compressiontime (ms)");        comprtime[i][ii]->GetYaxis()->SetTitle("compressiontime (ms)");
885        comprtime[i][ii]->GetYaxis()->CenterTitle();        comprtime[i][ii]->GetYaxis()->CenterTitle();
886        comprtime[i][ii]->GetYaxis()->SetRangeUser(0,2);        // comprtime[i][ii]->GetYaxis()->SetRangeUser(0,3);
887        comprtime[i][ii]->Draw("ap");        comprtime[i][ii]->Draw("ap");
888        oss1.str("");        oss1.str("");
889        CompTimeCanv[ii]->Update();        CompTimeCanv[ii]->Update();
890      }      }
891        
892        
893      EventNumCanv[ii]->cd();      EventNumCanv[ii]->cd();
894      pt0=new TPad("pt0"," ",0.704,0.004,0.996,0.98);      pt = new TPad("pt"," ",0.02,0.01,1.,0.98,18,0,0);
     pt1 = new TPaveText(0.004,0.004,0.986,0.996);  
     pt = new TPad("pt"," ",0.004,0.004,0.7,0.98,18,0,0);  
     pt1->SetFillColor(10);  
     pt1->ReadFile(out + "warning.txt");  
     pt1->SetTextAlign(22);  
     pt1->SetTextSize(0.035);  
     pt0->SetFillColor(10);  
     pt0->SetFrameFillColor(10);  
     pt0->Draw();  
     pt0->cd();  
     pt1->Draw();  
     EventNumCanv[ii]->cd();  
895      pt->SetFillColor(10);      pt->SetFillColor(10);
896      pt->SetFrameFillColor(10);      pt->SetFrameFillColor(10);
897      pt->Draw();      pt->Draw();
898      pt->cd();      pt->cd();
899      eventnumb[ii]=new TGraph(maxev-minev,x,eventint);      eventnumb[ii]=new TGraph(maxev-minev,x,eventint);
900      eventnumb[ii]->SetTitle("");      eventnumb[ii]->SetTitle("");
901      eventnumb[ii]->GetXaxis()->SetLabelSize(0.04);      eventnumb[ii]->GetXaxis()->SetLabelSize(0.02);
902      eventnumb[ii]->GetXaxis()->SetTitleSize(0.04);      eventnumb[ii]->GetXaxis()->SetTitleSize(0.03);
903      eventnumb[ii]->GetXaxis()->SetTitle("OBT (ms)");      eventnumb[ii]->GetXaxis()->SetTitle("OBT (ms)");
904      eventnumb[ii]->GetXaxis()->CenterTitle();      eventnumb[ii]->GetXaxis()->CenterTitle();
905      eventnumb[ii]->GetXaxis()->SetTickLength(0.01);      eventnumb[ii]->GetXaxis()->SetTickLength(0.01);
906      eventnumb[ii]->GetXaxis()->SetTitleOffset(1.2);      eventnumb[ii]->GetXaxis()->SetTitleOffset(1.1);
907      eventnumb[ii]->GetYaxis()->SetLabelSize(0.04);      eventnumb[ii]->GetYaxis()->SetLabelSize(0.02);
908      eventnumb[ii]->GetYaxis()->SetTitleSize(0.04);      eventnumb[ii]->GetYaxis()->SetTitleSize(0.03);
909      eventnumb[ii]->GetYaxis()->SetTitle("DSP event-number");      eventnumb[ii]->GetYaxis()->SetTitle("DSP event-number");
910      eventnumb[ii]->GetYaxis()->CenterTitle();      eventnumb[ii]->GetYaxis()->CenterTitle();
911      eventnumb[ii]->GetYaxis()->SetTitleOffset(1.5);      eventnumb[ii]->GetYaxis()->SetTitleOffset(2.);
912      eventnumb[ii]->SetMarkerStyle(21);      eventnumb[ii]->SetMarkerStyle(21);
913      eventnumb[ii]->SetMarkerColor(kBlue);      eventnumb[ii]->SetMarkerColor(kBlue);
914      eventnumb[ii]->SetMarkerSize(0.3);      eventnumb[ii]->SetMarkerSize(0.2);
915        oss1.str("");
916        oss1<<"number of events in this graph: "<<maxev-minev;
917        t->SetTextColor(kBlue);
918        t->SetTextSize(0.02);
919        double xtex=0,ytex=0;
920        xtex=x[maxev-minev-1]-(x[maxev-minev-1]-x[0])/3;
921        ytex=1000.+eventnumb[ii]->GetYaxis()->GetXmax();
922        t->DrawLatex(xtex,ytex,oss1.str().c_str());
923        oss1.str("");  
924      eventnumb[ii]->Draw("ap");      eventnumb[ii]->Draw("ap");
925      EventNumCanv[ii]->Update();      EventNumCanv[ii]->Update();
926            
   
     warning.close();  
927      minev=maxev;      minev=maxev;
928      if(maxev==maxevent-1) {      if(maxev==maxevent-1) {
929        cntpgdat=ii+1;        cntpgdat=ii+1;
930        break;        break;
931      }      }
932        
933    }    }
934    
935    alarm.close();    alarm.close();
936    
937    //****************************************************************************************    //****************************************************************************************
938    //Output figures --- Third sheet:    //Cluster Signal ladder1 Output Pages
939    //****************************************************************************************    //****************************************************************************************
940    
941    fromfile.str("");    fromfile.str("");
# Line 736  void FTrkQLook_EXPERT(TString file,Int_t Line 958  void FTrkQLook_EXPERT(TString file,Int_t
958    isfile.str("");    isfile.str("");
959        
960    //****************************************************************************************    //****************************************************************************************
961    //Output figures --- Third sheet:    //Cluster Signal ladder2 Output Pages
962    //****************************************************************************************    //****************************************************************************************
963    
964    isfile<<"Cluster Signal ladder2";    isfile<<"Cluster Signal ladder2";
# Line 757  void FTrkQLook_EXPERT(TString file,Int_t Line 979  void FTrkQLook_EXPERT(TString file,Int_t
979    isfile.str("");    isfile.str("");
980    
981    //****************************************************************************************    //****************************************************************************************
982    //Output figures --- Third sheet:    //Cluster Signal ladder3 Output Pages
983    //****************************************************************************************    //****************************************************************************************
984    
985    isfile<<"Cluster Signal ladder3";    isfile<<"Cluster Signal ladder3";
# Line 778  void FTrkQLook_EXPERT(TString file,Int_t Line 1000  void FTrkQLook_EXPERT(TString file,Int_t
1000    isfile.str("");    isfile.str("");
1001        
1002    //****************************************************************************************    //****************************************************************************************
1003    //Output figures --- Fourth sheet:    //Lighting of the views Output Pages
1004    //****************************************************************************************    //****************************************************************************************
1005    
1006    isfile<<"lighting of the views";    isfile<<"lighting of the views";
# Line 797  void FTrkQLook_EXPERT(TString file,Int_t Line 1019  void FTrkQLook_EXPERT(TString file,Int_t
1019    t1->DrawLatex(70.,98.7,isfile.str().c_str());    t1->DrawLatex(70.,98.7,isfile.str().c_str());
1020    isfile.str("");    isfile.str("");
1021        
1022      //
1023      // Draw the histos
1024    for (Int_t i=0; i<12 ; i++){    for (Int_t i=0; i<12 ; i++){
1025                    
1026      TBox b;      TBox b;
     b.SetFillColor(6);  
     b.SetFillStyle(3945);  
1027    
1028      Float_t maxhist=0;      Float_t maxhist=0;
1029      LandauCanv1->cd();      LandauCanv1->cd();
# Line 845  void FTrkQLook_EXPERT(TString file,Int_t Line 1067  void FTrkQLook_EXPERT(TString file,Int_t
1067      illuminazione[i]->Draw("");      illuminazione[i]->Draw("");
1068      if(i==1){      if(i==1){
1069        maxhist= illuminazione[i]->GetMaximum();        maxhist= illuminazione[i]->GetMaximum();
1070        b.DrawBox(2816.,0.,3060.,maxhist);        b.SetFillColor(6);
1071          b.SetFillStyle(3945);
1072          b.DrawBox(2944.,0.,3060.,maxhist);
1073    
1074          b.SetFillColor(107);
1075          b.SetFillStyle(3954);
1076          b.DrawBox(2816.,0.,2944.,maxhist);
1077          b.DrawBox(2048.,0.,2176.,maxhist);
1078        }
1079        else if(i==4){
1080          maxhist=illuminazione[i]->GetMaximum();
1081          b.SetFillColor(107);
1082          b.SetFillStyle(3954);
1083          b.DrawBox(384.,0.,512.,maxhist);
1084      }      }
1085      else if(i==6){      else if(i==6){
1086        maxhist= illuminazione[i]->GetMaximum();        maxhist= illuminazione[i]->GetMaximum();
1087          b.SetFillColor(6);
1088          b.SetFillStyle(3945);
1089        b.DrawBox(2560.,0.,2816.,maxhist);        b.DrawBox(2560.,0.,2816.,maxhist);
1090          b.DrawBox(1024.,0.,1535.,maxhist);
1091    
1092          b.SetFillColor(107);
1093          b.SetFillStyle(3954);
1094        b.DrawBox(512.,0.,768.,maxhist);        b.DrawBox(512.,0.,768.,maxhist);
1095        b.DrawBox(1024.,0.,1792.,maxhist);        b.DrawBox(1536.,0.,1792.,maxhist);
1096        }
1097        else if(i==7){
1098          maxhist= illuminazione[i]->GetMaximum();
1099          b.SetFillColor(107);
1100          b.SetFillStyle(3954);
1101          b.DrawBox(512.,0.,768.,maxhist);
1102        }
1103        else if(i==9){
1104          maxhist=illuminazione[i]->GetMaximum();
1105          b.SetFillColor(107);
1106          b.SetFillStyle(3954);
1107          b.DrawBox(256.,0.,384.,maxhist);
1108      }      }
1109      else if(i==11){      else if(i==11){
1110        maxhist= illuminazione[i]->GetMaximum();        maxhist= illuminazione[i]->GetMaximum();
1111          b.SetFillColor(6);
1112          b.SetFillStyle(3945);
1113        b.DrawBox(768.,0.,1024.,maxhist);        b.DrawBox(768.,0.,1024.,maxhist);
1114    
1115          b.SetFillColor(107);
1116          b.SetFillStyle(3954);
1117          b.DrawBox(0.,0.,512.,maxhist);
1118          b.DrawBox(1920.,0.,2048.,maxhist);
1119          b.DrawBox(2176.,0.,2304.,maxhist);
1120      }      }
1121      IlluminaCanv->Update();      IlluminaCanv->Update();
1122    }    }
1123    
1124    printf("... end of packets. \n");    printf("... end of packets. \n");
1125    
1126    //*************************************************************************    //*************************************************************************
1127    // Save output Files    // Save output Files
1128    //*************************************************************************    //*************************************************************************
# Line 870  void FTrkQLook_EXPERT(TString file,Int_t Line 1132  void FTrkQLook_EXPERT(TString file,Int_t
1132    else if(cntpgtemp<=cntpgdat) totpg=cntpgdat;    else if(cntpgtemp<=cntpgdat) totpg=cntpgdat;
1133    
1134    for(Int_t fl=0;fl<totpg;fl++){    for(Int_t fl=0;fl<totpg;fl++){
1135    
1136      if(!strcmp(outfile.Data(),"ps")||!strcmp(outfile.Data(),"pdf")){      if(!strcmp(outfile.Data(),"ps")||!strcmp(outfile.Data(),"pdf")){
1137        out1.str("");        out1.str("");
1138        out2.str("");        out2.str("");
# Line 883  void FTrkQLook_EXPERT(TString file,Int_t Line 1146  void FTrkQLook_EXPERT(TString file,Int_t
1146          CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");          CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");
1147          EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1148          TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1149            BfieldCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1150          LandauCanv1->Print(out+out2.str().c_str(),"Portrait");          LandauCanv1->Print(out+out2.str().c_str(),"Portrait");
1151          LandauCanv2->Print(out+out2.str().c_str(),"Portrait");          LandauCanv2->Print(out+out2.str().c_str(),"Portrait");
1152          LandauCanv3->Print(out+out2.str().c_str(),"Portrait");          LandauCanv3->Print(out+out2.str().c_str(),"Portrait");
# Line 892  void FTrkQLook_EXPERT(TString file,Int_t Line 1156  void FTrkQLook_EXPERT(TString file,Int_t
1156          if(fl==0) CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");          if(fl==0) CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");
1157          if(fl>0 && fl<cntpgdat) CompTimeCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          if(fl>0 && fl<cntpgdat) CompTimeCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1158          if(fl<cntpgdat) EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          if(fl<cntpgdat) EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1159            if(fl<cntpgmag) BfieldCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1160          if(fl<cntpgtemp) TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          if(fl<cntpgtemp) TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1161          if(fl==totpg-1){          if(fl==totpg-1){
1162            LandauCanv1->Print(out+out2.str().c_str(),"Portrait");            LandauCanv1->Print(out+out2.str().c_str(),"Portrait");
# Line 906  void FTrkQLook_EXPERT(TString file,Int_t Line 1171  void FTrkQLook_EXPERT(TString file,Int_t
1171        out1<<ffile<<"_FTrkQLook_EXPERT-CompTime-pag"<<fl+1<<"."<<outfile.Data();        out1<<ffile<<"_FTrkQLook_EXPERT-CompTime-pag"<<fl+1<<"."<<outfile.Data();
1172        if(fl<cntpgdat) CompTimeCanv[fl]->Print(out+out1.str().c_str());        if(fl<cntpgdat) CompTimeCanv[fl]->Print(out+out1.str().c_str());
1173        out1.str("");        out1.str("");
1174          out1<<ffile<<"_FTrkQLook_EXPERT-BField-pag"<<fl+1<<"."<<outfile.Data();
1175          if(fl<cntpgmag) BfieldCanv[fl]->Print(out+out1.str().c_str());
1176          out1.str("");
1177        out1<<ffile<<"_FTrkQLook_EXPERT-Temp-pag"<<fl+1<<"."<<outfile.Data();        out1<<ffile<<"_FTrkQLook_EXPERT-Temp-pag"<<fl+1<<"."<<outfile.Data();
1178        if(fl<cntpgtemp) TempCanv[fl]->Print(out+out1.str().c_str());        if(fl<cntpgtemp) TempCanv[fl]->Print(out+out1.str().c_str());
1179        out1.str("");        out1.str("");
1180        out1<<ffile<<"_FTrkQLook_EXPERT-EvNum-pag"<<fl+1<<"."<<outfile.Data();        out1<<ffile<<"_FTrkQLook_EXPERT-EvNum-pag"<<fl+1<<"."<<outfile.Data();
1181        if(fl<cntpgdat) EventNumCanv[fl]->Print(out+out1.str().c_str());        if(fl<cntpgdat) EventNumCanv[fl]->Print(out+out1.str().c_str());
1182        if(fl==countrun-1){        if(fl==totpg-1){
1183          out1.str("");          out1.str("");
1184          out1<<ffile<<"_FTrkQLook_EXPERT-LandauL1."<<outfile.Data();          out1<<ffile<<"_FTrkQLook_EXPERT-LandauL1."<<outfile.Data();
1185          LandauCanv1->Print(out+out1.str().c_str());          LandauCanv1->Print(out+out1.str().c_str());
# Line 928  void FTrkQLook_EXPERT(TString file,Int_t Line 1196  void FTrkQLook_EXPERT(TString file,Int_t
1196      }      }
1197    }      }  
1198    
1199      //
1200      // Convert ps to pdf if required
1201    if(!strcmp(outfile.Data(),"pdf")){    if(!strcmp(outfile.Data(),"pdf")){
1202      stringstream com;      stringstream com;
1203      com<<"ps2pdf13 "<<out<<ffile<<"_FTrkQLook_EXPERT.ps "<<out<<ffile<<"_FTrkQLook_EXPERT.pdf";      com<<"ps2pdf13 "<<out<<ffile<<"_FTrkQLook_EXPERT.ps "<<out<<ffile<<"_FTrkQLook_EXPERT.pdf";
# Line 940  void FTrkQLook_EXPERT(TString file,Int_t Line 1210  void FTrkQLook_EXPERT(TString file,Int_t
1210      com.str("");      com.str("");
1211    }    }
1212    
   command.str("");  
   command<<"rm -f "<<out<<"warning.txt";  
   system(command.str().c_str());  
     
1213    gROOT->Reset();    gROOT->Reset();
1214    return;    return;
1215  }  }
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.18
  ViewVC Help
Powered by ViewVC 1.1.23