home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / GRAPHICS / MISC / PVDAT.ZIP / TORUS.DAT < prev    next >
Encoding:
Text File  |  1991-09-07  |  1.6 KB  |  74 lines
  1. // Persistence of Vision Raytracer
  2. // Sample file
  3. // By Alexander Enzmann
  4. { sample quartic data file written by Alexander Enzmann }
  5.  
  6. #include "shapes.dat"
  7. #include "colors.dat"
  8. #include "textures.dat"
  9.  
  10. { Torus having major radius sqrt(40), minor radius sqrt(12) }
  11. object
  12.    quartic
  13.    < 1.0   0.0   0.0    0.0     2.0   0.0   0.0   2.0   0.0 -104.0
  14.      0.0   0.0   0.0    0.0     0.0   0.0   0.0   0.0   0.0    0.0
  15.      1.0   0.0   0.0    2.0     0.0  56.0   0.0   0.0   0.0    0.0
  16.      1.0   0.0 -104.0   0.0   784.0 >
  17.    end_quartic
  18.    bounded_by
  19.    sphere <0 0 0> 10 end_sphere
  20.    end_bound
  21.    texture
  22.      color CRed
  23.      phong 1.0
  24.      phongsize 10
  25.      ambient 0.2
  26.      diffuse 0.8
  27.    end_texture
  28.    rotate <-45 0 0>
  29.    translate <0 0 20>
  30.    color CRed
  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  2.0 -10.0>
  46.    look_at   <0.0  0.0   0.0>
  47.    up        <0.0  1.0   0.0>
  48.    right     <1.33 0.0   0.0>
  49. end_view_point
  50.  
  51. object
  52.    sphere<0.0 0.0 0.0> 1 end_sphere
  53.    translate <50 100 0>
  54.    texture
  55.      colour White
  56.      ambient 1.0
  57.      diffuse 0.0
  58.    end_texture
  59.    light_source
  60.    colour White
  61. end_object
  62.  
  63. object
  64.    sphere <0.0 0.0 0.0> 1 end_sphere
  65.    translate <-200 30 -300>
  66.    texture
  67.      colour White
  68.      ambient 1.0
  69.      diffuse 0.0
  70.    end_texture
  71.    light_source
  72.    colour White
  73. end_object
  74.