home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 9 / CD_ASCQ_09_1193.iso / news / 4444 / plant3 / plant1.inc < prev    next >
Text File  |  1992-08-02  |  3KB  |  64 lines
  1. //---- Potted House Plant.................... M.Miller 7/27/92
  2.  
  3. #include "stalk.inc"
  4. #include "leaf1.inc"
  5.  
  6.  
  7.  
  8. //--- A 17 Leaf Plant
  9. #declare Plant17 =
  10. composite {
  11. composite { Stalk scale <1 1 1> }
  12. composite { Leaf1 scale <.6 .6 .6> rotate <-20 0 0> rotate <0 30 0> translate <5 119 0> }
  13. composite { Leaf1 scale <.4 .4 .4> rotate <-20 0 0> rotate <0 -30 0> translate <5 119 0> }
  14. composite { Leaf1 scale <.7 .7 .7> rotate <-20 0 0> rotate <0 20 0> translate <-2 100 3.6> }
  15. composite { Leaf1 scale <.7 .7 .7> rotate <-20 0 0> rotate <0 120 0> translate <-2 100 3.6> }
  16. composite { Leaf1 scale <.65 .65 .65> rotate <-20 0 0> rotate <0 240 0> translate <-2 100 3.6> }
  17. composite { Leaf1 scale <.4 .4 .4> rotate <-20 0 0> rotate <0 -40 0> translate <-2 100 3.6> }
  18. composite { Leaf1 scale <.5 .5 .5> rotate <-20 0 0> rotate <0 -20 0> translate <-3.75 90 -2> }
  19. composite { Leaf1 scale <.5 .5 .5> rotate <-20 0 0> rotate <0 140 0> translate <-3.75 90 -2> }
  20. composite { Leaf1 scale <.6 .6 .6> rotate <-20 0 0> rotate <0 180 0> translate <-1.66 80 -2> }
  21. composite { Leaf1 scale <.6 .6 .6> rotate <-20 0 0> rotate <0 50 0> translate <-1.66 80 -2> }
  22. composite { Leaf1 scale <.6 .6 .6> rotate <-20 0 0> rotate <0 -50 0> translate <-1.66 80 -2> }
  23. composite { Leaf1 scale <.5 .5 .5> rotate <-20 0 0> rotate <0 -110 0> translate <-1.66 80 -2> }
  24. composite { Leaf1 scale <.6 .6 .6> rotate <-20 0 0> rotate <0 110 0> translate <-1.66 80 -2> }
  25. composite { Leaf1 scale <.5 .5 .5> rotate <-20 0 0> rotate <0 10 0> translate <-1.66 80 -2> }
  26. composite { Leaf1 scale <.6 .6 .6> rotate <-20 0 0> rotate <0 30 0> translate <2.5 60 -2> }
  27. composite { Leaf1 scale <.5 .5 .5> rotate <-20 0 0> rotate <0 -40 0> translate <4.5 60 -2> }
  28. composite { Leaf1 scale <.5 .5 .5> rotate <-20 0 0> rotate <0 100 0> translate <5.5 60 0> }
  29. }
  30.  
  31. //--- A 6 Leaf Plant
  32. #declare Plant6 =
  33. composite {
  34. composite { Stalk scale <1 1 1> }
  35. composite { Leaf1 scale <.6 .6 .6> rotate <-20 0 0> rotate <0 30 0> translate <5 119 0> }
  36. composite { Leaf1 scale <.4 .4 .4> rotate <-20 0 0> rotate <0 -30 0> translate <5 119 0> }
  37. composite { Leaf1 scale <.7 .7 .7> rotate <-20 0 0> rotate <0 -20 0> translate <-2 100 3.6> }
  38. composite { Leaf1 scale <.7 .7 .7> rotate <-20 0 0> rotate <0 -70 0> translate <-2 100 3.6> }
  39. composite { Leaf1 scale <.65 .65 .65> rotate <-20 0 0> rotate <0 -180 0> translate <-2 100 3.6> }
  40. composite { Leaf1 scale <.4 .4 .4> rotate <-20 0 0> rotate <0 -40 0> translate <-2 100 3.6> }
  41. }
  42.  
  43. //--- A 3 Leaf Plant
  44. #declare Plant3 =
  45. composite {
  46. composite { Stalk scale <1 1 1> }
  47. composite { Leaf1 scale <.6 .6 .6> rotate <-20 0 0> rotate <0 30 0> translate <5 119 0> }
  48. composite { Leaf1 scale <.4 .4 .4> rotate <-20 0 0> rotate <0 -30 0> translate <5 119 0> }
  49. composite { Leaf1 scale <.7 .7 .7> rotate <-20 0 0> rotate <0 -20 0> translate <-2 100 3.6> }
  50. }
  51.  
  52.  
  53. //--- Complete House Plant
  54. #declare Plant1 =
  55. composite {
  56. composite { Plant17 }
  57. composite { Plant6 scale <.7 .7 .7> rotate <0 0 0> translate <20 0 -10> }
  58. composite { Plant6 scale <.7 .7 .7> rotate <0 200 0> translate <-15 0 15> }
  59. composite { Plant3 scale <.55 .55 .55> translate <-2 0 -11> }
  60. composite { Plant3 scale <.6 .6 .6> translate <3 0 9> }
  61. }
  62.  
  63.  
  64.