home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / f / fractal112 / !Fractal / Scripts / FlowerGrow < prev    next >
Encoding:
Text File  |  1992-04-21  |  341 b   |  14 lines
  1. Script
  2. \ Draws 4 stages of a plant like system
  3. Load "<Frac$Dir>.Resources.L-A_M"
  4. Select L-System,List,Flowers1
  5. Off L-System,Auto Scale
  6. Data y0=-5, width=80, height=64
  7. On Image,Redraw,Clear
  8. Data Iter=2, x0=-5 ; Draw
  9. Off Image,Redraw,Clear
  10. Data Iter=3, x0=-15 ; Draw
  11. Data Iter=4, x0=-33 ; Draw
  12. Data Iter=5, x0=-65 ; Draw
  13. On Image,Redraw,Clear
  14.