home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 16 / CD_ASCQ_16_0994.iso / news / 4613 / diff.rrt < prev    next >
Text File  |  1980-01-06  |  899b  |  53 lines
  1. // Real Ray Tracer
  2. // A concave mirror made with a difference of 2 spheres.
  3.  
  4. #include "colors.inc"
  5. #include "textures.inc"
  6.  
  7. object {
  8.   difference {
  9.     sphere { <0.15 0.5 0.5> 1 }
  10.     sphere { <-0.1 0.7 -0.5> 1 }
  11.   }
  12.   texture { Phong_Mirror }
  13. }
  14.  
  15. object {
  16.   sphere { <-0.7 -0.4 -1> 0.3 }
  17.   texture {
  18.     color Red
  19.     ambient 0.10
  20.     diffuse 0.20
  21.     reflection 0.7
  22.     phong 0.3
  23.     phong_size 75
  24.   }
  25. }
  26.  
  27. object {
  28.   plane { <0 1 0> -2 }
  29.   texture {
  30.     checker
  31.       texture { Red_Marble scale <0.25 0.25 0.25> }
  32.       texture { Jade scale <0.3 0.3 0.3> }
  33.     scale <1 0 1>
  34.     ambient 0.15
  35.     diffuse 0.35
  36.   }
  37. }
  38.  
  39. camera {
  40.   location  <0 0 -3>
  41.   point_at <0 0 0>
  42. }
  43.  
  44. environment {
  45.    clouds
  46.    color_map { [0 1 color Blue color White ] }
  47. }
  48.  
  49. object { light_source { <2 5 -4> color White } }
  50.  
  51. object { light_source { <-3 4 -3> color White } }
  52.  
  53. end.