题意：有一个迷宫，包含墙、空白格子、起点S、终点E、方向格子（LRUD）和钥匙K。要求如下：

（1）每次转弯只能在碰到墙壁时（每次转弯的选择和初始时从S出发的方向选择均称为一次操作）；

（2）对于方向格子，若到达该格子，不管周围是不是墙，必须转向该格子指示的方向（这个不算一次操作）；

（3）若迷宫中没有钥匙存在，则求出S到E的最少操作次数；若有钥匙，则必须先遍历到每个钥匙之后才能去E（在这个过程中可以经过E也就是E不算做障碍）。

#include<stdio.h>
#include<string.h>
#include<queue>
using namespace std;

const int N  = 225;
const int inf = 1<<29;
struct node{
    int x,y,sta,stp;
};
int n,m,k;
char mapt[N][N];
int K[N][N];
bool vist[N][N][1<<7];
int dir[4][2]={0,-1,0,1,-1,0,1,0};

int judge1(node& now,int &e){
    int flag=0;
        if(now.x<0||now.x>=n||now.y<0||now.y>=m)
            return 0;
        if(mapt[now.x][now.y]!='#'){

            if(mapt[now.x][now.y]=='L')
                    e=0,flag=1;
            else if(mapt[now.x][now.y]=='R')
                        e=1,flag=1;
            else if(mapt[now.x][now.y]=='U')
                        e=2,flag=1;
            else if(mapt[now.x][now.y]=='D')
                        e=3,flag=1;
             else if(mapt[now.x][now.y]=='K')
                        now.sta|=(1<<K[now.x][now.y]);
            if(flag&&vist[now.x][now.y][now.sta])
                return 0;
            else if(flag) vist[now.x][now.y][now.sta]=1;  //固定方向的位置，可以直接标记
            return 1;
        }
        else    //遇到墙，退一格，在当前位置停止
        {
            now.x-=dir[e][0];
            now.y-=dir[e][1];
            return 2;
        }

}
int bfs(int sx,int sy){
    queue<node>q;
    node now,pre;

    for(int i=0; i<n; i++)
        for(int j=0; j<m; j++)
         for(int sta=0; sta<(1<<k); sta++)
          vist[i][j][sta]=0;

        now.x=sx,now.y=sy,now.sta=0,now.stp=0;
        q.push(now);
        vist[now.x][now.y][now.sta]=1;

    while(!q.empty()){
        pre=q.front(); q.pop();
        pre.stp++;

        for(int te=0; te<4; te++){
            int e=te;
            now=pre;
            while(1){   //找到一个停止点，或不能走，或走过了，则跳出
                now.x+=dir[e][0];
                now.y+=dir[e][1];

                int flag=judge1(now,e);

                if(flag==0)break;
                if(flag==1&&mapt[now.x][now.y]=='E'&&now.sta==(1<<k)-1){
                    return now.stp;
                }
                if(flag==2){
                    if(vist[now.x][now.y][now.sta])break;
                    vist[now.x][now.y][now.sta]=1;
                    q.push(now);
                    break;
                }
            }
        }
    }

    return -1;
}
int main()
{
    int sx,sy;
    while(scanf("%d%d",&n,&m)>0){
            k=0;
        for(int i=0; i<n; i++){
            scanf("%s",mapt[i]);
            for(int j=0; j<m; j++)
            if(mapt[i][j]=='S')
             sx=i,sy=j;
            else if(mapt[i][j]=='K')
                K[i][j]=k++;
        }
        printf("%d\n",bfs(sx,sy));
    }
}