POV-Ray : Newsgroups : povray.advanced-users : Random number generator needed ! : Re: Random number generator needed ! Server Time
30 Jul 2024 00:30:44 EDT (-0400)
  Re: Random number generator needed !  
From: Ron Parker
Date: 23 Feb 2001 14:16:18
Message: <slrn99ddo3.rsv.ron.parker@fwi.com>
On Fri, 23 Feb 2001 17:01:33 +0000, Michael Andrews wrote:
>// --** active sig alert **-- 
>plane{y,0 pigment{color rgb 1}}camera{location<1,5,-2>look_at 0}
>light_source{10 color 1.5}#declare g=sqrt(3);#macro m(a,b,c,n,i)
>#if(i=0)cylinder{a,b,c pigment{color rgb vnormalize(<abs(a.x),max
>(0,4*(1-abs(a.z))-abs(a.x)),4*abs(a.z)>)}}#else#local f=vlength(a
>-b)/32;#local d=(b-a)/8;#local e=vnormalize(vcross(d,n))*f*4;m(a-
>e,a+e,f,n,i-1)m(a+d+(1-g)*e,a+2*d+e,f,n,i-1)m(a+6*d+e,a+8*d+e,f,n
>,i-1)m(a+e,a+d+(1-g)*e,f,n,i-1)m(a+6*d-e,a+8*d-e,f,n,i-1)m(a+2*d+
>e,a+2*d-e,f,n,i-1)m(a+6*d-e,a+6*d+e,f,n,i-1)m(a+3*d-e,a+3*d+e,f,n
>,i-1)m(a+4*d-e,a+4*d+e,f,n,i-1)m(a+4*d,a+(4+g)*d+e,f,n,i-1)m(a+6*
>d,a+8*d,f,n,i-1)m(a+4*d,a+(4+g)*d-e,f,n,i-1)#end#end 
>m(-3*x,3*x,1/8,y,3) // Mike Andrews after Jan Walzer
>// --** end **--

Not to start this again, but you might want to go find the thread in 
off-topic where his sig was discussed.  I posted what I think are some
significant improvements to it (even got it below the McQuary limit!)

-- 
Ron Parker   http://www2.fwi.com/~parkerr/traces.html
My opinions.  Mine.  Not anyone else's.


Post a reply to this message

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