home *** CD-ROM | disk | FTP | other *** search
/ TOS Silver 2000 / TOS Silver 2000.iso / Anwendun / Pov / POVTOOLS / SCENES / MATH / QUARPARA.POV < prev    next >
Encoding:
Text File  |  1995-11-25  |  1.2 KB  |  51 lines
  1. // Persistence Of Vision raytracer version 2.0 sample file.
  2.  
  3. // By Alexander Enzmann
  4. /* sample quartic scene file written by Alexander Enzmann */
  5.  
  6. #include "colors.inc"
  7. #include "shapes.inc"
  8. #include "textures.inc"
  9.  
  10. #declare Rectangle =
  11.    box {
  12.       <-1, -1, -1>, <1, 1, 1>
  13.       texture { pigment { Clear } }
  14.    }
  15.  
  16. /* Quartic parabola of sorts */
  17. intersection {
  18.    quartic {
  19.      < 0.1,  0.0,  0.0, 0.0,  0.0,  0.0,  0.0,  0.0,  0.0, -1.0,
  20.        0.0,  0.0,  0.0, 0.0,  0.0,  0.0,  0.0,  0.0,  0.0,  0.0,
  21.        0.0,  0.0,  0.0, 0.0,  0.0,  0.0,  0.0,  0.0,  0.0, -1.0,
  22.        0.0,  0.0, -1.0, 0.0,  0.9 >
  23.  
  24.       texture {
  25.          pigment { Red }
  26.          finish {
  27.             phong 1.0
  28.             phong_size 20
  29.             ambient 0.2
  30.             diffuse 0.8
  31.          }
  32.       }
  33.    }
  34.    object { Rectangle }
  35.  
  36.    bounded_by { box { <-1, -1, -1>, <1, 1, 1> } }
  37.    /* translate 3*z */
  38.    rotate -30*x
  39. }
  40.  
  41. camera {
  42.    location  <0.0, 0.0, -10.0>
  43.    direction <0.0, 0.0,   1.0>
  44.    up        <0.0, 1.0,   0.0>
  45.    right     <4/3, 0.0,   0.0>
  46. }
  47.  
  48. light_source { <200, 30, -300> colour White }
  49.  
  50. light_source { <-200, 30, -300> colour White }
  51.