Я сделал так:

Код AS3:
var x1:Number = 0;
var z1:Number = 0;
var x2:Number = 1000;
var z2:Number = 1000;
for (var i:int = 0; i < 100; i++)
{
var xn:Number = (x1 + x2) / 2 + (z2 - z1) / 2;
var zn:Number = (z1 + z2) / 2 - (x2 - x1) / 2;
x1 = x2;
z1 = z2;
x2 = xn;
z2 = zn;
trace(xn, zn)
}
Ничего хорошего не вышло - массовые скопления в определенных точках...