funció de bales

max-x=n
min-x=(-n)
max-y=m
min-y=(-m)


funcio-de-bales( int **matriu-x[i][j] , int **matriu-y[i][j] , ...
...int min-x , int max-x , int min-y , int max-y )
{
x-bala-x=0+centre-x
y-bala-x=0+centre-y
si matriu-x[0][0]==1 ==> put-grafic( &bala-x[i][j] , x-bala-x , y-bala-x );
si matriu-x[not(0)][not(0)]==1 ==> put-grafic( &bala-x[i][j] , x-bala-x , y-bala-x );


x-bala-x=0+centre-x
y-bala-x=0+centre-y
si matriu-y[not(0)][not(0)]==(-1) ==> put-grafic( &bala-x[i][j] , x-bala-x , y-bala-x );
si matriu-y[0][0]==(-1) ==> put-grafic( &bala-x[i][j] , x-bala-x , y-bala-x );


for( i=1 ; i [< max-x ; i++ )
{
x-bala-x=i+centre-x
y-bala-x=0+centre-y
si matriu-x[i][0]==1 ==> put-grafic( &bala-x[i][j] , x-bala-x , y-bala-x );
si matriu-x[i][not(0)]==1 ==> put-grafic( &bala-x[i][j] , x-bala-x , y-bala-x );
}


for( i=(-1) ; i >] min-x ; i-- )
{
x-bala-x=i+centre-x
y-bala-x=0+centre-y
si matriu-y[i][not(0)]==(-1) ==> put-grafic( &bala-x[i][j] , x-bala-x , y-bala-x );
si matriu-y[i][0]==(-1) ==> put-grafic( &bala-x[i][j] , x-bala-x , y-bala-x );
}


for( j=1 ; j [< max-y ; j++ )
{
x-bala-x=0+centre-x
y-bala-x=j+centre-y
si matriu-x[0][j]==1 ==> put-grafic( &bala-x[i][j] , x-bala-x , y-bala-x );
si matriu-x[not(0)][j]==1 ==> put-grafic( &bala-x[i][j] , x-bala-x , y-bala-x );
}


for( j=(-1) ; j >] min-x ; j-- )
{
x-bala-x=0+centre-x
y-bala-x=j+centre-y
si matriu-y[not(0)][j]==(-1) ==> put-grafic( &bala-x[i][j] , x-bala-x , y-bala-x );
si matriu-y[0][j]==(-1) ==> put-grafic( &bala-x[i][j] , x-bala-x , y-bala-x );
}


for( i=1 ; i [< max-x ; i++ )
{
for( j=1 ; j [< max-y ; j++ )
{
x-bala-x=i+centre-x
y-bala-x=j+centre-y
si matriu-x[i][j]==1 ==> put-grafic( &bala-x[i][j] , x-bala-x , y-bala-x );
}
for( j=(-1) ; j >] min-y ; j-- )
{
x-bala-x=i+centre-x
y-bala-x=j+centre-y
si matriu-x[i][j]==1 ==> put-grafic( &bala-x[i][j] , x-bala-x , y-bala-x );
}
}


for( i=(-1) ; i >] min-x ; i-- )
{
for( j=(-1) ; j >] min-y ; j-- )
{
x-bala-x=i+centre-x
y-bala-x=j+centre-y
si matriu-x[i][j]==(-1) ==> put-grafic( &bala-x[i][j] , x-bala-x , y-bala-x );
}
for( j=1 ; j [< max-y ; j++ )
{
x-bala-x=i+centre-x
y-bala-x=j+centre-y
si matriu-x[i][j]==(-1) ==> put-grafic( &bala-x[i][j] , x-bala-x , y-bala-x );
}
}


}