home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C!T ROM 2
/
ctrom_ii_b.zip
/
ctrom_ii_b
/
DOS
/
GRAFISCH
/
RAYTRACE
/
VIVID
/
CLIP2.V
< prev
next >
Wrap
Text File
|
1992-03-15
|
1KB
|
81 lines
// clip2.v -- test out new clipping planes with cones
#include color.vc
studio {
from 1 -6 5
at 0 -1 0
up 0 0 1
angle 45
res 640 480
antialias adaptive
aspect 4/3
background {
greys.map
}
ambient white * .2
}
light {
type point
falloff 0
position 1 -.5 5
color white * .5
}
light {
type point
falloff 0
position -2 -4 5
color white * .5
}
// base surface
surface {
diff plum * .5 // dark plum
}
ring { center 0 0 0 normal 0 0 1 radius 1000 }
// clip cone
surf {
diff 0 .5 1
shine 20 white
}
cone { // 45° diagonal clips at end of cylinder
apex -2 0 .5
base 2 0 .5
radius .5
clip {
center -1.5 0 .5
normal 1 1 0 // face normal inward toward the
} // part we want to keep
clip {
center 1.5 0 .5
normal -1 1 0
}
}
cone { // clip in half, lengthwise
apex -2 -1.1 .5
base 2 -1.1 .5
radius .5
clip {
center 0 -1.1 .5
normal 0 0 -1 // keep the bottom half
}
}
cone { // clip in half at a diagonal, lengthwise
apex -2 -2.2 .5
base 2 -2.2 .5
radius .5
clip {
center 0 -2.2 .5
normal -.3 0 -1 // keep the bottom half
}
}