home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 12 / CD_ASCQ_12_0294.iso / maj / 2328 / bop01.ls < prev    next >
Text File  |  1993-11-22  |  324b  |  14 lines
  1. # --- L-System Parser/Mutator --- Lj Lapre ----------------------------------
  2. 5    # recursion depth
  3. 18    # angle
  4. 50    # thickness as % of length
  5. p
  6. p=i++[p+o]--->>[--l]i[++l]--[po]+++po
  7. i=Fs[>>&&l][>>^^l]Fs
  8. s=sFs
  9. l=[c{++f--ff--f++|++f--ff--f}]
  10. o=[&!ce>w>>>>w>>>>w>>>>w>>>>w]
  11. e=FF
  12. w=[c^!F][cc&&&&{---f+++f|---f+++f}]
  13. @
  14.