startshape START
#Variations remarquables : I, V, ZZTPD

CF::Background = [ hue 10 sat 0.1 b 1 ]

shape START
{
	SCENE [ hue -10 sat 0.9 b 0.9 ]
}

shape SCENE
{
	FLOW []
	FLOW [flip -90]
}

shape FLOW
rule {
	SQUARE []
	FLOW [x 1 r 3 s 0.994]
}

rule 0.005 {
	SQUARE []
	BUBBLES [s 10]
	FLOW [x 1 r 3 s 0.994]
}

rule 0.025 {
	SQUARE []
	CIRCLE [x -25..25 s 3..30 a -0.9]
	FLOW [x 1 r 3 s 0.994]
}

rule 0.025 {
	SQUARE []
	RING [x 15..20 z -100 s 5]
	FLOW [x 1 r 3 s 0.994]
}

rule 0.003 {
	SQUARE []
	FLOW [x 1 r 3 s 0.994]
	FLOW [x 1 r 3 s 0.994 flip 0]
}

rule 0.01 {
	SQUARE []
	FLOW [x 1 r 3 s 0.994 flip 0]
}

rule 0.0007 {
	SQUARE []
	END [s 0.994]
}

shape RING
{
	CIRCLE [a -0.65]
	CIRCLE [hue 20 b 1 sat -1 s 0.9 a -0.25]
}

shape BUBBLES
rule {
	CIRCLE [a -0.9]
	BUBBLES [x -0.8..0.8  y -0.8..0.8]
}

rule 0.3 {
	CIRCLE [a -0.9]
}

shape END
{
	loop 20 [x 0.2 s 1.1 1.04]
		CIRCLE []
}