]> git.uio.no Git - u/mrichter/AliRoot.git/blob - EVE/alice-macros/tpc_hits.C
Changed default point-size in accordance with the new convention.
[u/mrichter/AliRoot.git] / EVE / alice-macros / tpc_hits.C
1 // $Id$
2
3 Reve::PointSet*
4 tpc_hits(const char *varexp    = "TPC2.fArray.fR:TPC2.fArray.fFi:TPC2.fArray.fZ",
5          const char *selection = "TPC2.fArray.fR>80")
6 {
7   // Extracts 'major' TPC hits (not the compressed ones).
8   // This gives ~2.5% of all hits.
9
10   AliRunLoader* rl =  Alieve::Event::AssertRunLoader();
11   rl->LoadHits("TPC");
12
13   TTree* ht = rl->GetTreeH("TPC", false);
14
15   Reve::PointSet* points = new Reve::PointSet(Form("TPC Hits '%s'", selection));
16   points->SetSourceCS(TPointSelectorConsumer::TVT_RPhiZ);
17
18   TPointSelector ps(ht, points, varexp, selection);
19   ps.Select();
20
21   points->SetTitle(Form("N=%d", points->Size()));
22   points->SetMarkerSize(.5);
23   points->SetMarkerColor((Color_t)3);
24
25   gReve->AddRenderElement(points);
26   gReve->Redraw3D();
27
28   return points;
29 }