Extra header added to the list
[u/mrichter/AliRoot.git] / HMPID / Hdisp.C
index 9491632..a7ec8e8 100644 (file)
+#if !defined(__CINT__) || defined(__MAKECINT__)
+
+#include <TSystem.h>
+#include <TFile.h>
+#include <TVirtualX.h>
+#include <TTree.h>
+#include <TButton.h>
+#include <TCanvas.h>
+#include <TCanvasImp.h>
+#include <TStyle.h>
+#include <TString.h>
+#include <TClonesArray.h>
+#include <TParticle.h>
+#include <TRandom.h>
+#include <TLatex.h>
+#include <TPDGCode.h>
+#include <TLegend.h>
+#include <TPolyMarker.h>
+#include <TBox.h>
+#include <AliESDEvent.h>
+#include <AliCDBManager.h>
+#include <AliCDBEntry.h>
+#include "AliHMPIDHit.h"
+#include "AliHMPIDv2.h"
+#include "AliHMPIDReconstructor.h"
+#include "AliHMPIDRecon.h"
+#include "AliHMPIDParam.h"
+#include "AliHMPIDCluster.h"
+#include "AliTracker.h"
+#include "AliStack.h"
+
+#endif
+
+AliHMPIDParam *fParam;
+TDatabasePDG *fPdg;
+
+TCanvas *fCanvas=0; Int_t fType=1; Int_t fEvt=-1; Int_t fNevt=0;                      
+TCanvasImp *fCanvasImp;
+TFile *fHitFile; TTree *fHitTree; TClonesArray *fHitLst; TPolyMarker *fRenMip[7]; TPolyMarker *fRenCko[7]; TPolyMarker *fRenFee[7];
+                                  TClonesArray *fSdiLst; 
+TFile *fDigFile; TTree *fDigTree; TObjArray    *fDigLst; TBox *fRenDig[7][160*144]; TBox *fBox[7][160*144];   
+TFile *fCluFile; TTree *fCluTree; TObjArray    *fCluLst; TPolyMarker *fRenClu[7];
+TFile *fEsdFile; TTree *fEsdTree; AliESDEvent  *fEsd;    TPolyMarker *fRenTxC[7]; TPolyMarker *fRenRin[7];  
+TFile *fCosFile; TTree *fCosTree;
+
+TButton *fHitMipBok,*fHitCkoBok,*fHitFeeBok,*fDigBok,*fCluBok,*fEsdBok;
+
+TString fStHitMip = "ON";
+TString fStHitCko = "ON";
+TString fStHitFee = "ON";
+TString fStDig    = "ON";
+TString fStClu    = "ON";
+TString fStEsd    = "ON";
+
+Int_t fTimeArrow = 1;
+
+Int_t fMaxCharge = 200;  //maximum charge to saturate color to red
+
+Int_t fChamN[9]={6,5,-1,4,3,2,-1,1,0};
+
+Int_t fTotPads[7],fTotClus[7];
+
+Int_t qSigmaCut=0;
+
+Int_t trigType=0;
+
+AliRunLoader *gAL=0; 
+AliLoader *gDL=0; // detector loader (needed to get Digits and Clusters) 
+
+Int_t nDigs[7];
+
+enum EObjectType {kHitMip=kOpenTriangleUp,kHitCko=kOpenCircle,kHitFee=kOpenDiamond,kCluster=kStar,kTrack=kPlus,kRing=kFullDotSmall};
+  //  kOpenTriangleUp  Hit Mip
+  //  kOpenCircle      Hit Ckov
+  //  kOpenDiamond     Hit Feedback
+  //  kStar            Cluster 
+  //  kPlus            Track
+  //  kFullDotSmall    Ring
+  
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void CreateContainers()
+{//to create all containers
+  fHitLst=new TClonesArray("AliHMPIDHit");
+  fSdiLst=new TClonesArray("AliHMPIDDigit");
+  fDigLst=new TObjArray(7); for(Int_t i=0;i<7;i++) fDigLst->AddAt(new TClonesArray("AliHMPIDDigit"),i);       fDigLst->SetOwner(kTRUE);
+  fCluLst=new TObjArray(7); for(Int_t i=0;i<7;i++) fCluLst->AddAt(new TClonesArray("AliHMPIDCluster"),i);     fCluLst->SetOwner(kTRUE); 
+  fEsd   =new AliESDEvent;
+}
 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-void SimEsd(AliESD *pEsd)
-{
-  TParticle part; TLorentzVector mom;
-  for(Int_t iTrk=0;iTrk<25;iTrk++){//stack loop
-    part.SetPdgCode(kProton);
-    part.SetProductionVertex(0,0,0,0);  
-    Double_t eta= -0.4+gRandom->Rndm()*0.8; //rapidity is random [-0.4,+0.4]
-    Double_t phi= gRandom->Rndm()*1.4;      //phi is random      [ 0  , 80 ] degrees    
-    mom.SetPtEtaPhiM(2,eta,phi,part.GetMass());
-    part.SetMomentum(mom);
-    AliESDtrack trk(&part);
-    pEsd->AddTrack(&trk);
-  }//stack loop  
-}//EsdFromStack()
-//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-void EsdFromStack(AliESD *pEsd)
-{
-  al->LoadHeader();al->LoadKinematics();
-  AliStack *pStk=al->Stack();  
-  
-  for(Int_t iTrk=0;iTrk<pStk->GetNtrack();iTrk++){//stack loop
-    TParticle *pPart=pStk->Particle(iTrk);
-    if(pPart->GetPDG()->Charge()==0) continue; //neutral particles are not reconstructed
-    if(pPart->GetFirstMother()>0)    continue; //do not consider secondaries
-    AliESDtrack trk(pPart);
-    pEsd->AddTrack(&trk);
-  }//stack loop  
-}//EsdFromStack()
-//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-void HitsFromEsd(AliESD *pEsd, TClonesArray *pHitLst)
+void CreateRenders()
 {
-  AliHMPIDRecon rec;
-  const Int_t kCerenkov=50000050,kFeedback=50000051;
-  Int_t hc=0; TVector2 pos;
-  for(Int_t iTrk=0;iTrk<pEsd->GetNumberOfTracks();iTrk++){//tracks loop
-    AliESDtrack *pTrk=pEsd->GetTrack(iTrk);
-    Float_t xRa,yRa;
-    Int_t ch=AliHMPIDTracker::IntTrkCha(pTrk,xRa,yRa);
-    if(ch<0) continue; //this track does not hit HMPID
-    Float_t ckov=0.63;
-
-    Float_t th,ph,xPc,yPc,; pTrk->GetHMPIDtrk(xPc,yPc,th,ph); rec.SetTrack(xRa,yRa,th,ph); 
-    
-    if(!AliHMPIDDigit::IsInDead(xPc,yPc)) new((*pHitLst)[hc++]) AliHMPIDHit(ch,200e-9,kProton  ,iTrk,xPc,yPc);                 //mip hit
-    for(int i=0;i<4;i++)  new((*pHitLst)[hc++]) AliHMPIDHit(ch,7.5e-9,kFeedback,iTrk,gRandom->Rndm()*130,gRandom->Rndm()*126); //bkg hits 4 per track
-    for(int i=0;i<16;i++){
-      rec.TracePhot(ckov,gRandom->Rndm()*TMath::TwoPi(),pos);
-      new((*pHitLst)[hc++]) AliHMPIDHit(ch,7.5e-9,kCerenkov,iTrk,pos.X(),pos.Y());
-    }                      //photon hits  
-  }//tracks loop    
-}//HitsFromEsd()
-//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-void DrawSeg()
-{
-  TCanvas *pC=new TCanvas("seg","Segmentation as seen from electronics side");
-  DrawPc(1);
-
-  pC->ToggleEventStatus();
-  pC->SetEditable(0);
-  pC->AddExec("status","DrawStatus()");
-}
-//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-void DrawStatus()
-{// Show info about current cursur position in status bar of the canvas
-//  Printf("event %i",gPad->GetEvent()); return;
-  TPad *pad=gPad;
-  TCanvas *pC=(TCanvas*)pad; 
-  TRootCanvas *pRC= (TRootCanvas*)pC->GetCanvasImp();
-  TGStatusBar *pBar=pRC->GetStatusBar();
-  pBar->SetParts(5);
-  Float_t x=pad->AbsPixeltoX(pad->GetEventX()); Float_t y=pad->AbsPixeltoY(pad->GetEventY());
-  if(AliHMPIDDigit::IsInDead(x,y))
-    pBar->SetText("Out of sensitive area",4);    
-  else{
-    Int_t pc,px,py,w32,ddl,r,d,a;  AliHMPIDDigit::Lors2Pad(x,y,pc,px,py); AliHMPIDDigit dig; dig.Set(1,pc,px,py); dig.Raw(w32,ddl,r,d,a);
-    pBar->SetText(Form("(pc%i,px%i,py%i) (r%i,d%i,a%i) (%.2f,%.2f)",
-                         pc  ,px  ,py,    r  ,d  ,a   ,dig.LorsX(),dig.LorsY()),4);
-  }    
-//  if(pad->GetEvent()==1){
-//    new TCanvas("zoom",Form("Row %i DILOGIC %i",dig.Row(),dig.Dilogic()));  
-//  }
-}//DrawStatus()
-//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-void DrawPc(Bool_t isFill) 
-{ 
-  gPad->Range(-10,-10,AliHMPIDDigit::SizeAllX()+5,AliHMPIDDigit::SizeAllY()+5); 
+  for(Int_t ch=0;ch<7;ch++){
+    fRenMip[ch]=new TPolyMarker; fRenMip[ch]->SetMarkerStyle(kOpenTriangleUp);fRenMip[ch]->SetMarkerColor(kBlack)  ;
+    fRenCko[ch]=new TPolyMarker; fRenCko[ch]->SetMarkerStyle(kOpenCircle);    fRenCko[ch]->SetMarkerColor(kBlack)  ;
+    fRenFee[ch]=new TPolyMarker; fRenFee[ch]->SetMarkerStyle(kOpenDiamond);   fRenFee[ch]->SetMarkerColor(kBlack)  ;
+    fRenClu[ch]=new TPolyMarker; fRenClu[ch]->SetMarkerStyle(kStar);          fRenClu[ch]->SetMarkerColor(kMagenta);
+    fRenTxC[ch]=new TPolyMarker; fRenTxC[ch]->SetMarkerStyle(kPlus);          fRenTxC[ch]->SetMarkerColor(kRed)    ;
+                                 fRenTxC[ch]->SetMarkerSize(3);
+    fRenRin[ch]=new TPolyMarker; fRenRin[ch]->SetMarkerStyle(kFullDotSmall);  fRenRin[ch]->SetMarkerColor(kMagenta);
+
+    for(Int_t iDig=0;iDig<160*144;iDig++) {
+      fRenDig[ch][iDig] = new TBox;
+      fRenDig[ch][iDig]->SetFillStyle(1);
+      fBox[ch][iDig] = new TBox;
+      fBox[ch][iDig]->SetFillStyle(0);
+    }
+  }
+}//CreateRenders()
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void ClearRenders()
+{
+  for(Int_t ch=0;ch<7;ch++){
+    fRenTxC[ch]->SetPolyMarker(0); 
+    fRenRin[ch]->SetPolyMarker(0); 
+    fRenMip[ch]->SetPolyMarker(0); 
+    fRenCko[ch]->SetPolyMarker(0); 
+    fRenFee[ch]->SetPolyMarker(0); 
+    nDigs[ch] = 0;
+    fRenClu[ch]->SetPolyMarker(0); 
+  }
+}//ClearRenders()
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void PrintHits()
+{
+//Prints a list of HMPID hits for a given event. Default is event number 0.
+  if(!fHitTree) return;
+  Printf("List of HMPID hits for event %i",fEvt);
+  Int_t iTot=0;
+  for(Int_t iEnt=0;iEnt<fHitTree->GetEntries();iEnt++){//entries loop
+    fHitTree->GetEntry(iEnt);      
+    fHitLst->Print();
+    iTot+=fHitLst->GetEntries();
+  }
+  Printf("totally %i hits for event %i",iTot,fEvt);
+}//PrintHits();
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void PrintSdis()
+{//prints a list of HMPID sdigits  for a given event
+  Printf("List of HMPID sdigits for event %i",fEvt);
+  fSdiLst->Print();
+  Printf("totally %i sdigits for event %i",fSdiLst->GetEntries(),fEvt);
+}//PrintSdis()
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void PrintDigs()
+{//prints a list of HMPID digits
+  Printf("List of HMPID digits for event %i",fEvt);  
+//  fDigLst->Print();
   
+  Int_t iTot=0;  
+  for(Int_t iCh=0;iCh<7;iCh++) {
+    iTot+=((TClonesArray*)fDigLst->At(iCh))->GetEntries();
+
+    TClonesArray *pDigCham=(TClonesArray*)fDigLst->At(iCh);         //get digs list for this chamber
+    for(Int_t iDig=0;iDig<pDigCham->GetEntries();iDig++){            //digs loop
+      AliHMPIDDigit *pDig = (AliHMPIDDigit*)pDigCham->At(iDig);
+      pDig->Print();
+    }//Digit loop
+  }//chamber loop 
     
-  Float_t dX2=0.5*AliHMPIDDigit::SizePadX(),
-          dY2=0.5*AliHMPIDDigit::SizePadY() ;
+  Printf("totally %i digits for event %i",iTot,fEvt);
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void PrintClus()
+{//prints a list of HMPID clusters  for a given event
+  Printf("List of HMPID clusters for event %i",fEvt);
   
-  TLatex txt; txt.SetTextSize(0.01);
-  TLine *pL;
+//  fCluLst->Print();
   
-  AliHMPIDDigit dig;   UInt_t w32; Int_t ddl,r,d,a;    
+  Int_t iTot=0; for(Int_t iCh=0;iCh<7;iCh++) {
+    iTot+=((TClonesArray*)fCluLst->At(iCh))->GetEntries();
+    TClonesArray *pClusCham=(TClonesArray*)fCluLst->At(iCh);         //get clusters list for this chamber
+    for(Int_t iClu=0;iClu<pClusCham->GetEntries();iClu++){           //clusters loop
+      AliHMPIDCluster *pClu = (AliHMPIDCluster*)pClusCham->At(iClu); //get current cluster        
+      pClu->Print();
+    }
+  }
   
-  for(Int_t iPc=AliHMPIDDigit::kMinPc;iPc<=AliHMPIDDigit::kMaxPc;iPc++){
-    TBox *pBox=new TBox(AliHMPIDDigit::fMinPcX[iPc],AliHMPIDDigit::fMinPcY[iPc],
-                        AliHMPIDDigit::fMaxPcX[iPc],AliHMPIDDigit::fMaxPcY[iPc]);
+  Printf("totally %i clusters for event %i",iTot,fEvt);
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void PrintEsd()
+{//prints a list of HMPID Esd  for a given event
+  Printf("List of HMPID ESD summary for event %i",fEvt);
+  for(Int_t iTrk=0;iTrk<fEsd->GetNumberOfTracks();iTrk++){
+    AliESDtrack *pTrk = fEsd->GetTrack(iTrk);
     
-    if(iPc==0||iPc==2||iPc==4) pBox->SetFillColor(29);
-    else                       pBox->SetFillColor(41);
-    pBox->Draw();
+    Double_t xout[3],pout[3];
     
-    if(!isFill)  continue;
+    pTrk->GetOuterPxPyPz(pout);
+    Double_t pMomOut = TMath::Sqrt(pout[0]*pout[0]+pout[1]*pout[1]+pout[2]*pout[2]);
     
-//    if(iPc%2) {dig.Set(0,iPc,79,25); txt.DrawText(dig.LorsX()+2,dig.LorsY(),Form("PC%i",dig.Pc()));}//print PC#    
+    Float_t x,y;Int_t q,nacc;   pTrk->GetHMPIDmip(x,y,q,nacc);
+    Float_t xra,yra,th,ph; pTrk->GetHMPIDtrk(xra,yra,th,ph);
+//    Printf("xra %f yra %f th %f phi %f",xra,yra,th,ph);
+    Int_t ch,idx,size;
+    Int_t word = pTrk->GetHMPIDcluIdx();
+    ch = word/1000000;
+    word = word%1000000;
+    size = word/1000;
+    idx = word%1000;
+    Double_t rout[3]; pTrk->GetOuterXYZ(rout);
+    vol = gGeoManager->FindNode(rout[0],rout[1],rout[2]);
+    Float_t thetaCkov = -999.;
+    if(pTrk->GetHMPIDsignal()<0) thetaCkov = pTrk->GetHMPIDsignal();
+    else                         thetaCkov = pTrk->GetHMPIDsignal() - (Int_t)pTrk->GetHMPIDsignal();
+    Printf("Trk %02i Ch.%2i (%5.2f,%5.2f) pOut %7.2f ThCer %7.3f phots %3i QMip %4i size %2i (idx %3i) in vol. %s",iTrk,ch,
+        xra,yra,pMomOut,thetaCkov,nacc,q,size,idx,vol->GetName());
+  }  
+}//PrintEsd()
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void DrawChamber(Int_t iCh) 
+{//used by Draw() to Draw() chamber structure
+  gPad->Range(-10,-10,AliHMPIDParam::SizeAllX()+5,AliHMPIDParam::SizeAllY()+5);
+  if(iCh>=0){TLatex txt; txt.SetTextSize(0.06); txt.DrawLatex(55,-9,Form("RICH %i",iCh));}
+  
+  for(Int_t iPc=AliHMPIDParam::kMinPc;iPc<=AliHMPIDParam::kMaxPc;iPc++){
+    TBox *pBox=new TBox(AliHMPIDParam::MinPcX(iPc),AliHMPIDParam::MinPcY(iPc),
+                        AliHMPIDParam::MaxPcX(iPc),AliHMPIDParam::MaxPcY(iPc));
+    pBox->SetFillStyle(0);  pBox->Draw();
+  }//PC loop      
+}//DrawChamber()
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void DrawLegend()
+{//used by Draw() to draw legend
+  Int_t nTxC=0,nMip=0,nCko=0,nFee=0,nDig=0,nClu=0;
+  for(Int_t ch=0;ch<7;ch++){
+    nTxC+=fRenTxC[ch]->Size();
+    nMip+=fRenMip[ch]->Size();
+    nCko+=fRenCko[ch]->Size();
+    nFee+=fRenFee[ch]->Size();
+    nClu+=fRenClu[ch]->Size();
+    nDig+=nDigs[ch];
+  }
+  TLegend *pLeg=new TLegend(0.15,0.3,0.85,0.98);
+  pLeg->SetHeader(Form("Event %i Total %i",fEvt,fNevt));
+  pLeg->AddEntry(fRenTxC[0],   Form("TRKxPC %i"  ,nTxC),"p");
+  pLeg->AddEntry(fRenMip[0],   Form("Mip hits %i"  ,nMip),"p");    
+  pLeg->AddEntry(fRenCko[0],   Form("Ckov hits %i"  ,nCko),"p");    
+  pLeg->AddEntry(fRenFee[0],   Form("Feed hits %i"  ,nFee),"p");    
+  pLeg->AddEntry(fRenDig[0][0],Form("Digs %i"  ,nDig),"p");    
+  pLeg->AddEntry(fRenClu[0],   Form("Clus %i"  ,nClu),"p");    
+  pLeg->Draw();
+/*  TLegend *pLeg2 = new TLegend(0.4,0.087,0.8,0.97);
+  pLeg2->SetHeader("");
+  pLeg2->AddEntry(fRenMip[0],Form("Mip hits %i"   ,nMip),"p");
+  pLeg2->Draw();*/
 
-    txt.SetTextAlign(32);
-    for(Int_t iRow=0;iRow<8 ;iRow++){//draw row lines (horizontal)
-      dig.Set(0,iPc,0,iRow*6); dig.Raw(w32,ddl,r,d,a);  //set digit to the left-down pad of this row
-      
-      if(iPc%2) txt.DrawText(dig.LorsX()-1           ,dig.LorsY(),Form("%i",dig.PadPcY()));                  //print PadY#    
-                txt.DrawText(dig.LorsX()-1+(iPc%2)*67,dig.LorsY()+2,Form("r%i",r));                          //print Row#    
-      pL=new TLine(dig.LorsX()-dX2,dig.LorsY()-dY2,dig.LorsX()+AliHMPIDDigit::SizePcX()-dX2,dig.LorsY()-dY2);//draw horizontal line 
-      if(iRow!=0) pL->Draw(); 
-    }//row loop  
+ TBox *pBox = new TBox(0.012,0.01,0.97,0.28);
+ pBox->Draw("l");
+
+ TText *pText = new TText(0.35,0.21, "ddl = (0....13)");
+ pText->SetTextSize(0.06);
+ pText->Draw();
+
+ TText *pText2 = new TText(0.09,0.15,"RICH n ---> ddl 2n (left) & 2n+1 (right)");
+ pText2->SetTextSize(0.06);
+ pText2->Draw();
+
+ TText *pText3 = new TText(0.1,0.09, "phcat (0,2,4) left,   phcat (1,3,5) right");
+ pText3->SetTextSize(0.06);
+ pText3->Draw();
+
+ TText *pText4 = new TText(0.35,0.03, Form("sigma cut = %i",qSigmaCut));
+ pText4->SetTextSize(0.06);
+ pText4->Draw();
+
+}//DrawLegend()
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void Draw()
+{//draws all the objects of current event in given canvas
+  Int_t iPadN[7]={9,8,6,5,4,2,1};
+  Int_t sampleCol = fMaxCharge/gStyle->GetNumberOfColors();
+  for(Int_t iCh=0;iCh<7;iCh++){//chambers loop    
+    fCanvas->cd(iPadN[iCh]);
+    gPad->SetEditable(kTRUE); gPad->Clear(); DrawChamber(iCh);
     
-    txt.SetTextAlign(13);
-    for(Int_t iDil=0;iDil<10;iDil++){//draw dilogic lines (vertical)
-      dig.Set(0,iPc,iDil*8,0); dig.Raw(w32,ddl,r,d,a);       //set this digit to the left-down pad of this dilogic        
-      
-                           txt.DrawText(dig.LorsX()  ,dig.LorsY()-1,Form("%i",dig.PadPcX()));                 //print PadX# 
-      if(iPc==4 || iPc==5) txt.DrawText(dig.LorsX()+2,dig.LorsY()+42,Form("d%i",d));              //print Dilogic#    
-      pL=new TLine(dig.LorsX()-dX2,dig.LorsY()-dY2,dig.LorsX()-dX2,dig.LorsY()+AliHMPIDDigit::SizePcY()-dY2); //draw vertical line
-      if(iDil!=0)pL->Draw();
-    }//dilogic loop        
-  }//PC loop      
-}//DrawPc()
+    if(fDigFile){
+      if(fStDig   =="ON") {
+        for(Int_t iDig=0;iDig<nDigs[iCh];iDig++) {
+          Int_t charge = fRenDig[iCh][iDig]->GetUniqueID();
+          Int_t color = charge/sampleCol;if(color>=gStyle->GetNumberOfColors()) color = gStyle->GetNumberOfColors()-1;
+          fRenDig[iCh][iDig]->SetFillColor(gStyle->GetColorPalette(color));
+          fRenDig[iCh][iDig]->Draw();
+          fBox[iCh][iDig]->Draw();
+        }
+      }
+    }
+    
+    if(fEsdFile){if(fStEsd   =="ON") fRenTxC[iCh]->Draw();}
+    
+    if(fHitFile){
+      if(fStHitMip=="ON") fRenMip[iCh]->Draw();
+      if(fStHitFee=="ON") fRenFee[iCh]->Draw();
+      if(fStHitCko=="ON") fRenCko[iCh]->Draw();
+    }
+    
+    if(fEsdFile){if(fStEsd   =="ON") fRenRin[iCh]->Draw();}
+    if(fCluFile){if(fStClu   =="ON") fRenClu[iCh]->Draw();}
+    gPad->SetEditable(kFALSE);
+  }//chambers loop
+  
+  fCanvas->cd(3);  gPad->Clear(); DrawLegend();
+  
+  fCanvas->cd(7);
+  
+  if(fHitFile){
+    fHitMipBok->SetTitle(Form("Mips  %s",fStHitMip.Data())); fHitMipBok->Modified();
+    fHitCkoBok->SetTitle(Form("Ckov  %s",fStHitCko.Data())); fHitCkoBok->Modified();
+    fHitFeeBok->SetTitle(Form("Fdbk  %s",fStHitFee.Data())); fHitFeeBok->Modified();
+  }
+  if(fDigFile){fDigBok->SetTitle(fStDig); fDigBok->Modified();}  
+  if(fCluFile){fCluBok->SetTitle(fStClu); fCluBok->Modified();} 
+  if(fEsdFile){fEsdBok->SetTitle(fStEsd); fEsdBok->Modified();}
+  
+}//Draw()
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void RenderHit(TClonesArray *pHitLst)
+{//used by ReadEvent() to render hits to polymarker structures, one per chamber
+  for(Int_t iHit=0;iHit<pHitLst->GetEntries();iHit++){       //hits loop
+    AliHMPIDHit *pHit = (AliHMPIDHit*)pHitLst->At(iHit); Int_t ch=pHit->Ch(); Float_t x=pHit->LorsX(); Float_t y=pHit->LorsY();    //get current hit        
+    switch(pHit->Pid()){
+      case 50000050: fRenCko[ch]->SetNextPoint(x,y);break; 
+      case 50000051: fRenFee[ch]->SetNextPoint(x,y);break;
+      default:       fRenMip[ch]->SetNextPoint(x,y);break;
+    }//switch hit PID      
+//    Printf("----------ihit %i ch %i chhit %i MIP %i CKO %i FEE %i",iHit,ch,pHit->Pid());
+  }//hits loop for this entry
+}//RenderHits()
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void RenderDig(TObjArray *pDigLst)
+{//used by ReadEvent() to render digs to Tbox structures, one per chamber
+
+  for(Int_t iCh=0;iCh<=6;iCh++){                                    //chambers loop   
+    TClonesArray *pDigCham=(TClonesArray*)pDigLst->At(iCh);         //get digs list for this chamber
+    nDigs[iCh] = 0;
+    fTotPads[iCh] = pDigCham->GetEntries();
+    Int_t iDigEff=0;
+    for(Int_t iDig=0;iDig<pDigCham->GetEntries();iDig++){            //digs loop
+      AliHMPIDDigit *pDig = (AliHMPIDDigit*)pDigCham->At(iDig); Float_t x=pDig->LorsX(); Float_t y=pDig->LorsY();    //get current hit        
+      if((Int_t)pDig->Q()<=qSigmaCut) continue;
+      fRenDig[iCh][iDigEff]->SetX1(x-0.5*AliHMPIDParam::SizePadX());
+      fRenDig[iCh][iDigEff]->SetX2(x+0.5*AliHMPIDParam::SizePadX());
+      fRenDig[iCh][iDigEff]->SetY1(y-0.5*AliHMPIDParam::SizePadY());
+      fRenDig[iCh][iDigEff]->SetY2(y+0.5*AliHMPIDParam::SizePadY());
+      fRenDig[iCh][iDigEff]->SetUniqueID((Int_t)pDig->Q());
+      fBox[iCh][iDigEff]->SetX1(x-0.5*AliHMPIDParam::SizePadX());
+      fBox[iCh][iDigEff]->SetX2(x+0.5*AliHMPIDParam::SizePadX());
+      fBox[iCh][iDigEff]->SetY1(y-0.5*AliHMPIDParam::SizePadY());
+      fBox[iCh][iDigEff]->SetY2(y+0.5*AliHMPIDParam::SizePadY());
+      iDigEff++;
+      nDigs[iCh]++;
+    }//Digit loop
+  }//hits loop for this entry
+}//RenderHits()
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void RenderClu(TObjArray *pClus)
+{//used by ReadEvent() to render clusters to polymarker structures, one per chamber
+  for(Int_t iCh=0;iCh<=6;iCh++){                                     //chambers loop   
+    TClonesArray *pClusCham=(TClonesArray*)pClus->At(iCh);           //get clusters list for this chamber
+    fTotClus[iCh] = pClusCham->GetEntries();
+    for(Int_t iClu=0;iClu<pClusCham->GetEntries();iClu++){           //clusters loop
+      AliHMPIDCluster *pClu = (AliHMPIDCluster*)pClusCham->At(iClu); //get current cluster        
+      fRenClu[iCh]->SetNextPoint(pClu->X(),pClu->Y());
+//      Printf("RenderClu: ch %i x %f y %f",iCh,pClu->X(),pClu->Y());
+    }//cluster loop
+  }//chamber loop for this entry
+}//RenderClus()
 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-void Close_hed()
+void RenderEsd(AliESDEvent *pEsd)
+{//used by ReadEvent() to render ESD to polymarker structures for rings and intersections one per chamber
+  AliHMPIDRecon rec;
+  for(Int_t iTrk=0;iTrk<pEsd->GetNumberOfTracks();iTrk++){//tracks loop to collect cerenkov rings and intersection points
+    AliESDtrack *pTrk=pEsd->GetTrack(iTrk);    Int_t ch=pTrk->GetHMPIDcluIdx(); //get track and chamber intersected by it
+    ch/=1000000;
+    Float_t xPc,yPc,xRa,yRa,thRa,phRa; 
+    pTrk->GetHMPIDtrk(xPc,yPc,thRa,phRa);;
+    
+    xRa = xPc - (fParam->RadThick()+fParam->WinThick()+fParam->GapThick())*TMath::Cos(phRa)*TMath::Tan(thRa); //just linear extrapolation back to RAD
+    yRa = yPc - (fParam->RadThick()+fParam->WinThick()+fParam->GapThick())*TMath::Sin(phRa)*TMath::Tan(thRa);
+    
+    if(ch<AliHMPIDParam::AliHMPIDParam::kMinCh||ch>AliHMPIDParam::kMaxCh) continue;//this track does not intersect any chamber
+    Int_t npTrk = fRenTxC[ch]->SetNextPoint(xRa,yRa);                           //add this intersection point
+    Float_t ckov=pTrk->GetHMPIDsignal();                                        //get ckov angle stored for this track  
+    if(ckov>0){
+      Float_t thetaCkov = pTrk->GetHMPIDsignal() - (Int_t)pTrk->GetHMPIDsignal();
+      rec.SetTrack(xRa,yRa,thRa,phRa);
+      fRenRin[ch]->SetUniqueID(npTrk);
+      for(Int_t j=0;j<500;j++){
+        TVector2 pos; pos=rec.TracePhot(thetaCkov,j*6.28/500.);
+       if(!AliHMPIDParam::IsInDead(pos.X(),pos.Y())) fRenRin[ch]->SetNextPoint(pos.X(),pos.Y());
+      }      
+    }//if ckov is valid
+  }//tracks loop  
+}//RenEsd()
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+TString Stack(Int_t evt,Int_t tid)
 {
-  TCanvas *pC = ((TCanvas*)gROOT->FindObject("hed"));if(!pC) return;
-  pC->Close();
-  pC=0x0;
+// Prints some useful info from stack
+// Arguments: evt - event number. if not -1 print info only for that event
+//            tid - track id. if not -1 then print it and all it's mothers if any   
+//   Returns: mother tid of the given tid if any
+  if(gAL->LoadHeader()) return -1;
+  if(gAL->LoadKinematics()) return -1;
+  
+  gAL->GetEvent(evt);    
+  AliStack *pStack=gAL->Stack();  
+  TParticle *pTrack=pStack->Particle(tid);
+//  Int_t mtid=pTrack->GetFirstMother();
+  TString str;
+  str.Append(Form("with P = %7.4f (%7.4f,%7.4f,%7.4f) GeV/c ",pTrack->P(),pTrack->Px(),pTrack->Py(),pTrack->Pz()));
+  gAL->UnloadHeader();  gAL->UnloadKinematics();
+  return str;
 }
 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-void ReadHits(TClonesArray *pHitLst)
+void DispTB(TString t0,TString t1,TString t2,TString t3)
 {
-  pHitLst->Delete();  Int_t cnt=0;
-  for(Int_t iEnt=0;iEnt<hl->TreeH()->GetEntries();iEnt++){       //TreeH loop
-    hl->TreeH()->GetEntry(iEnt);                                 //get current entry (prim)                
-    for(Int_t iHit=0;iHit<h->Hits()->GetEntries();iHit++){       //hits loop
-      AliHMPIDHit *pHit = (AliHMPIDHit*)h->Hits()->At(iHit);     //get current hit        
-      new((*pHitLst)[cnt++]) AliHMPIDHit(*pHit);
-    }//hits loop for this entry
-  }//tree entries loop
-  
-}//ReadHits()
+  fCanvasImp->SetStatusText(t0,0);
+  fCanvasImp->SetStatusText(t1,1);
+  fCanvasImp->SetStatusText(t2,2);
+  fCanvasImp->SetStatusText(t3,3);
+}
 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-void sed()
+Bool_t FindPos(TVector3 xyz,Int_t &cham,Int_t &sect,Int_t &gap,Int_t &padX,Int_t &padY)
 {
-
-  static TCanvas *pC1=0;
-  
-  if(!pC1){
-    pC1=new TCanvas("hed","Simulated evets-View from electronics side, IP is behind the picture.",1000,900); pC1->Divide(3,3);
-    pC1->cd(7); TButton *pBtn=new TButton("Next","sed()",0,0,0.2,0.1);   pBtn->Draw(); 
-    pC1->Connect("ProcessedEvent(Int_t,Int_t,Int_t,TObject*)", 0, "","zoom(Int_t,Int_t,Int_t,TObject*)");
+// It finds the chamber parameters for a given point 
+// Arguments:  xyz  coordinates of a given point in MARS
+//   Returns:  cham   chamber ID ( 0-6 )
+//             sect   sector  ID ( 0-5 )
+//             padX   X (integer) of the pad in X in the given sector (1-80)
+//             padY   Y (integer) of the pad in Y in the given sector (1-48)
+  cham = -1;
+  TGeoNode *node = gGeoManager->FindNode(xyz.X(),xyz.Y(),xyz.Z());
+  if(!node) return kFALSE;
+  TGeoVolume *vol = node->GetVolume();
+  if(!vol) return kFALSE;
+  TGeoManager *geo = vol->GetGeoManager();
+  if(!geo) return kFALSE;
+  Int_t i=0;
+  while(geo->GetMother(i)) {
+    TString s = geo->GetMother(i)->GetName();
+//    if(s.Contains("Hcel_")) padX=(Int_t)(s.Remove(0,5)).Atof();
+//    if(s.Contains("Hrow_")) padY=(Int_t)(s.Remove(0,5)).Atof();
+//    if(s.Contains("Hsec_")) sect=(Int_t)(s.Remove(0,5)).Atof();
+//    if(s.Contains("Hmp_"))  cham=(Int_t)(s.Remove(0,4)).Atof();
+    if(s.Contains("Hcel_")) padX=geo->GetMother(i)->GetNumber();
+    if(s.Contains("Hrow_")) padY=geo->GetMother(i)->GetNumber();
+    if(s.Contains("Hsec_")) sect=geo->GetMother(i)->GetNumber();
+    if(s.Contains("Hmp_"))  cham=geo->GetMother(i)->GetNumber();
+    i++; 
   }
-
-  TClonesArray lh("AliHMPIDHit"); 
-  TClonesArray ls("AliHMPIDDigit"); 
-  TObjArray    ld(7); for(Int_t i=0;i<7;i++) ld.AddAt(new TClonesArray("AliHMPIDDigit"),i);
-  TObjArray    lc(7); for(Int_t i=0;i<7;i++) lc.AddAt(new TClonesArray("AliHMPIDCluster"),i);
-  AliESD esd;
-  
-  
-  SimEsd(&esd);
-  HitsFromEsd(&esd,&lh);
-             AliHMPIDv1::Hit2Sdi(&lh,&ls);                               
-      AliHMPIDDigitizer::Sdi2Dig(&ls,&ld);     
-  AliHMPIDReconstructor::Dig2Clu(&ld,&lc);
-//        AliHMPIDTracker::Recon(&esd,&cl);
-  
-  DrawEvt(pC1,&lh,&ld,&lc,&esd);  
-}//SimEvt()
+  return (cham==-1) ? kFALSE : kTRUE;
+}
 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
-void zoom(Int_t evt, Int_t pixx, Int_t pixy, TObject *obj)
+void DisplayInfo(Int_t evt,Int_t px, Int_t py)
 {
-  Printf("pad %i",gPad->GetNumber());
-  static Int_t lvl=32; //zoom level
-  if(evt!=5 && evt!=6) return;
-  if(evt==5&&lvl==2)  return; //max zoom in
-  if(evt==6&&lvl==32) return; //max zoom out
+  if(!gPad) return;
+  TVirtualPad *pPad=gPad->GetSelectedPad();
+  Int_t padN = pPad->GetNumber()-1;
+  if(padN<0 || padN>8) return;
+  Int_t ch,pc,padX,padY;
+  ch = fChamN[padN];
+  if(ch<0) return;
+  TString text0,text1,text2,text3;
   
-  Float_t x=gPad->AbsPixeltoX(pixx); Float_t y=gPad->AbsPixeltoY(pixy); 
-             
-  if(evt==5){ lvl=lvl/2; gPad->Range(x-lvl*2,y-lvl*2,x+lvl*2,y+lvl*2);} //zoom in
-  else      { lvl=32;    gPad->Range(-10,-10,150,140); } //zoom out 
-  ((TCanvas *)gTQSender)->SetTitle(Form("zoom %i",lvl));
-  gPad->Modified();
-  gPad->Update();                                              
-}
-void hed()
-{//event display from files
-  static TCanvas *pC=0;
-  static Int_t iEvt=0;
-  static Int_t iEvtTot=999;
-  static TFile *pEsdFl=0;
-  static TTree *pEsdTr=0;
-  static AliESD *pEsd=0;
-  
-  
-
-  
-  if(!pC&&iEvt<iEvtTot){
-    iEvt=0;
-    iEvtTot=999;
-    if(hl==0) {Printf("hed: no HMPID loader");return;}
-    Printf("Opening session");
-    pEsdFl=TFile::Open("AliESDs.root");     if(!pEsdFl || !pEsdFl->IsOpen()) return;//open AliESDs.root
-    pEsdTr=(TTree*) pEsdFl->Get("esdTree"); if(!pEsdTr)                      return;//get ESD tree
-    pEsdTr->SetBranchAddress("ESD", &pEsd);
-    hl->LoadHits(); hl->LoadDigits(); hl->LoadRecPoints();
-    iEvtTot=pEsdTr->GetEntries();
-    pC=new TCanvas("hed","View from electronics side, IP is behind the picture.",1000,900);  pC->ToggleEventStatus(); pC->Divide(3,3);
-    pC->cd(7); TButton *pBtn=new TButton("Next","hed()",0,0,0.2,0.1);   pBtn->Draw();
-    pC->cd(7); TButton *pBtn=new TButton("Quit","Close_hed()",0.2,0,0.4,0.1);   pBtn->Draw(); 
-    new TGedEditor(pC);
+  Float_t x=pPad->AbsPixeltoX(px); Float_t y=pPad->AbsPixeltoY(py); 
+  fParam->Lors2Pad(x,y,pc,padX,padY);
+  TVector3 xyz=fParam->Lors2Mars(ch,x,y);
+  
+  if(padX>=0&&padY>=0) {
+    text0.Append(Form("Pad(%i,%i)-LORS(%6.2f,%6.2f)-MARS(%7.2f,%7.2f,%7.2f) A(%6.2f,%6.2f)",padX,padY,x,y,xyz.X(),xyz.Y(),xyz.Z(),
+                                                                                                 xyz.Theta()*TMath::RadToDeg(),xyz.Phi()*TMath::RadToDeg()));
+    text1.Append(Form("Module %i Sector %i",ch,pc));
+    text2="";
+    text3.Append(Form("Pads = %i - Clusters = %i - Occupancy %5.2f%%",fTotPads[ch],fTotClus[ch],100.*fTotPads[ch]/(144.*160.)));
   }
-  TLatex txt; txt.SetTextSize(0.1);
-  TClonesArray hits("AliHMPIDHit");
-      
-  if(iEvt<iEvtTot){
-    pEsdTr->GetEntry(iEvt); al->GetEvent(iEvt); 
-    hl->TreeD()->GetEntry(0); hl->TreeR()->GetEntry(0);
-    ReadHits(&hits); 
-     
-    pC->cd(3);  gPad->Clear(); txt.DrawLatex(0.2,0.2,Form("Event %i (total %i)",iEvt,iEvtTot));
-    DrawEvt(pC,&hits,h->DigLst(),h->CluLst(),pEsd);
+  
+  TObject *obj = fCanvas->GetSelected();
+  TString name = obj->GetName();
+  
+// Find object DIGIT
+
+  if(name=="") {DispTB(text0,text1,text2,text3);return;} // TLatex not interesting
     
-    iEvt++;
-  }else{
-    Printf("--- No more events available...Bye.");
-    pC->Close();
-    pC=0x0;
-    iEvt=0;
-    iEvtTot=999;
+  if(name.Contains("TBox")) {
+    TBox *box = (TBox*)obj;
+    if(box->GetUniqueID()==0) return; // just black frame hit!
+    text2.Append(Form("charge = %i ADC",box->GetUniqueID()));
+    DispTB(text0,text1,text2,text3);
+    return;
   }
-}//hed()
-
-
-
-
-
+//
+// Find object HITs CLUSTER TRACK and RING (based on TPolyMarker and symbol)
+//
+  TPolyMarker *b = (TPolyMarker*)obj;
 
+  const Int_t big = 9999;
 
+  // check if point is near one of the points
+  Int_t distance = big;
+  Int_t index=0;
 
+  Double_t *xPol = b->GetX();
+  Double_t *yPol = b->GetY();
 
+  for(Int_t i=0;i<b->Size();i++) {
+    Int_t pxp = pPad->XtoAbsPixel(pPad->XtoPad(xPol[i]));
+    Int_t pyp = pPad->YtoAbsPixel(pPad->YtoPad(yPol[i]));
+    Int_t d   = TMath::Abs(pxp-px) + TMath::Abs(pyp-py);
+    if (d < distance) {distance = d; index=i;}
+  }
 
+  Int_t symbol = b->GetMarkerStyle();
 
+  //  kOpenTriangleUp  Hit Mip
+  //  kOpenCircle      Hit Ckov
+  //  kOpenDiamond     Hit Feedback
+  //  kStar            Cluster 
+  //  kPlus            Track
+  //  kFullDotSmall    Ring
+  
+  // Case Hit Mip of Hit Ckov or Hit Feedback
+  if(symbol==kHitMip || symbol==kHitCko || symbol==kHitFee) {
+    if(evt!=kButton1Down) return;
+    TString nameHit;
+    Int_t iCko[7]={0,0,0,0,0,0,0};
+    Int_t iFee[7]={0,0,0,0,0,0,0};
+    Int_t iMip[7]={0,0,0,0,0,0,0};
+    Int_t iHit;
+    Int_t chHit;
+    Int_t indHit=0;
+    
+    Int_t indTrk = b->GetUniqueID(); // track index
+    for(Int_t iEnt=0;iEnt<fHitTree->GetEntries();iEnt++){//entries loop
+      fHitTree->GetEntry(iEnt);                              
+      for(iHit=0;iHit<fHitLst->GetEntries();iHit++) {       //hits loop
+        AliHMPIDHit *pHit = (AliHMPIDHit*)fHitLst->At(iHit);
+        chHit = pHit->Ch();
+        Int_t pid = pHit->Pid();
+        if(pid==50000050) iCko[chHit]++;
+        else if(pid==50000051) iFee[chHit]++;
+        else iMip[chHit]++;
+
+        if(symbol==kHitMip && ch==chHit && index==iMip[chHit]-1) {indTrk=iEnt;indHit = iHit;break;}
+        if(symbol==kHitCko && ch==chHit && index==iCko[chHit]-1) {indTrk=iEnt;indHit = iHit;break;}
+        if(symbol==kHitFee && ch==chHit && index==iFee[chHit]-1) {indTrk=iEnt;indHit = iHit;break;}
+      }
+    }
+    fHitTree->GetEntry(indTrk);
+    AliHMPIDHit *pHit = (AliHMPIDHit*)fHitLst->At(indHit);
 
+    Int_t tid = pHit->Tid();
+    
+    TString str = Stack(fEvt,tid);
+     
+    Float_t x=pHit->LorsX(); 
+    Float_t y=pHit->LorsY();
+    Float_t charge = pHit->Q();
+    
+    TVector3 v = fParam->Lors2Mars(pHit->Ch(),pHit->LorsX(),pHit->LorsY());
+    Int_t cham,sect,gap,padX,padY;
+    FindPos(v,cham,sect,gap,padX,padY);
+    
+    if(pHit->Pid()==50000050) {nameHit = " Cherenkov Photon ";}
+    else if(pHit->Pid()==50000051) {nameHit = " Feedback Photon ";}
+    else if(fPdg->GetParticle(pHit->Pid())) nameHit = fPdg->GetParticle(pHit->Pid())->GetName();
+    nameHit.Append(Form(" (tid %i)",tid));
+    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()));
+    text2="";text2.Append(Form("Q = %7.2f ADC",charge));
+    text3="";text3="Particle: "+ nameHit +" "+ str;
+  } // Hit  
+  else if (symbol==kCluster) {
+    TClonesArray *pClusCham=(TClonesArray*)fCluLst->At(ch);         //get clusters list for this chamber
+    AliHMPIDCluster *pClu = (AliHMPIDCluster*)pClusCham->At(index); //get current cluster
+    text0="";text0.Append(Form("CLUSTER: x %6.2f y %6.2f",pClu->X(),pClu->Y()));
+    text2="";text2.Append(Form("charge = %i ADC",(Int_t)pClu->Q()));
+    }
+  else if (symbol==kTrack || symbol==kRing) {
+    if(symbol==kRing) index = b->GetUniqueID();
+    AliESDtrack *pTrk=fEsd->GetTrack(index);
+    Float_t xPc,yPc,thRa,phRa,xRa,yRa;
+    Int_t ch = AliHMPIDTracker::IntTrkCha(pTrk,xPc,yPc,xRa,yRa,thRa,phRa);
+    text0="";text0.Append(Form("TRACK n.%d: x %6.2f y %6.2f at PC plane in chamber %i",index,xPc,yPc,ch));
+    text2="";text2.Append(Form("p = %7.2f GeV/c",pTrk->GetP()));
+    Float_t ckov=pTrk->GetHMPIDsignal();                             
+    Double_t prob[5];
+    pTrk->GetHMPIDpid(prob);
+    if(ckov>0){
+      Float_t thetaCkov = pTrk->GetHMPIDsignal() - (Int_t)pTrk->GetHMPIDsignal();
+      Float_t x,y;Int_t q,nacc;   pTrk->GetHMPIDmip(x,y,q,nacc);
+      text3="";text3.Append(Form("Theta Cherenkov %5.3f with %i photons |  e %5.1f%% | u %5.1f%% | pi %5.1f%% | K %5.1f%% | p %5.1f%%",
+          thetaCkov,nacc,prob[0]*100,prob[1]*100,prob[2]*100,prob[3]*100,prob[4]*100));
+    }      
+  }
+//Update toolbar status  
 
-void DrawEvt(TCanvas *pC,TClonesArray *pHitLst,TObjArray *pDigLst,TObjArray *pCluLst,AliESD *pEsd)
-{//draws all the objects of current event in given canvas
+  DispTB(text0,text1,text2,text3);  
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void CloseInfo()
+{
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void DoZoom(Int_t evt, Int_t px, Int_t py, TObject *)
+{
+//  Printf(" px %i py%i event %i",px,py,evt);
+  
+  if(evt== 1) evt = 5;  //for laptop with touchpad: zoom in with left button
+  if(evt== 2) evt = 6;  //for laptop with touchpad: zoom out with both buttons
+  
+  if(evt==kMouseMotion||evt==kButton1Down) DisplayInfo(evt,px,py);
+//  if(evt==11)  CloseInfo();
+  if(evt!=5 && evt!=6) return; //5- zoom in 6-zoom out
+  const Int_t minZoom=64;
+  const Int_t maxZoom=2;
+  static Int_t zoom[7]={64,64,64,64,64,64,64}; //zoom level
+  
+ // if(!obj->IsA()->InheritsFrom("TPad")) return;  //current object is not pad
+  TVirtualPad *pPad=gPad->GetSelectedPad();
+  Int_t padN = pPad->GetNumber()-1;
+  if(padN<0 || padN>8) return;
+  
+  Int_t iCh = fChamN[padN];
+  if(iCh < 0) return;
+  
+  if(evt==5&&zoom[iCh]==maxZoom) return; 
+  if(evt==6&&zoom[iCh]==minZoom) return; 
+    
+  Float_t x=pPad->AbsPixeltoX(px); Float_t y=pPad->AbsPixeltoY(py); 
+  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
+  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 
+  if(zoom[iCh]==minZoom) pPad->Range(-10,-10,AliHMPIDParam::SizeAllX()+5,AliHMPIDParam::SizeAllY()+5);
+  ((TCanvas *)gTQSender)->SetTitle(Form("zoom x%i",minZoom/zoom[iCh]));
+  pPad->Modified();
+  pPad->Update();                                              
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void CheckStatus()
+{
+  if(fHitFile){
+    if(fStHitMip=="OFF") {fHitMipBok->SetFillColor(kRed);} else {fHitMipBok->SetFillColor(18);}
+    if(fStHitCko=="OFF") {fHitCkoBok->SetFillColor(kRed);} else {fHitCkoBok->SetFillColor(18);}
+    if(fStHitFee=="OFF") {fHitFeeBok->SetFillColor(kRed);} else {fHitFeeBok->SetFillColor(18);}
+  }
+  if(fDigFile){if(fStDig   =="OFF") {fDigBok->SetFillColor(kRed);} else {fDigBok->SetFillColor(18);}}
+  if(fCluFile){if(fStClu   =="OFF") {fCluBok->SetFillColor(kRed);} else {fCluBok->SetFillColor(18);}}
+  if(fEsdFile){if(fStEsd   =="OFF") {fEsdBok->SetFillColor(kRed);} else {fEsdBok->SetFillColor(18);}}
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void GetEvent()
+{
+  ClearRenders();
+  
+  ReadEvent();
+  
+  while(!Trigger()) {
+  Printf(" trigger %i for event %i",Trigger(),fEvt);
+    fEvt+=fTimeArrow;
+    ClearRenders();
+    ReadEvent();
+  }
+  
+  CheckStatus();
+  Draw();
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void NextEvent()
+{
+  fTimeArrow = 1;
+  fEvt+=fTimeArrow;
+  GetEvent();
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void PrevEvent()
+{
+  fTimeArrow = -1;
+  fEvt+=fTimeArrow;
+  GetEvent();
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void End()
+{
+  gSystem->Exit(0);
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void Hdisp()                                  
+{//display events from files if any in current directory or simulated events
+  
+  fParam=AliHMPIDParam::Instance();                          // first invocation of AliHMPIDParam to initialize geometry...
+  fPdg = TDatabasePDG::Instance();                           // first invocation of TDatabasePDG to retrieve particle infos...
+  
+  CreateContainers();
+  CreateRenders();
+  
+  TString title="Session with";
 
-  AliHMPIDRecon rec;  
-  TPolyMarker *pTxC[7];  TPolyMarker *pRin[7]; //intesections and rings
-  for(Int_t ch=0;ch<7;ch++){
-    pTxC[ch]=new TPolyMarker; pTxC[ch]->SetMarkerStyle(2); pTxC[ch]->SetMarkerColor(kRed); pTxC[ch]->SetMarkerSize(3);
-    pRin[ch]=new TPolyMarker; pRin[ch]->SetMarkerStyle(6); pRin[ch]->SetMarkerColor(kMagenta);
+  LoadRunLoader();
+  
+  if(gSystem->IsFileInIncludePath("HMPID.Hits.root")){// tries to open hits
+    fHitFile=TFile::Open("HMPID.Hits.root");       fNevt=fHitFile->GetNkeys(); fType=1; title+=Form(" HITS-%i ",fNevt);
   }
   
+  if(gSystem->IsFileInIncludePath("HMPID.Digits.root")){// tries to open clusters
+     fDigFile=TFile::Open("HMPID.Digits.root");  fNevt=fDigFile->GetNkeys(); fType=1;  title+=Form(" DIGITS-%i ",fNevt);
+   }
   
-  for(Int_t iTrk=0;iTrk<pEsd->GetNumberOfTracks();iTrk++){//tracks loop to collect cerenkov rings and intersection points
-    AliESDtrack *pTrk=pEsd->GetTrack(iTrk);
-    Int_t ch=pTrk->GetHMPIDcluIdx();
-    if(ch<0) continue; //this track does not hit HMPID
-    ch/=1000000; 
-    Float_t th,ph,xPc,yPc; pTrk->GetHMPIDtrk(xPc,yPc,th,ph);  //get info on current track
-    pTxC[ch]->SetNextPoint(xPc,yPc);                          //add new intersection point
-    
-    Float_t ckov=pTrk->GetHMPIDsignal();  Float_t err=TMath::Sqrt(pTrk->GetHMPIDchi2());
+  if(gSystem->IsFileInIncludePath("HMPID.RecPoints.root")){// tries to open clusters
+    fCluFile=TFile::Open("HMPID.RecPoints.root");  fNevt=fCluFile->GetNkeys(); fType=1;  title+=Form(" CLUSTERS-%i ",fNevt);
+   }
+
+  if(gSystem->IsFileInIncludePath("cosmic.root")){                          //clm: Check if cosmic file is in the folder
+    fCosFile=TFile::Open("cosmic.root");  fCosTree=(TTree*)fCosFile->Get("cosmic");  fNevt=fCosTree->GetEntries();  fType=2;
+    fCosTree->SetBranchAddress("Digs",&fDigLst);   fCosTree->SetBranchAddress("Clus",&fCluLst); 
+  }            
+
+  if(gSystem->IsFileInIncludePath("AliESDs.root")){     
+    fEsdFile=TFile::Open("AliESDs.root");
+    if(fEsdFile) { 
+      fEsdTree=(TTree*)fEsdFile->Get("esdTree"); 
+      fEsd->ReadFromTree(fEsdTree); fEsd->GetStdContent();                       //clm: new ESD schema: see Task Force meeting 20th June, 2007
+      if(fEsdTree) {
+        fNevt=fEsdTree->GetEntries(); fType=1;  title+=Form(" ESD-%i ",fNevt); 
+      } else {delete fEsdFile;fEsdFile=0x0;}
+    } else {delete fEsdFile; delete fEsdTree;}
+  }
+  
+  fCanvas=new TCanvas("all","",-1024,768);fCanvas->SetWindowSize(1024,768);
+  fCanvasImp = fCanvas->GetCanvasImp();
+  fCanvasImp->ShowStatusBar();
+  fCanvas->Divide(3,3,0,0);//  pAll->ToggleEditor();
+  fCanvas->Connect("ProcessedEvent(Int_t,Int_t,Int_t,TObject*)",0,0,"DoZoom(Int_t,Int_t,Int_t,TObject*)");
+  fCanvas->cd(7); 
+  gStyle->SetPalette(1,0);
+  switch(fType){
+    case 1: fCanvas->SetTitle(title.Data());                      
+                         TButton *pNxtBtn = new TButton("Next"      ,"NextEvent()"   ,0.0,0.0,0.3,0.1); pNxtBtn->Draw(); 
+                         TButton *pPrvBtn = new TButton("Previous"  ,"PrevEvent()"   ,0.3,0.0,0.6,0.1); pPrvBtn->Draw(); 
+            if(fHitFile){TButton *pHitBtn = new TButton("Print hits","PrintHits()"   ,0.0,0.2,0.3,0.3); pHitBtn->Draw();}  
+            if(fDigFile){TButton *pDigBtn = new TButton("Print digs","PrintDigs()"   ,0.0,0.4,0.3,0.5); pDigBtn->Draw();}  
+            if(fCluFile){TButton *pCluBtn = new TButton("Print clus","PrintClus()"   ,0.0,0.6,0.3,0.7); pCluBtn->Draw();} 
+            if(fEsdFile){TButton *pEsdBtn = new TButton("Print ESD ","PrintEsd()"    ,0.0,0.8,0.3,0.9); pEsdBtn->Draw();}
+            if(fHitFile){      fHitMipBok = new TButton(Form("Mip  %s",fStHitMip.Data()),"SwitchHitMip()",0.3,0.16,0.6,0.22); fHitMipBok->Draw();}
+            if(fHitFile){      fHitCkoBok = new TButton(Form("Ckov %s",fStHitCko.Data()),"SwitchHitCko()",0.3,0.22,0.6,0.28); fHitCkoBok->Draw();}  
+            if(fHitFile){      fHitFeeBok = new TButton(Form("Fdbk %s",fStHitFee.Data()),"SwitchHitFee()",0.3,0.28,0.6,0.34); fHitFeeBok->Draw();}  
+            if(fDigFile){         fDigBok = new TButton(fStDig      ,"SwitchDigs()"  ,0.3,0.4,0.6,0.5); fDigBok->Draw();}  
+            if(fCluFile){         fCluBok = new TButton(fStClu      ,"SwitchClus()"  ,0.3,0.6,0.6,0.7); fCluBok->Draw();} 
+            if(fEsdFile){         fEsdBok = new TButton(fStEsd      ,"SwitchEsd()"   ,0.3,0.8,0.6,0.9); fEsdBok->Draw();}
+
+            if(fHitFile){TButton *fHitMipOnly = new TButton(" Only ","OnlyHitMip()",0.6,0.16,0.9,0.22); fHitMipOnly->Draw();}  
+            if(fHitFile){TButton *fHitCkoOnly = new TButton(" Only ","OnlyHitCko()",0.6,0.22,0.9,0.28); fHitCkoOnly->Draw();}  
+            if(fHitFile){TButton *fHitFeeOnly = new TButton(" Only ","OnlyHitFee()",0.6,0.28,0.9,0.34); fHitFeeOnly->Draw();}  
+            if(fDigFile){TButton *fDigOnly    = new TButton(" Only ","OnlyDigs()"  ,0.6,0.40,0.9,0.50); fDigOnly->Draw();}  
+            if(fCluFile){TButton *fCluOnly    = new TButton(" Only ","OnlyClus()"  ,0.6,0.60,0.9,0.70); fCluOnly->Draw();} 
+            if(fEsdFile){TButton *fEsdOnly    = new TButton(" Only ","OnlyEsd()"   ,0.6,0.80,0.9,0.90); fEsdOnly->Draw();}
+                         TButton *pAll        = new TButton(" ALL  ","All()"       ,0.5,0.90,0.7,1.00); pAll->Draw();
+            
+                                     TButton *pEnd    = new TButton("Quit"      ,"End()"         ,0.6,0.0,0.9,0.1); pEnd->Draw();
+    break;
+    case 2: fCanvas->SetTitle("COSMIC");
+                         TButton *pCosBtn = new TButton("Next"      ,"NextEvent()",0.0,0.0,0.3,0.1); pCosBtn->Draw(); 
+             
+    break;
+    case 3: fCanvas->SetTitle("SIMULATION"); 
+            TButton *pSimBtn = new TButton("Simulate"  ,"NextEvent()",0.0,0.0,0.3,0.1); pSimBtn->Draw(); 
+            TButton *pHitBtn = new TButton("Print hits","PrintHits()",0.0,0.2,0.3,0.3); pHitBtn->Draw();  
+            TButton *pDigBtn = new TButton("Print digs","PrintDigs()",0.0,0.4,0.3,0.5); pDigBtn->Draw();
+            TButton *pCluBtn = new TButton("Print clus","PrintClus()",0.0,0.6,0.3,0.7); pCluBtn->Draw(); 
+            TButton *pEsdBtn = new TButton("Print ESD" ,"PrintEsd()" ,0.0,0.8,0.3,0.9); pEsdBtn->Draw();
+            if(fHitFile){      fHitMipBok = new TButton(Form("Mips %s",fStHitMip.Data()),"SwitchHitMip()",0.3,0.16,0.6,0.22); fHitMipBok->Draw();}  
+            if(fHitFile){      fHitCkoBok = new TButton(Form("Ckov %s",fStHitCko.Data()),"SwitchHitCko()",0.3,0.22,0.6,0.28); fHitCkoBok->Draw();}  
+            if(fHitFile){      fHitFeeBok = new TButton(Form("Fdbk %s",fStHitFee.Data()),"SwitchHitFee()",0.3,0.28,0.6,0.34); fHitFeeBok->Draw();}  
+            if(fDigFile){         fDigBok = new TButton(fStDig      ,"SwitchDigs()"  ,0.3,0.4,0.6,0.5); fDigBok->Draw();}  
+            if(fCluFile){         fCluBok = new TButton(fStClu      ,"SwitchClus()"  ,0.3,0.6,0.6,0.7); fCluBok->Draw();} 
+            if(fEsdFile){         fEsdBok = new TButton(fStEsd      ,"SwitchEsd()"   ,0.3,0.8,0.6,0.9); fEsdBok->Draw();}
+            
+            if(fHitFile){TButton *fHitMipOnly = new TButton(" Only ","OnlyHitMip()",0.6,0.16,0.9,0.22); fHitMipOnly->Draw();}  
+            if(fHitFile){TButton *fHitCkoOnly = new TButton(" Only ","OnlyHitCko()",0.6,0.22,0.9,0.28); fHitCkoOnly->Draw();}  
+            if(fHitFile){TButton *fHitFeeOnly = new TButton(" Only ","OnlyHitFee()",0.6,0.28,0.9,0.34); fHitFeeOnly->Draw();}  
+            if(fDigFile){TButton *fDigOnly    = new TButton(" Only ","OnlyDigs()"  ,0.6,0.40,0.9,0.50); fDigOnly->Draw();}  
+            if(fCluFile){TButton *fCluOnly    = new TButton(" Only ","OnlyClus()"  ,0.6,0.60,0.9,0.70); fCluOnly->Draw();} 
+            if(fEsdFile){TButton *fEsdOnly    = new TButton(" Only ","OnlyEsd()"   ,0.6,0.80,0.9,0.90); fEsdOnly->Draw();}
+                         TButton *pSimAll     = new TButton(" ALL  ","All()"       ,0.5,0.90,0.7,1.00); pSimAll->Draw();
+    break;
+  }
     
-    if(ckov>0){
-      rec.SetTrack(xPc,yPc,th,ph);
-     TVector2 pos;  for(int j=0;j<100;j++){rec.TracePhot(ckov,j*0.0628,pos); pRin[ch]->SetNextPoint(pos.X(),pos.Y());}      
-    }
-  }//tracks loop
+  NextEvent();           
       
-  for(Int_t iCh=0;iCh<7;iCh++){//chambers loop    
-    switch(iCh){
-      case 6: pC->cd(1); break; case 5: pC->cd(2); break;
-      case 4: pC->cd(4); break; case 3: pC->cd(5); break; case 2: pC->cd(6); break;
-                                case 1: pC->cd(8); break; case 0: pC->cd(9); break;
-    }
-    gPad->SetEditable(kTRUE); gPad->Clear(); 
-    DrawPc(0);
-    for(Int_t iHit=0;iHit<pHitLst->GetEntries();iHit++){
-      AliHMPIDHit *pHit=(AliHMPIDHit*)pHitLst->At(iHit);
-      if(pHit->Ch()==iCh)        pHit->Draw();  //draw hits
-    }
-    ((TClonesArray*)pDigLst->At(iCh))->Draw();  //draw digits
-    ((TClonesArray*)pCluLst->At(iCh))->Draw();  //draw clusters
-                            pTxC[iCh]->Draw();  //draw intersections
-                            pRin[iCh]->Draw();  //draw rings
-    gPad->SetEditable(kFALSE);
-  }//chambers loop
+}//Hdisp()
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void SwitchHitMip()
+{
+  fStHitMip=(fStHitMip=="OFF")? "ON":"OFF";
+  GetEvent();
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void SwitchHitCko()
+{
+  fStHitCko=(fStHitCko=="OFF")? "ON":"OFF";
+  GetEvent();
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void SwitchHitFee()
+{
+  fStHitFee=(fStHitFee=="OFF")? "ON":"OFF";
+  GetEvent();
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void SwitchDigs()
+{
+  fStDig=(fStDig=="OFF")? "ON":"OFF";
+  GetEvent();
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void SwitchClus()
+{
+  fStClu=(fStClu=="OFF")? "ON":"OFF";
+  GetEvent();
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void SwitchEsd()
+{
+  fStEsd=(fStEsd=="OFF")? "ON":"OFF";
+   GetEvent();
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void AllNo()
+{
+  if(fHitFile) {
+    fStHitMip = "OFF";
+    fStHitCko = "OFF";
+    fStHitFee = "OFF";
+  }
+  if(fDigFile) fStDig    = "OFF";
+  if(fCluFile) fStClu    = "OFF";
+  if(fEsdFile) fStEsd    = "OFF";
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void AllYes()
+{
+  if(fHitFile) {
+    fStHitMip = "ON";
+    fStHitCko = "ON";
+    fStHitFee = "ON";
+  }
+  if(fDigFile) fStDig    = "ON";
+  if(fCluFile) fStClu    = "ON";
+  if(fEsdFile) fStEsd    = "ON";
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void All()
+{
+  AllYes();
+  GetEvent();
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void OnlyHitMip()
+{
+  AllNo();
+  fStHitMip = "ON";
+  GetEvent();
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void OnlyHitCko()
+{
+  AllNo();
+  fStHitCko = "ON";
+  GetEvent();
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void OnlyHitFee()
+{
+  AllNo();
+  fStHitFee = "ON";
+  GetEvent();
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void OnlyDigs()
+{
+  AllNo();
+  fStDig    = "ON";
+  GetEvent();
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void OnlyClus()
+{
+  AllNo();
+  fStClu    = "ON";
+  GetEvent();
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void OnlyEsd()
+{
+  AllNo();
+  fStEsd    = "ON";
+  GetEvent();
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void LoadRunLoader(){
+  if(!gSystem->IsFileInIncludePath("galice.root")) {
+  Printf("\n\n galice.root not in path: please check! \n\n");
+  return;
+  }
+  if(gAlice) gAlice=0x0;                       
+  gAL=AliRunLoader::Open(); 
+  gAL->LoadHeader();
+  gAL->LoadHits("HMPID");
+  gAL->LoadDigits("HMPID");
+  gAL->LoadRecPoints("HMPID");
+  gDL = gAL->GetDetectorLoader("HMPID"); 
+  if(!gDL){
+   Printf("\n\n no AliLoader present: please check! \n\n");
+  return;
+  }
+  fNevt= gAL->GetNumberOfEvents(); 
+}
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void ReadEvent(){
+//used by NextEvent()  to read curent event and construct all render elements
+  if(fNevt && fEvt>=fNevt) fEvt=0; //loop over max event
+  if(fNevt && fEvt<0) fEvt=fNevt-1; //loop over max event
   
+//  Printf("getting event %i out of %i",fEvt,fNevt);
   
-//  TLatex txt; txt.SetTextSize(0.02);
-//  txt.DrawLatex(20,-5,Form("#theta=%.4f#pm%.5f with %2i #check{C}"          ,simCkov,simErr,simN));
-//  txt.DrawLatex(25,-5,Form("#theta=%.4f#pm%.5f with %2i #check{C}"          ,recCkov,recErr,recN));
-//  txt.DrawLatex(0 ,127,Form("#theta=%.2f#circ   #phi=%.2f#circ @(%.2f,%.2f) ",th*TMath::RadToDeg(),ph*TMath::RadToDeg(),radx,rady));
-//  Printf("DIG------DIG---------DIG--------DIG------DIG------DIG");pDigLst->Print();Printf("");                   
-}//DrawEvt()
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
+  if(gDL) {
+  
+    gAL->GetEvent(fEvt);
+    
+//-------- HITS
 
+    fHitTree=gDL->TreeH();
 
+    if(fHitTree) {    
+    
+      fHitTree->SetBranchAddress("HMPID",&fHitLst);
+      
+      for(Int_t iEnt=0;iEnt<fHitTree->GetEntries();iEnt++){    
+        fHitTree->GetEntry(iEnt);
+        RenderHit(fHitLst);   
+      }//prim loop
+    }//if hits tree
 
-Reve()
-{
-  gSystem->Load("libMinuit.so");
-  gSystem->Load("libVMC.so");
-  gSystem->Load("libESD.so");
-  gSystem->Load("libSTEER.so");
-  gSystem->Load("libCDB.so");
+//-------- DIGITS
 
-  gSystem->Load("libGed.so");
-  gSystem->Load("libRGL.so");
-  gSystem->Load("libGeom.so");
-  gSystem->Load("libVMC.so");
+    fDigTree=gDL->TreeD();
+    
+    if(fDigTree){ 
+      for(Int_t iCh=AliHMPIDParam::kMinCh;iCh<=AliHMPIDParam::kMaxCh;iCh++) fDigTree->SetBranchAddress(Form("HMPID%i",iCh),&(*fDigLst)[iCh]); 
+//      fDigTree->GetEvent(fEvt);
+      fDigTree->GetEntry(0);                       
+      RenderDig(fDigLst);
+      //cout << "pointer to the dig list " << fDigLst << endl;
+     }
 
-  gSystem->Load("libReve.so");
+//-------- CLUSTERS
 
-  gSystem->Load("libHMPIDbase.so");
-  gSystem->Load("libHMPIDsim.so");
-  gSystem->Load("libHMPIDrec.so");
-  
-  TGeoManager::Import("geometry.root");
-  
-  AliHMPIDParam *pParam=AliHMPIDParam::Instance();
-  
-  AliRunLoader *pAL=AliRunLoader::Open(); pAL->LoadHits  ("HMPID"); TTree *pHitT=pAL->GetTreeH("HMPID", false);
-                                          pAL->LoadDigits("HMPID"); TTree *pDigT=pAL->GetTreeD("HMPID", false); 
-                                          
-  Reve::PointSet *pHitPnt=new Reve::PointSet("Hits"));
-  TPolyMarker3D  *pDigPnt=new TPolyMarker3D;  pDigPnt->SetName("Digits"); pDigPnt->SetMarkerColor(kGreen);iPntCnt=0;
-                                          
-  TPointSelector ps(pHitT,pHitPnt,"fX:fY:fZ",""); ps.Select();
+     fCluTree= gDL->TreeR();
+     
+     if(fCluTree) {
+     for(Int_t iCh=AliHMPIDParam::kMinCh;iCh<=AliHMPIDParam::kMaxCh;iCh++) fCluTree->SetBranchAddress(Form("HMPID%i",iCh),&(*fCluLst)[iCh]); 
+     fCluTree->GetEntry(0);
+     RenderClu(fCluLst);   
+    }
+  }
   
-  TClonesArray *pDigLst=new TClonesArray("AliHMPIDDigit"); //this is tmp dig list per chamber
-  for(Int_t iCh=0;iCh<7;iCh++){
-    pDigT->SetBranchAddress(Form("HMPID%i",iCh+1),&pDigLst);
-    pDigT->GetEntry(0);
-    for(Int_t iDig=0;iDig<pDigLst->GetEntries();iDig++){
-      AliHMPIDDigit *pDig=(AliHMPIDDigit*)pDigLst->At(iDig);    
-      TVector2 lors=pParam->Pad2Loc(pDig->PadX(),pDig->PadY());
-      TVector3 mars=pParam->Lors2Mars(iCh,lors.X(),lors.Y());
-      pDigPnt->SetPoint(iPntCnt++,mars.X(),mars.Y(),mars.Z());
-    }//digits loop for chamber        
-  }//chambers loop
+//-------- ESD
   
-  if(!gReve) new Reve::RGTopFrame(0,0,0,2);
-  gReve->AddGlobalRenderElement(new Reve::RenderElementObjPtr(pDigPnt));
-  gReve->AddRenderElement(pHitPnt);
-  gReve->Redraw3D();
-}
+  if(fEsdFile){//if ESD file open
+    fEsdTree->GetEntry(fEvt);  
+    RenderEsd(fEsd);
+  }//if ESD file 
 
-
-
-void zzz(Int_t evt,Int_t px,Int_t py,TObject*o)
+}
+//+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void SetEvent(Int_t ev)
+{
+  fEvt=ev;
+  GetEvent();
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void SetSigmaCut(Int_t sig=0)
 {
-  Printf("evt %i (%i,%i) class %s",evt,px,py,o->IsA()->ClassName());
+  qSigmaCut = sig;
 }
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void SetField()
+{
+  gROOT->LoadMacro("Field.C");
+  AliMagF * b = Field();
 
-void Gui()
+AliHMPIDTracker::SetFieldMap(b,kTRUE);
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+void SetTrigger(Int_t type=0)
 {
-  TGMainFrame   *pMF     =new TGMainFrame(gClient->GetRoot(),300,400);//main frame
-//1 level widgets: button and 2 horizontal frames  
-  TRootEmbeddedCanvas *pDis;
-  pMF->AddFrame(pDis=new TRootEmbeddedCanvas("display",pMF,800,650));
-  pDis->GetCanvas()->Connect("ProcessedEvent(Int_t,Int_t,Int_t,TObject*)", 0, "","zzz(Int_t,Int_t,Int_t,TObject*)");
-  
-  pMF->Layout();
-  pMF->MapSubwindows();
-  pMF->Resize(pMF->GetDefaultSize());
-  pMF->MapWindow();
-}                                                                      
+  trigType = type;
+  if(type==1) Printf(" Trigger 1 selected: at least ONE track in HMPID.");
+}
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+Bool_t Trigger()
+{
+  if(trigType==0) return kTRUE;
+  if(trigType==1) {
+    if(fEsd->GetNumberOfTracks()>0) {
+    PrintEsd();
+    return kTRUE;
+    } else return kFALSE;
+  }
+  return kTRUE;
+}