home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: Graphics / Graphics.zip / DKBOS2.ZOO / dkb212dt.zoo / fishx.dat < prev    next >
Text File  |  1991-04-13  |  3KB  |  129 lines

  1. {BOWL.DAT}
  2.  
  3. INCLUDE "colors.dat"
  4. INCLUDE "shapes.dat"
  5. INCLUDE "textures.dat"
  6.  
  7. VIEW_POINT
  8.    LOCATION <0.0 10.0 -90.0>
  9.    DIRECTION <0.0 0.0  1.0>
  10.    UP  <0.0 1.0 0.0>
  11.    RIGHT <1.0 0.0 0.0>
  12. END_VIEW_POINT
  13.  
  14. {Top part of bowl}
  15. OBJECT
  16.     INTERSECTION
  17.        SPHERE <0.0 0.0 0.0> 20.0 END_SPHERE
  18.        SPHERE <0.0 0.0 0.0> 19.99 INVERSE END_SPHERE
  19.        PLANE <0.0 1.0 0.0> 15.0 ROTATE <-10.0 0.0 0.0> END_PLANE
  20.        PLANE <0.0 1.0 0.0> 10.0 ROTATE <-10.0 0.0 0.0> INVERSE END_PLANE
  21.     END_INTERSECTION
  22.     TRANSLATE <-8.0 0.0 0.0>
  23.     TEXTURE
  24.        COLOR LightGray ALPHA 0.7
  25.        AMBIENT 0.3
  26.        DIFFUSE 0.7
  27.        REFRACTION 1.0
  28.        IOR 1.5
  29.     END_TEXTURE
  30. END_OBJECT
  31.  
  32. {Bottom part of bowl}
  33. OBJECT
  34.    INTERSECTION
  35.        SPHERE <0.0 0.0 0.0> 20.0 END_SPHERE
  36.        SPHERE <0.0 0.0 0.0> 19.99 INVERSE END_SPHERE
  37.        PLANE <0.0 1.0 0.0> 10.0 ROTATE <-10.0 0.0 0.0> END_PLANE
  38.     END_INTERSECTION
  39.     TRANSLATE <-8.0 0.0 0.0>
  40.     TEXTURE
  41.        AMBIENT 0.3
  42.        DIFFUSE 0.7
  43.        REFRACTION 0.5
  44.     END_TEXTURE
  45. END_OBJECT
  46.  
  47. OBJECT
  48.     PLANE <0.0 1.0 0.0> -19.0 END_PLANE
  49.     TEXTURE
  50.        CHECKER COLOUR DarkSlateGrey COLOUR IndianRed
  51.        SCALE <10.0 10.0 10.0>
  52.     END_TEXTURE
  53. END_OBJECT
  54.  
  55. OBJECT
  56.     PLANE <0.0 0.0 1.0> 30.0 END_PLANE
  57.     TEXTURE
  58.        COLOUR RED 0.329804 BLUE 0.204314 GREEN 0.204314
  59.     END_TEXTURE
  60. END_OBJECT
  61.  
  62. OBJECT
  63.    SPHERE <0.0 0.0 0.0> 1.5 END_SPHERE
  64.    TRANSLATE <-100.0  100.0  -130.0>
  65.    TEXTURE
  66.       COLOUR RED 1.0 GREEN 1.0 BLUE 1.0
  67.       AMBIENT 1.0
  68.       DIFFUSE 0.0
  69.    END_TEXTURE
  70.    COLOUR RED 1.0 GREEN 1.0 BLUE 1.0
  71.    LIGHT_SOURCE
  72. END_OBJECT
  73.  
  74.  
  75. {Picture}
  76. COMPOSITE
  77.   OBJECT
  78.    INTERSECTION
  79.     PLANE <1.0 0.0 0.0> 1.0 END_PLANE
  80.     PLANE <1.0 0.0 0.0> -1.0 INVERSE END_PLANE
  81.     PLANE <0.0 1.0 0.0> 1.0 END_PLANE
  82.     PLANE <0.0 1.0 0.0> -1.0 INVERSE END_PLANE
  83.     PLANE <0.0 0.0 1.0> 1.0 END_PLANE
  84.     PLANE <0.0 0.0 1.0> -1.0 INVERSE END_PLANE
  85.    END_INTERSECTION
  86.     TRANSLATE <1.0 1.0 1.0>
  87.     SCALE <20.0 15.0 1.0>
  88.     TEXTURE
  89.        COLOR White
  90.        AMBIENT 0.05
  91.        DIFFUSE 0.9
  92.     END_TEXTURE
  93.   END_OBJECT
  94.  
  95. { The picture frame }
  96.   OBJECT
  97.    UNION
  98.     INTERSECTION
  99.     UNION
  100.       QUADRIC Cylinder_Y SCALE <1.0 1.0 1.0> TRANSLATE <41.0 0.0 0.0> END_QUADRIC
  101.       QUADRIC Cylinder_Y SCALE <1.0 1.0 1.0> TRANSLATE <-1.0 0.0 0.0> END_QUADRIC
  102.     END_UNION
  103.       PLANE <0.0 1.0 0.0> 31.0 END_PLANE
  104.           PLANE <0.0 1.0 0.0> -1.0 INVERSE END_PLANE
  105.     END_INTERSECTION
  106.     INTERSECTION
  107.     UNION
  108.         QUADRIC Cylinder_X SCALE <1.0 1.0 1.0> TRANSLATE <0.0 31.0 0.0> END_QUADRIC
  109.       QUADRIC Cylinder_X SCALE <1.0 1.0 1.0> TRANSLATE <0.0 -1.0 0.0> END_QUADRIC
  110.     END_UNION
  111.       PLANE <1.0 0.0 0.0> 41.0 END_PLANE
  112.       PLANE <1.0 0.0 0.0> -1.0 INVERSE END_PLANE
  113.     END_INTERSECTION
  114.       SPHERE <-1.0 -1.0 0.0> 1.0 END_SPHERE
  115.       SPHERE <-1.0 31.0 0.0> 1.0 END_SPHERE
  116.       SPHERE <41.0 -1.0 0.0> 1.0 END_SPHERE
  117.       SPHERE <41.0 31.0 0.0> 1.0 END_SPHERE
  118.    END_UNION
  119.    TEXTURE
  120.         Pine_Wood
  121.     AMBIENT 0.3
  122.     DIFFUSE 0.7
  123.    END_TEXTURE
  124.   END_OBJECT
  125.  
  126.     SCALE <1.5 1.5 1.5>
  127.     TRANSLATE <20.0 20.0 29.0>
  128. END_COMPOSITE
  129.