home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Professional / OS2PRO194.ISO / os2 / graphic / dkb / data / sunset2.dat < prev    next >
Encoding:
Text File  |  1991-12-05  |  1.8 KB  |  86 lines
  1. {
  2.     This is the "classic" SUNSET scene by David K. Buck.    I'm resurrecting it
  3.     because I always thought it looked very realistic...    - Aaron A. Collins
  4. }
  5.  
  6. INCLUDE "shapes.dat"
  7. INCLUDE "colors.dat"
  8. INCLUDE "textures.dat"
  9.  
  10. VIEW_POINT
  11.     LOCATION <0.0    100.0    200.0>
  12.     DIRECTION <0.0    0.0    -1.0>
  13.     UP <0.0    1.0    0.0>
  14.     RIGHT <1.333333 0.0 0.0>
  15. END_VIEW_POINT
  16.  
  17. { Define the ocean surface }
  18. OBJECT
  19.     PLANE <0.0 1.0 0.0> -10.0 END_PLANE
  20.     TEXTURE
  21.         WAVES 0.06
  22.         FREQUENCY 5000.0
  23.         SCALE <1000.0 1000.0 1000.0>
  24.         REFLECTION 1.0
  25.     END_TEXTURE
  26.     COLOUR Blue
  27. END_OBJECT
  28.  
  29. { Put a floor underneath to catch any errant waves from the ripples }
  30. OBJECT
  31.     PLANE <0.0 1.0 0.0> -11.0 END_PLANE
  32.     TEXTURE
  33.         0.05
  34.         COLOUR RED 1.0 GREEN 0.3
  35.         AMBIENT 1.0
  36.         DIFFUSE 0.0
  37.     END_TEXTURE
  38.     COLOUR Blue
  39. END_OBJECT
  40.  
  41. { Now draw the sky, a distant rear wall }
  42. OBJECT
  43.     PLANE <0.0 0.0 1.0> -200.0 END_PLANE
  44.     TEXTURE
  45.         0.05
  46.         COLOUR RED 1.0 GREEN 0.3
  47.         AMBIENT 0.3
  48.         DIFFUSE 0.7
  49.     END_TEXTURE
  50.     COLOUR Blue
  51. END_OBJECT
  52.  
  53. { Put in a few clouds }
  54. OBJECT
  55.     SPHERE <0.0    0.0 0.0> 259.0 END_SPHERE
  56.     TEXTURE
  57.         BOZO
  58.         TURBULENCE 0.7
  59.         COLOUR_MAP
  60.             [0.0 0.6    COLOUR RED 1.0 GREEN 1.0 BLUE 1.0 ALPHA 1.0
  61.                 COLOUR RED 1.0 GREEN 1.0 BLUE 1.0 ALPHA 1.0]
  62.             [0.6 0.8 COLOUR RED 1.0 GREEN 1.0 BLUE 1.0 ALPHA 1.0
  63.                 COLOUR RED 1.0 GREEN 1.0 BLUE 1.0]
  64.             [0.8 1.001 COLOUR RED 1.0 GREEN 1.0 BLUE 1.0
  65.                 COLOUR RED 0.8 GREEN 0.8 BLUE 0.8]
  66.         END_COLOUR_MAP
  67.         SCALE <100.0 20.0 100.0>
  68.         AMBIENT 0.7
  69.         DIFFUSE 0.0
  70.     END_TEXTURE
  71.     COLOUR RED 0.7    GREEN 0.7 BLUE 1.0
  72. END_OBJECT
  73.  
  74. { Now to cast some light on the subject }
  75. OBJECT
  76.     SPHERE <0.0 0.0 0.0> 20.0 END_SPHERE
  77.     TRANSLATE <0.0    30.0    -160.0>
  78.     TEXTURE
  79.         COLOUR RED 1.0 GREEN 0.6
  80.         AMBIENT 1.0
  81.         DIFFUSE 0.0
  82.     END_TEXTURE
  83.     LIGHT_SOURCE
  84.     COLOUR RED 1.0 GREEN 0.6
  85. END_OBJECT
  86.