home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Datafile PD-CD 5
/
DATAFILE_PDCD5.iso
/
utilities
/
f
/
fractal112
/
!Fractal
/
Resources
/
L-A_M
< prev
next >
Wrap
Text File
|
1993-07-19
|
3KB
|
300 lines
L-System
L-Sprites
Name=AntiKochflake
Iter=4
Angles=6
Axiom=F--F--F
F=F-F++F-F
Name=AntiKoch2
Iter=3
Angles=6
Axiom=F--F--F
F=FF-FF++FF-FF
Name=AntiKoch3
Iter=4
Angles=6
Axiom=F--F--F
F=F-FF++FF-F
Name=AntiKoch4
Iter=3
Angles=6
Axiom=F--F--F
F=F-FFF+F+FFF-F
Name=AntiKoch5
Iter=3
Angles=6
Axiom=F--F--F
F=FF-FFF+F+FFF-FF
Name=Bush 1
Iter=5
Angles=12
Axiom=---F
F=F[+F]F[-F]F<1
Name=Bush 2
Iter=5
Angles=12
Axiom=---G
G=GFX[+G][-G]
X=X[-FFF][+FFF]FX<4
Name=Bush 3
Iter=4
Angles=16
Axiom=c64----F
F=FF+[+F-F-F]-[-F+F+F]>1
Name=Bush 4
Iter=8
Angles=20
Axiom=>c64-----SLFFF
S=[+++G][---G]TS
G=+H[-G]L
H=-G[+H]L
T=TL
L=[-FFF][+FFF]F>1
Name=Bush5
Iter=3
Angles=16
Axiom=----F
F=FF-[-F+F+F]+[+F-F-F]
Name=Cesaro
Iter=10
Angles=34
Axiom=FX
F=
X=----F!X!++++++++F!X!----
Name=ColourTriangGasket
Iter=5
Angles=6
Axiom=--X
X=<2++FXF++FXF++FXF
F=FF<1
Name=Curve1
Iter=3
Angles=4
Axiom=F-F-F-F-
F=FF-F-F-F-F-F+F
Name=Curve2
Iter=3
Angles=4
Axiom=F-F-F-F-
F=FF-F+F-F-FF
Name=Curve3
Iter=4
Angles=4
Axiom=F-F-F-F-
F=F-FF--F-F
Name=Dragon
Iter=13
Angles=4
Axiom=X
X=X+YF+
Y=-FX-Y
Name=Dragon2
Iter=12
Angles=8
Axiom=FX
F=
Y=+FX--FY+
X=-FX++FY-
Name=DragonColour
Iter=12
Angles=4
Axiom=X
X=X-YF-
Y=+FX+Y<1
Name=Fass1
Iter=4
Angles=4
Axiom=-L
L=LF+RFR+FL-F-LFLFL-FRFR+
R=-LFLF+RFRFR+F+RF-LFL-FR<1
Name=Fass2
Iter=3
Angles=4
Axiom=-L
L=LFLF+RFR+FLFL-FRF-LFL-FR+F+RF-LFL-FRFRF
R=-LFLFLF+RFR+FL-F-LF+RFR+FLF+RFRF-LFL-FR
Name=Flowers1
Iter=4
Angles=12
Axiom=#6c64---T
L=[@.5#.5>4D{leaf2,3}]
F=FF
T=#.7U+[T]--[--L]U[++L][p]-[T]++T
U=F[--L][++L][--]F
p=D[{petalf}]--[{petalf}]--[{petalf}]--[{petalf}]--[{petalf}]--[{petalf}]
Name=Flowers2
Iter=4
Angles=12
Axiom=c64#6---T
L=[@.5>4D{leaf2,3}]
F=FF
T=#.7U+[T]--[--L]U[++L][f@.5-ppppppf------q]-[T]++T
U=F[--L][++L][--]F
p=--[f{petal,1.8}]
q={flower,1.7}
Name=FlowSnake
Iter=4
Angles=6
Axiom=FL
L=FL-FR--FR+FL++FLFL+FR-
R=+FL-FRFR--FR-FL++FL+FR<4
F=
Name=GreenIsle
Iter=3
Angles=4
Axiom=F+F-F-F+F-F-F+F-F-F+F-F
F=+F-F+F-F
Name=GreenIsle2
Iter=3
Angles=6
Axiom=F+F+F+F+F+F
F=F-F-F+F+F
Name=Hilbert
Iter=6
Angles=4
Axiom=X
X=-YF+XFX+FY-
Y=+XF-YFY-FX+
Name=Island1
Iter=2
Angles=4
Axiom=F+F+F+F
F=FFFF-F+F+F-F[-fFF+F+FF+F]FF
f=@8f@I8
Name=Island2
Iter=2
Angles=4
Axiom=F+F+F+F
F=F+fF-FF-F-FF+f+FF-fF+FF+F+FF-f-FFF
f=@6f@I6
Name=Koch Flake
Iter=4
Angles=6
Axiom=F
F=F-F++F-F
Name=Koch Flake2
Iter=4
Angles=6
Axiom=F++F++F
F=F-F++F-F
Name=Koch Island
Iter=3
Angles=4
Axiom=F+F+F+F
F=F+F-F-FF+F+F-F
Name=KochIsle2
Iter=3
Angles=4
Axiom=F+F+F+F
F=F+F-F-FFF+F+F-F
Name=Koch1
Iter=4
Angles=6
Axiom=F--F--F
F=F+F--F+F
Name=Koch2
Iter=5
Angles=12
Axiom=F---F---F---F
F=-F+++F---F+
Name=Koch3
Iter=3
Angles=4
Axiom=F-F-F-F
F=F-F+F+FF-F-F+F
Name=Koch4
Iter=4
Angles=12
Axiom=F++++F++++F
F=+F--F++F-
Name=Koch5
Iter=3
Angles=4
Axiom=F+F+F+F
F=F+F-F-FFF+F+F-F
Name=Koch6
Iter=4
Angles=4
Axiom=F+F+F+F
F=FF+F++F+F
Name=Koch7
Iter=5
Angles=4
Axiom=F+F+F+F
F=F+F-F+F+F
Name=Koch8
Iter=3
Angles=4
Axiom=F+F+F+F
F=F+F-F-FF+F+F-F
Name=Koch9
Iter=2
Angles=4
Axiom=F+F+F+F
F=F-FF+FF+F+F-F-FF+F+F-F-FF-FF+F
Name=Koch10
Iter=4
Angles=4
Axiom=F+F+F+F
F=F-F+F+F-F
Name=Leaf1
Iter=10
Angles=8
Axiom=A
A=F[+X]FB
B=F[-Y]FA
X=A
Y=B
F=@1.36F@I1.36
Name=MyTree
Iter=5
Angles=16
Axiom=c80----F
F=FF-[XY]+[XY]
X=+FY
Y=-FX