Algorithm Ink

[DEElekgolo]

This is a java based fractal program. The source was released near the release of firefox 3. You can create astounding fractals with little scripting.
http://azarask.in/projects/algorithm-ink/

Here is one that I made.
http://img354.imageshack.us/img354/5313/canvasft3.png

startshape scale
background { b -1 }
rule scale{ FULL { s 0.02 }}

rule SHAPE { SQUARE { } }
rule SHAPE 0.01 {
SQUARE { }
}

rule FULL {
FLOWER { hue 0 sat 10 b 0.5}
FULL{ s 0.7 r 27.8 hue 5 alpha -0.1}
}

rule FLOWER {
CURVE_I { }
CURVE_I { r 72 }
CURVE_I { r 144}
CURVE_I { r -72 }
CURVE_I { r -144 }

CURVE_D { }
CURVE_D { r 72 }
CURVE_D { r 144 }
CURVE_D { r -72}
CURVE_D { r -144}
}

rule CURVE_I {
SHAPE { }
CURVE_I { y 1 r 1.5 s 0.99 alpha -0.01}
}

rule CURVE_D {
SHAPE { }
CURVE_D { y 1 r -1.5 s 0.99 alpha -0.01}
}

rule MOUSECLICK{ FULL { s 0.01 } }
And another.
http://img206.imageshack.us/img206/5361/canvaswx3.jpg

startshape scale
background { b -1 }
rule scale{ FULL { s 0.02 }}

rule SHAPE { SQUARE { } }
rule SHAPE 0.01 {
SQUARE { }
}

rule FULL {
FLOWER { hue 0 sat 10 b 0.5}
FULL{ s 0.7 r 27.8 hue 5 alpha -0.1}
}

rule FLOWER {
CURVE_1 { }
CURVE_1 { r 72 }
CURVE_1 { r 144}
CURVE_1 { r -72 }
CURVE_1 { r -144 }

CURVE_2 { }
CURVE_2 { r 72 }
CURVE_2 { r 144 }
CURVE_2 { r -72}
CURVE_2 { r -144}
}

rule CURVE_1 {
SHAPE { }
CURVE_1 { y 1 r -2 s 0.99 alpha -0.01}
}

rule CURVE_2 {
SHAPE { }
CURVE_2 { y 1 r -2 s 0.99 alpha -0.01}
}

rule MOUSECLICK{ FULL { s 0.01 } }
Post some that you made!

[Gamerkd16]

This reminds me of the turtle graphics package used in Java.

[Heathen]

I can only make black circles :[

I suck.

[Random]

The syntax makes me go wtf :x

[Gamerkd16]

This one looks cool when it's done:


startshape frame

rule frame {
shape {s .07 y -2}
}

rule shape{
dit {r 2 s .9997}
}

rule dit {
CIRCLE {x .5 s .8}
shape {x 1}
}

rule dit {
SQUARE {x 1 s 1.6 .8}
shape {x 2 r 2}
}

rule dit .7 {
shape {x 1}
}

Didn't make it.

[Random]

This is really cool, thanks for the link

[Random]

double post I know but here is one I made.

startshape begin

rule begin{
CIRCLE{s .75 b 0}
left{x -.3 s .5}
up{y .3 s .5}
right{x .3 s .5}
down{y -.3 s .5}
}

rule left{
CIRCLE {b 0}
begin{x -.3 s .9}
}

rule up{
CIRCLE {b 0}
begin{x 0 y .3 s .9 }
}

rule right{
CIRCLE {b 0}
begin{x .3 s .9}
}

rule down{
CIRCLE {b 0}
begin{x 0 y -.3 s .9}
}