home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / GRAPHICS / MISC / PVDAT.ZIP / MONKEY.DAT < prev    next >
Encoding:
Text File  |  1991-09-07  |  1.7 KB  |  68 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. #declare Basic_Saddle =
  12.    quartic
  13.    < 0.0   0.0   0.0   1.0  0.0   0.0   0.0   0.0   0.0  0.0
  14.      0.0   0.0  -3.0   0.0  0.0   0.0   0.0   0.0   0.0  0.0
  15.      0.0   0.0   0.0   0.0  0.0   0.0   0.0   0.0   0.0  0.0
  16.      0.0   0.0   0.0  -1.0  0.0 >
  17.    end_quartic
  18.  
  19. #declare Unit_Cube =
  20.    intersection
  21.       plane < 1  0  0> 1 texture color Clear end_texture end_plane
  22.       plane <-1  0  0> 1 texture color Clear end_texture end_plane
  23.       plane < 0  1  0> 1 texture color Clear end_texture end_plane
  24.       plane < 0 -1  0> 1 texture color Clear end_texture end_plane
  25.       plane < 0  0  1> 1 texture color Clear end_texture end_plane
  26.       plane < 0  0 -1> 1 texture color Clear end_texture end_plane
  27.    end_intersection
  28.  
  29. { Monkey Saddle }
  30. object
  31.    intersection
  32.      quartic Basic_Saddle
  33.        texture
  34.          color CRed
  35.      specular 1.0
  36.      roughness 0.05
  37.      ambient 0.2
  38.      diffuse 0.8
  39.        end_texture
  40.      end_quartic
  41.      intersection Unit_Cube scale <2 2 2> end_intersection
  42.    end_intersection
  43.    bounded_by
  44.      intersection Unit_Cube scale <2.5 2.5 2.5> end_intersection
  45.    end_bound
  46.    rotate <0 20 0>
  47.    rotate <-30 0 0>
  48. end_object
  49.  
  50. view_point
  51.    location  <0.0  0.0 -10.0>
  52.    right     <1.33 0.0   0.0>
  53.    up        <0.0  1.0   0.0>
  54.    direction <0.0  0.0   1.0>
  55. end_view_point
  56.  
  57. object
  58.    sphere <0 0 0> 1 end_sphere
  59.    translate <200 30 -300> 
  60.    texture
  61.      colour White
  62.      ambient 1.0
  63.      diffuse 0.0
  64.    end_texture
  65.    light_source
  66.    colour White
  67. end_object
  68.