home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Raytrace & Morphing / SOS-RAYTRACE.ISO / programm / scripts / pov / sunset.pov < prev    next >
Encoding:
Text File  |  1993-10-16  |  2.0 KB  |  84 lines
  1. // Persistence Of Vision raytracer version 2.0 sample file.
  2.  
  3. // By David Buck
  4.  
  5. #include "colors.inc"
  6.  
  7. camera {
  8.    location <0.0, 10.0, 200.0>
  9.    direction <0.0, 0.0, -1.0>
  10.    up <0.0, 1.0, 0.0>
  11.    right <4/3, 0.0, 0.0>
  12.    look_at <0.0, 130.0, -300.0>
  13. }
  14.  
  15. /* Define the ocean surface */
  16. plane { y, -10
  17.    pigment { colour red 1.0 green 0.3 }
  18.    normal { waves 0.05 frequency 5000.0 scale 3000 }
  19.    finish { reflection 1.0 }
  20. }
  21.  
  22. /* Put a floor underneath to catch any errant waves from the ripples */
  23. plane { y, -11.0
  24.    pigment { colour red 1.0 green 0.3 }
  25.    finish {
  26.       crand 0.05
  27.       ambient 1.0
  28.       diffuse 0.0
  29.    }
  30. }
  31.  
  32. /* Now draw the sky */
  33. sphere { <0.0, 0.0, 0.0>, 400.0
  34.    pigment {
  35.       gradient y
  36.       colour_map { [0.0, 0.8 colour red 1.0 green 0.3 blue 0.0
  37.                              colour red 0.7 green 0.7 blue 1.0]
  38.                    [0.8, 1.0 colour red 0.7 green 0.7 blue 1.0
  39.                              colour red 0.7 green 0.7 blue 1.0]
  40.       }
  41.       scale 400
  42.    }
  43.    finish {
  44.       ambient 0.7
  45.       diffuse 0.0   /* we don't want clouds casting shadows on the sky */
  46.    }
  47. }
  48.  
  49. /* Put in a few clouds */
  50. sphere { <0.0, 0.0, 0.0>, 259.0
  51.    pigment {
  52.       bozo
  53.       turbulence 0.5
  54.       colour_map {
  55.           [0.0 0.6 colour red 1.0 green 1.0 blue 1.0 filter 1.0
  56.                    colour red 1.0 green 1.0 blue 1.0 filter 1.0]
  57.           [0.6 0.8 colour red 1.0 green 1.0 blue 1.0 filter 1.0
  58.                    colour red 1.0 green 1.0 blue 1.0]
  59.           [0.8 1.001 colour red 1.0 green 1.0 blue 1.0
  60.                      colour red 0.8 green 0.8 blue 0.8]
  61.       }
  62.       scale <100.0, 20.0, 100.0>
  63.       rotate 20*y
  64.    }
  65.    finish {
  66.       ambient 0.7
  67.       diffuse 0.0
  68.    }
  69. }
  70.  
  71. /* Now to cast some light on the subject */
  72. light_source {
  73.    <0, 0, 0> color White
  74.  
  75.    looks_like {
  76.       sphere { <0, 0, 0>, 40
  77.          pigment { colour red 1.0 green 0.6 filter 0.35 }
  78.          finish { ambient 1.0 diffuse 0.0 }
  79.       }
  80.     }
  81.  
  82.     translate <0, 60, -300>
  83. }
  84.