home *** CD-ROM | disk | FTP | other *** search
/ Ray Tracing Box / RAY_CD.mdf / RAYTRACE / _POV_DAT / SLUG1 / SLUG.INC < prev    next >
Encoding:
Text File  |  1992-12-31  |  42.3 KB  |  1,460 lines
  1. //---- Slug Like Creature
  2.  
  3.  
  4. //--- Slug Textures
  5.  
  6. #declare Cream = color red .9  green .85 blue .8
  7. #declare BruisedFlesh = color red .69  green .33 blue .33
  8.  
  9.  
  10. //---- Main Body Texture
  11. #declare BodyTexture =
  12. texture {
  13.   wood 
  14.   turbulence .01
  15.     color_map {
  16.      [0 .1 color Red color Red]
  17.      [.1 .14 color Black color Black]
  18.      [.14 .4 color Cream color Cream]
  19.      [.4 1 color Cream color Gold]
  20.     }
  21.    ambient .1
  22.    diffuse .5
  23.    scale <8 8 8>
  24.    translate <0 1.5 0>
  25. }  
  26. texture {
  27.   gradient <0 1 0>
  28.     color_map {
  29.      [0 .15 color DarkGreen color BruisedFlesh]
  30.      [.15 .24 color BruisedFlesh color Gold]
  31.      [.24 1 color Gold color Clear]
  32.     }
  33.    ambient .1
  34.    diffuse .5
  35.    scale <9 10 9>
  36.    translate <0 -3.5 0>
  37. }  
  38. texture {
  39.    color Clear
  40.    bumps 1
  41.    frequency .010
  42.    scale <.1 .1 .1>
  43.    ambient .1
  44.    diffuse .5
  45.    phong .7
  46.    phong_size 80
  47. }  
  48.  
  49.  
  50. //--- Leg Texture
  51. #declare LegTexture =
  52. texture {
  53.   gradient <0 1 0>
  54.   turbulence 0
  55.     color_map {
  56.      [0 .2 color Black color Red]
  57.      [.2 .5 color Red color Gold]
  58.      [.5 1 color Gold color Gold]
  59.     }
  60.    ambient .1
  61.    diffuse .5
  62.    phong 1
  63.    phong_size 70
  64.    scale <1 7 1>
  65. }  
  66.  
  67. //---- Horn Texture
  68. #declare YourTexture =
  69.     texture {
  70.     gradient <0 0 1>
  71.     color_map {
  72.     [0 .4 color Cream color Gold]
  73.     [.4 .7 color Gold color Scarlet]
  74.        [.7 1 color Scarlet color Black]
  75.     }
  76.     ambient .1
  77.     diffuse .5
  78.     phong 1
  79.     scale <1 1 11.5>
  80.     }
  81.  
  82. //---- Head Texture
  83. #declare HeadCheese =
  84. texture {
  85.   wood
  86.   color_map {
  87.    [0 .3 color Black color Violet]
  88.    [.3 .6 color Violet color Scarlet]
  89.    [.6 .8 color Scarlet color Gold]
  90.    [.8 1 color Gold color Cream]
  91.   }
  92.   ambient .2
  93.   phong 1
  94.   scale <8 8 1>
  95. }
  96. texture {
  97.    color Clear
  98.    bumps 1
  99.    frequency .010
  100.    scale <.1 .1 .1>
  101.    ambient .1
  102.    diffuse .5
  103.    phong .7
  104.    phong_size 80
  105. }  
  106.  
  107. //---- Alternative Head Pulpt
  108. #declare HeadTexture =
  109. texture {
  110.    gradient <0 0 1>
  111.    color_map {
  112.     [0 .5 color Cream color Clear]
  113.         [.5 1 color Clear color Clear]
  114.        }
  115.   ambient .1
  116.   diffuse .4
  117.   phong 1
  118.   scale <1 1 2>
  119.   translate <0 0 -2>
  120. }
  121. texture {
  122.   color Clear
  123.   bumps 1
  124.   frequency .010
  125.   scale <.1 .1 .1>
  126. }
  127.  
  128.  
  129.  
  130.  
  131. //+++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  132. //--- Slug Leg
  133.  
  134. #declare Dot =
  135.     quadric {
  136.        < 1.0  1.0  1.0>
  137.        < 0.0  0.0  0.0>
  138.        < 0.0  0.0  0.0>
  139.         -1.0
  140. scale <.98 .98 .98>
  141.     }
  142.  
  143. #declare Connector_1 = 
  144.    object {
  145.       quadric {
  146.          < 0.0  1.0  1.0>
  147.          < 0.0  0.0  0.0>
  148.          < 0.0  0.0  0.0>
  149.           -1.0
  150.       }
  151.       clipped_by {
  152.          plane { < 1.0  0.0  0.0> 1.0 }
  153.          plane { <-1.0  0.0  0.0> 0.0 }
  154.       }
  155.    }
  156.  
  157. #declare Connector_2 =
  158.    quadric {
  159.       < 1.0 -1.0  1.0>
  160.       < 0.0  0.0  0.0>
  161.       < 0.0  0.0  0.0>
  162.         0.0
  163.       rotate < 0.0  0.0  90.0>
  164.    }
  165.  
  166.  
  167. //---- Make one Slug Leg
  168. #declare Leg =
  169.    composite {
  170.       object {
  171.          quadric {
  172.             Dot
  173.             scale     < 0.100000  0.100000  0.100000>
  174.             translate <-6.500000  0.100000  0.000000>
  175.          }
  176.          texture {
  177.             LegTexture
  178.          }
  179.       }
  180.       object {
  181.          quadric {
  182.             Connector_2 
  183.          }
  184.          clipped_by {
  185.             plane {     < 1.000000  0.000000  0.000000>  0.297156 }
  186.             plane {     < 1.000000  0.000000  0.000000>  0.099052 inverse }
  187.          }
  188.          translate <-0.099052  0.000000  0.000000>
  189.          scale     < 7.211103  1.000000  1.000000>
  190.          translate < 0.013736  0.000000  0.000000>
  191.          rotate    < 0.000000  0.000000  74.054604>
  192.          rotate    < 0.000000 -180.000000  0.000000>
  193.          translate <-6.500000  0.100000  0.000000>
  194.          texture {
  195.             LegTexture
  196.          }
  197.       }
  198.       object {
  199.          quadric {
  200.             Dot
  201.             scale     < 0.300000  0.300000  0.300000>
  202.             translate <-6.900000  1.500000  0.000000>
  203.          }
  204.          texture {
  205.             LegTexture
  206.          }
  207.       }
  208.       object {
  209.          quadric {
  210.             Connector_2 
  211.          }
  212.          clipped_by {
  213.             plane {     < 1.000000  0.000000  0.000000>  0.397553 }
  214.             plane {     < 1.000000  0.000000  0.000000>  0.298165 inverse }
  215.          }
  216.          translate <-0.298165  0.000000  0.000000>
  217.          scale     < 9.000000  1.000000  1.000000>
  218.          translate < 0.033129  0.000000  0.000000>
  219.          rotate    < 0.000000  0.000000  83.659808>
  220.          rotate    < 0.000000 -180.000000  0.000000>
  221.          translate <-6.900000  1.500000  0.000000>
  222.          texture {
  223.             LegTexture
  224.          }
  225.       }
  226.       object {
  227.          quadric {
  228.             Dot
  229.             scale     < 0.400000  0.400000  0.400000>
  230.             translate <-7.000000  2.400000  0.000000>
  231.          }
  232.          texture {
  233.             LegTexture
  234.          }
  235.       }
  236.       object {
  237.          quadric {
  238.             Connector_2 
  239.          }
  240.          clipped_by {
  241.             plane {     < 1.000000  0.000000  0.000000>  0.497947 }
  242.             plane {     < 1.000000  0.000000  0.000000>  0.398357 inverse }
  243.          }
  244.          translate <-0.398357  0.000000  0.000000>
  245.          scale     < 11.000000  1.000000  1.000000>
  246.          translate < 0.036214  0.000000  0.000000>
  247.          rotate    < 0.000000  0.000000  84.805571>
  248.          translate <-7.000000  2.400000  0.000000>
  249.          texture {
  250.             LegTexture
  251.          }
  252.       }
  253.       object {
  254.          quadric {
  255.             Dot
  256.             scale     < 0.500000  0.500000  0.500000>
  257.             translate <-6.900000  3.500000  0.000000>
  258.          }
  259.          texture {
  260.             LegTexture
  261.          }
  262.       }
  263.       object {
  264.          quadric {
  265.             Connector_2 
  266.          }
  267.          clipped_by {
  268.             plane {     < 1.000000  0.000000  0.000000>  0.596460 }
  269.             plane {     < 1.000000  0.000000  0.000000>  0.497050 inverse }
  270.          }
  271.          translate <-0.497050  0.000000  0.000000>
  272.          scale     < 9.165151  1.000000  1.000000>
  273.          translate < 0.054233  0.000000  0.000000>
  274.          rotate    < 0.000000  0.000000  77.471192>
  275.          translate <-6.900000  3.500000  0.000000>
  276.          texture {
  277.             LegTexture
  278.          }
  279.       }
  280.       object {
  281.          quadric {
  282.             Dot
  283.             scale     < 0.600000  0.600000  0.600000>
  284.             translate <-6.700000  4.400000  0.000000>
  285.          }
  286.          texture {
  287.             LegTexture
  288.          }
  289.       }
  290.       object {
  291.          quadric {
  292.             Connector_2 
  293.          }
  294.          clipped_by {
  295.             plane {     < 1.000000  0.000000  0.000000>  0.692179 }
  296.             plane {     < 1.000000  0.000000  0.000000>  0.593296 inverse }
  297.          }
  298.          translate <-0.593296  0.000000  0.000000>
  299.          scale     < 6.633250  1.000000  1.000000>
  300.          translate < 0.089443  0.000000  0.000000>
  301.          rotate    < 0.000000  0.000000  63.434949>
  302.          translate <-6.700000  4.400000  0.000000>
  303.          texture {
  304.             LegTexture
  305.          }
  306.       }
  307.       object {
  308.          quadric {
  309.             Dot
  310.             scale     < 0.700000  0.700000  0.700000>
  311.             translate <-6.400000  5.000000  0.000000>
  312.          }
  313.          texture {
  314.             LegTexture
  315.          }
  316.       }
  317.       object {
  318.          quadric {
  319.             Connector_2 
  320.          }
  321.          clipped_by {
  322.             plane {     < 1.000000  0.000000  0.000000>  0.834176 }
  323.             plane {     < 1.000000  0.000000  0.000000>  0.686969 inverse }
  324.          }
  325.          translate <-0.686969  0.000000  0.000000>
  326.          scale     < 5.109903  1.000000  1.000000>
  327.          translate < 0.134439  0.000000  0.000000>
  328.          rotate    < 0.000000  0.000000  39.805571>
  329.          translate <-6.400000  5.000000  0.000000>
  330.          texture {
  331.             LegTexture
  332.          }
  333.       }
  334.       object {
  335.          quadric {
  336.             Dot
  337.             scale     < 0.850000  0.850000  0.850000>
  338.             translate <-5.800000  5.500000  0.000000>
  339.          }
  340.          texture {
  341.             LegTexture
  342.          }
  343.       }
  344.       object {
  345.          quadric {
  346.             Connector_2 
  347.          }
  348.          clipped_by {
  349.             plane {     < 1.000000  0.000000  0.000000>  0.982540 }
  350.             plane {     < 1.000000  0.000000  0.000000>  0.835159 inverse }
  351.          }
  352.          translate <-0.835159  0.000000  0.000000>
  353.          scale     < 5.280993  1.000000  1.000000>
  354.          translate < 0.158144  0.000000  0.000000>
  355.          rotate    < 0.000000  0.000000  29.744881>
  356.          translate <-5.800000  5.500000  0.000000>
  357.          texture {
  358.             LegTexture
  359.          }
  360.       }
  361.       object {
  362.          quadric {
  363.             Dot
  364.             translate <-5.100000  5.900000  0.000000>
  365.          }
  366.          texture {
  367.             LegTexture
  368.          }
  369.       }
  370.  
  371.       bounded_by {
  372.     box { UnitBox scale <2 4 1.2> translate <-5.8 3.9 0> }
  373.       }
  374.    }
  375.  
  376.  
  377. //--- Slug's Body & Head
  378.  
  379. //--- Main Body Section
  380. #declare B1 =
  381. object {
  382.  union {
  383.   union {
  384.    intersection {
  385.     quadric {
  386.             <0.073046018991965 -0.034925127830533 0.073046018991965>
  387.             <0.000000000000000  0.000000000000000 0.000000000000000>
  388.             <0.000000000000000  0.000000000000000 0.000000000000000>
  389.             -1.0
  390.      }
  391.     plane { <0.0 1.0 0.0> 2.3 }
  392.     plane { <0.0 1.0 0.0> -2.3 inverse }
  393.     rotate <90 0 0>
  394.    }
  395.     quadric { Sphere scale <4.05 4.05 2.6> translate <0 0 -2.6> }
  396.     quadric { Sphere scale <4.05 4.05 2.6> translate <0 0 2.6> }
  397.     scale <1 .8 1> 
  398.   }
  399.     quadric { Sphere scale <1.9 1.9 1> rotate <-20 0 0> translate <0 -.8 -4.8> }
  400.     quadric { Sphere scale <1.9 1.9 1> rotate <20 0 0> translate <0 -.8 4.8> }
  401.  } 
  402.     texture { BodyTexture } 
  403.     bounded_by {
  404.     box { UnitBox scale <4.2 3.4 6.2> }
  405.         }
  406. }
  407.  
  408.  
  409.  
  410. //--- Complete Body Section
  411. #declare BS =
  412. composite {
  413.   object { B1 translate <0 7 0> }
  414.   composite { Leg rotate <0 -90 0>}
  415.   composite { Leg rotate <0 90 0> }
  416.     bounded_by {
  417.     box { UnitBox scale <4.2 5.3 7.8> translate <0 5.1 0> }
  418.         }
  419. }
  420.  
  421.  
  422. //+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  423. //---- Head Horns
  424. #declare Horn =
  425.    composite {
  426.       object {
  427.          quadric {
  428.             Dot
  429.             scale     < 0.970000  0.970000  0.970000>
  430.          }
  431.          texture {
  432.             YourTexture
  433.          }
  434.       }
  435.       object {
  436.          quadric {
  437.             Connector_2
  438.          }
  439.          clipped_by {
  440.             plane {     < 1.000000  0.000000  0.000000>  0.967528 }
  441.             plane {     < 1.000000  0.000000  0.000000>  0.937605 inverse }
  442.          }
  443.          translate <-0.967528  0.000000  0.000000>
  444.          scale     < 13.981666  1.000000  1.000000>
  445.          translate <-0.069200  0.000000  0.000000>
  446.          rotate    < 0.000000  180.000000  0.000000>
  447.          rotate    < 0.000000  134.452764  0.000000>
  448.          texture {
  449.             YourTexture
  450.          }
  451.       }
  452.       object {
  453.          quadric {
  454.             Dot
  455.             scale     < 0.940000  0.940000  0.940000>
  456.             translate <-0.294500  0.000000 -0.300180>
  457.          }
  458.          texture {
  459.             YourTexture
  460.          }
  461.       }
  462.       object {
  463.          quadric {
  464.             Connector_2
  465.          }
  466.          clipped_by {
  467.             plane {     < 1.000000  0.000000  0.000000>  0.937605 }
  468.             plane {     < 1.000000  0.000000  0.000000>  0.907681 inverse }
  469.          }
  470.          translate <-0.937605  0.000000  0.000000>
  471.          scale     < 13.981696  1.000000  1.000000>
  472.          translate <-0.067059  0.000000  0.000000>
  473.          rotate    < 0.000000  180.000000  0.000000>
  474.          rotate    < 0.000000  131.112482  0.000000>
  475.          translate <-0.294500  0.000000 -0.300180>
  476.          texture {
  477.             YourTexture
  478.          }
  479.       }
  480.       object {
  481.          quadric {
  482.             Dot
  483.             scale     < 0.910000  0.910000  0.910000>
  484.             translate <-0.571010  0.000000 -0.617010>
  485.          }
  486.          texture {
  487.             YourTexture
  488.          }
  489.       }
  490.       object {
  491.          quadric {
  492.             Connector_2
  493.          }
  494.          clipped_by {
  495.             plane {     < 1.000000  0.000000  0.000000>  0.907681 }
  496.             plane {     < 1.000000  0.000000  0.000000>  0.877758 inverse }
  497.          }
  498.          translate <-0.907681  0.000000  0.000000>
  499.          scale     < 13.981624  1.000000  1.000000>
  500.          translate <-0.064920  0.000000  0.000000>
  501.          rotate    < 0.000000  180.000000  0.000000>
  502.          rotate    < 0.000000  127.772453  0.000000>
  503.          translate <-0.571010  0.000000 -0.617010>
  504.          texture {
  505.             YourTexture
  506.          }
  507.       }
  508.       object {
  509.          quadric {
  510.             Dot
  511.             scale     < 0.880000  0.880000  0.880000>
  512.             translate <-0.828590  0.000000 -0.949410>
  513.          }
  514.          texture {
  515.             YourTexture
  516.          }
  517.       }
  518.       object {
  519.          quadric {
  520.             Connector_2
  521.          }
  522.          clipped_by {
  523.             plane {     < 1.000000  0.000000  0.000000>  0.877758 }
  524.             plane {     < 1.000000  0.000000  0.000000>  0.847834 inverse }
  525.          }
  526.          translate <-0.877758  0.000000  0.000000>
  527.          scale     < 13.981903  1.000000  1.000000>
  528.          translate <-0.062778  0.000000  0.000000>
  529.          rotate    < 0.000000  180.000000  0.000000>
  530.          rotate    < 0.000000  124.432247  0.000000>
  531.          translate <-0.828590  0.000000 -0.949410>
  532.          texture {
  533.             YourTexture
  534.          }
  535.       }
  536.       object {
  537.          quadric {
  538.             Dot
  539.             scale     < 0.850000  0.850000  0.850000>
  540.             translate <-1.066370  0.000000 -1.296260>
  541.          }
  542.          texture {
  543.             YourTexture
  544.          }
  545.       }
  546.       object {
  547.          quadric {
  548.             Connector_2
  549.          }
  550.          clipped_by {
  551.             plane {     < 1.000000  0.000000  0.000000>  0.847834 }
  552.             plane {     < 1.000000  0.000000  0.000000>  0.817911 inverse }
  553.          }
  554.          translate <-0.847834  0.000000  0.000000>
  555.          scale     < 13.981642  1.000000  1.000000>
  556.          translate <-0.060639  0.000000  0.000000>
  557.          rotate    < 0.000000  180.000000  0.000000>
  558.          rotate    < 0.000000  121.091572  0.000000>
  559.          translate <-1.066370  0.000000 -1.296260>
  560.          texture {
  561.             YourTexture
  562.          }
  563.       }
  564.       object {
  565.          quadric {
  566.             Dot
  567.             scale     < 0.820000  0.820000  0.820000>
  568.             translate <-1.283530  0.000000 -1.656370>
  569.          }
  570.          texture {
  571.             YourTexture
  572.          }
  573.       }
  574.       object {
  575.          quadric {
  576.             Connector_2
  577.          }
  578.          clipped_by {
  579.             plane {     < 1.000000  0.000000  0.000000>  0.817911 }
  580.             plane {     < 1.000000  0.000000  0.000000>  0.787987 inverse }
  581.          }
  582.          translate <-0.817911  0.000000  0.000000>
  583.          scale     < 13.981762  1.000000  1.000000>
  584.          translate <-0.058498  0.000000  0.000000>
  585.          rotate    < 0.000000  180.000000  0.000000>
  586.          rotate    < 0.000000  117.749657  0.000000>
  587.          translate <-1.283530  0.000000 -1.656370>
  588.          texture {
  589.             YourTexture
  590.          }
  591.       }
  592.       object {
  593.          quadric {
  594.             Dot
  595.             scale     < 0.790000  0.790000  0.790000>
  596.             translate <-1.479330  0.000000 -2.028530>
  597.          }
  598.          texture {
  599.             YourTexture
  600.          }
  601.       }
  602.       object {
  603.          quadric {
  604.             Connector_2
  605.          }
  606.          clipped_by {
  607.             plane {     < 1.000000  0.000000  0.000000>  0.787987 }
  608.             plane {     < 1.000000  0.000000  0.000000>  0.758064 inverse }
  609.          }
  610.          translate <-0.787987  0.000000  0.000000>
  611.          scale     < 13.981669  1.000000  1.000000>
  612.          translate <-0.056359  0.000000  0.000000>
  613.          rotate    < 0.000000  180.000000  0.000000>
  614.          rotate    < 0.000000  114.410578  0.000000>
  615.          translate <-1.479330  0.000000 -2.028530>
  616.          texture {
  617.             YourTexture
  618.          }
  619.       }
  620.       object {
  621.          quadric {
  622.             Dot
  623.             scale     < 0.760000  0.760000  0.760000>
  624.             translate <-1.653120  0.000000 -2.411460>
  625.          }
  626.          texture {
  627.             YourTexture
  628.          }
  629.       }
  630.       object {
  631.          quadric {
  632.             Connector_2
  633.          }
  634.          clipped_by {
  635.             plane {     < 1.000000  0.000000  0.000000>  0.758064 }
  636.             plane {     < 1.000000  0.000000  0.000000>  0.728140 inverse }
  637.          }
  638.          translate <-0.758064  0.000000  0.000000>
  639.          scale     < 13.981774  1.000000  1.000000>
  640.          translate <-0.054218  0.000000  0.000000>
  641.          rotate    < 0.000000  180.000000  0.000000>
  642.          rotate    < 0.000000  111.069694  0.000000>
  643.          translate <-1.653120  0.000000 -2.411460>
  644.          texture {
  645.             YourTexture
  646.          }
  647.       }
  648.       object {
  649.          quadric {
  650.             Dot
  651.             scale     < 0.730000  0.730000  0.730000>
  652.             translate <-1.804300  0.000000 -2.803870>
  653.          }
  654.          texture {
  655.             YourTexture
  656.          }
  657.       }
  658.       object {
  659.          quadric {
  660.             Connector_2
  661.          }
  662.          clipped_by {
  663.             plane {     < 1.000000  0.000000  0.000000>  0.728140 }
  664.             plane {     < 1.000000  0.000000  0.000000>  0.698216 inverse }
  665.          }
  666.          translate <-0.728140  0.000000  0.000000>
  667.          scale     < 13.981721  1.000000  1.000000>
  668.          translate <-0.052078  0.000000  0.000000>
  669.          rotate    < 0.000000  180.000000  0.000000>
  670.          rotate    < 0.000000  107.729619  0.000000>
  671.          translate <-1.804300  0.000000 -2.803870>
  672.          texture {
  673.             YourTexture
  674.          }
  675.       }
  676.       object {
  677.          quadric {
  678.             Dot
  679.             scale     < 0.700000  0.700000  0.700000>
  680.             translate <-1.932360  0.000000 -3.204420>
  681.          }
  682.          texture {
  683.             YourTexture
  684.          }
  685.       }
  686.       object {
  687.          quadric {
  688.             Connector_2
  689.          }
  690.          clipped_by {
  691.             plane {     < 1.000000  0.000000  0.000000>  0.698216 }
  692.             plane {     < 1.000000  0.000000  0.000000>  0.668293 inverse }
  693.          }
  694.          translate <-0.698216  0.000000  0.000000>
  695.          scale     < 13.981654  1.000000  1.000000>
  696.          translate <-0.049938  0.000000  0.000000>
  697.          rotate    < 0.000000  180.000000  0.000000>
  698.          rotate    < 0.000000  104.388840  0.000000>
  699.          translate <-1.932360  0.000000 -3.204420>
  700.          texture {
  701.             YourTexture
  702.          }
  703.       }
  704.       object {
  705.          quadric {
  706.             Dot
  707.             scale     < 0.670000  0.670000  0.670000>
  708.             translate <-2.036860  0.000000 -3.611750>
  709.          }
  710.          texture {
  711.             YourTexture
  712.          }
  713.       }
  714.       object {
  715.          quadric {
  716.             Connector_2
  717.          }
  718.          clipped_by {
  719.             plane {     < 1.000000  0.000000  0.000000>  0.668293 }
  720.             plane {     < 1.000000  0.000000  0.000000>  0.638369 inverse }
  721.          }
  722.          translate <-0.668293  0.000000  0.000000>
  723.          scale     < 13.981766  1.000000  1.000000>
  724.          translate <-0.047797  0.000000  0.000000>
  725.          rotate    < 0.000000  180.000000  0.000000>
  726.          rotate    < 0.000000  101.048605  0.000000>
  727.          translate <-2.036860  0.000000 -3.611750>
  728.          texture {
  729.             YourTexture
  730.          }
  731.       }
  732.       object {
  733.          quadric {
  734.             Dot
  735.             scale     < 0.640000  0.640000  0.640000>
  736.             translate <-2.117450  0.000000 -4.024480>
  737.          }
  738.          texture {
  739.             YourTexture
  740.          }
  741.       }
  742.       object {
  743.          quadric {
  744.             Connector_2
  745.          }
  746.          clipped_by {
  747.             plane {     < 1.000000  0.000000  0.000000>  0.638369 }
  748.             plane {     < 1.000000  0.000000  0.000000>  0.608446 inverse }
  749.          }
  750.          translate <-0.638369  0.000000  0.000000>
  751.          scale     < 13.981641  1.000000  1.000000>
  752.          translate <-0.045658  0.000000  0.000000>
  753.          rotate    < 0.000000  180.000000  0.000000>
  754.          rotate    < 0.000000  97.709080  0.000000>
  755.          translate <-2.117450  0.000000 -4.024480>
  756.          texture {
  757.             YourTexture
  758.          }
  759.       }
  760.       object {
  761.          quadric {
  762.             Dot
  763.             scale     < 0.610000  0.610000  0.610000>
  764.             translate <-2.173860  0.000000 -4.441200>
  765.          }
  766.          texture {
  767.             YourTexture
  768.          }
  769.       }
  770.       object {
  771.          quadric {
  772.             Connector_2
  773.          }
  774.          clipped_by {
  775.             plane {     < 1.000000  0.000000  0.000000>  0.608446 }
  776.             plane {     < 1.000000  0.000000  0.000000>  0.578522 inverse }
  777.          }
  778.          translate <-0.608446  0.000000  0.000000>
  779.          scale     < 13.981646  1.000000  1.000000>
  780.          translate <-0.043517  0.000000  0.000000>
  781.          rotate    < 0.000000  180.000000  0.000000>
  782.          rotate    < 0.000000  94.366938  0.000000>
  783.          translate <-2.173860  0.000000 -4.441200>
  784.          texture {
  785.             YourTexture
  786.          }
  787.       }
  788.       object {
  789.          quadric {
  790.             Dot
  791.             scale     < 0.580000  0.580000  0.580000>
  792.             translate <-2.205880  0.000000 -4.860500>
  793.          }
  794.          texture {
  795.             YourTexture
  796.          }
  797.       }
  798.       object {
  799.          quadric {
  800.             Connector_2
  801.          }
  802.          clipped_by {
  803.             plane {     < 1.000000  0.000000  0.000000>  0.578522 }
  804.             plane {     < 1.000000  0.000000  0.000000>  0.548599 inverse }
  805.          }
  806.          translate <-0.578522  0.000000  0.000000>
  807.          scale     < 13.981872  1.000000  1.000000>
  808.          translate <-0.041377  0.000000  0.000000>
  809.          rotate    < 0.000000  180.000000  0.000000>
  810.          rotate    < 0.000000  91.027360  0.000000>
  811.          translate <-2.205880  0.000000 -4.860500>
  812.          texture {
  813.             YourTexture
  814.          }
  815.       }
  816.       object {
  817.          quadric {
  818.             Dot
  819.             scale     < 0.550000  0.550000  0.550000>
  820.             translate <-2.213420  0.000000 -5.280960>
  821.          }
  822.          texture {
  823.             YourTexture
  824.          }
  825.       }
  826.       object {
  827.          quadric {
  828.             Connector_2
  829.          }
  830.          clipped_by {
  831.             plane {     < 1.000000  0.000000  0.000000>  0.548599 }
  832.             plane {     < 1.000000  0.000000  0.000000>  0.518675 inverse }
  833.          }
  834.          translate <-0.548599  0.000000  0.000000>
  835.          scale     < 13.981703  1.000000  1.000000>
  836.          translate <-0.039237  0.000000  0.000000>
  837.          rotate    < 0.000000  180.000000  0.000000>
  838.          rotate    < 0.000000  87.687226  0.000000>
  839.          translate <-2.213420  0.000000 -5.280960>
  840.          texture {
  841.             YourTexture
  842.          }
  843.       }
  844.       object {
  845.          quadric {
  846.             Dot
  847.             scale     < 0.520000  0.520000  0.520000>
  848.             translate <-2.196450  0.000000 -5.701140>
  849.          }
  850.          texture {
  851.             YourTexture
  852.          }
  853.       }
  854.       object {
  855.          quadric {
  856.             Connector_2
  857.          }
  858.          clipped_by {
  859.             plane {     < 1.000000  0.000000  0.000000>  0.518675 }
  860.             plane {     < 1.000000  0.000000  0.000000>  0.488752 inverse }
  861.          }
  862.          translate <-0.518675  0.000000  0.000000>
  863.          scale     < 13.981812  1.000000  1.000000>
  864.          translate <-0.037096  0.000000  0.000000>
  865.          rotate    < 0.000000  180.000000  0.000000>
  866.          rotate    < 0.000000  84.346076  0.000000>
  867.          translate <-2.196450  0.000000 -5.701140>
  868.          texture {
  869.             YourTexture
  870.          }
  871.       }
  872.       object {
  873.          quadric {
  874.             Dot
  875.             scale     < 0.490000  0.490000  0.490000>
  876.             translate <-2.155020  0.000000 -6.119620>
  877.          }
  878.          texture {
  879.             YourTexture
  880.          }
  881.       }
  882.       object {
  883.          quadric {
  884.             Connector_2
  885.          }
  886.          clipped_by {
  887.             plane {     < 1.000000  0.000000  0.000000>  0.488752 }
  888.             plane {     < 1.000000  0.000000  0.000000>  0.458828 inverse }
  889.          }
  890.          translate <-0.488752  0.000000  0.000000>
  891.          scale     < 13.981630  1.000000  1.000000>
  892.          translate <-0.034957  0.000000  0.000000>
  893.          rotate    < 0.000000  180.000000  0.000000>
  894.          rotate    < 0.000000  81.006053  0.000000>
  895.          translate <-2.155020  0.000000 -6.119620>
  896.          texture {
  897.             YourTexture
  898.          }
  899.       }
  900.       object {
  901.          quadric {
  902.             Dot
  903.             scale     < 0.460000  0.460000  0.460000>
  904.             translate <-2.089280  0.000000 -6.534970>
  905.          }
  906.          texture {
  907.             YourTexture
  908.          }
  909.       }
  910.       object {
  911.          quadric {
  912.             Connector_2
  913.          }
  914.          clipped_by {
  915.             plane {     < 1.000000  0.000000  0.000000>  0.458828 }
  916.             plane {     < 1.000000  0.000000  0.000000>  0.428904 inverse }
  917.          }
  918.          translate <-0.458828  0.000000  0.000000>
  919.          scale     < 13.981834  1.000000  1.000000>
  920.          translate <-0.032816  0.000000  0.000000>
  921.          rotate    < 0.000000  180.000000  0.000000>
  922.          rotate    < 0.000000  77.665821  0.000000>
  923.          translate <-2.089280  0.000000 -6.534970>
  924.          texture {
  925.             YourTexture
  926.          }
  927.       }
  928.       object {
  929.          quadric {
  930.             Dot
  931.             scale     < 0.430000  0.430000  0.430000>
  932.             translate <-1.999450  0.000000 -6.945790>
  933.          }
  934.          texture {
  935.             YourTexture
  936.          }
  937.       }
  938.       object {
  939.          quadric {
  940.             Connector_2
  941.          }
  942.          clipped_by {
  943.             plane {     < 1.000000  0.000000  0.000000>  0.428904 }
  944.             plane {     < 1.000000  0.000000  0.000000>  0.398981 inverse }
  945.          }
  946.          translate <-0.428904  0.000000  0.000000>
  947.          scale     < 13.981628  1.000000  1.000000>
  948.          translate <-0.030676  0.000000  0.000000>
  949.          rotate    < 0.000000  180.000000  0.000000>
  950.          rotate    < 0.000000  74.324480  0.000000>
  951.          translate <-1.999450  0.000000 -6.945790>
  952.          texture {
  953.             YourTexture
  954.          }
  955.       }
  956.       object {
  957.          quadric {
  958.             Dot
  959.             scale     < 0.400000  0.400000  0.400000>
  960.             translate <-1.885830  0.000000 -7.350670>
  961.          }
  962.          texture {
  963.             YourTexture
  964.          }
  965.       }
  966.       object {
  967.          quadric {
  968.             Connector_2
  969.          }
  970.          clipped_by {
  971.             plane {     < 1.000000  0.000000  0.000000>  0.398981 }
  972.             plane {     < 1.000000  0.000000  0.000000>  0.369057 inverse }
  973.          }
  974.          translate <-0.398981  0.000000  0.000000>
  975.          scale     < 13.981906  1.000000  1.000000>
  976.          translate <-0.028536  0.000000  0.000000>
  977.          rotate    < 0.000000  180.000000  0.000000>
  978.          rotate    < 0.000000  70.984254  0.000000>
  979.          translate <-1.885830  0.000000 -7.350670>
  980.          texture {
  981.             YourTexture
  982.          }
  983.       }
  984.       object {
  985.          quadric {
  986.             Dot
  987.             scale     < 0.370000  0.370000  0.370000>
  988.             translate <-1.748810  0.000000 -7.748250>
  989.          }
  990.          texture {
  991.             YourTexture
  992.          }
  993.       }
  994.       object {
  995.          quadric {
  996.             Connector_2
  997.          }
  998.          clipped_by {
  999.             plane {     < 1.000000  0.000000  0.000000>  0.369057 }
  1000.             plane {     < 1.000000  0.000000  0.000000>  0.339134 inverse }
  1001.          }
  1002.          translate <-0.369057  0.000000  0.000000>
  1003.          scale     < 13.981535  1.000000  1.000000>
  1004.          translate <-0.026396  0.000000  0.000000>
  1005.          rotate    < 0.000000  180.000000  0.000000>
  1006.          rotate    < 0.000000  67.643729  0.000000>
  1007.          translate <-1.748810  0.000000 -7.748250>
  1008.          texture {
  1009.             YourTexture
  1010.          }
  1011.       }
  1012.       object {
  1013.          quadric {
  1014.             Dot
  1015.             scale     < 0.340000  0.340000  0.340000>
  1016.             translate <-1.588860  0.000000 -8.137160>
  1017.          }
  1018.          texture {
  1019.             YourTexture
  1020.          }
  1021.       }
  1022.       object {
  1023.          quadric {
  1024.             Connector_2
  1025.          }
  1026.          clipped_by {
  1027.             plane {     < 1.000000  0.000000  0.000000>  0.339134 }
  1028.             plane {     < 1.000000  0.000000  0.000000>  0.309210 inverse }
  1029.          }
  1030.          translate <-0.339134  0.000000  0.000000>
  1031.          scale     < 13.981869  1.000000  1.000000>
  1032.          translate <-0.024255  0.000000  0.000000>
  1033.          rotate    < 0.000000  180.000000  0.000000>
  1034.          rotate    < 0.000000  64.303868  0.000000>
  1035.          translate <-1.588860  0.000000 -8.137160>
  1036.          texture {
  1037.             YourTexture
  1038.          }
  1039.       }
  1040.       object {
  1041.          quadric {
  1042.             Dot
  1043.             scale     < 0.310000  0.310000  0.310000>
  1044.             translate <-1.406520  0.000000 -8.516100>
  1045.          }
  1046.          texture {
  1047.             YourTexture
  1048.          }
  1049.       }
  1050.       object {
  1051.          quadric {
  1052.             Connector_2
  1053.          }
  1054.          clipped_by {
  1055.             plane {     < 1.000000  0.000000  0.000000>  0.309210 }
  1056.             plane {     < 1.000000  0.000000  0.000000>  0.279287 inverse }
  1057.          }
  1058.          translate <-0.309210  0.000000  0.000000>
  1059.          scale     < 13.981526  1.000000  1.000000>
  1060.          translate <-0.022116  0.000000  0.000000>
  1061.          rotate    < 0.000000  180.000000  0.000000>
  1062.          rotate    < 0.000000  60.962732  0.000000>
  1063.          translate <-1.406520  0.000000 -8.516100>
  1064.          texture {
  1065.             YourTexture
  1066.          }
  1067.       }
  1068.       object {
  1069.          quadric {
  1070.             Dot
  1071.             scale     < 0.280000  0.280000  0.280000>
  1072.             translate <-1.202410  0.000000 -8.883760>
  1073.          }
  1074.          texture {
  1075.             YourTexture
  1076.          }
  1077.       }
  1078.       object {
  1079.          quadric {
  1080.             Connector_2
  1081.          }
  1082.          clipped_by {
  1083.             plane {     < 1.000000  0.000000  0.000000>  0.279287 }
  1084.             plane {     < 1.000000  0.000000  0.000000>  0.249363 inverse }
  1085.          }
  1086.          translate <-0.279287  0.000000  0.000000>
  1087.          scale     < 13.981816  1.000000  1.000000>
  1088.          translate <-0.019975  0.000000  0.000000>
  1089.          rotate    < 0.000000  180.000000  0.000000>
  1090.          rotate    < 0.000000  57.622437  0.000000>
  1091.          translate <-1.202410  0.000000 -8.883760>
  1092.          texture {
  1093.             YourTexture
  1094.          }
  1095.       }
  1096.       object {
  1097.          quadric {
  1098.             Dot
  1099.             scale     < 0.250000  0.250000  0.250000>
  1100.             translate <-0.977220  0.000000 -9.238910>
  1101.          }
  1102.          texture {
  1103.             YourTexture
  1104.          }
  1105.       }
  1106.       object {
  1107.          quadric {
  1108.             Connector_2
  1109.          }
  1110.          clipped_by {
  1111.             plane {     < 1.000000  0.000000  0.000000>  0.249363 }
  1112.             plane {     < 1.000000  0.000000  0.000000>  0.219439 inverse }
  1113.          }
  1114.          translate <-0.249363  0.000000  0.000000>
  1115.          scale     < 13.981649  1.000000  1.000000>
  1116.          translate <-0.017835  0.000000  0.000000>
  1117.          rotate    < 0.000000  180.000000  0.000000>
  1118.          rotate    < 0.000000  54.281761  0.000000>
  1119.          translate <-0.977220  0.000000 -9.238910>
  1120.          texture {
  1121.             YourTexture
  1122.          }
  1123.       }
  1124.       object {
  1125.          quadric {
  1126.             Dot
  1127.             scale     < 0.220000  0.220000  0.220000>
  1128.             translate <-0.731720  0.000000 -9.580330>
  1129.          }
  1130.          texture {
  1131.             YourTexture
  1132.          }
  1133.       }
  1134.       object {
  1135.          quadric {
  1136.             Connector_2
  1137.          }
  1138.          clipped_by {
  1139.             plane {     < 1.000000  0.000000  0.000000>  0.219439 }
  1140.             plane {     < 1.000000  0.000000  0.000000>  0.189516 inverse }
  1141.          }
  1142.          translate <-0.219439  0.000000  0.000000>
  1143.          scale     < 13.981634  1.000000  1.000000>
  1144.          translate <-0.015695  0.000000  0.000000>
  1145.          rotate    < 0.000000  180.000000  0.000000>
  1146.          rotate    < 0.000000  50.942491  0.000000>
  1147.          translate <-0.731720  0.000000 -9.580330>
  1148.          texture {
  1149.             YourTexture
  1150.          }
  1151.       }
  1152.       object {
  1153.          quadric {
  1154.             Dot
  1155.             scale     < 0.190000  0.190000  0.190000>
  1156.             translate <-0.466750  0.000000 -9.906870>
  1157.          }
  1158.          texture {
  1159.             YourTexture
  1160.          }
  1161.       }
  1162.       object {
  1163.          quadric {
  1164.             Connector_2
  1165.          }
  1166.          clipped_by {
  1167.             plane {     < 1.000000  0.000000  0.000000>  0.189516 }
  1168.             plane {     < 1.000000  0.000000  0.000000>  0.159592 inverse }
  1169.          }
  1170.          translate <-0.189516  0.000000  0.000000>
  1171.          scale     < 13.981810  1.000000  1.000000>
  1172.          translate <-0.013554  0.000000  0.000000>
  1173.          rotate    < 0.000000  180.000000  0.000000>
  1174.          rotate    < 0.000000  47.602125  0.000000>
  1175.          translate <-0.466750  0.000000 -9.906870>
  1176.          texture {
  1177.             YourTexture
  1178.          }
  1179.       }
  1180.       object {
  1181.          quadric {
  1182.             Dot
  1183.             scale     < 0.160000  0.160000  0.160000>
  1184.             translate <-0.183200  0.000000 -10.217420>
  1185.          }
  1186.          texture {
  1187.             YourTexture
  1188.          }
  1189.       }
  1190.       object {
  1191.          quadric {
  1192.             Connector_2
  1193.          }
  1194.          clipped_by {
  1195.             plane {     < 1.000000  0.000000  0.000000>  0.159592 }
  1196.             plane {     < 1.000000  0.000000  0.000000>  0.129669 inverse }
  1197.          }
  1198.          translate <-0.159592  0.000000  0.000000>
  1199.          scale     < 13.981724  1.000000  1.000000>
  1200.          translate <-0.011414  0.000000  0.000000>
  1201.          rotate    < 0.000000  180.000000  0.000000>
  1202.          rotate    < 0.000000  44.260069  0.000000>
  1203.          translate <-0.183200  0.000000 -10.217420>
  1204.          texture {
  1205.             YourTexture
  1206.          }
  1207.       }
  1208.       object {
  1209.          quadric {
  1210.             Dot
  1211.             scale     < 0.130000  0.130000  0.130000>
  1212.             translate < 0.117970  0.000000 -10.510910>
  1213.          }
  1214.          texture {
  1215.             YourTexture
  1216.          }
  1217.       }
  1218.       object {
  1219.          quadric {
  1220.             Connector_2
  1221.          }
  1222.          clipped_by {
  1223.             plane {     < 1.000000  0.000000  0.000000>  0.129669 }
  1224.             plane {     < 1.000000  0.000000  0.000000>  0.099745 inverse }
  1225.          }
  1226.          translate <-0.129669  0.000000  0.000000>
  1227.          scale     < 13.981898  1.000000  1.000000>
  1228.          translate <-0.009274  0.000000  0.000000>
  1229.          rotate    < 0.000000  180.000000  0.000000>
  1230.          rotate    < 0.000000  40.920355  0.000000>
  1231.          translate < 0.117970  0.000000 -10.510910>
  1232.          texture {
  1233.             YourTexture
  1234.          }
  1235.       }
  1236.       object {
  1237.          quadric {
  1238.             Dot
  1239.             scale     < 0.100000  0.100000  0.100000>
  1240.             translate < 0.435730  0.000000 -10.786360>
  1241.          }
  1242.          texture {
  1243.             YourTexture
  1244.          }
  1245.       }
  1246.       object {
  1247.          quadric {
  1248.             Connector_2
  1249.          }
  1250.          clipped_by {
  1251.             plane {     < 1.000000  0.000000  0.000000>  0.099745 }
  1252.             plane {     < 1.000000  0.000000  0.000000>  0.069822 inverse }
  1253.          }
  1254.          translate <-0.099745  0.000000  0.000000>
  1255.          scale     < 13.981494  1.000000  1.000000>
  1256.          translate <-0.007134  0.000000  0.000000>
  1257.          rotate    < 0.000000  180.000000  0.000000>
  1258.          rotate    < 0.000000  37.580056  0.000000>
  1259.          translate < 0.435730  0.000000 -10.786360>
  1260.          texture {
  1261.             YourTexture
  1262.          }
  1263.       }
  1264.       object {
  1265.          quadric {
  1266.             Dot
  1267.             scale     < 0.070000  0.070000  0.070000>
  1268.             translate < 0.768990  0.000000 -11.042820>
  1269.          }
  1270.          texture {
  1271.             YourTexture
  1272.          }
  1273.       }
  1274.       bounded_by {
  1275.          quadric {
  1276.             Dot
  1277.             scale < 7.040532  7.040532  7.040532>
  1278.             translate <-0.907940  0.000000 -5.071410>
  1279.          }
  1280.       }
  1281.    }
  1282.  
  1283.  
  1284.  
  1285.  
  1286. //---- Torus's for Head
  1287.  
  1288. #declare MT1 = 
  1289.    quartic {
  1290.    <    1.000000 0.000000 0.000000 0.000000 2.000000
  1291.         0.000000 0.000000 2.000000 0.000000 -32.040000
  1292.         0.000000 0.000000 0.000000 0.000000 0.000000
  1293.         0.000000 0.000000 0.000000 0.000000 0.000000
  1294.         1.000000 0.000000 0.000000 2.000000 0.000000
  1295.         28.800000 0.000000 0.000000 0.000000 0.000000
  1296.         1.000000 0.000000 -32.040000 0.000000 207.360000 >
  1297.    }
  1298.  
  1299. #declare MT2 = 
  1300.    quartic {
  1301.    <    1.000000 0.000000 0.000000 0.000000 2.000000
  1302.         0.000000 0.000000 2.000000 0.000000 -20.000000
  1303.         0.000000 0.000000 0.000000 0.000000 0.000000
  1304.         0.000000 0.000000 0.000000 0.000000 0.000000
  1305.         1.000000 0.000000 0.000000 2.000000 0.000000
  1306.         16.000000 0.000000 0.000000 0.000000 0.000000
  1307.         1.000000 0.000000 -20.000000 0.000000 64.000000 >
  1308.    }
  1309.  
  1310. #declare MT3 = 
  1311.    quartic {
  1312.    <    1.000000 0.000000 0.000000 0.000000 2.000000
  1313.         0.000000 0.000000 2.000000 0.000000 -6.800000
  1314.         0.000000 0.000000 0.000000 0.000000 0.000000
  1315.         0.000000 0.000000 0.000000 0.000000 0.000000
  1316.         1.000000 0.000000 0.000000 2.000000 0.000000
  1317.         6.160000 0.000000 0.000000 0.000000 0.000000
  1318.         1.000000 0.000000 -6.800000 0.000000 9.486400 >
  1319.    }
  1320.  
  1321.  
  1322. //---- Small Curved Fang
  1323. #declare Fang =
  1324. object {
  1325.   difference {
  1326.    quadric { Cylinder_Y scale <1.1 1 1> translate <.9 0 -.2> }
  1327.    quadric { Cylinder_Y scale <1 1 1> translate <1.2 0 .15> }
  1328.    plane { <0 1 0> 0 rotate < 0 0 -7> translate <2 0 0> inverse}
  1329.    plane { <0 1 0> 0 rotate < 0 0 7> translate <2 0 0> }
  1330.   }
  1331.     texture {
  1332.        gradient <0 0 1>
  1333.        color_map {
  1334.     [0 .1 color White color Wheat]
  1335.         [.1 .3 color Wheat color Gold]
  1336.     [.3 1 color Gold color Red]
  1337.        }
  1338.     ambient .3
  1339.     diffuse .4
  1340.     phong 1
  1341.     scale <1 1 1>
  1342.     translate <0 0 -1.2>
  1343.     }
  1344.        bounded_by {
  1345.        box { UnitBox scale <4 2 4> translate <.9 0 -.3> }           
  1346.        }
  1347. scale <1 .8 1>
  1348. translate <-2.6 0 -3.4>
  1349. }
  1350.  
  1351.  
  1352. //---- Head Section
  1353. //---- Complete Head
  1354.  
  1355. #declare Head =
  1356. composite {
  1357.  composite {
  1358.  object {
  1359.   union {
  1360.    difference {
  1361.     quadric { Sphere scale <4.25 4.25 4> translate <0 0 -2.8> }
  1362.     quadric { Sphere scale <4.8 4.8 4.4> translate <0 0 -4.8> }
  1363.    }
  1364.     quartic { MT1 rotate <90 0 0> scale <1 1 1.1> translate <0 0 -2.8> }
  1365.     quartic { MT2 rotate <90 0 0> scale <1.1 1.1 1.7> translate <0 0 -1.3> }
  1366.   }
  1367.      texture { BodyTexture }
  1368.        bounded_by {
  1369.        box { UnitBox scale <6 6 6> translate <0 0 -1.5> }           
  1370.        }
  1371.  }
  1372.  //--- Mouth
  1373.  object {
  1374.   union {
  1375.     quartic { MT2 rotate <90 0 0> scale <1.1 1.1 1> translate <0 0 -2.8> }
  1376.     quartic { MT3 rotate <90 0 0> translate <0 0 -2.4> }
  1377.     intersection { Disk_Z scale <2 2 .01> translate <0 0 -2.4> }
  1378.   }
  1379.      texture { HeadCheese }
  1380.        bounded_by {
  1381.        box { UnitBox scale <6 6 6> translate <0 0 -1.5> }           
  1382.        }
  1383.  }
  1384.  object { Fang rotate <0 0 0> }
  1385.  object { Fang rotate <0 0 30> }
  1386.  object { Fang rotate <0 0 60> }
  1387.  object { Fang rotate <0 0 90> }
  1388.  object { Fang rotate <0 0 120> }
  1389.  object { Fang rotate <0 0 150> }
  1390.  object { Fang rotate <0 0 180> }
  1391.  object { Fang rotate <0 0 210> }
  1392.  object { Fang rotate <0 0 240> }
  1393.  object { Fang rotate <0 0 270> }
  1394.  object { Fang rotate <0 0 300> }
  1395.  object { Fang rotate <0 0 330> }
  1396.  composite {
  1397.  composite { Horn translate <-4 0 -2> rotate <0 0 -45> }
  1398.  composite { Horn translate <-4 0 -2> rotate <0 0 45> }
  1399.  composite { Horn translate <-4 0 -2> rotate <0 0 135> }
  1400.  composite { Horn translate <-4 0 -2> rotate <0 0 225> }
  1401.  scale <1 1 1>
  1402.  }
  1403.  scale <1.1 1 1.1>
  1404.  rotate <0 -90 0>
  1405.  translate <1.5 7 0> 
  1406.  }
  1407.  composite { BS }
  1408. }
  1409.  
  1410.  
  1411.  
  1412.  
  1413. //----- Body Translated in +Z direction for ground sweep
  1414. #declare BS1 = composite { BS translate <0 0 15>  }
  1415.  
  1416.  
  1417.  
  1418. //---- Complete Slug in a Left Twist
  1419. composite {
  1420.   //--- Tail
  1421.   composite { BS  rotate <0 90 0> translate <0 10 0> rotate <-15 0 0> translate <15 -10 0> } 
  1422.   composite { BS  rotate <0 90 0> translate <0 10 0> rotate <-30 0 0> translate <15 -10 0> } 
  1423.   composite { BS  rotate <0 90 0> translate <0 10 0> rotate <-45 0 0> translate <15 -10 0> } 
  1424.   composite { BS  rotate <0 90 0> translate <0 10 0> rotate <-60 0 0> translate <15 -10 0> } 
  1425.   composite { BS  rotate <0 90 0> translate <0 10 0> rotate <-75 0 0> translate <15 -10 0> } 
  1426.   composite { BS  rotate <0 90 0> translate <0 10 0> rotate <-90 0 0> translate <15 -10 0> } 
  1427.   composite { BS  rotate <0 90 0> translate <0 10 0> rotate <-105 0 0> translate <15 -10 0> } 
  1428.   composite { BS1 rotate <0 0 0> }
  1429.   composite { BS1 rotate <0 22.5 0> }
  1430.   composite { BS1 rotate <0 45 0> }
  1431.   composite { BS1 rotate <0 67.5 0> }
  1432.   composite { BS1 rotate <0 90 0> }
  1433.   composite { BS translate <0 -15 0> rotate <0 0 -18> translate <0 15 15> }
  1434.   composite { BS translate <0 -15 0> rotate <0 0 -36> translate <0 15 15> }
  1435.   composite { BS rotate <9 0 0> translate <0 -15 0> rotate <0 0 -54> translate <0 15 15> }
  1436.   composite { BS rotate <18 0 0> translate <0 -15 0> rotate <0 0 -72> translate <0 15 15> }
  1437.   composite { BS rotate <27 0 0> translate <0 -15 0> rotate <0 0 -90> translate <0 15 15> }
  1438.   composite { BS  rotate <0 0 -90> rotate <0 -36 0> translate <0 0 15> rotate <-15 0 0> translate <-15 15 0> } 
  1439.   composite { BS  rotate <0 0 -90> rotate <0 -45 0> translate <0 0 15> rotate <-30 0 0> translate <-15 15 0> } 
  1440.   composite { BS  rotate <0 0 -90> rotate <0 -54 0> translate <0 0 15> rotate <-45 0 0> translate <-15 15 0> } 
  1441.   composite { BS  rotate <0 0 -90> rotate <0 -63 0> translate <0 0 15> rotate <-60 0 0> translate <-15 15 0> } 
  1442.   composite { BS  rotate <0 0 -90> rotate <0 -72 0> translate <0 0 15> rotate <-75 0 0> translate <-15 15 0> } 
  1443.   composite { BS  rotate <0 0 -90> rotate <0 -81 0> translate <0 0 15> rotate <-90 0 0> translate <-15 15 0> } 
  1444.   composite { BS  rotate <0 0 -90> rotate <0 -81 0> translate <0 0 15> rotate <-105 0 0> translate <-15 15 0> } 
  1445.   composite { Head  rotate <0 180 0> rotate <0 0 -90> rotate <0 -90 0> translate <0 0 15> rotate <-120 0 0> translate <-15 15 0> } 
  1446. rotate <0 -45 0>
  1447. scale <23 23 23>
  1448. translate <-260 800 -1100>
  1449. //--- to lazy to compute bound
  1450. }
  1451.  
  1452.  
  1453.  
  1454.  
  1455.  
  1456.  
  1457.  
  1458.  
  1459.  
  1460.