+#if !defined(__CINT__) || defined(__MAKECINT__)
+#include <TFile.h>
+#include <TGLViewer.h>
+#include <TEveManager.h>
+#include <TEveElement.h>
+#include <TEveGeoShape.h>
+#include <TEveGeoShapeExtract.h>
+
+#include <AliEveEventManager.h>
+#include <AliEveMultiView.h>
+#endif
+
void geom_gentle_notransparency(Bool_t register_as_global=kTRUE)
{
+ TEveGeoShape* gsre1;
+ TEveGeoShape* gsre2;
+ TEveGeoShape* gsre3;
+
+{
+ TFile f("$ALICE_ROOT/EVE/alice-data/gentle_geo.root");
+ TEveGeoShapeExtract* gse = (TEveGeoShapeExtract*) f.Get("Gentle");
+ gsre1 = TEveGeoShape::ImportShapeExtract(gse);
+ f.Close();
- TFile f("$ALICE_ROOT/EVE/alice-data/gentle_geo.root");
- TEveGeoShapeExtract* gse = (TEveGeoShapeExtract*) f.Get("Gentle");
- TEveGeoShape* gsre1 = TEveGeoShape::ImportShapeExtract(gse);
- f.Close();
-
- if (register_as_global)
- {
- gEve->AddGlobalElement(gsre1);
- }
-
- // Fix visibility, color and transparency
-
- gsre1->SetRnrSelf(kFALSE);
- TEveElement::List_i i = gsre1->BeginChildren();
-
-//ITS
-
- TEveGeoShape* lvl1 = (TEveGeoShape*) *i;
- lvl1->SetRnrSelf(kFALSE);
- TEveElement::List_i j = lvl1->BeginChildren();
-
- TEveGeoShape* lvl2 = (TEveGeoShape*) *j;
- lvl2->SetRnrSelf(kFALSE);
- TEveElement::List_i k = lvl2->BeginChildren();
-
- TEveGeoShape* its1 = (TEveGeoShape*) *k;
- its1->SetRnrSelf(kTRUE);
- its1->SetMainTransparency(5);
- k++;
-
- TEveGeoShape* its2 = (TEveGeoShape*) *k;
- its2->SetRnrSelf(kTRUE);
- its2->SetMainTransparency(5);
- k++;
-
- TEveGeoShape* its3 = (TEveGeoShape*) *k;
- its3->SetRnrSelf(kTRUE);
- its3->SetMainTransparency(5);
-
-//TPC
-
- i++;
-
- TEveGeoShape* lvl1 = (TEveGeoShape*) *i;
- lvl1->SetRnrSelf(kFALSE);
- TEveElement::List_i j = lvl1->BeginChildren();
-
- TEveGeoShape* lvl2 = (TEveGeoShape*) *j;
- lvl2->SetRnrSelf(kFALSE);
- TEveElement::List_i k = lvl2->BeginChildren();
-
- TEveGeoShape* lvl3 = (TEveGeoShape*) *k;
- lvl3->SetRnrSelf(kTRUE);
- lvl3->SetMainTransparency(5);
- TEveElement::List_i l = lvl3->BeginChildren();
-
- TEveGeoShape* lvl4 = (TEveGeoShape*) *l;
- lvl4->SetRnrSelf(kFALSE);
- TEveElement::List_i m = lvl4->BeginChildren();
-
- TEveGeoShape* tpc1 = (TEveGeoShape*) *m;
- tpc1->SetRnrSelf(kTRUE);
- tpc1->SetMainTransparency(5);
- m++;
-
- TEveGeoShape* tpc2 = (TEveGeoShape*) *m;
- tpc2->SetMainColor(kGray);
- tpc2->SetMainTransparency(5);
- m++;
-
- TEveGeoShape* tpc3 = (TEveGeoShape*) *m;
- tpc3->SetRnrSelf(kTRUE);
- tpc3->SetMainTransparency(5);
- m++;
-
-//TRD+TOF
-
- i++;
-
- TEveGeoShape* lvl1 = (TEveGeoShape*) *i;
- lvl1->SetRnrSelf(kFALSE);
- TEveElement::List_i j = lvl1->BeginChildren();
-
- TEveGeoShape* lvl2 = (TEveGeoShape*) *j;
- lvl2->SetRnrSelf(kTRUE);
- lvl2->SetMainTransparency(5);
- j++;
+ if (register_as_global)
+ {
+ gEve->AddGlobalElement(gsre1);
+ }
- TEveGeoShape* lvl2 = (TEveGeoShape*) *j;
- lvl2->SetRnrSelf(kTRUE);
- lvl2->SetMainTransparency(5);
- j++;
+ // Fix visibility, color and transparency
-//PHOS
+ gsre1->SetRnrSelf(kFALSE);
+ TEveElement::List_i i = gsre1->BeginChildren();
- i++;
+ //ITS
+ {
+ TEveGeoShape* lvl1 = (TEveGeoShape*) *i;
+ lvl1->SetRnrSelf(kFALSE);
+ TEveElement::List_i j = lvl1->BeginChildren();
- TEveGeoShape* lvl1 = (TEveGeoShape*) *i;
- lvl1->SetRnrSelf(kFALSE);
+ TEveGeoShape* lvl2 = (TEveGeoShape*) *j;
+ lvl2->SetRnrSelf(kFALSE);
+ TEveElement::List_i k = lvl2->BeginChildren();
+
+ TEveGeoShape* its1 = (TEveGeoShape*) *k;
+ its1->SetRnrSelf(kTRUE);
+ its1->SetMainTransparency(5);
+ k++;
+
+ TEveGeoShape* its2 = (TEveGeoShape*) *k;
+ its2->SetRnrSelf(kTRUE);
+ its2->SetMainTransparency(5);
+ k++;
+
+ TEveGeoShape* its3 = (TEveGeoShape*) *k;
+ its3->SetRnrSelf(kTRUE);
+ its3->SetMainTransparency(5);
+ }
+ //TPC
- for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++)
+ i++;
{
+ TEveGeoShape* lvl1 = (TEveGeoShape*) *i;
+ lvl1->SetRnrSelf(kFALSE);
+ TEveElement::List_i j = lvl1->BeginChildren();
+
TEveGeoShape* lvl2 = (TEveGeoShape*) *j;
- lvl2->SetRnrSelf(kTRUE);
- lvl2->SetMainTransparency(5);
+ lvl2->SetRnrSelf(kFALSE);
+ TEveElement::List_i k = lvl2->BeginChildren();
+
+ TEveGeoShape* lvl3 = (TEveGeoShape*) *k;
+ lvl3->SetRnrSelf(kTRUE);
+ lvl3->SetMainTransparency(5);
+ TEveElement::List_i l = lvl3->BeginChildren();
+
+ TEveGeoShape* lvl4 = (TEveGeoShape*) *l;
+ lvl4->SetRnrSelf(kFALSE);
+ TEveElement::List_i m = lvl4->BeginChildren();
+
+ TEveGeoShape* tpc1 = (TEveGeoShape*) *m;
+ tpc1->SetRnrSelf(kTRUE);
+ tpc1->SetMainTransparency(5);
+ m++;
+
+ TEveGeoShape* tpc2 = (TEveGeoShape*) *m;
+ tpc2->SetMainColor(kGray);
+ tpc2->SetMainTransparency(5);
+ m++;
+
+ TEveGeoShape* tpc3 = (TEveGeoShape*) *m;
+ tpc3->SetRnrSelf(kTRUE);
+ tpc3->SetMainTransparency(5);
+ m++;
}
-//HMPID
+ //TRD+TOF
- i++;
+ i++;
+ {
+ TEveGeoShape* lvl1 = (TEveGeoShape*) *i;
+ lvl1->SetRnrSelf(kFALSE);
+ TEveElement::List_i j = lvl1->BeginChildren();
+
+ TEveGeoShape* lvl2 = (TEveGeoShape*) *j;
+ lvl2->SetRnrSelf(kTRUE);
+ lvl2->SetMainTransparency(5);
+ j++;
+
+ TEveGeoShape* lvl3 = (TEveGeoShape*) *j;
+ lvl3->SetRnrSelf(kTRUE);
+ lvl3->SetMainTransparency(5);
+ j++;
+ }
- TEveGeoShape* lvl1 = (TEveGeoShape*) *i;
- lvl1->SetRnrSelf(kFALSE);
+ //PHOS
- for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++)
+ i++;
{
- TEveGeoShape* lvl2 = (TEveGeoShape*) *j;
- lvl2->SetRnrSelf(kTRUE);
- lvl2->SetMainTransparency(5);
+ TEveGeoShape* lvl1 = (TEveGeoShape*) *i;
+ lvl1->SetRnrSelf(kFALSE);
+
+ for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++)
+ {
+ TEveGeoShape* lvl2 = (TEveGeoShape*) *j;
+ lvl2->SetRnrSelf(kTRUE);
+ lvl2->SetMainTransparency(5);
+ }
}
+
+ //HMPID
+ i++;
+ {
+ TEveGeoShape* lvl1 = (TEveGeoShape*) *i;
+ lvl1->SetRnrSelf(kFALSE);
+
+ for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++)
+ {
+ TEveGeoShape* lvl2 = (TEveGeoShape*) *j;
+ lvl2->SetRnrSelf(kTRUE);
+ lvl2->SetMainTransparency(5);
+ }
+ }
+}
+{
TFile f("$ALICE_ROOT/EVE/alice-data/gentle_rphi_geo.root");
TEveGeoShapeExtract* gse = (TEveGeoShapeExtract*) f.Get("Gentle");
- TEveGeoShape* gsre2 = TEveGeoShape::ImportShapeExtract(gse);
+ gsre2 = TEveGeoShape::ImportShapeExtract(gse);
f.Close();
+}
+{
TFile f("$ALICE_ROOT/EVE/alice-data/gentle_rhoz_geo.root");
TEveGeoShapeExtract* gse = (TEveGeoShapeExtract*) f.Get("Gentle");
- TEveGeoShape* gsre3 = TEveGeoShape::ImportShapeExtract(gse);
+ gsre3 = TEveGeoShape::ImportShapeExtract(gse);
f.Close();
+}
TEveElement* top = gEve->GetCurrentEvent();
AliEveMultiView *mv = AliEveMultiView::Instance();
- mv->InitGeomGentle(gsre1, gsre2, gsre3);
+ mv->InitGeomGentle(gsre1, gsre2, gsre3, 0);
gEve->FullRedraw3D(kTRUE, kTRUE);