|
|
"Norbert Kern" <nor### [at] t-onlinede> wrote in message
news:web.44a5fb529c5d72994c493f840@news.povray.org...
> #declare areal = plane {y,0}
> #declare r1 = seed(1);
> #declare n = 0;
> #while (n < 200)
> #declare X = rand(r1)*hfscalx*2;
> #declare Z = rand(r1)*hfscalz*2;
> #declare Norm = <0,0,0>;
> #declare Start = <X-hfscalx,100,Z-hfscalz>;
> #declare Inter = trace (areal,Start,-y,Norm);
> #if (vlength (Norm) != 0)
> object {
> thingy
> scale (0.7+0.6*rand(r1))
> translate <Inter.x,0,Inter.z>
here's your problem: transparency only works as expected if the
transparent object is, in this case, higher than the background.
so, change translate <Inter.x,0,Inter.z> into translate
<Inter.x,rand(r1)*.1,Inter.z>, and you'll get the desired effect.
cu!
--
#macro G(b,e)b+(e-b)*C/50#end#macro _(b,e,k,l)#local C=0;#while(C<50)
sphere{G(b,e)+3*z.1pigment{rgb G(k,l)}finish{ambient 1}}#local C=C+1;
#end#end _(y-x,y,x,x+y)_(y,-x-y,x+y,y)_(-x-y,-y,y,y+z)_(-y,y,y+z,x+y)
_(0x+y.5+y/2x)_(0x-y.5+y/2x) // ZK http://www.povplace.com
Post a reply to this message
|
|