POV-Ray : Newsgroups : povray.general : Anybody in for some sig-shortening? Server Time
16 Nov 2024 23:19:57 EST (-0500)
  Anybody in for some sig-shortening? (Message 1 to 5 of 5)  
From: Florian Brucker
Subject: Anybody in for some sig-shortening?
Date: 3 Aug 2003 12:09:12
Message: <3f2d33a8$1@news.povray.org>
Hey Guys!

Thought it would be time for me to get a sig :)
I tried to make it a three-liner, but hey, this is all i could do... 
Anybody else want to try?

#local a=0;#while(a<999)cylinder{#local _=.01*a-4.99;#local p=a*.01-5;#
local c=.01*a-4.995;<sin(p*pi)*5p*10pow(p,5)*.01><sin(_*pi)*5_*10pow(_,
5)*.01>sin(c*c*c*.1)+1pigment{rgb 9*z}}#local a=a+1;#end camera{look_at
-y*10location<8,-3,-8>*10}

Florian


Post a reply to this message

From: Jeffry Reifel
Subject: Re: Anybody in for some sig-shortening?
Date: 3 Aug 2003 15:03:41
Message: <3f2d5c8d$1@news.povray.org>
I can't see any difference in the image.
#local a=-5;#while(a<5)sphere{<sin(a*pi)*5a*10pow(a,5)*.01>sin(a*a*a*
.1)+1pigment{rgb 9*z}}#local a=a+.01;#end camera{look_at-y*10location
<8,-3,-8>*10}


Post a reply to this message

From: Francois Labreque
Subject: Re: Anybody in for some sig-shortening?
Date: 3 Aug 2003 15:53:20
Message: <3f2d6830$1@news.povray.org>
Program ended abnormally on 2003-08-03 12:09, Due to a catastrophic
Florian Brucker error:

> Hey Guys!
> 
> Thought it would be time for me to get a sig :)
> I tried to make it a three-liner, but hey, this is all i could do... 
> Anybody else want to try?
> 
> #local a=0;#while(a<999)cylinder{#local _=.01*a-4.99;#local p=a*.01-5;#
> local c=.01*a-4.995;<sin(p*pi)*5p*10pow(p,5)*.01><sin(_*pi)*5_*10pow(_,
> 5)*.01>sin(c*c*c*.1)+1pigment{rgb 9*z}}#local a=a+1;#end camera{look_at
> -y*10location<8,-3,-8>*10}
> 

#local a=-5;#macro f(p)<sin(p*pi)*5p*10pow(p,5)*.01>#end#while(a<5)/**/
cylinder{#local _=a+.01;#local c=a+.005;f(a)f(_)sin(c*c*c*.1)+1pigment{
rgb 9*z}}#local a=a+.01;#end camera{look_at-y*10location<8,-3,-8>*10}//

-- 
/*Francois Labreque*/#local a=x+y;#local b=x+a;#local c=a+b;#macro P(F//
/*    flabreque    */L)polygon{5,F,F+z,L+z,L,F pigment{rgb 9}}#end union
/*        @        */{P(0,a)P(a,b)P(b,c)P(2*a,2*b)P(2*b,b+c)P(b+c,<2,3>)
/*   videotron.ca  */}camera{orthographic location<6,1.25,-6>look_at a }


Post a reply to this message

From: Florian Brucker
Subject: Re: Anybody in for some sig-shortening?
Date: 3 Aug 2003 17:12:54
Message: <3f2d7ad6$1@news.povray.org>
Thank you Guys!

That's really a nice shortie now :)

Florian
-- 
//=================[web: http://www.torfbold.com]==================\\
#local a=-5;#while(a<5)sphere{<sin(a*pi)*5a*10pow(a,5)*.01>sin(a*a*a*
.1)+1pigment{rgb 9*z}}#local a=a+.01;#end camera{look_at-y*10location
<8,-3,-8>*10}// [www.povray.org]     [www.imp.org]     [www.irtc.org]


Post a reply to this message

From: ABX
Subject: Re: Anybody in for some sig-shortening?
Date: 4 Aug 2003 03:28:39
Message: <ef2sivcros6krla724rndsgt34107sdu4s@4ax.com>
On Sun, 03 Aug 2003 15:50:22 -0400, Francois Labreque <fla### [at] videotronca>
wrote:
> #local a=-5;#macro f(p)<sin(p*pi)*5p*10pow(p,5)*.01>#end#while(a<5)/**/
> cylinder{#local _=a+.01;#local c=a+.005;f(a)f(_)sin(c*c*c*.1)+1pigment{
> rgb 9*z}}#local a=a+.01;#end camera{look_at-y*10location<8,-3,-8>*10}//

camera{look_at-y*10location-<-8 3 8>*10#macro f(_)<sin(_*pi)*5_*10pow(_
5)/1e2>#end}#local a=-5;#while(a<5)cylinder{f(a)f(a+.01)sin(pow(a+.005
3)/10)+1pigment{blue 9}}#local a=a+.01;#end

ABX


Post a reply to this message

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