//hdu 1044Collect More Jewels(bfs+dfs)
/*
题意:
在这个问题中,你是冒险家在一个危险的地牢。
你告知地牢将倒塌。你必须找到出口楼梯在给定的时间。
然而,你不想离开地牢两手空空。有很多稀有的珠宝在地牢。
尝试收集一些在你离开之前。
一些便宜的珠宝和一些更昂贵。
所以你会尽量最大化你的收藏,更重要的是,离开地牢。
解题思路:
就是bfs去寻找到各个点得最短路径,然后构成一个新的图;
然后用dfs去寻找最大价值或者是否可以逃出去。
很坑的是,我的搜索少了一个截止,害了我超时了很多次。
所构出来的新图m点事结束点,m+1点是开始点
*/
#include<iostream>
#include<cstdio>
#include<cstring>
#include<queue>
using namespace std;
const int N=60;
const int M=20;
const int inf=10000000;
//================
char ma[N][N];
int w,h,L,m;//w地牢的宽,h地牢的高,L时间限制,m宝珠数量;
struct jew
{
int v;
int xi,xj;
}je[M];//宝珠价值和位置;
int sti,stj,eni,enj;//st开始的位置,en结束的位置
int diri[4]={1,0,-1,0};
int dirj[4]={0,-1,0,1};
int sumv;
//==================
int nma[M][M];//重新构图;
bool flag[N][N];
struct node
{
int ii,jj;
int len;
}temp;
int bfs(int i1,int j1,int i2,int j2)//用bfs寻找各个点得最近距离;
{
int t=inf;
memset(flag,false,sizeof(flag));
temp.ii=i1;
temp.jj=j1;
temp.len=0;
flag[i1][j1]=true;
queue<node> q;
q.push(temp);
node dk;
while(!q.empty())
{
dk=q.front();q.pop();
if(dk.ii==i2&&dk.jj==j2)
{
return dk.len;
}
for(int i=0;i<4;i++)
{
if(diri[i]+dk.ii>=0&&diri[i]+dk.ii<h&&dirj[i]+dk.jj>=0&&dirj[i]+dk.jj<w)
{
int ti=diri[i]+dk.ii;
int tj=dirj[i]+dk.jj;
if(ma[ti][tj]!='*'&&flag[ti][tj]==false)
{
flag[ti][tj]=true;
temp.ii=ti;
temp.jj=tj;
temp.len=dk.len+1;
q.push(temp);
}
}
}
}
return inf;
}
int ansmax=0,ansflag;
bool nflag[M];
void dfs(int rm,int tim,int va)//用新构的图进行深度搜索
{
nflag[rm]=true;
if(ansmax==sumv) return;//就差这个截止,害了我超时了好多次,不然一次就能ac了
if(tim>L) return ;
if(tim<=L&&rm==m+1)
{
ansflag=true;
if(va>ansmax)
{
ansmax=va;
}
}
for(int i=0;i<=m+1;i++)
{
if(nma[rm][i]!=inf&&tim+nma[rm][i]<=L&&nflag[i]==false)
{
dfs(i,tim+nma[rm][i],va+je[i].v);
}
}
nflag[rm]=false;
}
void NEWMAP()//重新构图
{
nma[m][m+1]=nma[m+1][m]=bfs(sti,stj,eni,enj);
nma[m][m]=nma[m+1][m+1]=inf;
for(int i=0;i<m;i++)
{
nma[i][m]=nma[m][i]=bfs(sti,stj,je[i].xi,je[i].xj);
nma[i][m+1]=nma[m+1][i]=bfs(eni,enj,je[i].xi,je[i].xj);
for(int j=0;j<m;j++)
{
if(i!=j)
{
nma[i][j]=nma[j][i]=bfs(je[j].xi,je[j].xj,je[i].xi,je[i].xj);
}
else
{
nma[i][j]=inf;
}
}
}
ansflag=false;
ansmax=0;
memset(nflag,false,sizeof(nflag));
je[m].v=je[m+1].v=0;
dfs(m,0,0);
}
int main()
{
int t;
scanf("%d",&t);
for(int tk=1;tk<=t;tk++)
{
scanf("%d%d%d%d",&w,&h,&L,&m);
sumv=0;
for(int i=0;i<m;i++)
{
scanf("%d",&je[i].v);
sumv+=je[i].v;
}
for(int i=0;i<h;i++)
{
scanf("%s",ma[i]);
}
for(int i=0;i<h;i++)
{
for(int j=0;j<w;j++)
{
if(ma[i][j]>='A'&&ma[i][j]<='Z')//寻找宝珠的位置
{
je[ma[i][j]-'A'].xi=i;
je[ma[i][j]-'A'].xj=j;
}
if(ma[i][j]=='@')//寻找开始的位置
{
sti=i;stj=j;
}
if(ma[i][j]=='<')//寻找出口的位置
{
eni=i;enj=j;
}
}
}
NEWMAP();
printf("Case %d:\n",tk);
if(ansflag==true)
{
printf("The best score is %d.\n",ansmax);
}
else
{
printf("Impossible\n");
}
if(tk!=t)
{
printf("\n");
}
}
return 0;
}