home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / GRAPHICS / MISC / PVDAT.ZIP / DEVIL.DAT < prev    next >
Encoding:
Text File  |  1991-09-07  |  1.5 KB  |  69 lines
  1. // Persistence of Vision Raytracer
  2. // Sample file
  3. // By Alexander Enzmann
  4.  
  5. { sample quartic data file written by Alexander Enzmann }
  6.  
  7. #include "shapes.dat"
  8. #include "colors.dat"
  9. #include "textures.dat"
  10.  
  11. { Variant of a devil's curve }
  12. object
  13.    intersection
  14.      quartic
  15.      <-1.0   0.0   0.0    0.0  0.0   0.0   0.0  -2.0   0.0  0.36
  16.        0.0   0.0   0.0    0.0  0.0   0.0   0.0   0.0   0.0  0.0
  17.        1.0   0.0   0.0    0.0  0.0  -0.25  0.0   0.0   0.0  0.0
  18.       -1.0   0.0   0.0    0.0  0.0 >
  19.        texture
  20.          color CRed
  21.       specular 0.8
  22.       roughness 0.01
  23.      ambient 0.4
  24.      diffuse 0.6
  25.        end_texture
  26.      end_quartic
  27.      sphere <0 0 0> 2 texture color Clear end_texture end_sphere
  28.      plane <0 0  1> 0.5 texture color Clear end_texture end_plane
  29.      plane <0 0 -1> 0.5 texture color Clear end_texture end_plane
  30.    end_intersection
  31.    bounded_by
  32.      sphere <0 0 0> 2 end_sphere
  33.    end_bound
  34.    scale <2 2 2>
  35.    rotate <0 30 0>
  36.    translate <0 0 5>
  37. end_object
  38.  
  39. view_point
  40.    location  <0.0  0.0 -5.0>
  41.    direction <0.0  0.0  1.0>
  42.    up        <0.0  1.0  0.0>
  43.    right     <1.33 0.0  0.0>
  44. end_view_point
  45.  
  46. object
  47.    sphere <0 0 0> 1 end_sphere
  48.    translate <200 30 -300>
  49.    texture
  50.      color White
  51.      ambient 1.0
  52.      diffuse 0.0
  53.    end_texture
  54.    light_source
  55.    colour White
  56. end_object
  57.  
  58. object
  59.    sphere <0 0 0> 1 end_sphere
  60.    translate <-200 30 -300>
  61.    texture
  62.      color White
  63.      ambient 1.0
  64.      diffuse 0.0
  65.    end_texture
  66.    light_source
  67.    colour White
  68. end_object
  69.