home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: Graphics / Graphics.zip / DKBOS2.ZOO / dkb212dt.zoo / monkey.dat < prev    next >
Text File  |  1991-04-24  |  2KB  |  64 lines
  1. { DKB sample QUARTIC data file written by Alexander Enzmann }
  2.  
  3. INCLUDE "shapes.dat"
  4. INCLUDE "colors.dat"
  5. INCLUDE "textures.dat"
  6.  
  7. DECLARE Basic_Saddle =
  8.    QUARTIC
  9.    < 0.0   0.0   0.0   1.0  0.0   0.0   0.0   0.0   0.0  0.0
  10.      0.0   0.0  -3.0   0.0  0.0   0.0   0.0   0.0   0.0  0.0
  11.      0.0   0.0   0.0   0.0  0.0   0.0   0.0   0.0   0.0  0.0
  12.      0.0   0.0   0.0  -1.0  0.0 >
  13.    END_QUARTIC
  14.  
  15. DECLARE Unit_Cube =
  16.    INTERSECTION
  17.       PLANE < 1  0  0> 1 TEXTURE COLOR Clear END_TEXTURE END_PLANE
  18.       PLANE <-1  0  0> 1 TEXTURE COLOR Clear END_TEXTURE END_PLANE
  19.       PLANE < 0  1  0> 1 TEXTURE COLOR Clear END_TEXTURE END_PLANE
  20.       PLANE < 0 -1  0> 1 TEXTURE COLOR Clear END_TEXTURE END_PLANE
  21.       PLANE < 0  0  1> 1 TEXTURE COLOR Clear END_TEXTURE END_PLANE
  22.       PLANE < 0  0 -1> 1 TEXTURE COLOR Clear END_TEXTURE END_PLANE
  23.    END_INTERSECTION
  24.  
  25. { Monkey Saddle }
  26. OBJECT
  27.    INTERSECTION
  28.      QUARTIC Basic_Saddle
  29.        TEXTURE
  30.          COLOR Red
  31.      SPECULAR 1.0
  32.      ROUGHNESS 0.05
  33.      AMBIENT 0.2
  34.      DIFFUSE 0.8
  35.        END_TEXTURE
  36.      END_QUARTIC
  37.      INTERSECTION Unit_Cube SCALE <2 2 2> END_INTERSECTION
  38.    END_INTERSECTION
  39.    BOUNDED_BY
  40.      INTERSECTION Unit_Cube SCALE <2.5 2.5 2.5> END_INTERSECTION
  41.    END_BOUND
  42.    ROTATE <0 20 0>
  43.    ROTATE <-30 0 0>
  44. END_OBJECT
  45.  
  46. VIEW_POINT
  47.    LOCATION  <0.0  0.0 -10.0>
  48.    RIGHT     <1.33 0.0   0.0>
  49.    UP        <0.0  1.0   0.0>
  50.    DIRECTION <0.0  0.0   1.0>
  51. END_VIEW_POINT
  52.  
  53. OBJECT
  54.    SPHERE <0 0 0> 1 END_SPHERE
  55.    TRANSLATE <200 30 -300> 
  56.    TEXTURE
  57.      COLOUR White
  58.      AMBIENT 1.0
  59.      DIFFUSE 0.0
  60.    END_TEXTURE
  61.    LIGHT_SOURCE
  62.    COLOUR White
  63. END_OBJECT
  64.