home *** CD-ROM | disk | FTP | other *** search
/ Ray Tracing Box / RAY_CD.mdf / raytrace / trees / mytree03.ls < prev    next >
Text File  |  1994-01-30  |  499b  |  21 lines
  1. # ------------------ L-System script for ficus tree -------------------------
  2. # Version 1:  Moderate density of large leaves.   
  3. # 
  4. 11            #recursion depth
  5. 30            #basic angle                    
  6. 50            #starting thickness (% of length)
  7. #
  8. FFFFA        #Axiom
  9. #
  10. A=!(.8)t(.1)FB>(94)C>(132)D
  11. B=[&'t(.4)!(.9)F$AL|zL]
  12. C=[&'t(.3)!(.8)F$AL|zL]
  13. D=[&'t(.25)!(.7)F$AL|zL]
  14. #
  15. L=[c~^{-f(2)+f(2)+f(2)-|-f(2)+f(2)+f(2)}]    #leaf polygon
  16. @
  17. # ---------------------------------------------------------------------------
  18.  
  19.  
  20.  
  21.