home *** CD-ROM | disk | FTP | other *** search
/ ANews 3 / AnewsCD3.iso / atari / GRAPHX / POV / 68030.060 / POV31G30 / POVRAY_3.1G / SCENES / INCDEMO / GLASSES / GLASSES.POV < prev   
Text File  |  1999-10-30  |  2KB  |  82 lines
  1. // Persistence Of Vision Raytracer version 3.1 sample file.
  2.  
  3. global_settings { assumed_gamma 2.2 }
  4. #include "colors.inc"
  5. #include "shapes.inc"
  6. #include "glass.inc"
  7.  
  8. #declare T01 = texture { T_Glass1 }
  9. #declare T02 = texture { T_Glass2 }
  10. #declare T03 = texture { T_Glass3 }
  11. #declare T04 = texture { T_Glass4 }
  12. #declare T05 = texture { T_Old_Glass }
  13.  
  14. #declare T06 = texture { T_Winebottle_Glass }
  15. #declare T07 = texture { T_Beerbottle_Glass }
  16. #declare T08 = texture { T_Ruby_Glass       }
  17. #declare T09 = texture { T_Green_Glass      }
  18. #declare T10 = texture { T_Dark_Green_Glass }
  19.  
  20. #declare T11 = texture { T_Yellow_Glass      }
  21. #declare T12 = texture { T_Orange_Glass      }
  22. #declare T13 = texture { T_Vicksbottle_Glass }
  23.  
  24. camera {
  25.    location <0, 0, -60>
  26.    direction <0, 0,  2.85>
  27.    right x*1.33
  28.    look_at 0
  29. }
  30.  
  31. light_source {<-50, 50, -1000> color Gray50}
  32. light_source {<150, 50, -200> color Gray15}
  33.  
  34. plane { z, 5
  35.     hollow on
  36.     pigment {checker color Gray40 color Gray80
  37.         scale <100000, 1, 1>
  38.     }
  39.     finish { ambient 0.45 }
  40. }
  41.  
  42. sky_sphere {
  43.     pigment {
  44.         gradient y
  45.         color_map {[0, 1  color Gray20 color Gray80]}
  46.     rotate x*30
  47.     }
  48. }
  49.  
  50. //plane { z, 2.5 pigment {Gray50} finish { ambient 0.45 } }
  51.  
  52. #declare Stack =
  53. union {
  54.    sphere{<0, 4, 0>, 1}
  55.    object {Disk_Y translate 2*y}
  56.    object {UnitBox}
  57.    translate -y*1.5
  58.    rotate y*45
  59. }
  60.  
  61. #declare Row1 =  14;
  62. #declare Row2 =   7;
  63. #declare Row3 =   0;
  64. #declare Row4 =  -7;
  65. #declare Row5 = -14;
  66.  
  67. object { Stack texture{T01} interior{I_Glass} translate <-6.25, 6, 0> }
  68. object { Stack texture{T02} interior{I_Glass} translate <-2.5,  6, 0> }
  69. object { Stack texture{T03} interior{I_Glass} translate < 2.5,  6, 0> }
  70. object { Stack texture{T04} interior{I_Glass} translate < 6.25, 6, 0> }
  71.  
  72. object { Stack texture{T05} interior{I_Glass} translate <-9.0, 0, 0> }
  73. object { Stack texture{T06} interior{I_Glass} translate <-4.5, 0, 0> }
  74. object { Stack texture{T07} interior{I_Glass} translate < 0.0, 0, 0> }
  75. object { Stack texture{T08} interior{I_Glass} translate < 4.5, 0, 0> }
  76. object { Stack texture{T09} interior{I_Glass} translate < 9.0, 0, 0> }
  77.  
  78. object { Stack texture{T10} interior{I_Glass} translate <-6.25, -6, 0> }
  79. object { Stack texture{T11} interior{I_Glass} translate <-2.5,  -6, 0> }
  80. object { Stack texture{T12} interior{I_Glass} translate < 2.5,  -6, 0> }
  81. object { Stack texture{T13} interior{I_Glass} translate < 6.25, -6, 0> }
  82.