]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - EVE/alice-macros/geom_gentle.C
- rename macro to display TRD digits
[u/mrichter/AliRoot.git] / EVE / alice-macros / geom_gentle.C
index b19fad0d93d3324a3ecd7ac29270ea56d8d7bc00..1b3c9dfea75aff57adc3e73478a66e1a521810a6 100644 (file)
@@ -4,14 +4,53 @@
 /**************************************************************************
  * Copyright(c) 1998-2008, ALICE Experiment at CERN, all rights reserved. *
  * See http://aliceinfo.cern.ch/Offline/AliRoot/License.html for          *
- * full copyright notice.                                                 * 
+ * full copyright notice.                                                 *
  **************************************************************************/
 
-TEveGeoShape* geom_gentle()
+TEveGeoShape* geom_gentle(Bool_t register_as_global=kTRUE)
 {
-  TFile f("$REVESYS/alice-data/gentle_geo.root");
+  TFile f("$ALICE_ROOT/EVE/alice-data/gentle_geo.root");
   TEveGeoShapeExtract* gse = (TEveGeoShapeExtract*) f.Get("Gentle");
-  TEveGeoShape* gsre = TEveGeoShape::ImportShapeExtract(gse, 0);
+  TEveGeoShape* gsre = TEveGeoShape::ImportShapeExtract(gse);
+  f.Close();
+
+  TEveElement* elPHOS = gsre->FindChild("PHOS");
+  elPHOS->SetRnrState(kTRUE);
+  elPHOS->FindChild("PHOS_4")->SetRnrState(kFALSE);
+  elPHOS->FindChild("PHOS_5")->SetRnrState(kFALSE);
+
+  if (register_as_global)
+  {
+    gEve->AddGlobalElement(gsre);
+  }
+
+  return gsre;
+}
+
+TEveGeoShape* geom_gentle_rphi()
+{
+  // The resulting geometry is NOT added into the global scene!
+
+  TFile f("$ALICE_ROOT/EVE/alice-data/gentle_rphi_geo.root");
+  TEveGeoShapeExtract* gse = (TEveGeoShapeExtract*) f.Get("Gentle");
+  TEveGeoShape* gsre = TEveGeoShape::ImportShapeExtract(gse);
+  f.Close();
+
+  TEveElement* elPHOS = gsre->FindChild("PHOS");
+  elPHOS->SetRnrState(kTRUE);
+  elPHOS->FindChild("PHOS_4")->SetRnrState(kFALSE);
+  elPHOS->FindChild("PHOS_5")->SetRnrState(kFALSE);
+
+  return gsre;
+}
+
+TEveGeoShape* geom_gentle_rhoz()
+{
+  // The resulting geometry is NOT added into the global scene!
+
+  TFile f("$ALICE_ROOT/EVE/alice-data/gentle_rhoz_geo.root");
+  TEveGeoShapeExtract* gse = (TEveGeoShapeExtract*) f.Get("Gentle");
+  TEveGeoShape* gsre = TEveGeoShape::ImportShapeExtract(gse);
   f.Close();
 
   return gsre;