Changed class inheritance: from TObject to TTask
[u/mrichter/AliRoot.git] / TOF / DrawTOFplates.C
1 void DrawTOFplates()
2 {
3    gMC->Gsatt("*", "seen", -1);
4    gMC->Gsatt("alic", "seen", 0);
5    gROOT->LoadMacro("ViewTOFplates.C");
6    gInterpreter->ProcessLine("ViewTOFplates()");
7    gMC->Gdopt("hide", "on");
8    gMC->Gdopt("shad", "on");
9    gMC->Gsatt("*", "fill", 5);
10    gMC->SetClipBox(".");
11    gMC->SetClipBox("*", 0, 1000, 0, 1000, 0, 1000);
12    gMC->DefaultRange();
13    gMC->Gdraw("alic", 45, 40, 0, 10, 10, .015, .015);
14    gMC->Gdhead(1111, "TOF Detector (Plates)");
15    gMC->Gdman(18, 4, "MAN");             
16 }