EVE/alice-macros/tof_digits_strips.C

   1 void tof_digits_strips()
   2 {
   3   TClonesArray *array = 0x0;
   4
   5   Int_t nDigitsInVolume[3] = {-1, -1, -1};
   6   Int_t nStrips=19;
   7   TGeoManager *localGeoManager = (TGeoManager*)gReve->GetGeometry("./geometry.root");//"$REVESYS/alice-data/alice_fullgeo.root");
   8   if (!localGeoManager) {
   9     printf("ERROR: no TGeo\n");
  10   }
  11
  12   AliRunLoader* rl =  Alieve::Event::AssertRunLoader();
  13   rl->LoadDigits("TOF");
  14   TTree* dt = rl->GetTreeD("TOF", false);
  15
  16   Alieve::TOFDigitsInfo* di = new Alieve::TOFDigitsInfo();
  17   di->SetTree(dt);
  18   di->LoadDigits();
  19   di->Dump();
  20
  21   AliTOFGeometry* g = di->fGeom;
  22
  23   gStyle->SetPalette(1, 0);
  24   gReve->DisableRedraw();
  25
  26   TString sPlate;
  27   TString bsPlate="Plate";
  28   TString sStrip;
  29   TString bsStrip="Strip";
  30   TString sPadZ;
  31   TString bsPadZ="PadZ";
  32   TString sPadX;
  33   TString bsPadX="PadX";
  34
  35   Char_t sectorName[100];
  36   Char_t sectorTitle[200];
  37
  38   Reve::RenderElementList* ll = new Reve::RenderElementList("TOF");
  39   ll->SetTitle("TOF detector");
  40   ll->SetMainColor((Color_t)2);
  41   gReve->AddRenderElement(ll);
  42
  43   for(Int_t iSector=0; iSector<g->NSectors(); iSector++) {
  44
  45     sprintf(sectorName,"Sector%2i",iSector);
  46     Reve::RenderElementList* l = new Reve::RenderElementList(sectorName);
  47     l->SetTitle(sectorTitle);
  48     l->SetMainColor((Color_t)2);
  49     gReve->AddRenderElement(l, ll);
  50
  51
  52     for(Int_t iPlate=0; iPlate<g->NPlates(); iPlate++) {
  53       if(iPlate==2) nStrips=15;
  54       else nStrips=19;
  55
  56       sPlate=bsPlate;
  57       sPlate+=iPlate;
  58       Reve::RenderElementList* relPlate = new Reve::RenderElementList(sPlate.Data());
  59       relPlate->SetMainColor((Color_t)2);
  60       gReve->AddRenderElement(relPlaete, l);
  61
  62
  63       for(Int_t iStrip=0; iStrip<nStrips; iStrip++) {
  64
  65         array = di->GetDigits(iSector,iPlate, iStrip);
  66
  67         Alieve::TOFStrip* m = new Alieve::TOFStrip(localGeoManager,iSector,iPlate,iStrip,array);
  68         gReve->AddRenderElement(m, relPlate);
  69
  70       }
  71     }
  72   }
  73
  74   gReve->EnableRedraw();
  75
  76
  77 }