home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_disks / 300-399 / ff397.lzh / DKBTrace / DKBAmiga.LZH / DATA / dish.dat < prev    next >
Text File  |  1990-08-27  |  2KB  |  73 lines
  1. { Scene Description of a Satellite Dish by Aaron A. Collins }
  2. { Made to test the QUADRIC "Paraboloid" and "Cone" Shapes   } 
  3.  
  4. INCLUDE "BasicShapes.data"
  5.  
  6. VIEW_POINT
  7.    LOCATION <0.0  0.0  -70.0>
  8.    DIRECTION <0.0 0.0  1.0>
  9.    UP  <0.0  1.0  0.0>
  10.    RIGHT <1.33333 0.0 0.0>
  11. END_VIEW_POINT
  12.  
  13. COMPOSITE
  14.  
  15.   OBJECT            { The basic dish }
  16.      INTERSECTION
  17.       QUADRIC Paraboloid_Y SCALE <30.0 20.0 30.0> END_QUADRIC
  18.       QUADRIC Paraboloid_Y SCALE <29.0 19.0 29.0> INVERSE END_QUADRIC
  19.       PLANE <0.0 1.0 0.0> 20.0 END_PLANE
  20.      END_INTERSECTION
  21.      COLOR RED 0.8 GREEN 0.2 BLUE 0.2
  22.      AMBIENT 0.2
  23.      DIFFUSE 0.8
  24.      PHONG 1.0
  25.      PHONGSIZE 10
  26.   END_OBJECT
  27.  
  28.   OBJECT            { The LNA thingy at the focal point }
  29.      UNION
  30.       QUADRIC Cone_Y SCALE <1.0 10.0 1.0> TRANSLATE <0.0 31.0 0.0> END_QUADRIC
  31.       SPHERE <0.0 30.0 0.0> 2.0 END_SPHERE
  32.      END_UNION
  33.      COLOR RED 0.0 GREEN 0.2 BLUE 0.8
  34.      AMBIENT 0.2
  35.      DIFFUSE 0.8
  36.      PHONG 1.0
  37.      PHONGSIZE 30
  38.   END_OBJECT
  39.  
  40.   OBJECT            { The equatorial mount }
  41.      QUADRIC Cone_Y SCALE <30.0 60.0 30.0> END_QUADRIC
  42.      COLOR RED 0.0 GREEN 0.8 BLUE 0.2
  43.      AMBIENT 0.2
  44.      DIFFUSE 0.8
  45.      PHONG 1.0
  46.      PHONGSIZE 30
  47.   END_OBJECT
  48.  
  49.   ROTATE <30.0 30.0 0.0>
  50.  
  51. END_COMPOSITE
  52.  
  53. OBJECT
  54.    SPHERE <0.0 0.0 0.0> 2.0 END_SPHERE
  55.  
  56.    TRANSLATE <100.0  120.0  -130.0>
  57.    COLOUR RED 1.0 GREEN 1.0 BLUE 1.0
  58.    AMBIENT 1.0
  59.    DIFFUSE 0.0
  60.    LIGHT_SOURCE
  61. END_OBJECT
  62.  
  63. OBJECT
  64.    SPHERE <0.0 0.0 0.0> 2.0 END_SPHERE
  65.  
  66.    TRANSLATE <-100.0  100.0  -130.0>
  67.    COLOUR RED 1.0 GREEN 1.0 BLUE 1.0
  68.    AMBIENT 1.0
  69.    DIFFUSE 0.0
  70.    LIGHT_SOURCE
  71. END_OBJECT
  72.  
  73.