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