On Tue, 08 May 2001 10:56:23 -0400, Francois Labreque wrote:
>
>-- 
>#local a=<1,1,0>;#local b=<2,1,0>;#local c=<3,2,0>;#local d=<5,3,0>;
>#macro P(A,B) polygon{4,A,A+z,B+z,B texture{pigment{color rgb 1}finish
>{ambient 1}}}#end union{P(0,a)P(a,b)P(b,c)P(c,2*a)P(2*a,2*b)P(2*b,d)P(
>d,<2,3,0>)}camera{location <5,1.2,-5>look_at a orthographic}//FL

I had to do it; it's a compulsion. Doesn't anyone understand?

#local a=x+y;#local b=x+a;#local c=a+b;#macro P(A,B) polygon{
4,A,A+z,B+z,B texture{pigment{color rgb 1}finish{ambient 1}}}
#end union{P(0,a)P(a,b)P(b,c)P(c,2*a)P(2*a,2*b)P(2*b,b+c)P(b+
c,<2,3>)}camera{location<5,1.2,-5>look_at a orthographic}//FL

or

#local a=x+y;#local b=x+a;#local c=a+b;#macro P(A,B)polygon{5,A,A+z,B+z,B,A//FL
texture{pigment{rgb 1}finish{ambient 1}}}#end union{P(0,a)P(a,b)P(b,c)P(c,2*a)P
(2*a,2*b)P(2*b,b+c)P(b+c,<2,3>)}camera{location<5,1.2,-5>look_at a orthographic}

which has the advantage of rendering without warnings.


-- 
#local R=<7084844682857967,32787982,826975826580>#macro L(P)concat(#while(P)chr(
mod(P,100)),#local P=P/100;#end"")#end background{rgb 1}text{ttf L(R.x)L(R.y)0,0
translate<-.8,0,-1>}text{ttf L(R.x)L(R.z)0,0translate<-1.6,-.75,-1>}sphere{z/9e3
4/26/2001finish{reflection 1}}//ron.parker@povray.org My opinions, nobody else's

Post a reply to this message