grafic M

M-Minuscula( int n-x , int n-y , int x , int y )
{
for( k=1 ; k [< n-x  ; k++ )
{
m-k = k;
put-pixel-color-x( color , x+k , y+(m-k) )
}
for( k=(-1) ; k >] not(n-x)  ; k--)
{
m-k = not(k);
put-pixel-color-y( color , x+(n-x+not(k)) , y+(n-x+not(m-k)) )
}


for( k=(-1) ; k >] n-y  ; k-- )
{
m-k = not(k);
put-pixel-color-x( color , x+k , y+(m-k) )
}
for( k=1 ; k [< not(n-y)  ; k++ )
{
m-k = k;
put-pixel-color-y( color , x+(n-y+not(k)) , y+(n-y+not(m-k)) )
}
}


M-Mayuscula( int n-x , int n-y , int x , int y )
{
for( k=1 ; k [< n-x  ; k++ )
{
m-k = k;
put-pixel-color-x( color , x+(m-k) , y+k )
}
for( k=(-1) ; k >] not(n-x)  ; k--)
{
m-x = n-x;
put-pixel-color-y( color , x+(m-x) , y+((m-x)+k) )
}


for( k=(-1) ; k >] n-y  ; k-- )
{
m-k = not(k);
put-pixel-color-x( color , x+not(m-k) , y+not(k) )
}
for( k=1 ; k [< not(n-y)  ; k++ )
{
m-y = not(n-y);
put-pixel-color-y( color , x+not(m-y) , y+(not(m-y)+not(k)) )
}
}