home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DP Tool Club 9
/
CD_ASCQ_09_1193.iso
/
news
/
4426
/
arch5
/
floor.inc
< prev
next >
Wrap
Text File
|
1993-08-30
|
1KB
|
82 lines
// Persistence of Vision Raytracer
// Persistence of Vision Raytracer
//---------- Tile Walk & Footers
//------- footer pads
#declare footer = object {
union {
union { y_tri scale <24 1 260> translate <-12 0 -160> }
intersection { Disk_Z scale <4 4 260> translate <-12 -4 -160> }
intersection { Disk_Z scale <4 4 260> translate <12 -4 -160> }
intersection { Disk_Z scale <2 2 260> translate <-16 -6 -160> }
intersection { Disk_Z scale <2 2 260> translate <16 -6 -160> }
}
texture { Stone9 scale <10 10 14> reflection 0.2 }
//---- add cracks
texture {
gradient <0 0 1>
color_map {
[0.0 0.95 color Clear color Clear]
[0.95 1.0 color Black color Black]
}
scale <100 100 20> translate <0 -40 0>
}
bounded_by {
intersection { Cube scale <20 10 150> translate <0 -2 -30> }
}
}
//------- tile walk
#declare walk = object {
union { y_tri scale <38 1 260> }
texture { Stone1 scale <10 7 15> }
texture {
checker
color Mica alpha 0.4
color Clear
scale <19 1 19> translate <-19 -0.7723 0>
phong 1.0 reflection 0.2 ambient 0.2 diffuse 0.6
}
}
//-------- floor Section under Rail
#declare stoop = object {
union {
intersection { Cube scale <20 2 14> }
intersection { Disk_X scale <200 2 2> translate <-100 0 -14> }
}
texture { Stone9 scale <10 10 14> reflection 0.15 }
}
//-------- water
#declare water = object {
union { y_tri scale <200 1 135> }
texture { lq }
}