home *** CD-ROM | disk | FTP | other *** search
/ Ray Tracing Box / RAY_CD.mdf / RAYTRACE / TREES / MYTREE01.LS < prev    next >
Encoding:
Text File  |  1994-01-30  |  564 b   |  22 lines
  1. # ------------------ L-System script for ficus tree -------------------------
  2. # Version 2:  Abundant growth of small leaves.  (Generates file size over 
  3. #                 3X the file size of Version 1.)
  4. #
  5. 13            #recursion depth
  6. 30            #basic angle                    
  7. 50            #starting thickness (% of length)
  8. #
  9. FFFFFA
  10. #
  11. A=!(.8)t(.1)FB>(94)C>(132)D
  12. B=[&'t(.4)!(.9)F$AL|zL]
  13. C=[&'t(.3)!(.8)F$AL|zL]
  14. D=[&'t(.25)!(.7)F$AL|zL]
  15. #
  16. L=[c~^{-f(1.2)+f(1.2)+f(1.2)-|-f(1.2)+f(1.2)+f(1.2)}]     #leaf polygon
  17. @
  18. #----------------------------------------------------------------------------
  19.  
  20.  
  21.  
  22.