home *** CD-ROM | disk | FTP | other *** search
/ Ray Tracing Box / RAY_CD.mdf / RAYTRACE / _POV_DAT / STRWAY / PILLAR.INC < prev    next >
Encoding:
Text File  |  1993-09-16  |  2.2 KB  |  107 lines
  1. //Pillar for stairway in Hillingham estate hallway
  2. #include "shapes2.inc"
  3. #include "octagon.inc"
  4. #include "wainscot.inc"
  5. #include "connect.inc"
  6.  
  7.  
  8. // octagonal pillar 
  9. #declare Pillar=
  10. object {
  11.   union { 
  12.     intersection {
  13.        Octagon
  14.        scale <1.2 1.1 1.2>
  15.        translate <0.0 0.6 0.0>
  16.     }
  17.     union {
  18.        Connector
  19.        scale <0.35 0.3 0.35>
  20.        translate <0.0 1.88 0.0>
  21.     }
  22.     intersection {
  23.        Octagon
  24.        scale <0.8 1.7 0.8>
  25.        translate <0.0 3.78 0.0>
  26.     }     
  27.     union {
  28.        Connector
  29.        scale <0.35 0.3 0.35>
  30.        rotate <180.0 0.0 0.0>
  31.        translate <0.0 5.68 0.0>
  32.     }
  33.     intersection {
  34.        Octagon
  35.        scale <1.2 0.5 1.2>
  36.        translate <0.0 6.35 0.0>
  37.     }
  38.     intersection {
  39.        Octagon
  40.        scale <1.5 0.05 1.5>
  41.        translate <0.0 6.8 0.0>
  42.     }
  43.     union {
  44.        Connector
  45.        scale <0.48 0.3 0.48>
  46.        rotate <180.0 0.0 0.0>
  47.        translate <0.0 7.0 0.0>
  48.     }
  49.     union {
  50.        Connector
  51.        scale <0.48 0.3 0.48>
  52.        translate <0.0 7.1 0.0>
  53.     }
  54.     intersection {
  55.        Octagon
  56.        scale <0.8 0.07 0.8>
  57.        translate <0.0 7.3 0.0>
  58.     }
  59.   } 
  60.    translate <0.0 0.4 0.0>
  61.    texture {
  62.       Stone6
  63.       scale <2.0 1.0 2.0>
  64.       rotate <0.0 0.0 -45.0>
  65.       ambient 0.2
  66.       diffuse 0.7   
  67.       phong 1
  68.       phong_size 100
  69.       brilliance 10
  70.    }
  71.    bounded_by {
  72.       box {<0 0 0> <1 1 1>
  73.          scale <3.5 8.0 3.5>
  74.          translate <-1.5 0 -1.5>}
  75.    }
  76. }
  77. object {Pillar
  78.         scale <3.5 3.5 3.5>
  79.         rotate <90.0 0.0 0.0>
  80.         translate <1.2 -2.0 3.0>}
  81.  
  82. object {Pillar
  83.         scale <3.5 3.5 3.5>
  84.         rotate <90.0 0.0 0.0>
  85.         translate <1.2 49.6 3.0>}
  86.  
  87. object {Pillar
  88.         scale <3.5 3.5 3.5>
  89.         rotate <90.0 0.0 0.0>
  90.         translate <49.72 -2.0 31.0>}
  91.  
  92. object {Pillar
  93.         scale <3.5 3.5 3.5>
  94.         rotate <90.0 0.0 0.0>
  95.         translate <49.72 49.6 31.0>}
  96.  
  97. object {Pillar
  98.         scale <3.5 3.5 3.5>
  99.         rotate <90.0 0.0 0.0>
  100.         translate <49.72 -30.0 45.0>}
  101.  
  102. object {Pillar
  103.         scale <3.5 3.5 3.5>
  104.         rotate <90.0 0.0 0.0>
  105.         translate <49.72 78.5 45.0>}
  106.  
  107.