/[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.8 by pam-fi, Thu Jun 29 11:11:59 2006 UTC revision 1.14 by pam-fi, Tue Aug 22 15:47:49 2006 UTC
# Line 2  Line 2 
2   * FTrkQLook_EXPERT.cxx   * FTrkQLook_EXPERT.cxx
3   *   *
4   * autor: D.Fedele   * autor: D.Fedele
5   * version v1r04   * version v1r10
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 30  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  //  //
# Line 39  void FTrkQLook_EXPERT(TString file,Int_t Line 41  void FTrkQLook_EXPERT(TString file,Int_t
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
   const string filepath=file.Data();  
44    Int_t dwpos = file.Last('/');    Int_t dwpos = file.Last('/');
45    Int_t dwpos1 = file.Last('.');    Int_t dwpos1 = file.Last('.');
46    TString base,ffile ;    TString base,ffile ;
# Line 58  void FTrkQLook_EXPERT(TString file,Int_t Line 59  void FTrkQLook_EXPERT(TString file,Int_t
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 77  void FTrkQLook_EXPERT(TString file,Int_t Line 80  void FTrkQLook_EXPERT(TString file,Int_t
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 92  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 99  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 136  void FTrkQLook_EXPERT(TString file,Int_t Line 145  void FTrkQLook_EXPERT(TString file,Int_t
145    // information about the RunHeader    // information about the RunHeader
146    ULong64_t HOBT[neventH];    ULong64_t HOBT[neventH];
147    Int_t trk_cal_us[neventH];    Int_t trk_cal_us[neventH];
148      Int_t countnboot=1;
149    for (Int_t vi=0; vi<neventH;vi++){    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;
# Line 145  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)
159          countnboot+=1;
160    }    }
161      countnboot+=(Int_t)(2*nevent/MAXSTORAGE);
162      //   printf("\ncountnboot=%d\n",countnboot);
163      
164    
165    //    //
166    // other variables definitions    // other variables definitions
# Line 162  void FTrkQLook_EXPERT(TString file,Int_t Line 177  void FTrkQLook_EXPERT(TString file,Int_t
177      maxsize+=tmpSize;      maxsize+=tmpSize;
178    }    }
179    const Int_t tsize=maxsize;    const Int_t tsize=maxsize;
180    Int_t tempt[tsize][5],xt[tsize], tempt_tmp[tsize];    Int_t tempt[tsize][5];
181    Int_t countnboot=1;    ULong64_t xt[tsize];
182    
183      Int_t cntpgtemp=1,cntpgdat=0,cntpgmag=0;
184    //    //
185    // information about the temperatures    // information about the temperatures
186    for (Int_t ev=0; ev<tnevent; ev++){    for (Int_t ev=0; ev<tnevent; ev++){
# Line 173  void FTrkQLook_EXPERT(TString file,Int_t Line 190  void FTrkQLook_EXPERT(TString file,Int_t
190        record = (pamela::TsbTRecord*)event->Records->At(j);        record = (pamela::TsbTRecord*)event->Records->At(j);
191        xt[siztmp]=record->RECORD_OBT;        xt[siztmp]=record->RECORD_OBT;
192        if((xt[siztmp]<xt[siztmp-1]) && siztmp>0)        if((xt[siztmp]<xt[siztmp-1]) && siztmp>0)
193          countnboot+=1;          cntpgtemp+=1;
194                
195        for (Int_t z = 0; z < 5; z++){        for (Int_t z = 0; z < 5; z++){
196          tempt[siztmp][z] = record->TEMPERATURES[z+1];              tempt[siztmp][z] = record->TEMPERATURES[z+1];    
# Line 181  void FTrkQLook_EXPERT(TString file,Int_t Line 198  void FTrkQLook_EXPERT(TString file,Int_t
198        siztmp++;        siztmp++;
199      }      }
200    }    }
201    countnboot+=2*(Int_t)nevent/MAXSTORAGE;    
202    //   printf("\ncountnboot=%d\n",countnboot);    //
203      // information about the entries for the magnetic field
204      if(bnevent>0) cntpgmag=1;
205      maxsize=0;
206      for (Int_t ev=0; ev<bnevent; ev++){
207        Btree->GetEntry(ev);
208        tmpSize = Bevent->Records->GetEntries();
209        maxsize+=tmpSize;
210      }
211      const Int_t bsize=maxsize;
212      Int_t magt[bsize][5];
213      ULong64_t xb[bsize];
214      siztmp=0;
215      //
216      // information about the magnetic field
217      for (Int_t ev=0; ev<bnevent; ev++){
218        Btree->GetEntry(ev);
219        tmpSize = Bevent->Records->GetEntries();
220        for (Int_t j = 0; j < tmpSize; j++){
221          Brecord = (pamela::TsbBRecord*)Bevent->Records->At(j);
222          xb[siztmp]=Brecord->RECORD_OBT;
223          if((xb[siztmp]<xb[siztmp-1]) && siztmp>0)
224            cntpgmag+=1;
225          for (Int_t z = 0; z < 5; z++){
226            magt[siztmp][z] = Brecord->B_FIELD[z+1];    
227          }
228          siztmp++;
229        }
230      }
231        
232    //    //
233    // open the output text files for the alarms    // open the output text files for the alarms
# Line 277  void FTrkQLook_EXPERT(TString file,Int_t Line 322  void FTrkQLook_EXPERT(TString file,Int_t
322    
323    //    //
324    // Define output canvas, histos and graphs    // Define output canvas, histos and graphs
325    TCanvas *CompTimeCanv[countnboot],*EventNumCanv[countnboot],*TempCanv[countnboot];    TCanvas *CompTimeCanv[countnboot],*EventNumCanv[countnboot],*TempCanv[cntpgtemp],*BfieldCanv[cntpgmag];
326    TCanvas *IlluminaCanv,*LandauCanv1,*LandauCanv2,*LandauCanv3;    TCanvas *IlluminaCanv,*LandauCanv1,*LandauCanv2,*LandauCanv3;
327    
328    TH1F *landau1[12],*landau2[12],*landau3[12],*illuminazione[12];    TH1F *landau1[12],*landau2[12],*landau3[12],*illuminazione[12];
329    TGraph *comprtime[12][countnboot],*temp[5][countnboot],*eventnumb[countnboot];    TGraph *comprtime[12][countnboot],*temp[5][cntpgtemp],*tempw[5][cntpgtemp],*eventnumb[countnboot],*mag[5][cntpgmag];
330    TPad *pad1[12],*pad2[12],*pad3[12],*pad4[12],*pad5[12],*pad6[5];    TPad *pad1[12],*pad2[12],*pad3[12],*pad4[12],*pad5[12],*pad6[5],*pad7[5];
331    
332    for(Int_t n = 0; n<12; n++) {    for(Int_t n = 0; n<12; n++) {
333    
# Line 320  void FTrkQLook_EXPERT(TString file,Int_t Line 365  void FTrkQLook_EXPERT(TString file,Int_t
365    TLatex *t=new TLatex();    TLatex *t=new TLatex();
366    TLatex *t1=new TLatex();    TLatex *t1=new TLatex();
367    
368    Int_t cntpgtemp=0,cntpgdat=0;    
369    Int_t minev=minevent,maxev=maxevent,countTEMP=0;    Int_t minev=minevent,maxev=maxevent,countTEMP=0,countMAG=0;
370    
371    //    //
372    // Fill temperature graphs    // Fill temperature graphs
373    for(Int_t ii=0; ii<countnboot;ii++){    for(Int_t ii=0; ii<cntpgtemp;ii++){
374      //****************************************************************************************      //****************************************************************************************
375      //Temperature Output Pages      //Temperature Output Pages
376      //****************************************************************************************      //****************************************************************************************
# Line 347  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 372  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 409  void FTrkQLook_EXPERT(TString file,Int_t Line 478  void FTrkQLook_EXPERT(TString file,Int_t
478        temp[i][ii]->SetMarkerSize(0.2);        temp[i][ii]->SetMarkerSize(0.2);
479        temp[i][ii]->Draw("ap");        temp[i][ii]->Draw("ap");
480        tit.str("");        tit.str("");
481          if(vv>0){
482            tempw[i][ii]= new TGraph(vv,xt_tmpw,tempt_tmpw);
483            tempw[i][ii]->SetMarkerStyle(21);
484            tempw[i][ii]->SetMarkerSize(0.2);
485            tempw[i][ii]->SetMarkerColor(196);
486            tempw[i][ii]->Draw("samep");
487          }
488        TempCanv[ii]->Update();        TempCanv[ii]->Update();
489            
490                
491      }      }
492      if(countTEMP==tsize-1){      if(countTEMP==tsize-1 && ii==cntpgtemp-1){
       cntpgtemp=ii+1;  
493        break;        break;
494      }      }
495    }    }
496    
497      //
498      // Fill magnetic field graphs
499      for(Int_t ii=0; ii<cntpgmag;ii++){
500        //****************************************************************************************
501        //Magnetic Field Output Pages
502        //****************************************************************************************
503        fromfile.str("");
504        fromfile<<"FTrkQLook_EXPERT      File: "<<ffile;
505        isfile<<"Magnetic Axial Field vs OBT   pag"<<ii+1;
506        BfieldCanv[ii]=new TCanvas(isfile.str().c_str(),isfile.str().c_str(),900,1200);
507        BfieldCanv[ii]->SetFillColor(10);
508        BfieldCanv[ii]->Range(0,0,100,100);
509        
510        t->SetTextFont(32);
511        t->SetTextColor(1);
512        t->SetTextAlign(12);
513        t->SetTextSize(0.02);
514        t->DrawLatex(2.,98.7,fromfile.str().c_str());
515        t1->SetTextFont(32);
516        t1->SetTextColor(1);
517        t1->SetTextAlign(12);
518        t1->SetTextSize(0.02);
519        t1->DrawLatex(70.,98.7,isfile.str().c_str());
520        isfile.str("");
521      
522        TLine li;
523        li.SetLineStyle(1);
524        li.SetLineWidth(1);
525        li.SetLineColor(190);
526        t1->SetTextColor(190);
527        t1->SetTextSize(0.04);
528        
529        Float_t tposy = 0.95;    // up y-coord - top pads
530        Float_t thpad = 0;   // pad height
531        Float_t tposx1=0;          // left  x-coord - pad column
532        Float_t tposx0=0;          //       x-coord - column division
533        Float_t twrel = 0;     // relative x size of first sub-column
534        Float_t tmarg = 0.004;   // margin among pads
535      
536        thpad = (tposy-tmarg*5)/3;
537        twrel = (1-tmarg*4)/2;
538        
539        for(Int_t i=0; i<5; i++){
540          if ( (i+1)%2==1 ) {
541            if(i>1) tposy = tposy-(tmarg*2+thpad);
542            tposx1 = tmarg;
543            tposx0 = tposx1 + twrel;
544          }
545          else {
546            tposx1 = tposx0 + 2*tmarg;
547            tposx0 = tposx1 + twrel;
548          }
549          
550          /* -----------> pad for histograms  */
551          pad7[i] = new TPad("pad7"," ",tposx1,tposy-thpad,tposx0,tposy,18,0,0);
552          
553          Int_t v=0;
554          Double_t xb_tmp[bsize], magt_tmp[bsize];
555          for (Int_t ev=countMAG; ev<bsize; ev++){
556            
557            if(ev==bsize-1 && i==4 && ii==cntpgmag-1) countMAG=bsize-1;
558            if(xb[ev]<xb[ev-1] && ev>countMAG){
559              if(i==4) countMAG=ev;
560              break;
561            }
562            else{
563              magt_tmp[v]=(Double_t)magt[ev][i];
564              xb_tmp[v++]=(Double_t)xb[ev];
565            }
566          }
567          BfieldCanv[ii]->cd();
568          tit<<"B"<<i+5<<" (magnetic module "<<i+1<<")";
569          pad7[i]->SetFillColor(10);
570          pad7[i]->Draw();
571          pad7[i]->cd();
572          mag[i][ii]= new TGraph(v,xb_tmp,magt_tmp);
573          mag[i][ii]->SetTitle(tit.str().c_str());
574          mag[i][ii]->GetXaxis()->SetNdivisions(502,kTRUE);
575          mag[i][ii]->GetXaxis()->SetLabelSize(0.04);
576          mag[i][ii]->GetXaxis()->SetTitleSize(0.04);
577          mag[i][ii]->GetXaxis()->SetTitle("OBT (ms)");
578          mag[i][ii]->GetXaxis()->CenterTitle();
579          mag[i][ii]->GetXaxis()->SetTitleOffset(0.85);
580          if(i!=4) mag[i][ii]->GetYaxis()->SetRangeUser(2047,2058);
581          else mag[i][ii]->GetYaxis()->SetRangeUser(2060,2066);
582          mag[i][ii]->GetYaxis()->SetTitleOffset(1.2);
583          mag[i][ii]->GetYaxis()->SetLabelOffset(0.001);
584          mag[i][ii]->GetYaxis()->SetLabelSize(0.03);
585          mag[i][ii]->GetYaxis()->SetTitleSize(0.04);
586          mag[i][ii]->GetYaxis()->SetTitle("Magnetic Field (au)");
587          mag[i][ii]->GetYaxis()->CenterTitle();
588          mag[i][ii]->SetMarkerStyle(21);
589          mag[i][ii]->SetMarkerSize(0.4);
590          mag[i][ii]->Draw("ap");
591          Double_t min=0.,max=0,xlat=0.;
592          min=mag[i][ii]->GetXaxis()->GetXmin();
593          max=mag[i][ii]->GetXaxis()->GetXmax();
594          xlat=min+(max-min)/2;
595          stringstream mi,ma;
596          mi<<"minimum recorded value";
597          ma<<"maximum recorded value";
598          t->SetTextSize(0.1);
599          switch(i){
600            case 0:
601              li.DrawLine(min,2054.,max,2054.);
602              li.DrawLine(min,2048.,max,2048.);
603              t1->DrawLatex(xlat,2054.3,ma.str().c_str());
604              t1->DrawLatex(xlat,2047.7,mi.str().c_str());  
605              break;
606    
607            case 1:
608              li.DrawLine(min,2055.,max,2055.);
609              li.DrawLine(min,2050.,max,2050.);
610              t1->DrawLatex(xlat,2055.3,ma.str().c_str());
611              t1->DrawLatex(xlat,2049.7,mi.str().c_str());
612              break;
613    
614            case 2:
615              li.DrawLine(min,2056.,max,2056.);
616              li.DrawLine(min,2051.,max,2051.);
617              t1->DrawLatex(xlat,2056.3,ma.str().c_str());
618              t1->DrawLatex(xlat,2050.7,mi.str().c_str());
619              break;
620          
621            case 3:
622              li.DrawLine(min,2057.,max,2057.);
623              li.DrawLine(min,2052.,max,2052.);
624              t1->DrawLatex(xlat,2057.3,ma.str().c_str());
625              t1->DrawLatex(xlat,2051.7,mi.str().c_str());
626              break;
627    
628            case 4:
629              li.DrawLine(min,2065.,max,2065.);
630              li.DrawLine(min,2061.,max,2061.);
631              t1->DrawLatex(xlat,2065.15,ma.str().c_str());
632              t1->DrawLatex(xlat,2060.85,mi.str().c_str());
633              break;
634    
635          }
636          BfieldCanv[ii]->Update();
637          tit.str("");
638        }
639        if(countMAG==bsize-1 && ii==cntpgmag-1){
640          break;
641        }
642      }
643      
644    
645    //    //
646    // Fill compressiontime and eventnumber graphs and DSP warnings    // Fill compressiontime and eventnumber graphs and DSP warnings
# Line 500  void FTrkQLook_EXPERT(TString file,Int_t Line 723  void FTrkQLook_EXPERT(TString file,Int_t
723      // and fill graphs and histos      // and fill graphs and histos
724    
725      Int_t al=0;      Int_t al=0;
726      Float_t x[MAXSTORAGE];      Double_t x[MAXSTORAGE];
727      Float_t yc[MAXSTORAGE][12];      Float_t yc[MAXSTORAGE][12];
728      Float_t eventint[MAXSTORAGE];      Double_t eventint[MAXSTORAGE];
729        Int_t eventn[12];
730        
731      for (Int_t ev=minev; ev<maxevent; ev++){      for (Int_t ev=minev; ev<maxevent; ev++){
732        tr->GetEntry(ev);        tr->GetEntry(ev);
733        ph = eh->GetPscuHeader();        ph = eh->GetPscuHeader();
734        cod = eh->GetCounter();        cod = eh->GetCounter();
735        
736    
737        if(ev==maxevent-1) maxev=maxevent-1;        if(ev==maxevent-1) maxev=maxevent-1;
738    
739        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 521  void FTrkQLook_EXPERT(TString file,Int_t Line 746  void FTrkQLook_EXPERT(TString file,Int_t
746                    
747          Int_t dsp=0;          Int_t dsp=0;
748          for(Int_t i=0; i<12; i++){          for(Int_t i=0; i<12; i++){
749              if(te->DSPnumber[i]<1 || te->DSPnumber[i]>12) {
750                ALARM=1;
751                break;
752              }
753    
754            dsp=te->DSPnumber[i]-1;            dsp=te->DSPnumber[i]-1;
755            yc[(ev-minev)][dsp]= 0.051*te->compressiontime[i];            yc[(ev-minev)][dsp]= 0.051*te->compressiontime[i];
756              
757            //            //
758            // Fill Cluster Signal and Lighting of the view histos            // Fill Cluster Signal and Lighting of the view histos
759            for(Int_t j=0;j<3;j++){            for(Int_t j=0;j<3;j++){
# Line 549  void FTrkQLook_EXPERT(TString file,Int_t Line 779  void FTrkQLook_EXPERT(TString file,Int_t
779            WARNING[i]=0;            WARNING[i]=0;
780            if(te->fc[i]!=0 || te->fl1[i]!=0 || te->fl2[i]!=0 || te->fl3[i]!=0 || te->fl4[i]!=0 || te->fl5[i]!=0 || te->fl6[i]!=0){            if(te->fc[i]!=0 || te->fl1[i]!=0 || te->fl2[i]!=0 || te->fl3[i]!=0 || te->fl4[i]!=0 || te->fl5[i]!=0 || te->fl6[i]!=0){
781              ALARM = 1;      //general alarm              ALARM = 1;      //general alarm
             al=1;  
782              WARNING[i] = 1; // DSP warning              WARNING[i] = 1; // DSP warning
783            };            };
784    
785            if(te->alarm[i]!=0){ // hardware alarm            if(te->alarm[i]!=0){ // hardware alarm
786              ALARM = 1;              ALARM = 1;
             al=1;  
787            };            };
788                
789            //**************************************************************************************            //**************************************************************************************
790            // warning for internal number            // warning for internal number
791            //**************************************************************************************            //**************************************************************************************
792            if(i<=10 && te->eventn[i]!=te->eventn[i+1]) ALARM=1;            if(i<=10 && te->eventn[i]!=te->eventn[i+1]) ALARM=1;
793              if((ev-minev)>=1 && eventn[i]+1!=te->eventn[i] && te->eventn[i]!=1) ALARM=1;
794          }          }
795          eventint[(ev-minev)]=te->eventn[0];          eventint[(ev-minev)]=te->eventn[0];
796          if((ev-minev)>=1 && eventint[(ev-minev)]!=eventint[(ev-minev)-1]+1 && eventint[(ev-minev)]!=1)  
            ALARM=1;  
           
797          //********************************************************************************************          //********************************************************************************************
798          // file DSP warning          // file DSP warning
799          //********************************************************************************************          //********************************************************************************************
800    
801          if(ALARM==1) {            if(ALARM==1) {  
802              al=1;
803            alarm <<endl<< "================================================="<< endl;            alarm <<endl<< "================================================="<< endl;
804            alarm << "PSCU-Pkt N. "<< ph->GetCounter() ;            alarm << "PSCU-Pkt N. "<< ph->GetCounter() ;
805            alarm << " - OBT "<< ph->GetOrbitalTime() << " ms"<<endl;            alarm << " - OBT "<< ph->GetOrbitalTime() << " ms"<<endl;
# Line 595  void FTrkQLook_EXPERT(TString file,Int_t Line 823  void FTrkQLook_EXPERT(TString file,Int_t
823            for(Int_t i=0; i<12 ; i++){            for(Int_t i=0; i<12 ; i++){
824              alarm.width(5); alarm << te->DSPnumber[i];              alarm.width(5); alarm << te->DSPnumber[i];
825              alarm.width(8); alarm << te->eventn[i];              alarm.width(8); alarm << te->eventn[i];
826              alarm.width(8); alarm << eventint[(ev-minev)-1];              alarm.width(8); alarm << eventn[i];
827              alarm.width(6); alarm << te->DATAlength[i];              alarm.width(6); alarm << te->DATAlength[i];
828              alarm.width(4); alarm << te->crc[i];              alarm.width(4); alarm << te->crc[i];
829              alarm.width(4); alarm << te->fc[i];              alarm.width(4); alarm << te->fc[i];
# Line 610  void FTrkQLook_EXPERT(TString file,Int_t Line 838  void FTrkQLook_EXPERT(TString file,Int_t
838              alarm    << endl;              alarm    << endl;
839            }            }
840          }          }
841            for(Int_t i=0; i<12 ; i++)
842              eventn[i]=te->eventn[i];
843        }        }
844      }      }
845      if(al==0) alarm << endl<< "Page "<<ii+1<< ": ------>  NO ALARM!!! <-------"<<endl;      if(al==0) alarm << endl<< "Page "<<ii+1<< ": ------>  NO ALARM!!! <-------"<<endl;
# Line 617  void FTrkQLook_EXPERT(TString file,Int_t Line 847  void FTrkQLook_EXPERT(TString file,Int_t
847      //      //
848      // Draw the graphs      // Draw the graphs
849      for (Int_t i=0; i<12 ; i++){      for (Int_t i=0; i<12 ; i++){
850        Float_t yyc[maxev-minev];        Double_t yyc[maxev-minev];
851        for (Int_t v=0; v<maxev-minev; v++){        for (Int_t v=0; v<maxev-minev; v++){
852          yyc[v]=yc[v][i];          yyc[v]=yc[v][i];
853        }        }
# Line 634  void FTrkQLook_EXPERT(TString file,Int_t Line 864  void FTrkQLook_EXPERT(TString file,Int_t
864        comprtime[i][ii]->GetXaxis()->CenterTitle();        comprtime[i][ii]->GetXaxis()->CenterTitle();
865        comprtime[i][ii]->GetYaxis()->SetTitle("compressiontime (ms)");        comprtime[i][ii]->GetYaxis()->SetTitle("compressiontime (ms)");
866        comprtime[i][ii]->GetYaxis()->CenterTitle();        comprtime[i][ii]->GetYaxis()->CenterTitle();
867        comprtime[i][ii]->GetYaxis()->SetRangeUser(0,3);        // comprtime[i][ii]->GetYaxis()->SetRangeUser(0,3);
868        comprtime[i][ii]->Draw("ap");        comprtime[i][ii]->Draw("ap");
869        oss1.str("");        oss1.str("");
870        CompTimeCanv[ii]->Update();        CompTimeCanv[ii]->Update();
# Line 665  void FTrkQLook_EXPERT(TString file,Int_t Line 895  void FTrkQLook_EXPERT(TString file,Int_t
895      eventnumb[ii]->Draw("ap");      eventnumb[ii]->Draw("ap");
896      EventNumCanv[ii]->Update();      EventNumCanv[ii]->Update();
897            
   
898      minev=maxev;      minev=maxev;
899      if(maxev==maxevent-1) {      if(maxev==maxevent-1) {
900        cntpgdat=ii+1;        cntpgdat=ii+1;
901        break;        break;
902      }      }
903        
904    }    }
905    
906    
907    alarm.close();    alarm.close();
908    
909    //****************************************************************************************    //****************************************************************************************
# Line 765  void FTrkQLook_EXPERT(TString file,Int_t Line 996  void FTrkQLook_EXPERT(TString file,Int_t
996    for (Int_t i=0; i<12 ; i++){    for (Int_t i=0; i<12 ; i++){
997                    
998      TBox b;      TBox b;
     b.SetFillColor(6);  
     b.SetFillStyle(3945);  
999    
1000      Float_t maxhist=0;      Float_t maxhist=0;
1001      LandauCanv1->cd();      LandauCanv1->cd();
# Line 810  void FTrkQLook_EXPERT(TString file,Int_t Line 1039  void FTrkQLook_EXPERT(TString file,Int_t
1039      illuminazione[i]->Draw("");      illuminazione[i]->Draw("");
1040      if(i==1){      if(i==1){
1041        maxhist= illuminazione[i]->GetMaximum();        maxhist= illuminazione[i]->GetMaximum();
1042        b.DrawBox(2816.,0.,3060.,maxhist);        b.SetFillColor(6);
1043          b.SetFillStyle(3945);
1044          b.DrawBox(2944.,0.,3060.,maxhist);
1045    
1046          b.SetFillColor(107);
1047          b.SetFillStyle(3954);
1048          b.DrawBox(2816.,0.,2944.,maxhist);
1049          b.DrawBox(2048.,0.,2176.,maxhist);
1050        }
1051        else if(i==4){
1052          maxhist=illuminazione[i]->GetMaximum();
1053          b.SetFillColor(107);
1054          b.SetFillStyle(3954);
1055          b.DrawBox(384.,0.,512.,maxhist);
1056      }      }
1057      else if(i==6){      else if(i==6){
1058        maxhist= illuminazione[i]->GetMaximum();        maxhist= illuminazione[i]->GetMaximum();
1059          b.SetFillColor(6);
1060          b.SetFillStyle(3945);
1061        b.DrawBox(2560.,0.,2816.,maxhist);        b.DrawBox(2560.,0.,2816.,maxhist);
       b.DrawBox(512.,0.,768.,maxhist);  
1062        b.DrawBox(1024.,0.,1792.,maxhist);        b.DrawBox(1024.,0.,1792.,maxhist);
1063    
1064          b.SetFillColor(107);
1065          b.SetFillStyle(3954);
1066          b.DrawBox(512.,0.,768.,maxhist);
1067        }
1068        else if(i==7){
1069          maxhist= illuminazione[i]->GetMaximum();
1070          b.SetFillColor(107);
1071          b.SetFillStyle(3954);
1072          b.DrawBox(512.,0.,768.,maxhist);
1073      }      }
1074      else if(i==11){      else if(i==11){
1075        maxhist= illuminazione[i]->GetMaximum();        maxhist= illuminazione[i]->GetMaximum();
1076          b.SetFillColor(6);
1077          b.SetFillStyle(3945);
1078        b.DrawBox(768.,0.,1024.,maxhist);        b.DrawBox(768.,0.,1024.,maxhist);
1079    
1080          b.SetFillColor(107);
1081          b.SetFillStyle(3954);
1082          b.DrawBox(0.,0.,512.,maxhist);
1083          b.DrawBox(1920.,0.,2048.,maxhist);
1084      }      }
1085      IlluminaCanv->Update();      IlluminaCanv->Update();
1086    }    }
# Line 849  void FTrkQLook_EXPERT(TString file,Int_t Line 1109  void FTrkQLook_EXPERT(TString file,Int_t
1109          CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");          CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");
1110          EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1111          TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1112            BfieldCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1113          LandauCanv1->Print(out+out2.str().c_str(),"Portrait");          LandauCanv1->Print(out+out2.str().c_str(),"Portrait");
1114          LandauCanv2->Print(out+out2.str().c_str(),"Portrait");          LandauCanv2->Print(out+out2.str().c_str(),"Portrait");
1115          LandauCanv3->Print(out+out2.str().c_str(),"Portrait");          LandauCanv3->Print(out+out2.str().c_str(),"Portrait");
# Line 858  void FTrkQLook_EXPERT(TString file,Int_t Line 1119  void FTrkQLook_EXPERT(TString file,Int_t
1119          if(fl==0) CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");          if(fl==0) CompTimeCanv[fl]->Print(out+out1.str().c_str(),"Portrait");
1120          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");
1121          if(fl<cntpgdat) EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          if(fl<cntpgdat) EventNumCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1122            if(fl<cntpgmag) BfieldCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1123          if(fl<cntpgtemp) TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");          if(fl<cntpgtemp) TempCanv[fl]->Print(out+out2.str().c_str(),"Portrait");
1124          if(fl==totpg-1){          if(fl==totpg-1){
1125            LandauCanv1->Print(out+out2.str().c_str(),"Portrait");            LandauCanv1->Print(out+out2.str().c_str(),"Portrait");
# Line 872  void FTrkQLook_EXPERT(TString file,Int_t Line 1134  void FTrkQLook_EXPERT(TString file,Int_t
1134        out1<<ffile<<"_FTrkQLook_EXPERT-CompTime-pag"<<fl+1<<"."<<outfile.Data();        out1<<ffile<<"_FTrkQLook_EXPERT-CompTime-pag"<<fl+1<<"."<<outfile.Data();
1135        if(fl<cntpgdat) CompTimeCanv[fl]->Print(out+out1.str().c_str());        if(fl<cntpgdat) CompTimeCanv[fl]->Print(out+out1.str().c_str());
1136        out1.str("");        out1.str("");
1137          out1<<ffile<<"_FTrkQLook_EXPERT-BField-pag"<<fl+1<<"."<<outfile.Data();
1138          if(fl<cntpgmag) BfieldCanv[fl]->Print(out+out1.str().c_str());
1139          out1.str("");
1140        out1<<ffile<<"_FTrkQLook_EXPERT-Temp-pag"<<fl+1<<"."<<outfile.Data();        out1<<ffile<<"_FTrkQLook_EXPERT-Temp-pag"<<fl+1<<"."<<outfile.Data();
1141        if(fl<cntpgtemp) TempCanv[fl]->Print(out+out1.str().c_str());        if(fl<cntpgtemp) TempCanv[fl]->Print(out+out1.str().c_str());
1142        out1.str("");        out1.str("");
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.14
  ViewVC Help
Powered by ViewVC 1.1.23