【NOIP2011】Mayan游戏

本题在洛谷上的链接：https://www.luogu.org/problemnew/show/P1312

---

很考验代码能力的一道搜索模拟题。

首先是大体的思路，显然我们应该把状态定义为某一时刻的棋盘，然后每进行一次操作，就跳到下一个状态，这道题用广搜的话，状态不容易存储，而且要求的步数n很小，所以深搜就可以满足我们的需要。

我们搜索整张棋盘，寻找可以进行的移动，移动后就更新棋盘，该下落的下落，然后判断是否可以消除，消除后再更新，此处应为循环。因为要回溯，所以应保存每步的状态。

关于剪枝，主要有两个，一是遇到相同的不交换；二是仅当左面为空时向左移动，因为，若左面不为空，那么左面的那个之前会向右移动，就导致了重复。

最后注意，根据输出的要求，应该是严格的n步，还有别忘了没有答案输出-1，可值20分呢！

#include <cstdio>
#include <cstdlib>
#include <algorithm>

using namespace std;

struct Step {
    int x, y, mov;
    
    Step(int x = -1, int y = -1, int m = 0) : x(x), y(y), mov(m) {}

    void print() {
        printf("%d %d %d
", x, y, mov);
    }
} step[10];

int n, mt[10][10][10], del[10][10]; //mt第一维中存储走完第i步后的状态

inline void cop(int d) {
    for (int i = 0; i < 5; ++i)
        for (int j = 0; j < 7; ++j) {
            mt[d][i][j] = mt[d - 1][i][j];
        }
}

inline void down(int d) {
    for (int i = 0; i < 5; ++i)
        for (int j = 1; j < 7; ++j)
            if (mt[d][i][j] && !mt[d][i][j - 1]) {
                int k = j - 1;
                while (!mt[d][i][k - 1] && k > 0) --k;
                swap(mt[d][i][j], mt[d][i][k]);
            }
}

inline int dele(int d) {
    int flag = 0;
    for (int i = 0; i < 5; ++i)
        for (int j = 0; j < 7; ++j) {
            if (!mt[d][i][j]) continue;
            if (i - 1 >= 0 && i + 1 < 5 && mt[d][i - 1][j] == mt[d][i][j] && mt[d][i][j] == mt[d][i + 1][j]) del[i - 1][j] = del[i][j] = del[i + 1][j] = flag = 1;
            if (j - 1 >= 0 && j + 1 < 7 && mt[d][i][j - 1] == mt[d][i][j] && mt[d][i][j] == mt[d][i][j + 1]) del[i][j - 1] = del[i][j] = del[i][j + 1] = flag = 1;
        }
    if (!flag) return 0;
    for (int i = 0; i < 5; ++i)
        for (int j = 0; j < 7; ++j)
            if (del[i][j]) mt[d][i][j] = del[i][j] = 0;
    return 1;
}

inline bool check(int d) {
    for (int i = 0; i < 5; ++i)
        for (int j = 0; j < 7; ++j)
            if (mt[d][i][j]) return false;
    return true;
}

void dfs(int d) { //该走第d步
    if (check(d - 1)) {
        for (int j = 1; j <= n; ++j)
            step[j].print();
        exit(0);
    } //判断完成
    if (d == n + 1) return;
    cop(d);
    for (int x = 0; x < 5; ++x)
        for (int y = 0; y < 7; ++y)
            if (mt[d][x][y]) {
                if (x + 1 < 5 && mt[d][x][y] != mt[d][x + 1][y]) {
                    step[d] = Step(x, y, 1);
                    swap(mt[d][x][y], mt[d][x + 1][y]);
                    down(d);
                    while (dele(d)) down(d);
                    dfs(d + 1);
                    cop(d);
                }
                if (x - 1 >= 0 && !mt[d][x - 1][y]) {
                    step[d] = Step(x, y, -1);
                    swap(mt[d][x][y], mt[d][x - 1][y]);
                    down(d);
                    while (dele(d)) down(d);
                    dfs(d + 1);
                    cop(d);
                }
            }
}

int main() {
    scanf("%d", &n);
    for (int i = 0; i < 5; ++i)
        for (int j = 0; !j || mt[0][i][j - 1]; ++j)
            scanf("%d", &mt[0][i][j]);
    dfs(1);
    printf("-1");
    return 0;
}