home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Current Shareware 1994 January
/
SHAR194.ISO
/
graphuti
/
lparser2.zip
/
MUT10.LS
< prev
next >
Wrap
Text File
|
1993-07-14
|
573b
|
32 lines
# --- L-System Parser/Mutator --- Lj Lapre ---
12
10
40
C
C=%LABHT
B=[???????zZZZ]
A=[zf&&&&&&&&&"""[pj>>>>>>>>>S]|[qj<<<<<<<<<S]]
p=Ft+:'p
q=Ft-:'q
j=;"j
S=['''!!r%^^r]
r=[Z?Z?Zu]
u=Z[cL]!'^::u
L=[c">>>>[s]>>>>[s]>>>>[s]>>>[s]>>>>>>[s]>>>[s]>>>>[s]>>>>[s]]
s=+++li+++dccc??""FF
l=Fh+:'l
d=FFF'd
i=;i
H=["">>>>>>>>>&&&&&&??FFFF!![???h][???k]%^^[??k]]
k=[Z?Z?Za]
a=Z[co]!'a
o=&&&&&&&&&!!!!!F
h=[^^kcccc"Z][^^ecccc"Z]
g=z!+z!+z!+z
e=z!-z!-z!-z
T=[f---------??""""""mccccF]
m=Ft+;'m
t=['::c!!!&&[f<<<n]^^^^f>>>n]
n=[c{--z++z++z--|--z++z++z}]
@