EVE/alice-macros/region_marker.C

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