EVE/macros/reve_lineset_test.C

   1 // $Header$
   2
   3 Reve::StraightLineSet* reve_lineset_test(Int_t nlines = 40, Int_t nmarkers = 4)
   4 {
   5   Reve::StraightLineSet* ls = new Reve::StraightLineSet();
   6
   7   TRandom r(0);
   8   Float_t s = 100;
   9
  10   for(Int_t i = 0; i<nlines; i++)
  11   {
  12     ls->AddLine( r.Uniform(-s,s), r.Uniform(-s,s), r.Uniform(-s,s),
  13                  r.Uniform(-s,s), r.Uniform(-s,s), r.Uniform(-s,s));
  14     // add random number of markers
  15     Int_t nm = Int_t(nmarkers* r.Rndm());
  16     for(Int_t m = 0; m < nm; m++) {
  17       ls->AddMarker(i, r.Rndm());
  18     }
  19   }
  20
  21   gReve->AddRenderElement(ls);
  22   gReve->Redraw3D();
  23
  24   return ls;
  25 }