On Tue, 18 May 2004 09:12:15 -0800, "Gary Blessing" <ble### [at] icefognet>
wrote:
> ummmm...... would someone want to extrude that code into something readable
> to those of us that don't thow this code inside and out? I am totasly lost
> with that.

Being author of this unreadable code I'm a little slack to do this ;-)

#macro c(C)
  cylinder{
    C+z*2
    z*2-C
#end

#macro s(C,k,m)
  #default{
    texture{
      pigment{checker C*0 C}
      finish{reflection.2}
    }
  }
  difference{
    c(z/9)
      .8
    }
    c(z/8)
      .7
    }
  }
  text{
    ttf
    "povlogo"
    "P"
    9, 0
    translate -<.33 .5, -1.9>
  }
  plane{
    y,-2
    no_image
  }
  background{1}
  global_settings{
    radiosity{}
  }
  light_source{
    9*y
    1
  }
  #while(k)
    c(m)
      1
      scale x/6
      rotate k*z
    }
    #local k=k-10;
  #end
#end

s( <.65.5.25>, 180, z/9e4)

ABX

Post a reply to this message