POV-Ray : Newsgroups : povray.binaries.images : Grass-like spikes in a POV box : Re: Grass-like spikes in a POV box Server Time
17 Aug 2024 02:30:14 EDT (-0400)
  Re: Grass-like spikes in a POV box  
From: Andrew Cocker
Date: 13 Nov 2001 20:10:10
Message: <3bf1c472@news.povray.org>
"Mahalis" <don### [at] fakeycom> wrote in message
news:3bf1a949@news.povray.org...
> Yes it does... source? ;-)

Full source is very messy. The actual trace () bit looked like this:
(apologies for posting source in this group)

#declare MyRad=0.075;

union {
#declare Spacing=0.1;
#declare Cnt=0;
#declare ff=seed(7);

#declare PosX=-5+MyRad;

#while (PosX < 5-MyRad)

  #declare PosY=-5+MyRad;

  #while (PosY < 5-MyRad)

    // trace function
    #declare Norm = <0, 0, 0>;
    #declare Start = <PosX+(rand(ff)-0.5)*Spacing,3,
PosY+(rand(ff)-0.5)*Spacing>;
    #declare Pos = trace (
                  Things,     // pre-declared object to test
                  Start,           // starting point
                  -y,              // direction
                  Norm );          // normal


    #if (Norm.x != 0 | Norm.y != 0 | Norm.z != 0)   // if intersection is
found, normal differs from 0

        union {
          sphere {<0,MyRad,0>,MyRad }
          cone {<0,MyRad,0>,0.02,<0,1,0>,0
                rotate <(rand(ff)*20)-10,(rand(ff)*20)-10,(rand(ff)*20)-10>
                }
          scale rand(ff)
          translate Pos
        }
        #declare Cnt=Cnt+1;

    #end

    #declare PosY=PosY+Spacing;

  #end

  #declare PosX=PosX+Spacing;
#end

texture {MyTex}

}


Post a reply to this message

Copyright 2003-2023 Persistence of Vision Raytracer Pty. Ltd.