|
|
Brendan Hurley wrote:
> Oh, well, I'll keep hoping someone has a copy stashed away
> somewhere...or knows an active link to a site with it.
Here's one I did some time ago.
#macro RoundBox(bdown,bup,br)
// bdown bottom left corner
// bup top right corner
// br angle radius
union{
sphere{0,br translate bdown+br}
sphere{0,br translate <bdown.x+br,bup.y-br,bdown.z+br>}
sphere{0,br translate <bup.x-br,bup.y-br,bdown.z+br>}
sphere{0,br translate <bup.x-br,bdown.y+br,bdown.z+br>}
sphere{0,br translate bup-br}
sphere{0,br translate <bdown.x+br,bup.y-br,bup.z-br>}
sphere{0,br translate <bdown.x+br,bdown.y+br,bup.z-br>}
sphere{0,br translate <bup.x-br,bdown.y+br,bup.z-br>}
box{<bdown.x+br,bdown.y+br,bdown.z>,<bup.x-br,bup.y-br,bdown.z+br>}
box{<bdown.x,bdown.y+br,bdown.z+br>,<bdown.x+br,bup.y-br,bup.z-br>}
box{<bup.x-br,bdown.y+br,bdown.z+br>,<bup.x,bup.y-br,bup.z-br>}
box{<bdown.x+br,bup.y-br,bdown.z+br>,<bup.x-br,bup.y,bup.z-br>}
box{<bdown.x+br,bdown.y,bdown.z+br>,<bup.x-br,bdown.y+br,bup.z-br>}
box{<bdown.x+br,bdown.y+br,bup.z-br>,<bup.x-br,bup.y-br,bup.z>}
cylinder{x*(bdown.x+br),x*(bup.x-br),br translate
<0,bdown.y+br,bdown.z+br>}
cylinder{x*(bdown.x+br),x*(bup.x-br),br translate
<0,bup.y-br,bdown.z+br>}
cylinder{x*(bdown.x+br),x*(bup.x-br),br translate
<0,bdown.y+br,bup.z-br>}
cylinder{x*(bdown.x+br),x*(bup.x-br),br translate
<0,bup.y-br,bup.z-br>}
cylinder{y*(bdown.y+br),y*(bup.y-br),br translate
<bdown.x+br,0,bdown.z+br>}
cylinder{y*(bdown.y+br),y*(bup.y-br),br translate
<bup.x-br,0,bdown.z+br>}
cylinder{y*(bdown.y+br),y*(bup.y-br),br translate
<bdown.x+br,0,bup.z-br>}
cylinder{y*(bdown.y+br),y*(bup.y-br),br translate
<bup.x-br,0,bup.z-br>}
cylinder{z*(bdown.z+br),z*(bup.z-br),br translate
<bdown.x+br,bdown.y+br,0>}
cylinder{z*(bdown.z+br),z*(bup.z-br),br translate
<bdown.x+br,bup.y-br,0>}
cylinder{z*(bdown.z+br),z*(bup.z-br),br translate
<bup.x-br,bdown.y+br,0>}
cylinder{z*(bdown.z+br),z*(bup.z-br),br translate
<bup.x-br,bup.y-br,0>}
}
#end
G.
--
**********************
http://www.oyonale.com
**********************
Graphic experiments
Pov-ray gallery
Post a reply to this message
|
|