This is the title I gave to this "kinetic digital sculpture" of mine, filed to the Wolfram Tweet-a-Program program:
Here is the code:
Show@Graphics[ Table[NestList[ Translate[Scale[#, .5 + Random[]], 9 {Random[], Random[]}^3] &, Circle[], 99], {j, 9}]]
And here's an output:
Attention, it may diverge!