home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / utilities / utilsp / povray / !POVscene / level2 / pov / arches next >
Encoding:
Text File  |  1992-09-27  |  3.0 KB  |  144 lines
  1. // Persistence Of Vision raytracer version 1.0 sample file.
  2.  
  3. // By Dan Farmer
  4. // Parabolic arches on the water.  Is this the St. Louis McDonalds? 
  5.  
  6. #include "colors"
  7. #include "shapes"
  8. #include "textures"
  9.  
  10. camera {
  11.    location <60.0  0.0  -135.0>
  12.    direction <0.0 0.0  2.0>
  13.    up  <0.0  1.0  0.0>
  14.    right <1.33333 0.0 0.0>
  15.    look_at <0.0 0.0 0.0>
  16. }
  17.  
  18. // Light 
  19. object {  
  20.    light_source {<200.0  200.0  -150.0>
  21.       colour red 1 green .5
  22.    }
  23. }
  24.  
  25. // Now draw the sky (From sunset.inc)
  26. object {
  27.    sphere { <0.0  0.0  0.0> 300.0 }
  28.    texture {
  29.       gradient <0.0  1.0  0.0>
  30.       colour_map { [0.0 0.8  colour red 0.5 green 0.1 blue 0.7
  31.          colour red 0.1 green 0.1 blue 0.9]
  32.          [0.8 1.0 colour red 0.1 green 0.1 blue 0.9
  33.          colour red 0.1 green 0.1 blue 0.9]
  34.       }
  35.       scale <300.0  300.0  300.0>
  36.       ambient 1
  37.    }
  38.    colour red 0.7  green 0.7 blue 1.0
  39. }
  40.  
  41. // Put in a few clouds 
  42.  
  43. object {
  44.    sphere { <0.0  0.0  0.0> 259.0 }
  45.  
  46.    texture {
  47.       bozo
  48.       turbulence 0.7
  49.       colour_map {
  50.          [0.0 0.6  colour red 1.0 green 1.0 blue 1.0 alpha 1.0
  51.          colour red 1.0 green 1.0 blue 1.0 alpha 1.0]
  52.          [0.6 0.8 colour red 1.0 green 1.0 blue 1.0 alpha 1.0
  53.          colour red 1.0 green 1.0 blue 1.0]
  54.          [0.8 1.001 colour red 1.0 green 1.0 blue 1.0
  55.          colour red 0.8 green 0.8 blue 0.8]
  56.       }
  57.       scale <100.0  20.0  100.0>
  58.       ambient 1
  59.    }
  60.    colour red 0.7  green 0.7  blue 1.0
  61. }
  62.  
  63.  
  64.  
  65. // Define the ocean surface 
  66. object {
  67.    plane { <0.0  1.0  0.0> -10.0 }
  68.  
  69.    texture {
  70.       colour Blue
  71.       waves 0.05
  72.       reflection 0.8
  73.       frequency 5000.0
  74.       scale <3000.0 3000.0 3000.0>
  75.    }
  76.    colour Blue
  77. }
  78.  
  79. /* Put a floor underneath to catch any errant waves from the ripples */
  80. object {
  81.    plane { <0.0  1.0  0.0> -11.0 }
  82.    texture {
  83.       colour Blue
  84.       ambient 1.0
  85.       diffuse 0.0
  86.    }
  87.    colour Blue
  88. }
  89.  
  90. // Create the arches using CSG difference between two "squashed" paraboloids
  91. composite {
  92.    object {
  93.       difference {
  94.          quadric { Paraboloid_Y
  95.             scale <20.0 20.0 5.0>
  96.             rotate <180.0 0.0 0.0>
  97.             translate <0.0 0.0 0.0>
  98.          }
  99.          quadric { Paraboloid_Y
  100.             scale <15.0 20.0 15.0>
  101.             rotate <180.0 0.0 0.0>
  102.             translate <0.0 -2.0 0.0>
  103.          }
  104.       }
  105.       texture {
  106.          Metal
  107.          color White
  108.       }
  109.       color White
  110.    }
  111.  
  112.    /* Move the whole thing to where I should've
  113.     designed it in the first place!!  */
  114.  
  115.    translate <0.0 30.0 -25.0>
  116. }
  117.  
  118. composite {
  119.    object {
  120.       difference {
  121.          quadric { Paraboloid_Y
  122.             scale <20.0 20.0 5.0>
  123.             rotate <180.0 0.0 0.0>
  124.             translate <0.0 0.0 0.0>
  125.          }
  126.          quadric { Paraboloid_Y
  127.             scale <15.0 20.0 15.0>
  128.             rotate <180.0 0.0 0.0>
  129.             translate <0.0 -2.0 0.0>
  130.          }
  131.       }
  132.       texture {
  133.          Metal
  134.          color White
  135.       }
  136.       color White
  137.    }
  138.  
  139.    /* Move the whole thing to where I should've
  140.     designed it in the first place!!  */
  141.    translate <0.0 30.0 50.0>
  142.  
  143. }
  144.