home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: Graphics / Graphics.zip / DKBOS2.ZOO / dkb212dt.zoo / sunset1.dat < prev    next >
Text File  |  1991-04-13  |  1KB  |  70 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.  
  21.    TEXTURE
  22.       WAVES 0.06
  23.       FREQUENCY 5000.0
  24.       SCALE <1000.0 1000.0 1000.0>
  25.       REFLECTION 1.0
  26.    END_TEXTURE
  27.    COLOUR RED 1.0 GREEN 0.3
  28. END_OBJECT
  29.  
  30. { Put a floor underneath to catch any errant waves from the ripples }
  31. OBJECT
  32.    PLANE <0.0 1.0 0.0> -11.0 END_PLANE
  33.  
  34.    TEXTURE
  35.       0.05
  36.       COLOUR RED 1.0 GREEN 0.3
  37.       AMBIENT 1.0
  38.       DIFFUSE 0.0
  39.    END_TEXTURE
  40.    COLOUR RED 1.0 GREEN 0.3
  41. END_OBJECT
  42.  
  43. { Now draw the sky, a distant rear wall }
  44. OBJECT
  45.    PLANE <0.0 0.0 1.0> -200.0 END_PLANE
  46.  
  47.    TEXTURE
  48.       0.05
  49.       COLOUR RED 1.0 GREEN 0.3
  50.       AMBIENT 0.3
  51.       DIFFUSE 0.7
  52.    END_TEXTURE
  53.    COLOUR RED 1.0 GREEN 0.3
  54. END_OBJECT
  55.  
  56. { Now to cast some light on the subject }
  57. OBJECT
  58.    SPHERE <0.0 0.0 0.0> 20.0 END_SPHERE
  59.    TRANSLATE <0.0  30.0  -160.0>
  60.  
  61.    TEXTURE
  62.      COLOUR RED 1.0 GREEN 0.6
  63.      AMBIENT 1.0
  64.      DIFFUSE 0.0
  65.    END_TEXTURE
  66.  
  67.    LIGHT_SOURCE
  68.    COLOUR RED 1.0 GREEN 0.6
  69. END_OBJECT
  70.