home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / GRAPHICS / MISC / PVDAT.ZIP / PIRIFORM.DAT < prev    next >
Encoding:
Text File  |  1991-09-07  |  1.6 KB  |  75 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. { Piriform - looks a bit like a Hershey's Kiss along the x axis...}
  12. object
  13.    quartic
  14.    < 4.0   0.0   0.0   -4.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    0.0  0.0   1.0   0.0   0.0   0.0  0.0
  17.      0.0   0.0   1.0    0.0  0.0 >
  18.    end_quartic
  19.    bounded_by
  20.    sphere <0 0 0> 2 end_sphere
  21.    end_bound
  22.    texture
  23.      color red 0.7 green 0.0 blue 0.0
  24.      phong 1.0
  25.      phongsize 20
  26.      ambient 0.2
  27.      diffuse 0.8
  28.    end_texture
  29.    translate <0 0.5 2>
  30. end_object
  31.  
  32. { Put down checkered floor }
  33. object
  34.    plane <0.0 1.0 0.0> -10.0 end_plane
  35.    texture
  36.       checker
  37.      colour red 0.137255 green 0.137255 blue 0.556863
  38.      colour red 0.184314 green 0.184314 blue 0.309804
  39.       scale < 20.0 20.0 20.0 >
  40.       ambient 0.8
  41.       diffuse 0.2
  42.    end_texture
  43. end_object
  44.  
  45. view_point
  46.    location  <0.0  2.0 -2.0>
  47.    up        <0.0  1.0  0.0>
  48.    right     <1.33 0.0  0.0>
  49.    look_at   <0.0  0.0  1.0>
  50. end_view_point
  51.  
  52. object
  53.    sphere <0 0 0> 1 end_sphere
  54.    translate <200 30 -300>
  55.    texture
  56.      colour White
  57.      ambient 1.0
  58.      diffuse 0.0
  59.    end_texture
  60.    light_source
  61.    colour White
  62. end_object
  63.  
  64. object
  65.    sphere <0 0 0> 1 end_sphere
  66.    translate <-200 30 -300>
  67.    texture
  68.      colour White
  69.      ambient 1.0
  70.      diffuse 0.0
  71.    end_texture
  72.    light_source
  73.    colour White
  74. end_object
  75.