home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / p / pvrayfiles / Twister / TwistTest
Encoding:
Text File  |  1988-06-16  |  1.3 KB  |  73 lines
  1. // Persistence of Vision Raytracer
  2. // Sample File
  3. // © Scintillating Graphics Co.
  4.  
  5. // To test the little twister program.
  6. // In order to render, you will need to drag the  accompanying file
  7. // "Twisted" into the "Inc" directory inside the PVRay appliaction.
  8.  
  9. #include "<PVRay$Dir>.Dat.Colors"
  10. #include "<PVRay$Dir>.Dat.Shapes"
  11. #include "<PVRay$Dir>.Dat.Textures"
  12.  
  13. {// helix - comment the other one out to create a helix.
  14. #declare OS = quadric
  15.    QSphere
  16.    Translate <2.0 0.0 0.0>
  17. end_quadric}
  18.  
  19. // macaroni
  20.  
  21. #declare OS = quadric
  22.    QSphere
  23.    scale <3.0 1.0 1.0>
  24. end_quadric
  25.  
  26. #include "<PVLib$Dir>.Inc.Twisted"
  27.  
  28. object
  29.    Twist
  30.    bounded_by
  31.       quadric
  32.          Cylinder_Y
  33.          scale <3.0 1.0 3.0>
  34.       end_quadric
  35.    end_bound
  36.    texture
  37.       colour CRed
  38.       phong 0.4
  39.       phongsize 60
  40.    end_texture
  41. end_object
  42.  
  43. object
  44.    plane <0.0 1.0 0.0> -2 end_plane
  45.    texture
  46.       colour CBlue
  47.    end_texture
  48. end_object
  49.  
  50. object
  51.    plane <0.0 0.0 1.0> -100 end_plane
  52.    texture
  53.       colour CGreen
  54.    end_texture
  55. end_object
  56.  
  57. object
  58.    sphere <0 0 0> 1 end_sphere
  59.    texture
  60.       colour White
  61.    end_texture
  62.    light_source
  63.    colour White
  64.    translate <5 20 -20>
  65. end_object
  66.  
  67. view_point
  68.    location  <0   2 -10>
  69.    direction <0   0   1>
  70.    up        <0   1   0>
  71.    right     <1.3 0   0>
  72. end_view_point
  73.