![](/i/fill.gif) |
![](/i/fill.gif) |
|
![](/i/fill.gif) |
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
On Tue, 8 May 2001 21:21:04 +0100, Tek wrote:
>That looks like fun! So I made my own. I'm sure it can be shortened more
>than this, but 4 lines ain't bad :)
Still 4 lines, but lots more room for comments:
#default{pigment{rgb 0}finish{reflection 1}}#macro M(A)#declare B=A;#end#macro L
(A)sphere{A,1}sphere{B,1}cylinder{A,B,1}M(A)#end M(4*u)L(<8,8>)L(<2,8>)M(6*u)L(<
10,8>)L(<16,8>)M(<8,4>)L(<12,4>)camera{location<9,4,-15>}sky_sphere{pigment{bozo
color_map{[0rgb 0][1rgb 1]}}} // Tek
--
plane{-z,-3normal{crackle scale.2#local a=5;#while(a)warp{repeat x flip x}rotate
z*60#local a=a-1;#end translate-9*x}pigment{rgb 1}}light_source{-9red 1rotate 60
*z}light_source{-9rgb y rotate-z*60}light_source{9-z*18rgb z}text{ttf"arial.ttf"
"RP".01,0translate-<.6,.4,.02>pigment{bozo}}light_source{-z*3rgb-.2}//Ron Parker
Post a reply to this message
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
Ron Parker wrote:
> Still 4 lines, but lots more room for comments:
Hey, I didn't know you could put line breaks there! Thanks :)
--
#default{pigment{rgb 0}finish{reflection 1}}#macro M(A)#declare B=A;#end#macro L
(A)sphere{A,1}sphere{B,1}cylinder{A,B,1}M(A)#end M(4*u)L(<8,8>)L(<2,8>)M(6*u)L(<
10,8>)L(<16,8>)M(<8,4>)L(<12,4>)camera{location<9,4,-15>}sky_sphere{pigment{bozo
color_map{[0rgb 0][1rgb 1]}}} // Tek. www.evilsuperbrain.com
Post a reply to this message
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
Ron Parker wrote:
>
> 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.
Thanks for the optimization. I had to leave for work before I had
finished... I knew I had to close my polygons, but I also found one that
was unecessary, So here's the final version:
--
#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 texture{pigment{rgb 1}finish{ambient 1}}}#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>)}camera{location<5,1.2,-5>look_at a
orthographic} // Francois Labreque - fla### [at] videotron ca
Post a reply to this message
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
Ron Parker wrote:
>
> On 8 May 2001 16:01:26 -0400, Ron Parker wrote:
> >On 8 May 2001 12:03:50 -0400, Ron Parker wrote:
> >>So can you make my new one smaller?
> >
> >Okay, that one was boring. So's this one, but at least the output is pretty.
>
> And now: the warning-free version.
wrong!
I get a "Can't find font file!" error.
I know how to fix it, but it should work "out-of-the-box".
--
Francois Labreque | The surest sign of the existence of extra-
flabreque | terrestrial intelligence is that they never
@ | bothered to come down here and visit us!
videotron.ca | - Calvin
Post a reply to this message
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
Tek wrote:
>
> I think I've fixed it now... I hope...
>
> --
> #default{texture{pigment{rgb 0}finish{reflection 1}}}#macro M(A) #declare B=A;
> #end#macro L(A) sphere{A,1}sphere{B,1}cylinder{A,B,1}#declare B=A;#end M(<4,0>)
> L(<8,8>)L(<2,8>)M(<6,0>)L(<10,8>)L(<16,8>)M(<8,4>)L(<12,4>)camera{location
> <9,4,-15>}sky_sphere{pigment{bozo colour_map{[0 rgb 0][1 rgb 1]}}} // Tek
Reminds me of the Van Halen logo.
--
Francois Labreque | The surest sign of the existence of extra-
flabreque | terrestrial intelligence is that they never
@ | bothered to come down here and visit us!
videotron.ca | - Calvin
Post a reply to this message
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
On Tue, 08 May 2001 20:32:47 -0400, Francois Labreque wrote:
>Ron Parker wrote:
>> And now: the warning-free version.
>
>wrong!
>I get a "Can't find font file!" error.
>
>I know how to fix it, but it should work "out-of-the-box".
Well, maybe... but I'm cursed with initials that don't have easy
sphere-and-cylinder construction, so I have to fall back on ttf
objects.
--
plane{-z,-3normal{crackle scale.2#local a=5;#while(a)warp{repeat x flip x}rotate
z*60#local a=a-1;#end translate-9*x}pigment{rgb 1}}light_source{-9red 1rotate 60
*z}light_source{-9rgb y rotate-z*60}light_source{9-z*18rgb z}text{ttf"arial.ttf"
"RP".01,0translate-<.6,.4,.02>pigment{bozo}}light_source{-z*3rgb-.2}//Ron Parker
Post a reply to this message
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
Ron Parker <ron### [at] povray org> wrote:
: Well, maybe... but I'm cursed with initials that don't have easy
: sphere-and-cylinder construction, so I have to fall back on ttf
: objects.
Well, my nick has an 'R' and a 'P' as well (besides 'W' and 'A') and I
don't have any problem ;)
--
#macro N(D,I)#if(I<6)cylinder{M()#local D[I]=div(D[I],104);M().5,2pigment{
rgb M()}}N(D,(D[I]>99?I:I+1))#end#end#macro M()<mod(D[I],13)-6,mod(div(D[I
],13),8)-3,10>#end blob{N(array[6]{11117333955,
7382340,3358,3900569407,970,4254934330},0)}// - Warp -
Post a reply to this message
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
Francois Labreque <fla### [at] videotron ca> wrote:
: So here's the final version:
: #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 texture{pigment{rgb 1}finish{ambient 1}}}#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>)}camera{location<5,1.2,-5>look_at a
: orthographic} // Francois Labreque - fla### [at] videotron ca
Wouldn't you prefer:
#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 pigment{rgb 9}}#end P(0,a)P(a,b)P(b,c)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}
// Francois Labreque - fla### [at] videotron ca
--
#macro N(D,I)#if(I<6)cylinder{M()#local D[I]=div(D[I],104);M().5,2pigment{
rgb M()}}N(D,(D[I]>99?I:I+1))#end#end#macro M()<mod(D[I],13)-6,mod(div(D[I
],13),8)-3,10>#end blob{N(array[6]{11117333955,
7382340,3358,3900569407,970,4254934330},0)}// - Warp -
Post a reply to this message
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
Ron Parker <ron### [at] povray org> wrote:
: #default{pigment{rgb 0}finish{reflection 1}}#macro M(A)#declare B=A;#end#macro L
: (A)sphere{A,1}sphere{B,1}cylinder{A,B,1}M(A)#end M(4*u)L(<8,8>)L(<2,8>)M(6*u)L(<
: 10,8>)L(<16,8>)M(<8,4>)L(<12,4>)camera{location<9,4,-15>}sky_sphere{pigment{bozo
: color_map{[0rgb 0][1rgb 1]}}} // Tek
If you add a "scale.5" or similar right after the color_map block, the
sig will be 7 characters longer but will look a lot cooler.
--
#macro N(D,I)#if(I<6)cylinder{M()#local D[I]=div(D[I],104);M().5,2pigment{
rgb M()}}N(D,(D[I]>99?I:I+1))#end#end#macro M()<mod(D[I],13)-6,mod(div(D[I
],13),8)-3,10>#end blob{N(array[6]{11117333955,
7382340,3358,3900569407,970,4254934330},0)}// - Warp -
Post a reply to this message
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
Ron Parker <ron### [at] povray org> wrote:
: plane{-z,-3normal{crackle scale.2#local a=5;#while(a)warp{repeat x flip x}rotate
: z*60#local a=a-1;#end translate-9*x}pigment{rgb 1}}light_source{-9red 1rotate 60
: *z}light_source{-9rgb y rotate-z*60}light_source{9-z*18rgb z}text{ttf"arial.ttf"
: "RP".01,0translate-<.6,.4,.02>pigment{bozo}}light_source{-z*3rgb-.2}//Ron Parker
A bit shorter:
#macro L(P,C,R)light_source{P,rgb C rotate z*R}#end plane{-z,-3normal{crackle
scale.2#local a=5;#while(a)warp{repeat x flip x}rotate z*60#local a=a-1;#end
translate-9*x}pigment{rgb 1}}L(-9,x,60)L(-9,y,-60)L(9-z*18,z,0)L(-z*3,-.2,0)
text{ttf"arial.ttf""RP".1,0translate-<.6,.4,.02>pigment{bozo}}//Ron Parker
--
#macro N(D,I)#if(I<6)cylinder{M()#local D[I]=div(D[I],104);M().5,2pigment{
rgb M()}}N(D,(D[I]>99?I:I+1))#end#end#macro M()<mod(D[I],13)-6,mod(div(D[I
],13),8)-3,10>#end blob{N(array[6]{11117333955,
7382340,3358,3900569407,970,4254934330},0)}// - Warp -
Post a reply to this message
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |
|
![](/i/fill.gif) |
| ![](/i/fill.gif) |
|
![](/i/fill.gif) |