home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Amiga Shareware Floppies / ma87a.dms / ma87a.adf / pov3c_1.lha / pov3demo / surfaces / irid.pov < prev    next >
Encoding:
Text File  |  1996-11-08  |  2.2 KB  |  106 lines
  1. // Persistence Of Vision raytracer version 3.0 sample file.
  2. // Iridescence "amount" example
  3.  
  4. #version 3
  5. global_settings { assumed_gamma 2.2 }
  6.  
  7. #include "colors.inc"
  8. #include "textures.inc"
  9. #include "shapes.inc"
  10.  
  11. camera {
  12.   location <0, 0, -10>
  13.   up y
  14.   right x*1.3333
  15.   direction z*3
  16.   look_at 0
  17. }
  18. light_source { < 150, 150, -2500> colour Gray90 }
  19.  
  20. // Top row: varies irid amount
  21. union {
  22.     sphere { <-1, 0, 0>, 0.45
  23.         pigment { White }
  24.         finish {
  25.             Shiny
  26.             diffuse 0.2
  27.             irid {0.25 thickness 2/4 turbulence 0.75}
  28.         }
  29.     }
  30.     sphere { < 0, 0, 0>, 0.45
  31.         pigment { White }
  32.         finish {
  33.             Shiny
  34.             diffuse 0.2
  35.             irid {0.5 thickness 2/4 turbulence 0.75}
  36.         }
  37.     }
  38.     sphere { < 1, 0, 0>, 0.45
  39.         pigment { White }
  40.         finish {
  41.             Shiny
  42.             diffuse 0.2
  43.             irid  {0.75 thickness 2/4 turbulence 0.75}
  44.         }
  45.     }
  46. translate y*1
  47. }
  48.  
  49. // Center row: varies irid thickness
  50. union {
  51.     sphere { <-1, 0, 0>, 0.45
  52.         pigment { White }
  53.         finish {
  54.             Shiny
  55.             diffuse 0.2
  56.             irid {0.5 thickness 0.5 turbulence 0.5}
  57.         }
  58.     }
  59.     sphere { < 0, 0, 0>, 0.45
  60.         pigment { White }
  61.         finish {
  62.             Shiny
  63.             diffuse 0.2
  64.             irid {0.5 thickness 2 turbulence 0.5}
  65.         }
  66.     }
  67.     sphere { < 1, 0, 0>, 0.45
  68.         pigment { White }
  69.         finish {
  70.             Shiny
  71.             diffuse 0.2
  72.             irid  {0.5 thickness 8 turbulence 0.5}
  73.         }
  74.     }
  75. }
  76.  
  77. // Right bottom: varies irid turbulence
  78. union {
  79.     sphere { <-1, 0, 0>, 0.45
  80.         pigment { White }
  81.         finish {
  82.             Shiny
  83.             diffuse 0.2
  84.             irid {0.5 thickness 2 turbulence 0.1}
  85.         }
  86.     }
  87.     sphere { < 0, 0, 0>, 0.45
  88.         pigment { White }
  89.         finish {
  90.             Shiny
  91.             diffuse 0.2
  92.             irid {0.5 thickness 2 turbulence 1}
  93.         }
  94.     }
  95.     sphere { < 1, 0, 0>, 0.45
  96.         pigment { White }
  97.         finish {
  98.             Shiny
  99.             diffuse 0.2
  100.             irid  {0.5 thickness 2 turbulence 2}
  101.         }
  102.     }
  103. translate -y*1
  104. }
  105.  
  106.