home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Crawly Crypt Collection 2
/
crawlyvol2.bin
/
graphics
/
ftpovscn
/
4
/
domino.pov
< prev
next >
Wrap
Text File
|
1994-04-07
|
5KB
|
248 lines
// Persistence of Vision Raytracer 2.0
// Image by George Ganoe
#include "colors.inc" // Standard colors library
#include "shapes.inc" // Commonly used object shapes
#include "textures.inc" // LOTS of neat textures. Lots of NEW textures.
#include "stones.inc"
camera {
location <-2.10, 3.0, -4.0>
direction <0.0, 0.0, 2.7>
up <0.0, 1.0, 0>
right <4/3, 0.0, 0>
look_at <2.0, 0, 0.8>}
light_source {<-100, 100, -200> color White}
light_source {<100, 100, -200> color Gray50}
#declare DomCutout = box { <-0.45, -0.45, -0.02>, <0.45, 0.45, 0.02> }
#declare DomDivide = box { <-0.45, -0.015, -0.01>, <0.45, 0.015, 0.01> }
#declare DomBox = union {
box { <-0.5, -0.94, -0.125>, <0.5, 0.94, 0.125> }
box { <-0.44, -1.0, -0.125>, <0.44, 1.0, 0.125> }
cylinder { <-0.44, 0.94, -0.125>, <-0.44, 0.94, 0.125>, 0.06 }
cylinder { <-0.44, -0.94, -0.125>, <-0.44, -0.94, 0.125>, 0.06 }
cylinder { <0.44, 0.94, -0.125>, <0.44, 0.94, 0.125>, 0.06 }
cylinder { <0.44, -0.94, -0.125>, <0.44, -0.94, 0.125>, 0.06 }
}
#declare DomRout = union {
object {
DomDivide
translate <0, 0, -0.125>
}
object {
DomCutout
translate <0, 0.5, -0.125>
}
object {
DomCutout
translate <0, -0.5, -0.125>
}
}
#declare DomBlank = difference
{
object { DomBox }
object { DomRout }
texture {
pigment { Gray10 }
normal{ bumps 0.2 scale 0.01 }
finish { Shiny }
}
bounded_by { box { <-0.501, -1.01, -0.126>, <0.501, 1.01, 0.126> } }
}
#declare Dom2Sph = union {
sphere { <-0.27, -0.27, 0>, 0.08 }
sphere { < 0.27, 0.27, 0>, 0.08 }
}
#declare Dom2Dip = union {
sphere { <-0.27, -0.27, -0.1833>, 0.2 }
sphere { < 0.27, 0.27, -0.1833>, 0.2 }
}
#declare Dom2Dot = difference {
object { Dom2Sph }
object { Dom2Dip }
texture {
pigment { Gray85 }
finish { Shiny }
}
}
#declare Dom3Sph = union {
sphere { < 0, 0, 0>, 0.08 }
sphere { <-0.27, -0.27, 0>, 0.08 }
sphere { < 0.27, 0.27, 0>, 0.08 }
}
#declare Dom3Dip = union {
sphere { < 0, 0, -0.1833>, 0.2 }
sphere { <-0.27, -0.27, -0.1833>, 0.2 }
sphere { < 0.27, 0.27, -0.1833>, 0.2 }
}
#declare Dom3Dot = difference {
object { Dom3Sph }
object { Dom3Dip }
texture {
pigment { Gray85 }
finish { Shiny }
}
}
#declare Dom7Sph = union {
sphere { < 0, 0, 0>, 0.08 }
sphere { <-0.27, 0.27, 0>, 0.08 }
sphere { <-0.27, 0, 0>, 0.08 }
sphere { <-0.27, -0.27, 0>, 0.08 }
sphere { < 0.27, 0.27, 0>, 0.08 }
sphere { < 0.27, 0, 0>, 0.08 }
sphere { < 0.27, -0.27, 0>, 0.08 }
}
#declare Dom7Dip = union {
sphere { < 0, 0, -0.1833>, 0.2 }
sphere { <-0.27, 0.27, -0.1833>, 0.2 }
sphere { <-0.27, 0, -0.1833>, 0.2 }
sphere { <-0.27, -0.27, -0.1833>, 0.2 }
sphere { < 0.27, 0.27, -0.1833>, 0.2 }
sphere { < 0.27, 0, -0.1833>, 0.2 }
sphere { < 0.27, -0.27, -0.1833>, 0.2 }
}
#declare Dom7Dot = difference {
object { Dom7Sph }
object { Dom7Dip }
texture {
pigment { Gray85 }
finish { Shiny }
}
}
object {
union {
difference {
object { DomBlank }
union {
object {
Dom7Sph
translate <0, 0.5, -0.105>
}
object {
Dom3Sph
translate <0, -0.5, -0.105>
}
}
}
union {
object {
Dom7Dot
translate <0, 0.5, -0.105>
}
object {
Dom3Dot
translate <0, -0.5, -0.105>
}
}
}
translate < 2.5, 0, 0.0 >
}
object {
DomBlank
translate < 2.50, 0, 0.0 >
rotate -25*y
}
object {
union {
difference {
object { DomBlank }
union {
object {
Dom2Sph
translate <0, 0.5, -0.105>
}
object {
Dom3Sph
translate <0, -0.5, -0.105>
}
}
}
union {
object {
Dom2Dot
translate <0, 0.5, -0.105>
}
object {
Dom3Dot
translate <0, -0.5, -0.105>
}
}
}
translate < 2.50, 0, 0.0 >
rotate -50*y
}
object {
DomBlank
translate < 2.50, 0, 0.0 >
rotate -75*y
}
/*
object {
DomBlank
translate < 2.50, 0, 0.0 >
rotate -100*y
}
object {
DomBlank
translate < 2.50, 0, 0.0 >
rotate -125*y
}
object {
DomBlank
translate < 2.50, 0, 0.0 >
rotate -150*y
}
object {
DomBlank
translate < 2.50, 0, 0.0 >
rotate -175*y
}
*/
plane { y, -1.001
/*
texture {
pigment { Aquamarine }
finish { Dull }
}
*/
texture {
Stone1
pigment {
octaves 3
rotate 90*z
}
finish { reflection 0.05 }
}
}
sphere { <0, 0, 0>, 1000
texture {
pigment { White }
finish { Luminous }
}
}
// end of file