home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / GRAPHICS / MISC / PVDAT.ZIP / LEMNISCA.DAT < prev    next >
Encoding:
Text File  |  1991-09-07  |  1.5 KB  |  74 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. { Lemniscate of Gerono }
  12. object
  13.    quartic
  14.    < 1.0   0.0   0.0    0.0  0.0   0.0   0.0   0.0   0.0 -1.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 CRed
  24.       phong 1.0
  25.       phongsize 10
  26.       ambient 0.2
  27.       diffuse 0.8
  28.    end_texture
  29.    rotate <0 -45 0>
  30.    translate <0 0 2>
  31. end_object
  32.  
  33. { Put down checkered floor }
  34. object
  35.    plane <0.0 1.0 0.0> -20.0 end_plane
  36.    texture
  37.       checker colour NavyBlue colour MidnightBlue
  38.       scale < 20.0 20.0 20.0 >
  39.       ambient 0.8
  40.       diffuse 0.2
  41.    end_texture
  42. end_object
  43.  
  44. view_point
  45.    location  <0.0  1.0 -2.0>
  46.    up          <0.0  1.0  0.0>
  47.    right     <1.33 0.0  0.0>
  48.    look_at   <0.0  0.0  5.0>
  49. end_view_point
  50.  
  51. object
  52.    sphere <0 0 0> 1 end_sphere
  53.    translate <200 30 -300>
  54.    texture
  55.      color White
  56.      ambient 1.0
  57.      diffuse 0.0
  58.    end_texture
  59.    light_source
  60.    color White
  61. end_object
  62.  
  63. object
  64.    sphere <0 0 0> 1 end_sphere
  65.    translate <-200 30 -300>
  66.    texture
  67.      color White
  68.      ambient 1.0
  69.      diffuse 0.0
  70.    end_texture
  71.    light_source
  72.    color White
  73. end_object
  74.