home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 16 / CD_ASCQ_16_0994.iso / news / 4613 / bound.rrt < prev    next >
Text File  |  1980-01-06  |  1KB  |  56 lines
  1. // Real Ray Tracer
  2. // A demo of bounding volumes.
  3.  
  4. #include "colors.inc"
  5. #include "textures.inc"
  6.  
  7. object {
  8.   bound {
  9.     object { sphere { < 0.3  0.3  0.3> 0.25  } 
  10.              texture { Blood_Marble scale <0.1 0.1 0.1> 
  11.                        diffuse 0.45  phong 0.25 phong_size 90 } }
  12.     object { sphere { < 0.3 -0.3 -0.3> 0.25  } 
  13.              texture { Red_Marble scale <0.1 0.1 0.1> 
  14.                        diffuse 0.40 phong 0.25 phong_size 90 } }
  15.     object { sphere { <-0.3 -0.3  0.3> 0.25  } 
  16.              texture { Blue_Sky3 scale <0.3 0.3 0.3> 
  17.                        diffuse 0.45 phong 0.25 phong_size 90 } }
  18.     object { sphere { <-0.3 -0.3 -0.3> 0.25  } }
  19.     object { sphere { <-0.3  0.3  0.3> 0.25  } }
  20.     object { sphere { < 0.3 -0.3  0.3> 0.25  } }
  21.   }
  22.   by box { <-0.55 -0.55 -0.55> <0.55 0.55 0.55> }
  23.   texture {
  24.     Phong_Mirror
  25.   }
  26. }
  27.  
  28. object {
  29.   plane { <0 1 0> -2 }
  30.   texture {
  31.     Jade
  32.     scale <0.4 0.4 0.4>
  33.     ambient 0.15
  34.     diffuse 0.50
  35.   }
  36. }
  37.  
  38. camera {
  39.   location  <0.17 2 -3>
  40.   point_at  <0 0 0>
  41.   angle 15
  42. }
  43.  
  44. environment {
  45.   background color Blue
  46. }
  47.  
  48. object {
  49.   light_source { <2 5 -4> color White }
  50. }
  51.  
  52. object {
  53.   light_source { <-3 4 -3> color White }
  54. }
  55.  
  56. end.