Category : Printer + Display Graphics
Archive   : PV050DAT.ZIP
Filename : QUARCYL.DAT

// Persistence of Vision Raytracer
// Sample file
// By Alexander Enzmann
{ sample quartic data file written by Alexander Enzmann }

#include "colors.dat"
#include "shapes.dat"
#include "textures.dat"

{ Quartic Cylinder - a Space Needle? }
object
quartic
< 0.0 0.0 0.0 0.0 1.0 0.0 0.0 0.0 0.0 0.01
0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0
0.0 0.0 0.0 1.0 0.0 0.0 0.0 0.0 0.0 0.0
0.0 0.0 0.01 0.0 -0.01 >
end_quartic
bounded_by
sphere <0 0 0> 2 end_sphere
end_bound
texture
color CRed
phong 1.0
phongsize 10
ambient 0.2
diffuse 0.8
end_texture
rotate <-30 20 0>
translate <0 0 3>
end_object

{ Put down checkered floor }
object
quadric
Plane_XZ
translate <0.0 -20.0 0.0>
end_quadric
texture
checker colour NavyBlue colour MidnightBlue
scale < 20.0 20.0 20.0 >
ambient 0.8
diffuse 0.2
end_texture

end_object

view_point
location <0.0 0.0 -3.0>
direction <0.0 0.0 1.0>
up <0.0 1.0 0.0>
right <1.33 0.0 0.0>
end_view_point

object
sphere <0 0 0> 1 end_sphere
translate <200 30 -300>
texture
color White
ambient 1.0
diffuse 0.0
end_texture
light_source
colour White
end_object

object
sphere <0 0 0> 1 end_sphere
translate <-200 30 -300>
texture
color White
ambient 1.0
diffuse 0.0
end_texture
light_source
colour White
end_object