[u/mrichter/AliRoot.git] / EVE / alice-macros / geom_gentle_green.C

#if !defined(__CINT__) || defined(__MAKECINT__)
#include <TFile.h>
#include <TEveManager.h>
#include <TEveElement.h>
#include <TEveGeoShape.h>
#include <TEveGeoShapeExtract.h>

#include <AliEveEventManager.h>
#include <AliEveMultiView.h>
#endif

void geom_gentle_green(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();

    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->SetMainColor(kMagenta-5);
    its1->SetMainTransparency(60);
    k++;

    TEveGeoShape* its2 = (TEveGeoShape*) *k;
    its2->SetRnrSelf(kTRUE);
    its2->SetMainColor(kCyan-5);
    its2->SetMainTransparency(60);
    k++;

    TEveGeoShape* its3 = (TEveGeoShape*) *k;
    its3->SetRnrSelf(kTRUE);
    its3->SetMainColor(kGreen-5);
    its3->SetMainTransparency(60);
    }
  //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(kFALSE);
    lvl3->SetMainColor(1);
    lvl3->SetMainTransparency(70);
    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->SetMainColor(1);
    tpc1->SetMainTransparency(70);
    m++;

    TEveGeoShape* tpc2 = (TEveGeoShape*) *m;
    tpc2->SetRnrSelf(kTRUE);
    tpc2->SetMainColor(1);
    tpc2->SetMainTransparency(70);
    m++;

    TEveGeoShape* tpc3 = (TEveGeoShape*) *m;
    tpc3->SetRnrSelf(kTRUE);
    tpc3->SetMainColor(1);
    tpc3->SetMainTransparency(70);
    m++;
    }
  //TRD+TOF

    i++;
    {
    TEveGeoShape* lvl1 = (TEveGeoShape*) *i;
    lvl1->SetRnrSelf(kFALSE);
    TEveElement::List_i j = lvl1->BeginChildren();

    TEveGeoShape* trd1 = (TEveGeoShape*) *j;
    trd1->SetRnrSelf(kTRUE);
    trd1->SetMainColor(kMagenta-8);
    trd1->SetMainTransparency(80);
    j++;

    TEveGeoShape* tof1 = (TEveGeoShape*) *j;
    tof1->SetRnrSelf(kTRUE);
    tof1->SetMainColor(kMagenta-1);
    tof1->SetMainTransparency(80);
    }
  //PHOS

    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->SetMainColor(kGreen-8);
        lvl2->SetMainTransparency(20);
      }
    }
  //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->SetMainColor(kBlue-5);
        lvl2->SetMainTransparency(20);
      }
    }
  }
  
  {TFile f("$ALICE_ROOT/EVE/alice-data/gentle_rphi_geo.root");
    TEveGeoShapeExtract* gse = (TEveGeoShapeExtract*) f.Get("Gentle");
    gsre2 = TEveGeoShape::ImportShapeExtract(gse);
    f.Close();

    // Fix visibility, color and transparency

    gsre2->SetRnrSelf(kFALSE);
    TEveElement::List_i i = gsre2->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->SetMainColor(1);
    its1->SetMainTransparency(80);

    k++;

    TEveGeoShape* its2 = (TEveGeoShape*) *k;
    its2->SetRnrSelf(kTRUE);
    its2->SetMainColor(1);
    its2->SetMainTransparency(80);
    k++;

    TEveGeoShape* its3 = (TEveGeoShape*) *k;
    its3->SetRnrSelf(kTRUE);
    its3->SetMainColor(1);
    its3->SetMainTransparency(80);
    }
  //TPC

    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->SetMainColor(1);
        lvl2->SetMainTransparency(80);
      }
    }
  //PHOS

    i++;
    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->SetMainColor(1);
        lvl2->SetMainTransparency(80);

      }
    }
  //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->SetMainColor(1);
        lvl2->SetMainTransparency(80);
      }
    }
  }
  
  { TFile f("$ALICE_ROOT/EVE/alice-data/gentle_rhoz_geo.root");
    TEveGeoShapeExtract* gse = (TEveGeoShapeExtract*) f.Get("Gentle");
    gsre3 = TEveGeoShape::ImportShapeExtract(gse);
    f.Close();

    // Fix visibility, color and transparency

    gsre3->SetRnrSelf(kFALSE);
    TEveElement::List_i i = gsre3->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->SetMainColor(1);
    k++;

    TEveGeoShape* its2 = (TEveGeoShape*) *k;
    its2->SetRnrSelf(kTRUE);
    its2->SetMainColor(1);
    k++;

    TEveGeoShape* its3 = (TEveGeoShape*) *k;
    its3->SetRnrSelf(kTRUE);
    its3->SetMainColor(1);
    }
  //TPC

    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->SetMainColor(1);
        lvl2->SetMainTransparency(80);

      }
    }
  //PHOS

    i++;
    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->SetMainColor(1);
        lvl2->SetMainTransparency(80);
      }
    }
  //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->SetMainColor(1);
        lvl2->SetMainTransparency(80);
      }
    }

  }
  
//fix all the viewers

  TEveElement* top = gEve->GetCurrentEvent();

  AliEveMultiView *mv = AliEveMultiView::Instance();
  
  mv->InitGeomGentle(gsre1, gsre2, gsre3, 0);

  gEve->FullRedraw3D(kTRUE, kTRUE);

}
Commit	Line	Data
	1	#if !defined(__CINT__) \|\| defined(__MAKECINT__)
	2	#include <TFile.h>
	3	#include <TEveManager.h>
	4	#include <TEveElement.h>
	5	#include <TEveGeoShape.h>
	6	#include <TEveGeoShapeExtract.h>
	7
	8	#include <AliEveEventManager.h>
	9	#include <AliEveMultiView.h>
	10	#endif
	11
	12	void geom_gentle_green(Bool_t register_as_global=kTRUE)
	13	{
	14	TEveGeoShape* gsre1;
	15	TEveGeoShape* gsre2;
	16	TEveGeoShape* gsre3;
	17
	18	{TFile f("$ALICE_ROOT/EVE/alice-data/gentle_geo.root");
	19	TEveGeoShapeExtract* gse = (TEveGeoShapeExtract*) f.Get("Gentle");
	20	gsre1 = TEveGeoShape::ImportShapeExtract(gse);
	21	f.Close();
	22
	23	if (register_as_global)
	24	{
	25	gEve->AddGlobalElement(gsre1);
	26	}
	27
	28	// Fix visibility, color and transparency
	29
	30	gsre1->SetRnrSelf(kFALSE);
	31	TEveElement::List_i i = gsre1->BeginChildren();
	32
	33	//ITS
	34	{
	35	TEveGeoShape* lvl1 = (TEveGeoShape) i;
	36	lvl1->SetRnrSelf(kFALSE);
	37	TEveElement::List_i j = lvl1->BeginChildren();
	38
	39	TEveGeoShape* lvl2 = (TEveGeoShape) j;
	40	lvl2->SetRnrSelf(kFALSE);
	41	TEveElement::List_i k = lvl2->BeginChildren();
	42
	43	TEveGeoShape* its1 = (TEveGeoShape) k;
	44	its1->SetRnrSelf(kTRUE);
	45	its1->SetMainColor(kMagenta-5);
	46	its1->SetMainTransparency(60);
	47	k++;
	48
	49	TEveGeoShape* its2 = (TEveGeoShape) k;
	50	its2->SetRnrSelf(kTRUE);
	51	its2->SetMainColor(kCyan-5);
	52	its2->SetMainTransparency(60);
	53	k++;
	54
	55	TEveGeoShape* its3 = (TEveGeoShape) k;
	56	its3->SetRnrSelf(kTRUE);
	57	its3->SetMainColor(kGreen-5);
	58	its3->SetMainTransparency(60);
	59	}
	60	//TPC
	61
	62	i++;
	63	{
	64	TEveGeoShape* lvl1 = (TEveGeoShape) i;
	65	lvl1->SetRnrSelf(kFALSE);
	66	TEveElement::List_i j = lvl1->BeginChildren();
	67
	68	TEveGeoShape* lvl2 = (TEveGeoShape) j;
	69	lvl2->SetRnrSelf(kFALSE);
	70	TEveElement::List_i k = lvl2->BeginChildren();
	71
	72	TEveGeoShape* lvl3 = (TEveGeoShape) k;
	73	lvl3->SetRnrSelf(kFALSE);
	74	lvl3->SetMainColor(1);
	75	lvl3->SetMainTransparency(70);
	76	TEveElement::List_i l = lvl3->BeginChildren();
	77
	78	TEveGeoShape* lvl4 = (TEveGeoShape) l;
	79	lvl4->SetRnrSelf(kFALSE);
	80	TEveElement::List_i m = lvl4->BeginChildren();
	81
	82	TEveGeoShape* tpc1 = (TEveGeoShape) m;
	83	tpc1->SetRnrSelf(kTRUE);
	84	tpc1->SetMainColor(1);
	85	tpc1->SetMainTransparency(70);
	86	m++;
	87
	88	TEveGeoShape* tpc2 = (TEveGeoShape) m;
	89	tpc2->SetRnrSelf(kTRUE);
	90	tpc2->SetMainColor(1);
	91	tpc2->SetMainTransparency(70);
	92	m++;
	93
	94	TEveGeoShape* tpc3 = (TEveGeoShape) m;
	95	tpc3->SetRnrSelf(kTRUE);
	96	tpc3->SetMainColor(1);
	97	tpc3->SetMainTransparency(70);
	98	m++;
	99	}
	100	//TRD+TOF
	101
	102	i++;
	103	{
	104	TEveGeoShape* lvl1 = (TEveGeoShape) i;
	105	lvl1->SetRnrSelf(kFALSE);
	106	TEveElement::List_i j = lvl1->BeginChildren();
	107
	108	TEveGeoShape* trd1 = (TEveGeoShape) j;
	109	trd1->SetRnrSelf(kTRUE);
	110	trd1->SetMainColor(kMagenta-8);
	111	trd1->SetMainTransparency(80);
	112	j++;
	113
	114	TEveGeoShape* tof1 = (TEveGeoShape) j;
	115	tof1->SetRnrSelf(kTRUE);
	116	tof1->SetMainColor(kMagenta-1);
	117	tof1->SetMainTransparency(80);
	118	}
	119	//PHOS
	120
	121	i++;
	122	{
	123	TEveGeoShape* lvl1 = (TEveGeoShape) i;
	124	lvl1->SetRnrSelf(kFALSE);
	125
	126	for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); ++j)
	127	{
	128	TEveGeoShape* lvl2 = (TEveGeoShape) j;
	129	lvl2->SetRnrSelf(kTRUE);
	130	lvl2->SetMainColor(kGreen-8);
	131	lvl2->SetMainTransparency(20);
	132	}
	133	}
	134	//HMPID
	135
	136	i++;
	137	{
	138	TEveGeoShape* lvl1 = (TEveGeoShape) i;
	139	lvl1->SetRnrSelf(kFALSE);
	140
	141	for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); ++j)
	142	{
	143	TEveGeoShape* lvl2 = (TEveGeoShape) j;
	144	lvl2->SetRnrSelf(kTRUE);
	145	lvl2->SetMainColor(kBlue-5);
	146	lvl2->SetMainTransparency(20);
	147	}
	148	}
	149	}
	150
	151	{TFile f("$ALICE_ROOT/EVE/alice-data/gentle_rphi_geo.root");
	152	TEveGeoShapeExtract* gse = (TEveGeoShapeExtract*) f.Get("Gentle");
	153	gsre2 = TEveGeoShape::ImportShapeExtract(gse);
	154	f.Close();
	155
	156	// Fix visibility, color and transparency
	157
	158	gsre2->SetRnrSelf(kFALSE);
	159	TEveElement::List_i i = gsre2->BeginChildren();
	160
	161	//ITS
	162	{
	163	TEveGeoShape* lvl1 = (TEveGeoShape) i;
	164	lvl1->SetRnrSelf(kFALSE);
	165	TEveElement::List_i j = lvl1->BeginChildren();
	166
	167	TEveGeoShape* lvl2 = (TEveGeoShape) j;
	168	lvl2->SetRnrSelf(kFALSE);
	169	TEveElement::List_i k = lvl2->BeginChildren();
	170
	171	TEveGeoShape* its1 = (TEveGeoShape) k;
	172	its1->SetRnrSelf(kTRUE);
	173	its1->SetMainColor(1);
	174	its1->SetMainTransparency(80);
	175
	176	k++;
	177
	178	TEveGeoShape* its2 = (TEveGeoShape) k;
	179	its2->SetRnrSelf(kTRUE);
	180	its2->SetMainColor(1);
	181	its2->SetMainTransparency(80);
	182	k++;
	183
	184	TEveGeoShape* its3 = (TEveGeoShape) k;
	185	its3->SetRnrSelf(kTRUE);
	186	its3->SetMainColor(1);
	187	its3->SetMainTransparency(80);
	188	}
	189	//TPC
	190
	191	i++;
	192	{
	193	TEveGeoShape* lvl1 = (TEveGeoShape) i;
	194	lvl1->SetRnrSelf(kFALSE);
	195
	196	for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++)
	197	{
	198	TEveGeoShape* lvl2 = (TEveGeoShape) j;
	199	lvl2->SetRnrSelf(kTRUE);
	200	lvl2->SetMainColor(1);
	201	lvl2->SetMainTransparency(80);
	202	}
	203	}
	204	//PHOS
	205
	206	i++;
	207	i++;
	208	{
	209	TEveGeoShape* lvl1 = (TEveGeoShape) i;
	210	lvl1->SetRnrSelf(kFALSE);
	211
	212	for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++)
	213	{
	214	TEveGeoShape* lvl2 = (TEveGeoShape) j;
	215	lvl2->SetRnrSelf(kTRUE);
	216	lvl2->SetMainColor(1);
	217	lvl2->SetMainTransparency(80);
	218
	219	}
	220	}
	221	//HMPID
	222
	223	i++;
	224	{
	225	TEveGeoShape* lvl1 = (TEveGeoShape) i;
	226	lvl1->SetRnrSelf(kFALSE);
	227
	228	for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++)
	229	{
	230	TEveGeoShape* lvl2 = (TEveGeoShape) j;
	231	lvl2->SetRnrSelf(kTRUE);
	232	lvl2->SetMainColor(1);
	233	lvl2->SetMainTransparency(80);
	234	}
	235	}
	236	}
	237
	238	{ TFile f("$ALICE_ROOT/EVE/alice-data/gentle_rhoz_geo.root");
	239	TEveGeoShapeExtract* gse = (TEveGeoShapeExtract*) f.Get("Gentle");
	240	gsre3 = TEveGeoShape::ImportShapeExtract(gse);
	241	f.Close();
	242
	243	// Fix visibility, color and transparency
	244
	245	gsre3->SetRnrSelf(kFALSE);
	246	TEveElement::List_i i = gsre3->BeginChildren();
	247
	248	//ITS
	249	{
	250	TEveGeoShape* lvl1 = (TEveGeoShape) i;
	251	lvl1->SetRnrSelf(kFALSE);
	252	TEveElement::List_i j = lvl1->BeginChildren();
	253
	254	TEveGeoShape* lvl2 = (TEveGeoShape) j;
	255	lvl2->SetRnrSelf(kFALSE);
	256	TEveElement::List_i k = lvl2->BeginChildren();
	257
	258	TEveGeoShape* its1 = (TEveGeoShape) k;
	259	its1->SetRnrSelf(kTRUE);
	260	its1->SetMainColor(1);
	261	k++;
	262
	263	TEveGeoShape* its2 = (TEveGeoShape) k;
	264	its2->SetRnrSelf(kTRUE);
	265	its2->SetMainColor(1);
	266	k++;
	267
	268	TEveGeoShape* its3 = (TEveGeoShape) k;
	269	its3->SetRnrSelf(kTRUE);
	270	its3->SetMainColor(1);
	271	}
	272	//TPC
	273
	274	i++;
	275	{
	276	TEveGeoShape* lvl1 = (TEveGeoShape) i;
	277	lvl1->SetRnrSelf(kFALSE);
	278
	279	for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++)
	280	{
	281	TEveGeoShape* lvl2 = (TEveGeoShape) j;
	282	lvl2->SetRnrSelf(kTRUE);
	283	lvl2->SetMainColor(1);
	284	lvl2->SetMainTransparency(80);
	285
	286	}
	287	}
	288	//PHOS
	289
	290	i++;
	291	i++;
	292	{
	293	TEveGeoShape* lvl1 = (TEveGeoShape) i;
	294	lvl1->SetRnrSelf(kFALSE);
	295
	296	for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++)
	297	{
	298	TEveGeoShape* lvl2 = (TEveGeoShape) j;
	299	lvl2->SetRnrSelf(kTRUE);
	300	lvl2->SetMainColor(1);
	301	lvl2->SetMainTransparency(80);
	302	}
	303	}
	304	//HMPID
	305
	306	i++;
	307	{
	308	TEveGeoShape* lvl1 = (TEveGeoShape) i;
	309	lvl1->SetRnrSelf(kFALSE);
	310
	311	for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++)
	312	{
	313	TEveGeoShape* lvl2 = (TEveGeoShape) j;
	314	lvl2->SetRnrSelf(kTRUE);
	315	lvl2->SetMainColor(1);
	316	lvl2->SetMainTransparency(80);
	317	}
	318	}
	319
	320	}
	321
	322	//fix all the viewers
	323
	324	TEveElement* top = gEve->GetCurrentEvent();
	325
	326	AliEveMultiView *mv = AliEveMultiView::Instance();
	327
	328	mv->InitGeomGentle(gsre1, gsre2, gsre3, 0);
	329
	330	gEve->FullRedraw3D(kTRUE, kTRUE);
	331
	332	}