var Data[2][20][20];
action fluid_action()
{ var x, y, i=0;
for(y=0; y<20; y++) for(x=0; x<20; x++) Data[0][x][y] = Data[1][x][y] = 0;
while(me)
{
for(y=1; y<19; y++) for(x=1; x<19; x++)
{
Data[i][x][y] = (Data[!i][x-1][y] + Data[!i][x+1][y] + Data[!i][x][y-1] + Data[!i][x][y+1]) / 2 - Data[i][x][y];
Data[i][x][y] *= 0.95;
vec_to_mesh(vector(0,0,Data[i][x][y]), my, (y*20)+x+1);
}
i = !i;
wait(1);
}
}
//