#include<bits/stdc++.h>
using namespace std;
typedef pair<int, int> P;
char c[100][100];
int mp[100][100],d[100][100],n,ans;
int xx[4]={1,0,-1,0};
int yy[4]={0,1,0,-1};
int xx1[8] = {-2, -1, 1, 2, 2, 1, -1, -2};
int yy1[8] = {1, 2, 2, 1, -1, -2, -2, -1};
int xx2[4]={1,-1,1,-1};
int yy2[4]={1,1,-1,-1};
int xx3[8]={1,0,-1,0,1,-1,1,-1};
int yy3[8]={0,1,0,-1,1,1,-1,-1};
int sx,sy,ex,ey;
void cb(int x,int y){
	for(int i=0;i<4;i++){
		for(int k=1;;k++){
			int tx=x+xx[i]*k,ty=y+yy[i]*k;
			if(c[tx][ty]!='.'||c[tx][ty]!='O'){break;}
			mp[tx][ty]=1;
		}
	}
	return;
}
void qs(int x,int y){
	for(int i=0;i<8;i++){
		int tx=x+xx1[i],ty=y+yy1[i];
		if(c[tx][ty]=='.'||c[tx][ty]=='O') mp[tx][ty]=1;
	}
	return;
}
void zj(int x,int y){
	for(int i=0;i<4;i++){
		for(int k=1;;k++){
			int tx=x+xx2[i]*k,ty=y+yy2[i]*k;
			if(c[tx][ty]!='.'){break;}
			mp[tx][ty]=1;
		}
	}
	return;
}
void gw(int x,int y){
	for(int i=0;i<8;i++){
		int tx=x+xx3[i],ty=y+yy3[i];
		if(c[tx][ty]=='.'||c[tx][ty]=='O') mp[tx][ty]=1;
	}
	return;
}
void sb(int x,int y){
	if(mp[x+1][y+1]=='.') mp[x+1][y+1]=1;
	if(mp[x+1][y-1]=='.') mp[x+1][y-1]=1;
	return;}






void cb1(int x,int y){
	for(int i=0;i<4;i++){
		for(int k=1;;k++){
			int tx=x+xx[i]*k,ty=y+yy[i]*k;
			if(c[tx][ty]!='.'||c[tx][ty]!='O'){break;}
			mp[tx][ty]=0;
		}
	}
	return;
}
void qs1(int x,int y){
	for(int i=0;i<8;i++){
		int tx=x+xx1[i],ty=y+yy1[i];
		if(c[tx][ty]=='.'||c[tx][ty]=='O') mp[tx][ty]=0;
	}
	return;
}
void zj1(int x,int y){
	for(int i=0;i<4;i++){
		for(int k=1;;k++){
			int tx=x+xx2[i]*k,ty=y+yy2[i]*k;
			if(c[tx][ty]!='.'||c[tx][ty]!='O'){break;}
			mp[tx][ty]=0;
		}
	}
	return;
}
void gw1(int x,int y){
	for(int i=0;i<8;i++){
		int tx=x+xx3[i],ty=y+yy3[i];
		if(c[tx][ty]=='.'||c[tx][ty]=='O') mp[tx][ty]=0;
	}
	return;
}
void sb1(int x,int y){
	if(mp[x+1][y+1]=='.') mp[x+1][y+1]=0;
	if(mp[x+1][y-1]=='.') mp[x+1][y-1]=0;
	return;
}


int check(int x,int y){
	for(int i=0;i<4;i++){
		for(int k=1;;k++){
			int tx=x+xx[i]*k,ty=y+yy[i]*k;
			if(c[tx][ty]=='C'){return 0;}
		}
	}
	for(int i=0;i<8;i++){
		int tx=x+xx1[i],ty=y+yy1[i];
		if(c[tx][ty]=='K'){return 0;}
	}
	for(int i=0;i<4;i++){
		for(int k=1;;k++){
			int tx=x+xx2[i]*k,ty=y+yy2[i]*k;
			if(c[tx][ty]=='B'){return 0;}
		}
	}
	if(mp[x-1][y-1]=='.'){return 0;}
	if(mp[x+1][y-1]=='.'){return 0;}
	return 0;
}
void inti(){
	for(int i=1;i<=n;i++)
		for(int j=1;j<=n;j++){
			cin>>c[i][j];
		}
	for(int i=1;i<=n;i++)
		for(int j=1;j<=n;j++){
			if(c[i][j]=='O') sx=i,sy=j;
			if(c[i][j]=='C') cb(i,j);
			if(c[i][j]=='K') qs(i,j),mp[i][j]=1;
			if(c[i][j]=='B') zj(i,j);
			if(c[i][j]=='Q') cb(i,j),zj(i,j);
			if(c[i][j]=='X') gw(i,j),ex=i,ey=j;
			if(c[i][j]=='P') sb(i,j),mp[i][j]=1;
		}
	return;
}
int bfs()
{
	queue<P> que; 
	for (int i = 1; i <= n; i++)
		for (int j = 1; j <= n; j++)
			d[i][j] = INT_MAX;
	que.push(P(sx, sy));
	d[sx][sy] = 0;
	while (que.size())
	{
		P p = que.front();
		que.pop();
		if (p.first == ex&&p.second == ey) break;
		for (int i = 0; i < 8; i++)
		{
			int nx = p.first + xx1[i],ny = p.second + yy1[i];
			if (1 <= nx&&nx <= n && 1 <= ny&&ny <= n&&mp[nx][ny]==0&&d[nx][ny] == INT_MAX)
			{
				if(c[nx][ny]=='C'&&check(nx,ny)) cb1(nx,ny);
				if(c[nx][ny]=='K'&&check(nx,ny)) qs1(nx,ny);
				if(c[nx][ny]=='B'&&check(nx,ny)) zj1(nx,ny);
				if(c[nx][ny]=='Q'&&check(nx,ny)) cb1(nx,ny),zj(nx,ny);
				if(c[nx][ny]=='P'&&check(nx,ny)) sb1(nx,ny);
				que.push(P(nx, ny));
				d[nx][ny] = d[p.first][p.second] + 1;
			}
		}
	}
	return d[ex][ey];
}
int main()
{
	while(scanf("%d",&n)!=EOF){
		memset(mp,0,sizeof(mp));
		inti();
		ans=bfs();
		if(ans==INT_MAX||mp[sx][sy]==1){
			cout<<-1<<endl;
		}else{			
			cout<<ans<<endl;
		}
	}
	return 0;
}

码风新奇