]> git.uio.no Git - u/mrichter/AliRoot.git/blob - HMPID/Hdisp.C
Pad volumes found
[u/mrichter/AliRoot.git] / HMPID / Hdisp.C
1 #if !defined(__CINT__) || defined(__MAKECINT__)
2
3 #include <TSystem.h>
4 #include <TFile.h>
5 #include <TVirtualX.h>
6 #include <TTree.h>
7 #include <TButton.h>
8 #include <TCanvas.h>
9 #include <TCanvasImp.h>
10 #include <TStyle.h>
11 #include <TString.h>
12 #include <TClonesArray.h>
13 #include <TParticle.h>
14 #include <TRandom.h>
15 #include <TLatex.h>
16 #include <TPDGCode.h>
17 #include <TLegend.h>
18 #include <TPolyMarker.h>
19 #include <TBox.h>
20 #include <AliESDEvent.h>
21 #include <AliCDBManager.h>
22 #include <AliCDBEntry.h>
23 #include "AliHMPIDHit.h"
24 #include "AliHMPIDv2.h"
25 #include "AliHMPIDReconstructor.h"
26 #include "AliHMPIDRecon.h"
27 #include "AliHMPIDParam.h"
28 #include "AliHMPIDCluster.h"
29 #include "AliTracker.h"
30 #include "AliStack.h"
31
32 #endif
33
34 AliHMPIDParam *fParam;
35 TDatabasePDG *fPdg;
36
37 TCanvas *fCanvas=0; Int_t fType=3; Int_t fEvt=-1; Int_t fNevt=0;                      
38 TCanvasImp *fCanvasImp;
39 TFile *fHitFile; TTree *fHitTree; TClonesArray *fHitLst; TPolyMarker *fRenMip[7]; TPolyMarker *fRenCko[7]; TPolyMarker *fRenFee[7];
40                                   TClonesArray *fSdiLst; 
41 TFile *fDigFile; TTree *fDigTree; TObjArray    *fDigLst; TBox *fRenDig[7][160*144]; TBox *fBox[7][160*144];   
42 TFile *fCluFile; TTree *fCluTree; TObjArray    *fCluLst; TPolyMarker *fRenClu[7];
43 TFile *fEsdFile; TTree *fEsdTree; AliESDEvent  *fEsd;    TPolyMarker *fRenTxC[7]; TPolyMarker *fRenRin[7];  
44 TFile *fCosFile; TTree *fCosTree;
45
46 TButton *fHitMipBok,*fHitCkoBok,*fHitFeeBok,*fDigBok,*fCluBok,*fEsdBok;
47
48 TString fStHitMip = "ON";
49 TString fStHitCko = "ON";
50 TString fStHitFee = "ON";
51 TString fStDig    = "ON";
52 TString fStClu    = "ON";
53 TString fStEsd    = "ON";
54
55 Int_t fTimeArrow = 1;
56
57 Int_t fMaxCharge = 200;  //maximum charge to saturate color to red
58
59 Int_t fChamN[9]={6,5,-1,4,3,2,-1,1,0};
60
61 Int_t fTotPads[7],fTotClus[7];
62
63 AliRunLoader *gAL=0; 
64
65 Int_t nDigs[7];
66
67 enum EObjectType {kHitMip=kOpenTriangleUp,kHitCko=kOpenCircle,kHitFee=kOpenDiamond,kCluster=kStar,kTrack=kPlus,kRing=kFullDotSmall};
68   //  kOpenTriangleUp  Hit Mip
69   //  kOpenCircle      Hit Ckov
70   //  kOpenDiamond     Hit Feedback
71   //  kStar            Cluster 
72   //  kPlus            Track
73   //  kFullDotSmall    Ring
74   
75 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
76 void CreateContainers()
77 {//to create all containers
78   fHitLst=new TClonesArray("AliHMPIDHit");
79   fSdiLst=new TClonesArray("AliHMPIDDigit");
80   fDigLst=new TObjArray(7); for(Int_t i=0;i<7;i++) fDigLst->AddAt(new TClonesArray("AliHMPIDDigit"),i);       fDigLst->SetOwner(kTRUE);
81   fCluLst=new TObjArray(7); for(Int_t i=0;i<7;i++) fCluLst->AddAt(new TClonesArray("AliHMPIDCluster"),i);     fCluLst->SetOwner(kTRUE); 
82   fEsd   =new AliESDEvent;
83 }
84 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
85 void CreateRenders()
86 {
87   for(Int_t ch=0;ch<7;ch++){
88     fRenMip[ch]=new TPolyMarker; fRenMip[ch]->SetMarkerStyle(kOpenTriangleUp);fRenMip[ch]->SetMarkerColor(kBlack)  ;
89     fRenCko[ch]=new TPolyMarker; fRenCko[ch]->SetMarkerStyle(kOpenCircle);    fRenCko[ch]->SetMarkerColor(kBlack)  ;
90     fRenFee[ch]=new TPolyMarker; fRenFee[ch]->SetMarkerStyle(kOpenDiamond);   fRenFee[ch]->SetMarkerColor(kBlack)  ;
91     fRenClu[ch]=new TPolyMarker; fRenClu[ch]->SetMarkerStyle(kStar);          fRenClu[ch]->SetMarkerColor(kMagenta);
92     fRenTxC[ch]=new TPolyMarker; fRenTxC[ch]->SetMarkerStyle(kPlus);          fRenTxC[ch]->SetMarkerColor(kRed)    ;
93                                  fRenTxC[ch]->SetMarkerSize(3);
94     fRenRin[ch]=new TPolyMarker; fRenRin[ch]->SetMarkerStyle(kFullDotSmall);  fRenRin[ch]->SetMarkerColor(kMagenta);
95
96     for(Int_t iDig=0;iDig<160*144;iDig++) {
97       fRenDig[ch][iDig] = new TBox;
98       fRenDig[ch][iDig]->SetFillStyle(1);
99       fBox[ch][iDig] = new TBox;
100       fBox[ch][iDig]->SetFillStyle(0);
101     }
102   }
103 }//CreateRenders()
104 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
105 void ClearRenders()
106 {
107   for(Int_t ch=0;ch<7;ch++){
108     fRenTxC[ch]->SetPolyMarker(0); 
109     fRenRin[ch]->SetPolyMarker(0); 
110     fRenMip[ch]->SetPolyMarker(0); 
111     fRenCko[ch]->SetPolyMarker(0); 
112     fRenFee[ch]->SetPolyMarker(0); 
113     nDigs[ch] = 0;
114     fRenClu[ch]->SetPolyMarker(0); 
115   }
116 }//ClearRenders()
117 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
118 void PrintHits()
119 {
120 //Prints a list of HMPID hits for a given event. Default is event number 0.
121   if(!fHitTree) return;
122   Printf("List of HMPID hits for event %i",fEvt);
123   Int_t iTot=0;
124   for(Int_t iEnt=0;iEnt<fHitTree->GetEntries();iEnt++){//entries loop
125     fHitTree->GetEntry(iEnt);      
126     fHitLst->Print();
127     iTot+=fHitLst->GetEntries();
128   }
129   Printf("totally %i hits for event %i",iTot,fEvt);
130 }//PrintHits();
131 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
132 void PrintSdis()
133 {//prints a list of HMPID sdigits  for a given event
134   Printf("List of HMPID sdigits for event %i",fEvt);
135   fSdiLst->Print();
136   Printf("totally %i sdigits for event %i",fSdiLst->GetEntries(),fEvt);
137 }//PrintSdis()
138 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
139 void PrintDigs()
140 {//prints a list of HMPID digits
141   Printf("List of HMPID digits for event %i",fEvt);  
142   fDigLst->Print();
143   Int_t iTot=0;  for(Int_t i=0;i<7;i++) {iTot+=((TClonesArray*)fDigLst->At(i))->GetEntries();}
144   Printf("totally %i digits for event %i",iTot,fEvt);
145 }
146 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
147 void PrintClus()
148 {//prints a list of HMPID clusters  for a given event
149   Printf("List of HMPID clusters for event %i",fEvt);
150   
151   fCluLst->Print();
152   Int_t iTot=0; for(Int_t iCh=0;iCh<7;iCh++) iTot+=((TClonesArray*)fCluLst->At(iCh))->GetEntries();
153   
154   Printf("totally %i clusters for event %i",iTot,fEvt);
155 }
156 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
157 void PrintEsd()
158 {//prints a list of HMPID Esd  for a given event
159   Printf("List of HMPID ESD summary for event %i",fEvt);
160   for(Int_t iTrk=0;iTrk<fEsd->GetNumberOfTracks();iTrk++){
161     AliESDtrack *pTrk = fEsd->GetTrack(iTrk);
162     Float_t x,y;Int_t q,nacc;   pTrk->GetHMPIDmip(x,y,q,nacc);
163     Printf("Track %02i with p %7.2f with ThetaCer %5.3f with %i photons",iTrk,pTrk->GetP(),pTrk->GetHMPIDsignal(),nacc);
164   }  
165 }//PrintEsd()
166 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
167 void DrawChamber(Int_t iCh) 
168 {//used by Draw() to Draw() chamber structure
169   gPad->Range(-10,-10,AliHMPIDParam::SizeAllX()+5,AliHMPIDParam::SizeAllY()+5);
170   if(iCh>=0){TLatex txt; txt.SetTextSize(0.1); txt.DrawLatex(-5,-5,Form("%i",iCh));}
171   
172   for(Int_t iPc=AliHMPIDParam::kMinPc;iPc<=AliHMPIDParam::kMaxPc;iPc++){
173     TBox *pBox=new TBox(AliHMPIDParam::MinPcX(iPc),AliHMPIDParam::MinPcY(iPc),
174                         AliHMPIDParam::MaxPcX(iPc),AliHMPIDParam::MaxPcY(iPc));
175     pBox->SetFillStyle(0);  pBox->Draw();
176   }//PC loop      
177 }//DrawChamber()
178 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
179 void DrawLegend()
180 {//used by Draw() to draw legend
181   Int_t nTxC=0,nMip=0,nCko=0,nFee=0,nDig=0,nClu=0;
182   for(Int_t ch=0;ch<7;ch++){
183     nTxC+=fRenTxC[ch]->Size();
184     nMip+=fRenMip[ch]->Size();
185     nCko+=fRenCko[ch]->Size();
186     nFee+=fRenFee[ch]->Size();
187     nClu+=fRenClu[ch]->Size();
188     nDig+=nDigs[ch];
189   }
190   TLegend *pLeg=new TLegend(0.2,0.2,0.8,0.8);
191   pLeg->SetHeader(Form("Event %i Total %i",fEvt,fNevt));
192   pLeg->AddEntry(fRenTxC[0],   Form("TRKxPC %i"     ,nTxC),"p");
193   pLeg->AddEntry(fRenMip[0],   Form("Mip hits %i"   ,nMip),"p");    
194   pLeg->AddEntry(fRenCko[0],   Form("Ckov hits %i"  ,nCko),"p");    
195   pLeg->AddEntry(fRenFee[0],   Form("Feed hits %i"  ,nFee),"p");    
196   pLeg->AddEntry(fRenDig[0][0],Form("Digs %i"       ,nDig),"p");    
197   pLeg->AddEntry(fRenClu[0],   Form("Clus %i"       ,nClu),"p");    
198   pLeg->Draw();
199 }//DrawLegend()
200 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
201 void Draw()
202 {//draws all the objects of current event in given canvas
203   Int_t iPadN[7]={9,8,6,5,4,2,1};
204   Int_t sampleCol = fMaxCharge/gStyle->GetNumberOfColors();
205   for(Int_t iCh=0;iCh<7;iCh++){//chambers loop    
206     fCanvas->cd(iPadN[iCh]);
207     gPad->SetEditable(kTRUE); gPad->Clear(); DrawChamber(iCh);
208     
209     if(fDigFile){
210       if(fStDig   =="ON") {
211         for(Int_t iDig=0;iDig<nDigs[iCh];iDig++) {
212           Int_t charge = fRenDig[iCh][iDig]->GetUniqueID();
213           Int_t color = charge/sampleCol;if(color>=gStyle->GetNumberOfColors()) color = gStyle->GetNumberOfColors()-1;
214           fRenDig[iCh][iDig]->SetFillColor(gStyle->GetColorPalette(color));
215           fRenDig[iCh][iDig]->Draw();
216           fBox[iCh][iDig]->Draw();
217         }
218       }
219     }
220     
221     if(fEsdFile){if(fStEsd   =="ON") fRenTxC[iCh]->Draw();}
222     
223     if(fHitFile){
224       if(fStHitMip=="ON") fRenMip[iCh]->Draw();
225       if(fStHitFee=="ON") fRenFee[iCh]->Draw();
226       if(fStHitCko=="ON") fRenCko[iCh]->Draw();
227     }
228     
229     if(fEsdFile){if(fStEsd   =="ON") fRenRin[iCh]->Draw();}
230     if(fCluFile){if(fStClu   =="ON") fRenClu[iCh]->Draw();}
231     gPad->SetEditable(kFALSE);
232   }//chambers loop
233   
234   fCanvas->cd(3);  gPad->Clear(); DrawLegend();
235   
236   fCanvas->cd(7);
237   
238   if(fHitFile){
239     fHitMipBok->SetTitle(Form("Mips  %s",fStHitMip.Data())); fHitMipBok->Modified();
240     fHitCkoBok->SetTitle(Form("Ckov  %s",fStHitCko.Data())); fHitCkoBok->Modified();
241     fHitFeeBok->SetTitle(Form("Fdbk  %s",fStHitFee.Data())); fHitFeeBok->Modified();
242   }
243   if(fDigFile){fDigBok->SetTitle(fStDig); fDigBok->Modified();}  
244   if(fCluFile){fCluBok->SetTitle(fStClu); fCluBok->Modified();} 
245   if(fEsdFile){fEsdBok->SetTitle(fStEsd); fEsdBok->Modified();}
246   
247 }//Draw()
248 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
249 void RenderHit(TClonesArray *pHitLst)
250 {//used by ReadEvent() and SimulateEvent() to render hits to polymarker structures, one per chamber
251   for(Int_t iHit=0;iHit<pHitLst->GetEntries();iHit++){       //hits loop
252     AliHMPIDHit *pHit = (AliHMPIDHit*)pHitLst->At(iHit); Int_t ch=pHit->Ch(); Float_t x=pHit->LorsX(); Float_t y=pHit->LorsY();    //get current hit        
253     switch(pHit->Pid()){
254       case 50000050: fRenCko[ch]->SetNextPoint(x,y);break; 
255       case 50000051: fRenFee[ch]->SetNextPoint(x,y);break;
256       default:       fRenMip[ch]->SetNextPoint(x,y);break;
257     }//switch hit PID      
258 //    Printf("----------ihit %i ch %i chhit %i MIP %i CKO %i FEE %i",iHit,ch,pHit->Pid());
259   }//hits loop for this entry
260 }//RenderHits()
261 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
262 void RenderDig(TObjArray *pDigLst)
263 {//used by ReadEvent() and SimulateEvent() to render digs to Tbox structures, one per chamber
264   for(Int_t iCh=0;iCh<=6;iCh++){                                    //chambers loop   
265     TClonesArray *pDigCham=(TClonesArray*)pDigLst->At(iCh);         //get digs list for this chamber
266     nDigs[iCh] = 0;
267     fTotPads[iCh] = pDigCham->GetEntries();
268     for(Int_t iDig=0;iDig<pDigCham->GetEntries();iDig++){            //digs loop
269       AliHMPIDDigit *pDig = (AliHMPIDDigit*)pDigCham->At(iDig); Float_t x=pDig->LorsX(); Float_t y=pDig->LorsY();    //get current hit        
270       fRenDig[iCh][iDig]->SetX1(x-0.5*AliHMPIDParam::SizePadX());
271       fRenDig[iCh][iDig]->SetX2(x+0.5*AliHMPIDParam::SizePadX());
272       fRenDig[iCh][iDig]->SetY1(y-0.5*AliHMPIDParam::SizePadY());
273       fRenDig[iCh][iDig]->SetY2(y+0.5*AliHMPIDParam::SizePadY());
274       fRenDig[iCh][iDig]->SetUniqueID((Int_t)pDig->Q());
275       fBox[iCh][iDig]->SetX1(x-0.5*AliHMPIDParam::SizePadX());
276       fBox[iCh][iDig]->SetX2(x+0.5*AliHMPIDParam::SizePadX());
277       fBox[iCh][iDig]->SetY1(y-0.5*AliHMPIDParam::SizePadY());
278       fBox[iCh][iDig]->SetY2(y+0.5*AliHMPIDParam::SizePadY());
279       nDigs[iCh]++;
280     }//Digit loop
281   }//hits loop for this entry
282 }//RenderHits()
283 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
284 void RenderClu(TObjArray *pClus)
285 {//used by ReadEvent() and SimulateEvent() to render clusters to polymarker structures, one per chamber
286   for(Int_t iCh=0;iCh<=6;iCh++){                                     //chambers loop   
287     TClonesArray *pClusCham=(TClonesArray*)pClus->At(iCh);           //get clusters list for this chamber
288     fTotClus[iCh] = pClusCham->GetEntries();
289     for(Int_t iClu=0;iClu<pClusCham->GetEntries();iClu++){           //clusters loop
290       AliHMPIDCluster *pClu = (AliHMPIDCluster*)pClusCham->At(iClu); //get current cluster        
291       fRenClu[iCh]->SetNextPoint(pClu->X(),pClu->Y());
292 //      Printf("RenderClu: ch %i x %f y %f",iCh,pClu->X(),pClu->Y());
293     }//cluster loop
294   }//chamber loop for this entry
295 }//RenderClus()
296 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
297 void RenderEsd(AliESDEvent *pEsd)
298 {//used by ReadEvent() or SimulateEvent() to render ESD to polymarker structures for rings and intersections one per chamber
299   AliHMPIDRecon rec;
300   for(Int_t iTrk=0;iTrk<pEsd->GetNumberOfTracks();iTrk++){//tracks loop to collect cerenkov rings and intersection points
301     AliESDtrack *pTrk=pEsd->GetTrack(iTrk);    Int_t ch=pTrk->GetHMPIDcluIdx(); //get track and chamber intersected by it
302     if(ch<0) continue;                                                          //this track does not intersect any chamber
303     Float_t thRa,phRa,xRa,yRa; pTrk->GetHMPIDtrk(xRa,yRa,thRa,phRa);            //get info on current track
304     ch/=1000000;                            
305     Float_t xPc=0,yPc=0; AliHMPIDTracker::IntTrkCha(pTrk,xPc,yPc);              //find again intersection of track with PC--> it is not stored in ESD!
306     fRenTxC[ch]->SetNextPoint(xPc,yPc);                                         //add this intersection point
307     Float_t ckov=pTrk->GetHMPIDsignal();                                        //get ckov angle stored for this track  
308     if(ckov>0){
309       rec.SetTrack(xRa,yRa,thRa,phRa);
310       for(Int_t j=0;j<500;j++){
311         TVector2 pos; pos=rec.TracePhot(ckov,j*6.28/500.);
312        if(!AliHMPIDParam::IsInDead(pos.X(),pos.Y())) fRenRin[ch]->SetNextPoint(pos.X(),pos.Y());
313       }      
314     }//if ckov is valid
315   }//tracks loop  
316 }//RenEsd()
317 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
318 void SimulateEsd(AliESDEvent *pEsd)
319 {
320   TParticle part; TLorentzVector mom;
321   for(Int_t iTrk=0;iTrk<100;iTrk++){//stack loop
322     Printf("SimulateEsd: kProton %i",kProton);
323     part.SetPdgCode(kProton);
324     part.SetProductionVertex(0,0,0,0);
325     Double_t eta= -0.2+gRandom->Rndm()*0.4; //rapidity is random [-0.2,+0.2]
326     Double_t phi= gRandom->Rndm()*60.*TMath::DegToRad();   //phi is random      [ 0  , 60 ] degrees    
327     mom.SetPtEtaPhiM(5,eta,phi,part.GetMass());
328     part.SetMomentum(mom);
329     AliESDtrack trk(&part);
330     pEsd->AddTrack(&trk);
331   }//stack loop  
332 }//EsdFromStack()
333 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
334 void SimulateHits(AliESDEvent *pEsd, TClonesArray *pHits)
335 {//used by SimulateEvent to simulate hits out from provided ESD
336   const Int_t kCerenkov=50000050;
337   const Int_t kFeedback=50000051;
338   
339   AliHMPIDRecon rec;
340   Float_t eMip=200e-9,ePho=7.5e-9; 
341   Int_t hc=0; 
342   for(Int_t iTrk=0;iTrk<pEsd->GetNumberOfTracks();iTrk++){//tracks loop
343     AliESDtrack *pTrk=pEsd->GetTrack(iTrk);
344     Float_t xRa,yRa;
345     Int_t ch=AliHMPIDTracker::IntTrkCha(pTrk,xRa,yRa);
346     if(ch<0) continue; //this track does not hit HMPID
347     Float_t beta = pTrk->GetP()/(TMath::Sqrt(pTrk->GetP()*pTrk->GetP()+0.938*0.938));
348     Float_t ckov=TMath::ACos(1./(beta*1.292));
349
350     Float_t theta,phi,xPc,yPc,; pTrk->GetHMPIDtrk(xPc,yPc,theta,phi); rec.SetTrack(xRa,yRa,theta,phi); 
351     
352     if(!AliHMPIDParam::IsInDead(xPc,yPc)) new((*pHits)[hc++]) AliHMPIDHit(ch,eMip,kProton  ,iTrk,xPc,yPc);                 //mip hit
353     Int_t nPhots = (Int_t)(20.*TMath::Power(TMath::Sin(ckov),2)/TMath::Power(TMath::Sin(TMath::ACos(1./1.292)),2));
354     for(int i=0;i<nPhots;i++){
355       TVector2 pos;
356       pos=rec.TracePhot(ckov,gRandom->Rndm()*TMath::TwoPi());
357       if(!AliHMPIDParam::IsInDead(pos.X(),pos.Y())) new((*pHits)[hc++]) AliHMPIDHit(ch,ePho,kCerenkov,iTrk,pos.X(),pos.Y());
358     }                      //photon hits  
359     for(int i=0;i<3;i++){//feedback photons
360       Float_t x=gRandom->Rndm()*160; Float_t y=gRandom->Rndm()*150;
361       if(!AliHMPIDParam::IsInDead(x,y)) new((*pHits)[hc++]) AliHMPIDHit(ch,ePho,kFeedback,iTrk,x,y);                 //feedback hits  
362     }//photon hits loop                      
363   }//tracks loop    
364 }//SimulateHits()
365 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
366 TString Stack(Int_t evt,Int_t tid)
367 {
368 // Prints some useful info from stack
369 // Arguments: evt - event number. if not -1 print info only for that event
370 //            tid - track id. if not -1 then print it and all it's mothers if any   
371 //   Returns: mother tid of the given tid if any
372   if(gAL->LoadHeader()) return -1;
373   if(gAL->LoadKinematics()) return -1;
374   
375   gAL->GetEvent(evt);    
376   AliStack *pStack=gAL->Stack();  
377   TParticle *pTrack=pStack->Particle(tid);
378 //  Int_t mtid=pTrack->GetFirstMother();
379   TString str;
380   str.Append(Form("with P = %7.4f (%7.4f,%7.4f,%7.4f) GeV/c ",pTrack->P(),pTrack->Px(),pTrack->Py(),pTrack->Pz()));
381   gAL->UnloadHeader();  gAL->UnloadKinematics();
382   return str;
383 }
384 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
385 void DispTB(TString t0,TString t1,TString t2,TString t3)
386 {
387   fCanvasImp->SetStatusText(t0,0);
388   fCanvasImp->SetStatusText(t1,1);
389   fCanvasImp->SetStatusText(t2,2);
390   fCanvasImp->SetStatusText(t3,3);
391 }
392 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
393 Bool_t FindPos(TVector3 xyz,Int_t &cham,Int_t &sect,Int_t &gap,Int_t &padX,Int_t &padY)
394 {
395 // It finds the chamber parameters for a given point 
396 // Arguments:  xyz  coordinates of a given point in MARS
397 //   Returns:  cham   chamber ID ( 0-6 )
398 //             sect   sector  ID ( 0-5 )
399 //             padX   X (integer) of the pad in X in the given sector (1-80)
400 //             padY   Y (integer) of the pad in Y in the given sector (1-48)
401   cham = -1;
402   TGeoNode *node = gGeoManager->FindNode(xyz.X(),xyz.Y(),xyz.Z());
403   if(!node) return kFALSE;
404   TGeoVolume *vol = node->GetVolume();
405   if(!vol) return kFALSE;
406   TGeoManager *geo = vol->GetGeoManager();
407   if(!geo) return kFALSE;
408   Int_t i=0;
409   while(geo->GetMother(i)) {
410     TString s = geo->GetMother(i)->GetName();
411 //    if(s.Contains("Hcel_")) padX=(Int_t)(s.Remove(0,5)).Atof();
412 //    if(s.Contains("Hrow_")) padY=(Int_t)(s.Remove(0,5)).Atof();
413 //    if(s.Contains("Hsec_")) sect=(Int_t)(s.Remove(0,5)).Atof();
414 //    if(s.Contains("Hmp_"))  cham=(Int_t)(s.Remove(0,4)).Atof();
415     if(s.Contains("Hcel_")) padX=geo->GetMother(i)->GetNumber();
416     if(s.Contains("Hrow_")) padY=geo->GetMother(i)->GetNumber();
417     if(s.Contains("Hsec_")) sect=geo->GetMother(i)->GetNumber();
418     if(s.Contains("Hmp_"))  cham=geo->GetMother(i)->GetNumber();
419     i++; 
420   }
421   return (cham==-1) ? kFALSE : kTRUE;
422 }
423 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
424 void DisplayInfo(Int_t evt,Int_t px, Int_t py)
425 {
426   if(!gPad) return;
427   TVirtualPad *pPad=gPad->GetSelectedPad();
428   Int_t padN = pPad->GetNumber()-1;
429   if(padN<0 || padN>8) return;
430   Int_t ch,pc,padX,padY;
431   ch = fChamN[padN];
432   if(ch<0) return;
433   TString text0,text1,text2,text3;
434   
435   Float_t x=pPad->AbsPixeltoX(px); Float_t y=pPad->AbsPixeltoY(py); 
436   fParam->Lors2Pad(x,y,pc,padX,padY);
437   TVector3 xyz=fParam->Lors2Mars(ch,x,y);
438   
439   if(padX>=0&&padY>=0) {
440     text0.Append(Form("Pad(%i,%i)-LORS(%6.2f,%6.2f)-MARS(%7.2f,%7.2f,%7.2f)",padX,padY,x,y,xyz.X(),xyz.Y(),xyz.Z()));
441     text1.Append(Form("Module %i Sector %i",ch,pc));
442     text2="";
443     text3.Append(Form("Pads = %i - Clusters = %i - Multiplicity %5.2f%%",fTotPads[ch],fTotClus[ch],100.*fTotPads[ch]/(144.*160.)));
444   }
445   
446   TObject *obj = fCanvas->GetSelected();
447   TString name = obj->GetName();
448   
449 // Find object DIGIT
450
451   if(name=="") {DispTB(text0,text1,text2,text3);return;} // TLatex not interesting
452     
453   if(name.Contains("TBox")) {
454     TBox *box = (TBox*)obj;
455     if(box->GetUniqueID()==0) return; // just black frame hit!
456     text2.Append(Form("charge = %i ADC",box->GetUniqueID()));
457     DispTB(text0,text1,text2,text3);
458     return;
459   }
460 //
461 // Find object HITs CLUSTER TRACK and RING (based on TPolyMarker and symbol)
462 //
463   TPolyMarker *b = (TPolyMarker*)obj;
464
465   const Int_t big = 9999;
466
467   // check if point is near one of the points
468   Int_t distance = big;
469   Int_t index=0;
470
471   Double_t *xPol = b->GetX();
472   Double_t *yPol = b->GetY();
473
474   for(Int_t i=0;i<b->Size();i++) {
475     Int_t pxp = pPad->XtoAbsPixel(pPad->XtoPad(xPol[i]));
476     Int_t pyp = pPad->YtoAbsPixel(pPad->YtoPad(yPol[i]));
477     Int_t d   = TMath::Abs(pxp-px) + TMath::Abs(pyp-py);
478     if (d < distance) {distance = d; index=i;}
479   }
480
481   Int_t symbol = b->GetMarkerStyle();
482
483   //  kOpenTriangleUp  Hit Mip
484   //  kOpenCircle      Hit Ckov
485   //  kOpenDiamond     Hit Feedback
486   //  kStar            Cluster 
487   //  kPlus            Track
488   //  kFullDotSmall    Ring
489   
490   // Case Hit Mip of Hit Ckov or Hit Feedback
491   if(symbol==kHitMip || symbol==kHitCko || symbol==kHitFee) {
492     if(evt!=kButton1Down) return;
493     TString nameHit;
494     Int_t iCko[7]={0,0,0,0,0,0,0};
495     Int_t iFee[7]={0,0,0,0,0,0,0};
496     Int_t iMip[7]={0,0,0,0,0,0,0};
497     Int_t iHit;
498     Int_t chHit;
499     Int_t indHit=0;
500     
501     Int_t indTrk = b->GetUniqueID(); // track index
502     for(Int_t iEnt=0;iEnt<fHitTree->GetEntries();iEnt++){//entries loop
503       fHitTree->GetEntry(iEnt);                              
504       for(iHit=0;iHit<fHitLst->GetEntries();iHit++) {       //hits loop
505         AliHMPIDHit *pHit = (AliHMPIDHit*)fHitLst->At(iHit);
506         chHit = pHit->Ch();
507         Int_t pid = pHit->Pid();
508         if(pid==50000050) iCko[chHit]++;
509         else if(pid==50000051) iFee[chHit]++;
510         else iMip[chHit]++;
511
512         if(symbol==kHitMip && ch==chHit && index==iMip[chHit]-1) {indTrk=iEnt;indHit = iHit;break;}
513         if(symbol==kHitCko && ch==chHit && index==iCko[chHit]-1) {indTrk=iEnt;indHit = iHit;break;}
514         if(symbol==kHitFee && ch==chHit && index==iFee[chHit]-1) {indTrk=iEnt;indHit = iHit;break;}
515       }
516     }
517     fHitTree->GetEntry(indTrk);
518     AliHMPIDHit *pHit = (AliHMPIDHit*)fHitLst->At(indHit);
519
520     Int_t tid = pHit->Tid();
521     
522     TString str = Stack(fEvt,tid);
523      
524     Float_t x=pHit->LorsX(); 
525     Float_t y=pHit->LorsY();
526     Float_t charge = pHit->Q();
527     
528     TVector3 v = fParam->Lors2Mars(pHit->Ch(),pHit->LorsX(),pHit->LorsY());
529     Int_t cham,sect,gap,padX,padY;
530     FindPos(v,cham,sect,gap,padX,padY);
531     
532     if(pHit->Pid()==50000050) {nameHit = " Cherenkov Photon ";}
533     else if(pHit->Pid()==50000051) {nameHit = " Feedback Photon ";}
534     else if(fPdg->GetParticle(pHit->Pid())) nameHit = fPdg->GetParticle(pHit->Pid())->GetName();
535     nameHit.Append(Form(" (tid %i)",tid));
536     text0="";text0.Append(Form("Hit(%5.2f,%6.2f) LORS - Pad Volume(%i,%i) - hit %i/%i",x,y,padX,padY,indHit+1,fHitLst->GetEntries()));
537     text2="";text2.Append(Form("Q = %7.2f ADC",charge));
538     text3="";text3="Particle: "+ nameHit +" "+ str;
539   } // Hit  
540   else if (symbol==kCluster) {
541     TClonesArray *pClusCham=(TClonesArray*)fCluLst->At(ch);         //get clusters list for this chamber
542     AliHMPIDCluster *pClu = (AliHMPIDCluster*)pClusCham->At(index); //get current cluster
543     text0="";text0.Append(Form("CLUSTER: x %6.2f y %6.2f",pClu->X(),pClu->Y()));
544     text2="";text2.Append(Form("charge = %i ADC",(Int_t)pClu->Q()));
545     }
546   else if (symbol==kTrack) {
547     AliESDtrack *pTrk=fEsd->GetTrack(index);
548     Float_t thRa,phRa,xRa,yRa; pTrk->GetHMPIDtrk(xRa,yRa,thRa,phRa);
549     Float_t xPc,yPc; AliHMPIDTracker::IntTrkCha(pTrk,xPc,yPc);
550     text0="";text0.Append(Form("TRACK: x %6.2f y %6.2f at PC plane",xPc,yPc));
551     text2="";text2.Append(Form("p = %7.2f GeV/c",pTrk->GetP()));
552     Float_t ckov=pTrk->GetHMPIDsignal();                             
553     if(ckov>0){
554       Float_t x,y;Int_t q,nacc;   pTrk->GetHMPIDmip(x,y,q,nacc);
555       text3="";text3.Append(Form("Theta Cherenkov %5.3f with %i photons",pTrk->GetHMPIDsignal(),nacc));
556     }      
557   }
558 //Update toolbar status  
559
560   DispTB(text0,text1,text2,text3);  
561 }
562 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
563 void CloseInfo()
564 {
565 }
566 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
567 void DoZoom(Int_t evt, Int_t px, Int_t py, TObject *)
568 {
569 //  Printf(" px %i py%i event %i",px,py,evt);
570   if(evt==kMouseMotion||evt==kButton1Down) DisplayInfo(evt,px,py);
571   if(evt==11)  CloseInfo();
572   if(evt!=5 && evt!=6) return; //5- zoom in 6-zoom out
573   const Int_t minZoom=64;
574   const Int_t maxZoom=2;
575   static Int_t zoom[7]={64,64,64,64,64,64,64}; //zoom level
576   
577  // if(!obj->IsA()->InheritsFrom("TPad")) return;  //current object is not pad
578   TVirtualPad *pPad=gPad->GetSelectedPad();
579   Int_t padN = pPad->GetNumber()-1;
580   if(padN<0 || padN>8) return;
581   
582   Int_t iCh = fChamN[padN];
583   if(iCh < 0) return;
584   
585   if(evt==5&&zoom[iCh]==maxZoom) return; 
586   if(evt==6&&zoom[iCh]==minZoom) return; 
587     
588   Float_t x=pPad->AbsPixeltoX(px); Float_t y=pPad->AbsPixeltoY(py); 
589  
590   if(evt==5){ zoom[iCh]=zoom[iCh]/2;     pPad->Range(x-zoom[iCh]*2,y-zoom[iCh]*2,x+zoom[iCh]*2,y+zoom[iCh]*2);} //zoom in
591   if(evt==6){ zoom[iCh]=zoom[iCh]*2;     pPad->Range(x-zoom[iCh]*2,y-zoom[iCh]*2,x+zoom[iCh]*2,y+zoom[iCh]*2);} //zoom out 
592   if(zoom[iCh]==minZoom) pPad->Range(-10,-10,AliHMPIDParam::SizeAllX()+5,AliHMPIDParam::SizeAllY()+5);
593   ((TCanvas *)gTQSender)->SetTitle(Form("zoom x%i",minZoom/zoom[iCh]));
594   pPad->Modified();
595   pPad->Update();                                              
596 }
597 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
598 void ReadEvent()
599 {//used by NextEvent()  to read curent event and construct all render elements
600   if(fNevt && fEvt>=fNevt) fEvt=0; //loop over max event
601   if(fNevt && fEvt<0) fEvt=fNevt-1; //loop over max event
602   
603   if(fHitFile){ 
604     if(fHitTree) delete fHitTree;   fHitTree=(TTree*)fHitFile->Get(Form("Event%i/TreeH",fEvt));
605     
606                           fHitTree->SetBranchAddress("HMPID",&fHitLst);
607     for(Int_t iEnt=0;iEnt<fHitTree->GetEntries();iEnt++){    
608                           fHitTree->GetEntry(iEnt);
609       RenderHit(fHitLst);   
610     }//prim loop
611   }//if hits file
612
613   if(fDigFile){ 
614     if(fDigTree) delete fDigTree;   fDigTree=(TTree*)fDigFile->Get(Form("Event%i/TreeD",fEvt));
615     for(Int_t iCh=AliHMPIDParam::kMinCh;iCh<=AliHMPIDParam::kMaxCh;iCh++) fDigTree->SetBranchAddress(Form("HMPID%i",iCh),&(*fDigLst)[iCh]);      
616     fDigTree->GetEntry(0);                              
617     RenderDig(fDigLst);   
618   }//if digs file
619     
620   if(fCluFile){ 
621     if(fCluTree) delete fCluTree; fCluTree=(TTree*)fCluFile->Get(Form("Event%i/TreeR",fEvt));
622     for(Int_t iCh=AliHMPIDParam::kMinCh;iCh<=AliHMPIDParam::kMaxCh;iCh++) fCluTree->SetBranchAddress(Form("HMPID%i",iCh),&(*fCluLst)[iCh]);      
623     fCluTree->GetEntry(0);
624     RenderClu(fCluLst);   
625   }//if clus file
626   
627   if(fEsdFile){//if ESD file open
628     fEsdTree->GetEntry(fEvt);  
629     RenderEsd(fEsd);
630   }//if ESD file 
631 }//ReadEvent()
632 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
633 void SimulateEvent()
634 {// used by NextEvent() to simulate all info
635   AliCDBManager* pCDB = AliCDBManager::Instance();  pCDB->SetDefaultStorage("local://$HOME"); pCDB->SetRun(0);
636   AliCDBEntry *pNmeanEnt=pCDB->Get("HMPID/Calib/Nmean");
637
638   SimulateEsd(fEsd);
639   SimulateHits(fEsd,fHitLst);
640                  AliHMPIDv2::Hit2Sdi(fHitLst,fSdiLst);                               
641           AliHMPIDDigitizer::Sdi2Dig(fSdiLst,fDigLst);     
642       AliHMPIDReconstructor::Dig2Clu(fDigLst,fCluLst);
643             AliHMPIDTracker::Recon(fEsd,fCluLst,(TObjArray*)pNmeanEnt->GetObject());
644             
645   RenderHit(fHitLst);
646   RenderClu(fCluLst);
647   RenderEsd(fEsd);            
648 }//SimulateEvent()
649 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
650 void CheckStatus()
651 {
652   if(fHitFile){
653     if(fStHitMip=="OFF") {fHitMipBok->SetFillColor(kRed);} else {fHitMipBok->SetFillColor(18);}
654     if(fStHitCko=="OFF") {fHitCkoBok->SetFillColor(kRed);} else {fHitCkoBok->SetFillColor(18);}
655     if(fStHitFee=="OFF") {fHitFeeBok->SetFillColor(kRed);} else {fHitFeeBok->SetFillColor(18);}
656   }
657   if(fDigFile){if(fStDig   =="OFF") {fDigBok->SetFillColor(kRed);} else {fDigBok->SetFillColor(18);}}
658   if(fCluFile){if(fStClu   =="OFF") {fCluBok->SetFillColor(kRed);} else {fCluBok->SetFillColor(18);}}
659   if(fEsdFile){if(fStEsd   =="OFF") {fEsdBok->SetFillColor(kRed);} else {fEsdBok->SetFillColor(18);}}
660 }
661 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
662 void GetEvent()
663 {
664   ClearRenders();
665   CheckStatus();
666   switch(fType){
667     case 1: ReadEvent();break;
668 //    case 2: ReadCosmic(); break;
669     case 3: SimulateEvent();     break;
670     default:                 return;
671   }  
672   Draw();
673 }
674 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
675 void NextEvent()
676 {
677   fTimeArrow = 1;
678   fEvt+=fTimeArrow;
679   GetEvent();
680 }
681 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
682 void PrevEvent()
683 {
684   fTimeArrow = -1;
685   fEvt+=fTimeArrow;
686   GetEvent();
687 }
688 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
689 void End()
690 {
691   gSystem->Exit(0);
692 }
693 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
694 void Hdisp()                                  
695 {//display events from files if any in current directory or simulated events
696   
697   fParam=AliHMPIDParam::Instance();                          // first invocation of AliHMPIDParam to initialize geometry...
698   fPdg = TDatabasePDG::Instance();                           // first invocation of TDatabasePDG to retrieve particle infos...
699   
700   CreateContainers();
701   CreateRenders();
702   
703   TString title="Session with";
704   if(gSystem->IsFileInIncludePath("HMPID.Hits.root")){// tries to open hits
705     fHitFile=TFile::Open("HMPID.Hits.root");       fNevt=fHitFile->GetNkeys(); fType=1; title+=Form(" HITS-%i ",fNevt);
706   }
707   
708   if(gSystem->IsFileInIncludePath("HMPID.Digits.root")){// tries to open clusters
709      fDigFile=TFile::Open("HMPID.Digits.root");  fNevt=fDigFile->GetNkeys(); fType=1;  title+=Form(" DIGITS-%i ",fNevt);
710    }
711   
712   if(gSystem->IsFileInIncludePath("HMPID.RecPoints.root")){// tries to open clusters
713     fCluFile=TFile::Open("HMPID.RecPoints.root");  fNevt=fCluFile->GetNkeys(); fType=1;  title+=Form(" CLUSTERS-%i ",fNevt);
714    }
715   
716   if(gSystem->IsFileInIncludePath("AliESDs.root")){     
717     fEsdFile=TFile::Open("AliESDs.root"); 
718     fEsdTree=(TTree*)fEsdFile->Get("esdTree"); 
719     fEsd->ReadFromTree(fEsdTree); fEsd->GetStdContent();                       //clm: new ESD schema: see Task Force meeting 20th June, 2007
720     fNevt=fEsdTree->GetEntries(); fType=1;  title+=Form(" ESD-%i ",fNevt);
721     
722     //clm: we need to set the magnetic field  
723     if(gSystem->IsFileInIncludePath("galice.root")){
724     if(gAlice) delete gAlice;                       
725     gAL=AliRunLoader::Open();                       
726     gAL->LoadgAlice();           
727     AliHMPIDTracker::SetFieldMap(gAL->GetAliRun()->Field(),kTRUE);                         
728    }else{
729           Printf("=============== NO galice file! Magnetic field for ESD tracking is: %f ===============",AliTracker::GetBz());
730      }  
731       
732   }
733
734   if(gSystem->IsFileInIncludePath("cosmic.root")){                          //clm: Check if cosmic file is in the folder
735     fCosFile=TFile::Open("cosmic.root");  fCosTree=(TTree*)fCosFile->Get("cosmic");  fNevt=fCosTree->GetEntries();  fType=2;
736     fCosTree->SetBranchAddress("Digs",&fDigLst);   fCosTree->SetBranchAddress("Clus",&fCluLst); 
737   }            
738
739   fCanvas=new TCanvas("all","",-1024,768);fCanvas->SetWindowSize(1024,768);
740   fCanvasImp = fCanvas->GetCanvasImp();
741   fCanvasImp->ShowStatusBar();
742   fCanvas->Divide(3,3,0,0);//  pAll->ToggleEditor();
743   fCanvas->Connect("ProcessedEvent(Int_t,Int_t,Int_t,TObject*)",0,0,"DoZoom(Int_t,Int_t,Int_t,TObject*)");
744   fCanvas->cd(7); 
745   gStyle->SetPalette(1,0);
746   switch(fType){
747     case 1: fCanvas->SetTitle(title.Data());                      
748                          TButton *pNxtBtn = new TButton("Next"      ,"NextEvent()"   ,0.0,0.0,0.3,0.1); pNxtBtn->Draw(); 
749                          TButton *pPrvBtn = new TButton("Previous"  ,"PrevEvent()"   ,0.3,0.0,0.6,0.1); pPrvBtn->Draw(); 
750             if(fHitFile){TButton *pHitBtn = new TButton("Print hits","PrintHits()"   ,0.0,0.2,0.3,0.3); pHitBtn->Draw();}  
751             if(fDigFile){TButton *pDigBtn = new TButton("Print digs","PrintDigs()"   ,0.0,0.4,0.3,0.5); pDigBtn->Draw();}  
752             if(fCluFile){TButton *pCluBtn = new TButton("Print clus","PrintClus()"   ,0.0,0.6,0.3,0.7); pCluBtn->Draw();} 
753             if(fEsdFile){TButton *pEsdBtn = new TButton("Print ESD ","PrintEsd()"    ,0.0,0.8,0.3,0.9); pEsdBtn->Draw();}
754             if(fHitFile){      fHitMipBok = new TButton(Form("Mip  %s",fStHitMip.Data()),"SwitchHitMip()",0.3,0.16,0.6,0.22); fHitMipBok->Draw();}
755             if(fHitFile){      fHitCkoBok = new TButton(Form("Ckov %s",fStHitCko.Data()),"SwitchHitCko()",0.3,0.22,0.6,0.28); fHitCkoBok->Draw();}  
756             if(fHitFile){      fHitFeeBok = new TButton(Form("Fdbk %s",fStHitFee.Data()),"SwitchHitFee()",0.3,0.28,0.6,0.34); fHitFeeBok->Draw();}  
757             if(fDigFile){         fDigBok = new TButton(fStDig      ,"SwitchDigs()"  ,0.3,0.4,0.6,0.5); fDigBok->Draw();}  
758             if(fCluFile){         fCluBok = new TButton(fStClu      ,"SwitchClus()"  ,0.3,0.6,0.6,0.7); fCluBok->Draw();} 
759             if(fEsdFile){         fEsdBok = new TButton(fStEsd      ,"SwitchEsd()"   ,0.3,0.8,0.6,0.9); fEsdBok->Draw();}
760
761             if(fHitFile){TButton *fHitMipOnly = new TButton(" Only ","OnlyHitMip()",0.6,0.16,0.9,0.22); fHitMipOnly->Draw();}  
762             if(fHitFile){TButton *fHitCkoOnly = new TButton(" Only ","OnlyHitCko()",0.6,0.22,0.9,0.28); fHitCkoOnly->Draw();}  
763             if(fHitFile){TButton *fHitFeeOnly = new TButton(" Only ","OnlyHitFee()",0.6,0.28,0.9,0.34); fHitFeeOnly->Draw();}  
764             if(fDigFile){TButton *fDigOnly    = new TButton(" Only ","OnlyDigs()"  ,0.6,0.40,0.9,0.50); fDigOnly->Draw();}  
765             if(fCluFile){TButton *fCluOnly    = new TButton(" Only ","OnlyClus()"  ,0.6,0.60,0.9,0.70); fCluOnly->Draw();} 
766             if(fEsdFile){TButton *fEsdOnly    = new TButton(" Only ","OnlyEsd()"   ,0.6,0.80,0.9,0.90); fEsdOnly->Draw();}
767                          TButton *pAll        = new TButton(" ALL  ","All()"       ,0.5,0.90,0.7,1.00); pAll->Draw();
768             
769                                      TButton *pEnd    = new TButton("Quit"      ,"End()"         ,0.6,0.0,0.9,0.1); pEnd->Draw();
770     break;
771     case 2: fCanvas->SetTitle("COSMIC");
772                          TButton *pCosBtn = new TButton("Next"      ,"NextEvent()",0.0,0.0,0.3,0.1); pCosBtn->Draw(); 
773              
774     break;
775     case 3: fCanvas->SetTitle("SIMULATION"); 
776             TButton *pSimBtn = new TButton("Simulate"  ,"NextEvent()",0.0,0.0,0.3,0.1); pSimBtn->Draw(); 
777             TButton *pHitBtn = new TButton("Print hits","PrintHits()",0.0,0.2,0.3,0.3); pHitBtn->Draw();  
778             TButton *pDigBtn = new TButton("Print digs","PrintDigs()",0.0,0.4,0.3,0.5); pDigBtn->Draw();
779             TButton *pCluBtn = new TButton("Print clus","PrintClus()",0.0,0.6,0.3,0.7); pCluBtn->Draw(); 
780             TButton *pEsdBtn = new TButton("Print ESD" ,"PrintEsd()" ,0.0,0.8,0.3,0.9); pEsdBtn->Draw();
781             if(fHitFile){      fHitMipBok = new TButton(Form("Mips %s",fStHitMip.Data()),"SwitchHitMip()",0.3,0.16,0.6,0.22); fHitMipBok->Draw();}  
782             if(fHitFile){      fHitCkoBok = new TButton(Form("Ckov %s",fStHitCko.Data()),"SwitchHitCko()",0.3,0.22,0.6,0.28); fHitCkoBok->Draw();}  
783             if(fHitFile){      fHitFeeBok = new TButton(Form("Fdbk %s",fStHitFee.Data()),"SwitchHitFee()",0.3,0.28,0.6,0.34); fHitFeeBok->Draw();}  
784             if(fDigFile){         fDigBok = new TButton(fStDig      ,"SwitchDigs()"  ,0.3,0.4,0.6,0.5); fDigBok->Draw();}  
785             if(fCluFile){         fCluBok = new TButton(fStClu      ,"SwitchClus()"  ,0.3,0.6,0.6,0.7); fCluBok->Draw();} 
786             if(fEsdFile){         fEsdBok = new TButton(fStEsd      ,"SwitchEsd()"   ,0.3,0.8,0.6,0.9); fEsdBok->Draw();}
787             
788             if(fHitFile){TButton *fHitMipOnly = new TButton(" Only ","OnlyHitMip()",0.6,0.16,0.9,0.22); fHitMipOnly->Draw();}  
789             if(fHitFile){TButton *fHitCkoOnly = new TButton(" Only ","OnlyHitCko()",0.6,0.22,0.9,0.28); fHitCkoOnly->Draw();}  
790             if(fHitFile){TButton *fHitFeeOnly = new TButton(" Only ","OnlyHitFee()",0.6,0.28,0.9,0.34); fHitFeeOnly->Draw();}  
791             if(fDigFile){TButton *fDigOnly    = new TButton(" Only ","OnlyDigs()"  ,0.6,0.40,0.9,0.50); fDigOnly->Draw();}  
792             if(fCluFile){TButton *fCluOnly    = new TButton(" Only ","OnlyClus()"  ,0.6,0.60,0.9,0.70); fCluOnly->Draw();} 
793             if(fEsdFile){TButton *fEsdOnly    = new TButton(" Only ","OnlyEsd()"   ,0.6,0.80,0.9,0.90); fEsdOnly->Draw();}
794                          TButton *pSimAll     = new TButton(" ALL  ","All()"       ,0.5,0.90,0.7,1.00); pSimAll->Draw();
795     break;
796   }
797     
798   NextEvent();           
799       
800 }//Hdisp()
801 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
802 void SwitchHitMip()
803 {
804   fStHitMip=(fStHitMip=="OFF")? "ON":"OFF";
805   GetEvent();
806 }
807 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
808 void SwitchHitCko()
809 {
810   fStHitCko=(fStHitCko=="OFF")? "ON":"OFF";
811   GetEvent();
812 }
813 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
814 void SwitchHitFee()
815 {
816   fStHitFee=(fStHitFee=="OFF")? "ON":"OFF";
817   GetEvent();
818 }
819 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
820 void SwitchDigs()
821 {
822   fStDig=(fStDig=="OFF")? "ON":"OFF";
823   GetEvent();
824 }
825 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
826 void SwitchClus()
827 {
828   fStClu=(fStClu=="OFF")? "ON":"OFF";
829   GetEvent();
830 }
831 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
832 void SwitchEsd()
833 {
834   fStEsd=(fStEsd=="OFF")? "ON":"OFF";
835    GetEvent();
836 }
837 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
838 void AllNo()
839 {
840   if(fHitFile) {
841     fStHitMip = "OFF";
842     fStHitCko = "OFF";
843     fStHitFee = "OFF";
844   }
845   if(fDigFile) fStDig    = "OFF";
846   if(fCluFile) fStClu    = "OFF";
847   if(fEsdFile) fStEsd    = "OFF";
848 }
849 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
850 void AllYes()
851 {
852   if(fHitFile) {
853     fStHitMip = "ON";
854     fStHitCko = "ON";
855     fStHitFee = "ON";
856   }
857   if(fDigFile) fStDig    = "ON";
858   if(fCluFile) fStClu    = "ON";
859   if(fEsdFile) fStEsd    = "ON";
860 }
861 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
862 void All()
863 {
864   AllYes();
865   GetEvent();
866 }
867 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
868 void OnlyHitMip()
869 {
870   AllNo();
871   fStHitMip = "ON";
872   GetEvent();
873 }
874 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
875 void OnlyHitCko()
876 {
877   AllNo();
878   fStHitCko = "ON";
879   GetEvent();
880 }
881 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
882 void OnlyHitFee()
883 {
884   AllNo();
885   fStHitFee = "ON";
886   GetEvent();
887 }
888 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
889 void OnlyDigs()
890 {
891   AllNo();
892   fStDig    = "ON";
893   GetEvent();
894 }
895 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
896 void OnlyClus()
897 {
898   AllNo();
899   fStClu    = "ON";
900   GetEvent();
901 }
902 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
903 void OnlyEsd()
904 {
905   AllNo();
906   fStEsd    = "ON";
907   GetEvent();
908 }
909 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++