home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 2 / RISC_DISC_2.iso / resources / jpeg / scenes / Bowl4 next >
Encoding:
Text File  |  1994-11-20  |  1.7 KB  |  78 lines
  1. // Flat Green Bowls
  2. //  Mike Williams
  3. //   111 Evering Road
  4. //    LONDON N16 7SL
  5.  
  6. #include "shapes"
  7. #include "colors"
  8. #include "textures"
  9.                       
  10. camera
  11. { location <-30  60  -50>
  12.   up  <0  1  0>
  13.   right <1.25 0 0>
  14.   look_at <0 20 100>
  15. }
  16.  
  17. #declare bowl = object
  18. { quadric { Ellipsoid scale <40 40 33> translate <0 25 0> }
  19.   texture
  20.   { image_map { <1 -1 0> gif "<POVgif$Dir>.Bowl4" interpolate 2 }
  21.     scale < 75 75 75 >
  22.     translate < 35 -19 0 >
  23.     ambient 0.2
  24.     diffuse 0.7
  25.     reflection 0.2
  26.     phong 0.75
  27.   }
  28.   color red 0 blue 0 green 0
  29.   translate <0 -25 0>
  30. }
  31.  
  32. object { bowl rotate <0 0 80> translate <170 25 220> }
  33. object { bowl rotate <30 0 0> translate <-40 25 200> }
  34. object { bowl rotate <0 -20 120> translate <20 25 140> }
  35. object { bowl rotate <0 90 0> translate <-90 25 80> }
  36.  
  37. object                      // Grass
  38. { plane { <0 1 0> -10 }
  39.   texture
  40.   { 0.05
  41.     color YellowGreen
  42.     turbulence 0.1
  43.     ambient 0.3
  44.     diffuse 0.8
  45.   }
  46. }
  47.  
  48. object                      // Sky
  49. { sphere { <0 -39000 0> 40000 inverse }
  50.   texture
  51.   { bozo
  52.     turbulence 0.6
  53.     colour_map
  54.     { [0 0.5 colour red 0.4 green 0.5 blue 1
  55.              colour red 0.4 green 0.5 blue 1]
  56.       [0.5 0.7 colour red 0.4 green 0.5 blue 1
  57.                colour red 1 green 1 blue 1]
  58.       [0.7 1 colour red 1 green 1 blue 1
  59.              colour red 0.7 green 0.7 blue 0.7]
  60.     }
  61.     scale <500 500 500>
  62.     ambient 1
  63.     diffuse 1
  64.   }
  65.   colour red 0.4 green 0.5 blue 1
  66. }
  67.  
  68. object { light_source { <100 120 -130> colour White } }
  69. object { light_source { <-100 100 130> colour White } }
  70.  
  71. object                   // Jack
  72. { sphere {<-40 15 120> 25}
  73.   texture {colour White
  74.            phong 1 phong_size 20
  75.            wrinkles 0.2
  76.           }
  77.   colour White
  78. }