home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: Graphics / Graphics.zip / DKBOS2.ZOO / dkb212dt.zoo / quarcyl.dat < prev    next >
Text File  |  1991-04-24  |  1KB  |  73 lines
  1. { DKB sample QUARTIC data file written by Alexander Enzmann }
  2.  
  3. INCLUDE "colors.dat"
  4. INCLUDE "shapes.dat"
  5. INCLUDE "textures.dat"
  6.  
  7. { Quartic Cylinder - A Space Needle? }
  8. OBJECT
  9.    QUARTIC
  10.    < 0.0   0.0   0.0   0.0   1.0   0.0   0.0   0.0   0.0   0.01
  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   0.0   0.0   0.0   0.0   0.0
  13.      0.0   0.0   0.01  0.0  -0.01 >
  14.    END_QUARTIC
  15.    BOUNDED_BY
  16.      SPHERE <0 0 0> 2 END_SPHERE
  17.    END_BOUND
  18.    TEXTURE
  19.       COLOR Red
  20.       PHONG 1.0
  21.       PHONGSIZE 10
  22.       AMBIENT 0.2
  23.       DIFFUSE 0.8
  24.    END_TEXTURE
  25.    ROTATE <-30 20 0>
  26.    TRANSLATE <0 0 3>
  27. END_OBJECT
  28.  
  29. { Put down checkered floor }
  30. OBJECT
  31.    QUADRIC
  32.       Plane_XZ
  33.       TRANSLATE <0.0  -20.0  0.0>
  34.    END_QUADRIC
  35.    TEXTURE
  36.       CHECKER COLOUR NavyBlue COLOUR MidnightBlue
  37.       SCALE < 20.0 20.0 20.0 >
  38.       AMBIENT 0.8
  39.       DIFFUSE 0.2
  40.    END_TEXTURE
  41. END_OBJECT
  42.  
  43. VIEW_POINT
  44.    LOCATION  <0.0  0.0 -3.0>
  45.    DIRECTION <0.0  0.0  1.0>
  46.    UP        <0.0  1.0  0.0>
  47.    RIGHT     <1.33 0.0  0.0>
  48. END_VIEW_POINT
  49.  
  50. OBJECT
  51.    SPHERE <0 0 0> 1 END_SPHERE
  52.    TRANSLATE <200 30 -300>
  53.    TEXTURE
  54.       COLOR White
  55.       AMBIENT 1.0
  56.       DIFFUSE 0.0
  57.    END_TEXTURE
  58.    LIGHT_SOURCE
  59.    COLOUR White
  60. END_OBJECT
  61.  
  62. OBJECT
  63.    SPHERE <0 0 0> 1 END_SPHERE
  64.    TRANSLATE <-200 30 -300>
  65.    TEXTURE
  66.       COLOR White
  67.       AMBIENT 1.0
  68.       DIFFUSE 0.0
  69.    END_TEXTURE
  70.    LIGHT_SOURCE
  71.    COLOUR White
  72. END_OBJECT
  73.