Category : Printer + Display Graphics
Archive   : PV050DAT.ZIP
Filename : WITCH.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"

{ Witch of Agnesi }
object
intersection
quartic
< 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.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.04
0.0 0.0 0.0 0.0 0.04 >
texture
color CRed
specular 1.0
roughness 0.05
ambient 0.2
diffuse 0.8
end_texture
end_quartic
sphere <0 0 0> 1
texture
color Clear
end_texture
end_sphere
end_intersection
bounded_by
sphere <0 0 0> 1.5 end_sphere
end_bound
rotate <30 0 180>
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