HDU4528+BFS

#include<stdio.h>
#include<string.h>
#include<stdlib.h>
#include<algorithm>
#include<iostream>
#include<queue>
#include<stack>
#include<math.h>
#include<map>
using namespace std;
const int maxn = 115;
const int inf = 9999999;
char mat[ maxn ][ maxn ];
int vis[ maxn ][ maxn ][ 2 ][ 2 ];
const int dx[]={1,-1,0,0};
const int dy[]={0,0,1,-1};
struct Pos{
	int x,y;
};
struct Node{
	int x,y,ti;
	int D,E;//flag
};
Pos D,S,E;
void init(){
	for( int i=0;i<maxn;i++ )
		for( int j=0;j<maxn;j++ )
			mat[i][j] = 'X';
}

bool in( Node p,int n,int m ){
	if( p.x>=0&&p.x<n&&p.y>=0&&p.y<m )
		return true;
	else
		return false;
}
bool Judge1( Node tmp ){
	int x = tmp.x;
	int y1 = min( tmp.y,D.y );
	int y2 = max( tmp.y,D.y );
	for( int i=y1+1;i<y2;i++ ){
		if( mat[x][i]=='X' ) return false;
		else if( mat[x][i]=='.' ){
			if( x==D.x&&i==D.y ) return false;
			else if( x==E.x&&i==E.y ) return false;
		}
	}
	return true;
}
bool Judge2( Node tmp ){
	int x = tmp.x;
	int y1 = min( tmp.y,E.y );
	int y2 = max( tmp.y,E.y );
	for( int i=y1+1;i<y2;i++ ){
		if( mat[x][i]=='X' ) return false;
		else if( mat[x][i]=='.' ){
			if( x==D.x&&i==D.y ) return false;
			else if( x==E.x&&i==E.y ) return false;
		}
	}
	return true;
}
bool Judge3( Node tmp ){
	int y = tmp.y;
	int x1 = min( tmp.x,D.x );
	int x2 = max( tmp.x,D.x );
	for( int i=x1+1;i<x2;i++ ){
		if( mat[i][y]=='X' ) return false;
		else if( mat[i][y]=='.' ){
			if( i==D.x&&y==D.y ) return false;
			else if( i==E.x&&y==E.y ) return false;
		}
	}
	return true;
}
bool Judge4( Node tmp ){
	int y = tmp.y;
	int x1 = min( tmp.x,E.x );
	int x2 = max( tmp.x,E.x );
	for( int i=x1+1;i<x2;i++ ){
		if( mat[i][y]=='X' ) return false;
		else if( mat[i][y]=='.' ){
			if( i==D.x&&y==D.y ) return false;
			else if( i==E.x&&y==E.y ) return false;
		}
	}
	return true;
}

int bfs( int n,int m,int aim_ti ){
	Node cur,nxt;
	cur.x = S.x;
	cur.y = S.y;
	cur.ti = 0;
	cur.D = cur.E = 0;
	queue<Node>q;
	while( !q.empty() )
		q.pop();
	q.push( cur );
	int ans = inf;
	vis[ cur.x ][ cur.y ][ cur.D ][ cur.E ] = 1;
	while( !q.empty() ){
		cur = q.front();
		q.pop();
		if( cur.ti>aim_ti ) continue;
		//printf("cur:x=%d,y=%d,ti=%d\n",cur.x,cur.y,cur.ti);
		if( cur.x==D.x&&Judge1( cur )==true ) cur.D = 1;
		if( cur.x==E.x&&Judge2( cur )==true ) cur.E = 1;
		if( cur.y==D.y&&Judge3( cur )==true ) cur.D = 1;
		if( cur.y==E.y&&Judge4( cur )==true ) cur.E = 1;
		if( cur.D==1 ) {
			if( cur.E==1 ){
				if( ans>cur.ti ){
					ans = cur.ti;
				}
			}
		}
			//printf("ans:%d\n",ans);
		for( int i=0;i<4;i++ ){
			nxt = cur;
			nxt.x+=dx[i];
			nxt.y+=dy[i];
			nxt.ti++;
			if( in( nxt,n,m )==true&&mat[nxt.x][nxt.y]!='X'&&vis[nxt.x][nxt.y][nxt.D][nxt.E]==0 ){
				vis[nxt.x][nxt.y][nxt.D][nxt.E] = 1;
				q.push(nxt);
			}
		}
	}
	if( ans>aim_ti ) return -1;
	else return ans;
}

int main(){
	int ca,T;
	scanf("%d",&ca);
	T = 1;
	while( ca-- ){
		int n,m,aim_ti;
		printf("Case %d:\n",T++);
		init();
		scanf("%d%d%d",&n,&m,&aim_ti);
		for( int i=0;i<n;i++ ){
			scanf("%s",mat[i]);
			for( int j=0;j<m;j++ ){
				if( mat[i][j]=='D' ){
					D.x = i;
					D.y = j;
					mat[i][j]='X';
				}
				else if( mat[i][j]=='S' ){
					S.x = i;
					S.y = j;
					mat[i][j]='.';
				}
				else if( mat[i][j]=='E' ){
					E.x = i;
					E.y = j;
					mat[i][j]='X';
				}
			}
		}
		memset( vis,0,sizeof( vis ) );
		int ans = bfs( n,m,aim_ti );
		printf("%d\n",ans);
	}
	return 0;
}