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


> 
> 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