洛谷 P1312 Mayan游戏

题目描述
Mayan puzzle是最近流行起来的一个游戏。游戏界面是一个 7 行5 列的棋盘，上面堆放着一些方块，方块不能悬空堆放，即方块必须放在最下面一行，或者放在其他方块之上。游戏通关是指在规定的步数内消除所有的方块，消除方块的规则如下：
1 、每步移动可以且仅可以沿横向（即向左或向右）拖动某一方块一格：当拖动这一方块时，如果拖动后到达的位置（以下称目标位置）也有方块，那么这两个方块将交换位置（参见输入输出样例说明中的图6 到图7 ）；如果目标位置上没有方块，那么被拖动的方块将从原来的竖列中抽出，并从目标位置上掉落（直到不悬空，参见下面图1 和图2）；

2 、任一时刻，如果在一横行或者竖列上有连续三个或者三个以上相同颜色的方块，则它们将立即被消除（参见图1 到图3）。

注意：
a) 如果同时有多组方块满足消除条件，几组方块会同时被消除（例如下面图4 ，三个颜色为1 的方块和三个颜色为 2 的方块会同时被消除，最后剩下一个颜色为 2 的方块）。
b) 当出现行和列都满足消除条件且行列共享某个方块时，行和列上满足消除条件的所有方块会被同时消除（例如下面图5 所示的情形，5 个方块会同时被消除）。
3 、方块消除之后，消除位置之上的方块将掉落，掉落后可能会引起新的方块消除。注意：掉落的过程中将不会有方块的消除。
上面图1 到图 3 给出了在棋盘上移动一块方块之后棋盘的变化。棋盘的左下角方块的坐标为（0, 0 ），将位于（3, 3 ）的方块向左移动之后，游戏界面从图 1 变成图 2 所示的状态，此时在一竖列上有连续三块颜色为4 的方块，满足消除条件，消除连续3 块颜色为4 的方块后，上方的颜色为3 的方块掉落，形成图 3 所示的局面。

---

【题目分析】
暴力。

---

【代码】

#include <cstdio>
#include <cstring>
#include <algorithm>
using namespace std;
struct record{int x,y,z;}b[6];
struct map{int a[5][8];int step;};
int n,dep;
bool del(map & x)
{
    int can[5][8]; memset(can,0,sizeof can);
    for (int i=0;i<5;++i) for (int j=0;j<7;++j)
        if (x.a[i][j]){
            int tmp=0,k=0;
            while (j+k<7&&x.a[i][j]==x.a[i][j+k]) k++,tmp++;
            if (tmp>=3) for (int l=0;l<k;++l) can[i][j+l]=1;
        }
    for (int i=0;i<5;++i) for (int j=0;j<7;++j)
        if (x.a[i][j]){
            int tmp=0,k=0;
            while (i+k<5&&x.a[i][j]==x.a[i+k][j]) k++,tmp++;
            if (tmp>=3) for (int l=0;l<k;++l) can[i+l][j]=1;
        }
    bool flag=false;
    for (int i=0;i<5;++i) for (int j=0;j<7;++j) if (can[i][j])
        x.a[i][j]=0,flag=true;  
    return flag;
}
void drop(map & x)
{
    for (int i=0;i<5;++i) for (int j=0;j<7;++j) if (x.a[i][j]==0)
        for (int k=j+1;k<7;++k)
            if (x.a[i][k]!=0)
            {
                x.a[i][j]=x.a[i][k],x.a[i][k]=0;
                break; 
            }
}
bool dfs(map now)
{
    int v[11],cnt=0; memset(v,0,sizeof v);
    for (int i=0;i<5;++i) for (int j=0;j<7;++j)
        v[now.a[i][j]]++;
    for (int i=1;i<=10;++i) if (v[i]==1||v[i]==2) return false;
    bool flag=true;
    for (int i=0;i<5;++i) for (int j=0;j<7;++j)
        if (now.a[i][j]) flag=false;
    if (flag) return true;
    if (now.step>=dep) return false;
    for (int i=0;i<5;++i)
        for (int j=0;j<7;++j)
        if (now.a[i][j]!=0){
            if (now.a[i][j]&&i+1<5&&now.a[i][j]!=now.a[i+1][j])
            {
                map to=now;
                swap(to.a[i][j],to.a[i+1][j]);
                drop(to);
                while (del(to)) drop(to);
                to.step=now.step+1;
                if (dfs(to))
                {
                    b[now.step].x=i;
                    b[now.step].y=j;
                    b[now.step].z=1;
                    return true;
                }
            }
            if (now.a[i][j]&&i-1>=0&&now.a[i-1][j]==0)
            {
                map to=now;
                swap(to.a[i-1][j],to.a[i][j]);
                drop(to);
                while (del(to)) drop(to);
                to.step=now.step+1;
                if (dfs(to))
                {
                    b[now.step].x=i;
                    b[now.step].y=j;
                    b[now.step].z=-1;
                    return true;
                }
            }
        }
    return false;
}
void pout()
{for (int i=0;i<dep;++i) printf("%d %d %d\n",b[i].x,b[i].y,b[i].z);}
int main()
{
    map st;
    scanf("%d",&n);
    memset(st.a,0,sizeof st.a);
    for (int i=0;i<5;++i)
        for (int j=0;;++j)
        {scanf("%d",&st.a[i][j]); if (st.a[i][j]==0) break;}
    st.step=0; dep=n;
    if (dfs(st)){pout();return 0;}
    printf("-1\n");
}