Here is a signature file I've had in mind for some time now. It started out as
patches and wound up like this. It is an approximation of a logo I made for
myself several years ago.

Once again, I've devoted huge quantities of time developing objects for my irtc
entry. Neither is finished, so, the scene isn't either. Thought I'd just shift
gears, and do this sig. I can finish the year with some sense of accomplishment.
:)

Optimizations are welcome. I would love to stick my name in it somewhere so it
is readily identifiable. Five characters would do ( //^"^ ).

Batronyx.

light_source{0 1}#macro c(a)sphere{0,a}#end#macro T(J)translate J#end##macro O()
object{#end#macro B(R,V)union{c(4)intersection{O()c(R)T(V)}difference{O()c(10)
scale 1.1*x+y+z}union{O()c(10)scale y+x*1.1+z T(-z*.1)}O()c(5)scale<1.5,9,1>T(z*
4)}}T(-z*4)}}}#end union{B(12,0)O()B(8,y*4)scale.5T(y*6)}T(z*25)pigment{blue 1}}

Post a reply to this message

On Fri, 28 Dec 2001 08:22:34 -0600, "Batronyx" <bat### [at] alliancecablenet>
wrote:
> Optimizations are welcome. I would love to stick my name in it somewhere so it
> is readily identifiable.

There is place for your whole email :-)

#macro c(a)sphere{0a#end#macro B(R,V)c(4)}intersection{c(R)T(V)}difference{c(
10)scale.1*x+1}union{c(10)scale 1+x*.1T(-z*.1)}c(5)scale 1+<.5,9>T(z*4)}}T(-z
*4)}}#end#macro T(J)translate J#end light_source{0 1}union{B(12,0)union{B(8,y
*4)scale.5T(y*6)}T(z*25)pigment{rgb z}} // batronyx @ alliancecable.net

I hope I've not destroyed anything :-)

ABX

Post a reply to this message

Batronyx <bat### [at] alliancecablenet> wrote:
: light_source{0 1}#macro c(a)sphere{0,a}#end#macro T(J)translate J#end##macro O()
: object{#end#macro B(R,V)union{c(4)intersection{O()c(R)T(V)}difference{O()c(10)
: scale 1.1*x+y+z}union{O()c(10)scale y+x*1.1+z T(-z*.1)}O()c(5)scale<1.5,9,1>T(z*
: 4)}}T(-z*4)}}}#end union{B(12,0)O()B(8,y*4)scale.5T(y*6)}T(z*25)pigment{blue 1}}


light_source{0 1}#macro c(J,a)sphere{0,1scale a translate J+O}#end#macro B(R,
V,O)union{c(0,4)intersection{c(V,R)difference{c(-z*4<11,10,10>)c(-z*4.1<11,10
,10>)c(0<7.5,45,5>)}}#end union{B(12,0z*25)}B(8y*4<0,12,50>)scale.5}pigment{
rgb z}}



-- 
#macro M(A,N,D,L)plane{-z,-9pigment{mandel L*9translate N color_map{[0rgb x]
[1rgb 9]}scale<D,D*3D>*1e3}rotate y*A*8}#end M(-3<1.206434.28623>70,7)M(
-1<.7438.1795>1,20)M(1<.77595.13699>30,20)M(3<.75923.07145>80,99)// - Warp -

Post a reply to this message

On 28 Dec 2001 11:19:45 -0500, Warp <war### [at] tagpovrayorg> wrote:
> light_source{0 1}#macro c(J,a)sphere{0,1scale a translate J+O}#end#macro B(R,
> V,O)union{c(0,4)intersection{c(V,R)difference{c(-z*4<11,10,10>)c(-z*4.1<11,10
> ,10>)c(0<7.5,45,5>)}}#end union{B(12,0z*25)}B(8y*4<0,12,50>)scale.5}pigment{
> rgb z}}

light_source{0 1}#macro c(J,a)sphere{0,1scale a translate J+O}#end#macro B(R,
V,O)union{c(0,4)intersection{c(V,R)difference{c(-z*4x+10)c(-z*4.1x+10)c(0<7.5
,45,5>)}}#end union{B(12,0z*25)}B(8y*4y*12+50*z)scale.5}pigment{rgb z}}

ABX

Post a reply to this message

123456789012345678901234567890123456789012345678901234567890123456789012

"W³odzimierz ABX Skiba" wrote:
> 
> On 28 Dec 2001 11:19:45 -0500, Warp <war### [at] tagpovrayorg> wrote:
> > light_source{0 1}#macro c(J,a)sphere{0,1scale a translate J+O}#end#macro B(R,
> > V,O)union{c(0,4)intersection{c(V,R)difference{c(-z*4<11,10,10>)c(-z*4.1<11,10
> > ,10>)c(0<7.5,45,5>)}}#end union{B(12,0z*25)}B(8y*4<0,12,50>)scale.5}pigment{
> > rgb z}}
> 
> light_source{0 1}#macro c(J,a)sphere{0,1scale a translate J+O}#end#macro B(R,
> V,O)union{c(0,4)intersection{c(V,R)difference{c(-z*4x+10)c(-z*4.1x+10)c(0<7.5
> ,45,5>)}}#end union{B(12,0z*25)}B(8y*4y*12+50*z)scale.5}pigment{rgb z}}


But why all those unions ?


This is 8 characters less:

> light_source{0,1}#macro c(J,a)sphere{0,1scale a translate J+O}#end#macro B(R,
> V,O)c(0,4)intersection{c(V,R)difference{c(-z*4x+10)c(-z*4.1x+10)c(0<7.5,45,5>
> )}}#end union{B(12,0z*25)B(8y*4<0,12,50>)pigment{rgb z}scale.5}

(I quoted it to prevent Netscape from messing it up.)


Tor Olav

Post a reply to this message

Tor Olav Kristensen <tor### [at] hotmailcom> wrote:
:> light_source{0,1}#macro c(J,a)sphere{0,1scale a translate J+O}#end#macro B(R,
:> V,O)c(0,4)intersection{c(V,R)difference{c(-z*4x+10)c(-z*4.1x+10)c(0<7.5,45,5>
:> )}}#end union{B(12,0z*25)B(8y*4<0,12,50>)pigment{rgb z}scale.5}

  I got lost. How can this work?
  From what I see, the 'scale.5' at the end is now scaling *both* instances
of B() instead of just the second one, as previously, so now also the first
instance should be reduced to half size.
  But when I render this, I can't believe my eyes: It's identical.

  I don't get it. *shame*

-- 
#macro N(D)#if(D>99)cylinder{M()#local D=div(D,104);M().5,2pigment{rgb M()}}
N(D)#end#end#macro M()<mod(D,13)-6mod(div(D,13)8)-3,10>#end blob{
N(11117333955)N(4254934330)N(3900569407)N(7382340)N(3358)N(970)}//  - Warp -

Post a reply to this message

Warp <war### [at] tagpovrayorg> wrote:
:   I don't get it. *shame*

  Ah!!! I got it.
  Yes, it's true that it's now scaling both instead of the latter one.
However, it doesn't matter because it's scaling them with respect to the
origin, and as the camera is at the origin, what the camera sees does not
change in apparent size.
  From this I deduced that the scale is, in fact, obsolete. And yes, it
indeed is:

light_source{0,1}#macro c(J,a)sphere{0,1scale a translate J+O}#end#macro B(R,
V,O)c(0,4)intersection{c(V,R)difference{c(-z*4x+10)c(-z*4.1x+10)c(0<7.5,45,5>
)}}#end union{B(12,0z*25)B(8y*4<0,12,50>)pigment{rgb z}}

-- 
#macro N(D)#if(D>99)cylinder{M()#local D=div(D,104);M().5,2pigment{rgb M()}}
N(D)#end#end#macro M()<mod(D,13)-6mod(div(D,13)8)-3,10>#end blob{
N(11117333955)N(4254934330)N(3900569407)N(7382340)N(3358)N(970)}//  - Warp -

Post a reply to this message

Warp <war### [at] tagpovrayorg> wrote:
: light_source{0,1}#macro c(J,a)sphere{0,1scale a translate J+O}#end#macro B(R,
: V,O)c(0,4)intersection{c(V,R)difference{c(-z*4x+10)c(-z*4.1x+10)c(0<7.5,45,5>
: )}}#end union{B(12,0z*25)B(8y*4<0,12,50>)pigment{rgb z}}

  And as there's no need for scaling anymore, we can reduce the sig even
more:

light_source{0,1}#macro c(J,a)sphere{0,1pigment{rgb z}scale a translate J+O}
#end#macro B(R,V,O)c(0,4)intersection{c(V,R)difference{c(-z*4x+10)c(-z*4.1x+
10)c(0<7.5,45,5>)}}#end B(12,0z*25)B(8y*4<0,12,50>)


-- 
#macro N(D)#if(D>99)cylinder{M()#local D=div(D,104);M().5,2pigment{rgb M()}}
N(D)#end#end#macro M()<mod(D,13)-6mod(div(D,13)8)-3,10>#end blob{
N(11117333955)N(4254934330)N(3900569407)N(7382340)N(3358)N(970)}//  - Warp -

Post a reply to this message

Warp wrote:
> 
> Warp <war### [at] tagpovrayorg> wrote:
> : light_source{0,1}#macro c(J,a)sphere{0,1scale a translate J+O}#end#macro B(R,
> : V,O)c(0,4)intersection{c(V,R)difference{c(-z*4x+10)c(-z*4.1x+10)c(0<7.5,45,5>
> : )}}#end union{B(12,0z*25)B(8y*4<0,12,50>)pigment{rgb z}}
> 
>   And as there's no need for scaling anymore, we can reduce the sig even
> more:
> 
> light_source{0,1}#macro c(J,a)sphere{0,1pigment{rgb z}scale a translate J+O}
> #end#macro B(R,V,O)c(0,4)intersection{c(V,R)difference{c(-z*4x+10)c(-z*4.1x+
> 10)c(0<7.5,45,5>)}}#end B(12,0z*25)B(8y*4<0,12,50>)

Yes that's exactly the same conclusion that I reached.

Note that if the light source had not been postioned
at origo too, then the light rays would have hit the
object at different angles.


Tor Olav

Post a reply to this message

Warp wrote:
> 
> Tor Olav Kristensen <tor### [at] hotmailcom> wrote:
> :> light_source{0,1}#macro c(J,a)sphere{0,1scale a translate J+O}#end#macro B(R,
> :> V,O)c(0,4)intersection{c(V,R)difference{c(-z*4x+10)c(-z*4.1x+10)c(0<7.5,45,5>
> :> )}}#end union{B(12,0z*25)B(8y*4<0,12,50>)pigment{rgb z}scale.5}
> 
>   I got lost. How can this work?
>   From what I see, the 'scale.5' at the end is now scaling *both* instances
> of B() instead of just the second one, as previously, so now also the first
> instance should be reduced to half size.
>   But when I render this, I can't believe my eyes: It's identical.
> 
>   I don't get it. *shame*

Here's the explanation that I had prepared
for posting, before I noticed that Warp had
answered his question himself.

But I'm posting it anyway, in case that any-
one finds this informative. (And because it
took me while to write it =)



I think that with the default camera;

camera {
  perspective
  location <0,0,0>
  direction <0,0,1>
  right 1.33*x
  up y
  sky <0,1,0>
}

which is placed at origo and looking in the
positive z-direction, an object will be in the
same vertical/horizontal "screen position" and
have the same "screen size" as any other copy
of the same object scaled differently, but
uniformly with respect to all 3 axes; i.e.:
scale constant*<1, 1, 1>. (The distance from
origo is scaled by the same amount as the size
of the object.)

So even this should produce the same image:

> light_source{0,1}#macro c(J,a)sphere{0,1scale a pigment{rgb z}translate J+O}
> #end#macro B(R,V,O)c(0,4)intersection{c(V,R)difference{c(-z*4x+10)c(-z*4.1x+
> 10)c(0<7.5,45,5>)}}#end B(12,0z*25)B(8y*4<0,12,50>)


Tor Olav

Post a reply to this message

Wow! "The incredible shrinking signature" I'm both impressed and grateful.
Bravo! Thanks guys.

--
light_source{0,1}#macro c(J,a)sphere{0,1pigment{rgb z}scale a translate J+O}
#end#macro B(R,V,O)c(0,4)intersection{c(V,R)difference{c(-z*4x+10)c(-z*4.1x+
10)c(0<7.5,45,5>)}}#end B(12,0z*25)B(8y*4<0,12,50>)          // Batronyx ^"^

Post a reply to this message

"Batronyx" <bat### [at] alliancecablenet> wrote in message
news:3c2d43fb$1@news.povray.org...
> Wow! "The incredible shrinking signature" I'm both impressed and grateful.
> Bravo! Thanks guys.

The group shrunk mine down to two lines in p.o-t, but I decided to keep the
original, four line version that I did...I like how it comes out as one big
block :-)

--
#macro S(M)cylinder{E(M)<A,C,5>,<B,D,5>,.1,15}#end#macro E(P)#if(div(P,16)
)#declare B=-1;#declare D=-2;#end#if(div(P,32))#declare A=1;#declare C=0;#
end#if(div(P,64))#declare B=-1;#declare D=0;#end#if(div(P,128))#declare A=
1;#declare C=2;#end#end blob{S(192)S(96)S(48)pigment{rgb 8*z}} /** Ian **/

Post a reply to this message

Ian Burgmyer wrote:
> The group shrunk mine down to two lines in p.o-t, but I decided to keep the
> original, four line version that I did...I like how it comes out as one big
> block :-)

I think it is a waste of server resources.

-- 
Ken Tyler

Post a reply to this message

but only a 256 (or so) bytes...

-peter
-- 
Current obsession: "Ballet pour ma fille."
http://www.applesnake.net

Post a reply to this message

Dearmad wrote:
> 
> but only a 256 (or so) bytes...

That much !?!

-- 
Ken Tyler

Post a reply to this message

Seek help.

And stop wasting resources. Just by responding to this thread you've...

DOH!

GrimDude

Post a reply to this message

"GrimDude" <vos### [at] gulfnet> wrote in message news:3c3523d5@news.povray.org...
> Seek help.

I think it's too late for Ken :-)

> And stop wasting resources. Just by responding to this thread you've...
>
> DOH!

LOL :-)

--
#macro S(M)cylinder{E(M)<A,C,5>,<B,D,5>,.1,15}#end#macro E(P)#if(div(P,16)
)#declare B=-1;#declare D=-2;#end#if(div(P,32))#declare A=1;#declare C=0;#
end#if(div(P,64))#declare B=-1;#declare D=0;#end#if(div(P,128))#declare A=
1;#declare C=2;#end#end blob{S(192)S(96)S(48)pigment{rgb 8*z}} /** Ian **/

Post a reply to this message