《算法竞赛进阶指南》立体推箱子

立体推箱子是一个风靡世界的小游戏。

游戏地图是一个 NN 行 MM 列的矩阵，每个位置可能是硬地（用 . 表示）、易碎地面（用 E 表示）、禁地（用 # 表示）、起点（用 X 表示）或终点（用 O 表示）。

你的任务是操作一个 1×1×21×1×2 的长方体。

这个长方体在地面上有两种放置形式，“立”在地面上（1×11×1 的面接触地面）或者“躺”在地面上（1×21×2 的面接触地面）。

在每一步操作中，可以按上下左右四个键之一。

按下按键之后，长方体向对应的方向沿着棱滚动 9090 度。

任意时刻，长方体不能有任何部位接触禁地，并且不能立在易碎地面上。

字符 X 标识长方体的起始位置，地图上可能有一个 X 或者两个相邻的 X。

地图上唯一的一个字符 O 标识目标位置。

求把长方体移动到目标位置（即立在 O 上）所需要的最少步数。

在移动过程中，X 和 O 标识的位置都可以看作是硬地被利用。

输入格式

输入包含多组测试用例。

对于每个测试用例，第一行包括两个整数 NN 和 MM。

接下来 NN 行用来描述地图，每行包括 MM 个字符，每个字符表示一块地面的具体状态。

当输入用例 N=0，M=0N=0，M=0 时，表示输入终止，且该用例无需考虑。

输出格式

每个用例输出一个整数表示所需的最少步数，如果无解则输出 Impossible。

每个结果占一行。

数据范围

3≤N,M≤5003≤N,M≤500

输入样例：

7 7
#######
#..X###
#..##O#
#....E#
#....E#
#.....#
#######
0 0

输出样例：

10

/*定义状态：
立着 0；
横着躺：1；
竖着躺：2；
定义坐标：
立着：(x, y);
横着躺：坐标定义为左边部分
竖着躺：坐标定义为上边部分;
*/ 

#include <queue>
#include <cstdio>
#include <cstring>
#include <iostream>

using namespace std;

const int N = 510;

struct state
{
    int x, y, lie;
};

int n, m;
char g[N][N];
int dist[N][N][3];
int d[3][4][3] = {  //三维分别表示躺的状态，上下左右的动作，上下左右操作完后x, y, tie的状态
    {{-2, 0, 2}, {0, 1, 1}, {1, 0, 2}, {0, -2, 1}},//立着0
    {{-1, 0, 1}, {0, 2, 0}, {1, 0, 1}, {0, -1, 0}},//横着1
    {{-1, 0, 0}, {0, 1, 2}, {2, 0, 0}, {0, -1, 2}},//竖着2
};

bool check(int x, int y)
{
    if (x < 0 || x >= n || y < 0 || y >= m) {
        return false;
    }
    return g[x][y] != '#';  //判断该点是否是 禁地（空的
}


int bfs(state s, state e)
{
    memset(dist, -1, sizeof dist);
    dist[s.x][s.y][s.lie] = 0;
    
    queue<state> q;
    q.push(s);
    
    while (q.size())
    {
        auto t = q.front();
        q.pop();
        
        int x = t.x, y = t.y, lie = t.lie;
        for (int i = 0; i < 4; i ++ )
        {
            state next = {x + d[lie][i][0], y + d[lie][i][1], d[lie][i][2]};
            
            if (!check(next.x, next.y)) continue;
            if (next.lie == 0)
            {
                if (g[next.x][next.y] == 'E') continue ;
            }
            if (next.lie == 1)
            {
                if (!check(next.x, next.y + 1)) continue;
            }
            if (next.lie == 2)
            {
                if (!check(next.x + 1, next.y)) continue;
            }
            
            if (dist[next.x][next.y][next.lie] == -1)
            {
                dist[next.x][next.y][next.lie] = dist[x][y][lie] + 1;
                q.push(next);
            }
        }
    }
    
    return dist[e.x][e.y][e.lie];
}

int main()
{
    while (cin >> n >> m, n || m)
    {
        for (int i = 0; i < n; i ++ ) scanf("%s", g[i]);
        
        state start = {-1}, last;
        for (int i = 0; i < n; i ++ )
            for (int j = 0; j < m; j ++ )
            {
                if (g[i][j] == 'X' && start.x == -1)
                {
                    if (g[i + 1][j] == 'X') {  //竖着躺
                        start = {i, j, 2};
                    }
                    else if (g[i][j + 1] == 'X') { // 横着躺
                        start = {i, j, 1};  
                    }
                    else {  //立着
                        start = {i, j, 0};
                    }
                }
                else if (g[i][j] == 'O') last = {i, j, 0};
            }
        
        int t = bfs(start, last);
        if (t == -1) puts("Impossible");
        else printf("%d\n", t);
        
    }
    
    return 0;
}