home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 16 / CD_ASCQ_16_0994.iso / news / 4613 / casse.rrt < prev    next >
Text File  |  1980-01-06  |  908b  |  67 lines
  1. // Real Ray Tracer
  2. // A demo of refraction.
  3.  
  4. #include "colors.inc"
  5. #include "shapes.inc"
  6. #include "Textures.inc"
  7.  
  8. object {
  9.   Cylinder_Y
  10.   rotate <0 0 45>
  11.   texture {
  12.     color Yellow
  13.     ambient 0.10
  14.     diffuse 0.25
  15.     phong 0.15
  16.     phong_size 90
  17.   }
  18. }
  19.  
  20. object {
  21.   sphere { <2.5 0.40 1> 1.2  }
  22.   texture {
  23.     Phong_Mirror
  24.   }
  25. }
  26.  
  27. object {
  28.   intersection {
  29.     plane { <0 0 -1> 2.5 }
  30.     plane { <0 1 0> 0.3 }
  31.   }
  32.   texture {
  33.     Transparent
  34.     ior 1.33
  35.   }
  36. }
  37.  
  38. object {
  39.   plane { <0 0 -1> -5 }
  40.   texture {
  41.     checker color Blue color green 1.0 blue 0.75
  42.     scale <1 1 0>
  43.     ambient 0.20
  44.     diffuse 0.35
  45.     reflection 0.40
  46.   }
  47. }
  48.  
  49. camera {
  50.   location  <0 1 -5>
  51.   point_at <0 0.4 0>
  52. }
  53.  
  54. environment {
  55.   background color Blue
  56. }
  57.  
  58. object {
  59.   light_source { <2 5 -4> color White }
  60. }
  61.  
  62. object {
  63.   light_source { <-3 2 -5> color White }
  64. }
  65.  
  66. end.
  67.