EVE/alice-macros/region_marker.C

   1 // $Header
   2
   3 void region_marker(Float_t a=10, Float_t x=0, Float_t y=0, Float_t z=0)
   4 {
   5   TPolyMarker3D* mark = new TPolyMarker3D(8);
   6   mark->SetName("Origin marker");
   7   mark->SetMarkerStyle(3);
   8   mark->SetMarkerColor(6);
   9   mark->SetPoint(0, x+a, y+a, z+a);
  10   mark->SetPoint(1, x+a, y-a, z+a);
  11   mark->SetPoint(2, x-a, y-a, z+a);
  12   mark->SetPoint(3, x-a, y+a, z+a);
  13
  14   mark->SetPoint(4, x+a, y+a, z-a);
  15   mark->SetPoint(5, x+a, y-a, z-a);
  16   mark->SetPoint(6, x-a, y+a, z-a);
  17   mark->SetPoint(7, x-a, y-a, z-a);
  18
  19   using namespace Reve;
  20   Color_t* colp = FindColorVar(mark, "fMarkerColor");
  21   RenderElementObjPtr* rnrEl = new RenderElementObjPtr(mark, *colp);
  22   gReve->AddGlobalRenderElement(rnrEl);
  23   gReve->DrawRenderElement(rnrEl);
  24 }