home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The World of Computer Software
/
World_Of_Computer_Software-02-385-Vol-1of3.iso
/
p
/
ply15dat.zip
/
LAYER2.PI
< prev
next >
Wrap
Text File
|
1992-11-08
|
1KB
|
55 lines
// Sample Polyray file
// A layered marble texture with glass in the veins
//
viewpoint {
from <0, 2, -10>
at <0,0,0>
up <0,1,0>
angle 35
resolution 160, 160
aspect 1
}
include "..\colors.inc"
background midnightblue
light <-10, 7, -5>
object {
disc <0, -2.005, 0>, <0, 1, 0>, 10
texture { checker matte_white, matte_black }
}
define position_objectx 1
define lookup_sawtooth 1
define glass_veined_marble
texture {
layered
texture {
noise surface {
color white
position_fn position_objectx
lookup_fn lookup_sawtooth
octaves 3
turbulence 3
ambient 0.3
diffuse 0.8
specular 0.3
microfacet Reitz 5
color_map(
[0.0, 0.2, white, 0, white, 0]
[0.2, 0.3, white, 0, black, 0.2]
[0.3, 0.4, black, 0.2, black, 1]
[0.4, 1.0, black, 1, black, 1])
}
},
glass
}
object {
sphere <0, 0, 0>, 2
glass_veined_marble
}