洛谷 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 所示的局面。

输入输出格式

输入格式：
输入文件mayan.in，共 6 行。

第一行为一个正整数n ，表示要求游戏通关的步数。

接下来的5 行，描述 7*5 的游戏界面。每行若干个整数，每两个整数之间用一个空格隔开，每行以一个0 结束，自下向上表示每竖列方块的颜色编号（颜色不多于10种，从1 开始顺序编号，相同数字表示相同颜色）。

输入数据保证初始棋盘中没有可以消除的方块。

输出格式：
输出文件名为mayan.out。

如果有解决方案，输出 n 行，每行包含 3 个整数x，y，g ，表示一次移动，每两个整数之间用一个空格隔开，其中（x ，y）表示要移动的方块的坐标，g 表示移动的方向，1 表示向右移动，-1表示向左移动。注意：多组解时，按照 x 为第一关健字，y 为第二关健字，1优先于-1 ，给出一组字典序最小的解。游戏界面左下角的坐标为（0 ，0 ）。

如果没有解决方案，输出一行，包含一个整数-1。

输入输出样例

输入样例：
3
1 0
2 1 0
2 3 4 0
3 1 0
2 4 3 4 0

输出样例：
2 1 1
3 1 1
3 0 1

说明

【输入输出样例说明】
按箭头方向的顺序分别为图6 到图11

样例输入的游戏局面如上面第一个图片所示，依次移动的三步是：（2 ，1 ）处的方格向右移动，（3，1 ）处的方格向右移动，（3 ，0）处的方格向右移动，最后可以将棋盘上所有方块消除。

【数据范围】
对于30% 的数据，初始棋盘上的方块都在棋盘的最下面一行；
对于100%的数据，0 < n≤5 。

noip2011提高组day1第3题

---

暴搜……
优先右移，然后再搜左移的情况，右移时注意同色方块交换无意义，左移时只与空的方块交换（若与有颜色的方块交换可以用另一方块右移代替）。每搜到一个方块就维护一次，把所有能消的方块打上标记，最后统一消除然后在回溯时记录答案。

Code：

#include<cstdio>
#include<cstdlib>
#include<cstring>

int w[10][10][10];
int a[10][10];
int d[15],x[10],y[10],f[10];
int t,tot=0,n=5,m=7,tot1,tot2;
bool tf=false,v[10][10];

void swap(int x1,int y1,int x2,int y2)
{
    int kk=a[x1][y1];
    a[x1][y1]=a[x2][y2];
    a[x2][y2]=kk;
}

void ctrl_c(int d)
{
    for(int i=1;i<=n;i++)
        for(int j=1;j<=m;j++)
            w[d][i][j]=a[i][j];
}

void ctrl_v(int d)
{
    for(int i=1;i<=n;i++)
        for(int j=1;j<=m;j++)
            a[i][j]=w[d][i][j];
}

void drop()
{
    for(int i=1;i<=n;i++)
        for(int j=m;j>=1;j--)
            if(!a[i][j])
                for(int k=j;k<=m;k++)
                    swap(i,k,i,k+1);
}

bool find()
{
    bool vv=false;
    memset(v,false,sizeof(v));
    for(int i=1;i<=n;i++)
        for(int j=1;j<=m;j++)
        {
            if(j+2<=m && a[i][j] && a[i][j]==a[i][j+1] && a[i][j]==a[i][j+2]) v[i][j]=v[i][j+1]=v[i][j+2]=true;
            if(i+2<=n && a[i][j] && a[i][j]==a[i+1][j] && a[i][j]==a[i+2][j]) v[i][j]=v[i+1][j]=v[i+2][j]=true; 
        }
    tot1=0;
    for(int i=1;i<=n;i++)
        for(int j=1;j<=m;j++)
            if(v[i][j])
            {
                a[i][j]=0;
                tot1++;
                vv=true;
            }
    return vv;
}

void wh()
{
    tot2=0;
    drop();
    while(find())
    {
        tot2+=tot1;
        drop();
    }
}

void dfs(int k,int dd)
{
    if(k==t+1)
    {
        if(dd==0) tf=true;
        return;
    }
    for(int i=1;i<=n;i++)
        for(int j=1;j<=m;j++)
            if(a[i][j])
            {
                if(i+1<=n && a[i][j]!=a[i+1][j])
                {
                    ctrl_c(k);
                    swap(i,j,i+1,j);
                    wh();
                    dfs(k+1,dd-tot2);
                    if(tf) {x[k]=i;y[k]=j;f[k]=1;return;}
                    ctrl_v(k);
                }
                if(i-1>=1 && a[i-1][j]==0)
                {
                    ctrl_c(k);
                    swap(i,j,i-1,j);
                    wh();
                    dfs(k+1,dd-tot2);
                    if(tf) {x[k]=i;y[k]=j;f[k]=-1;return;}
                    ctrl_v(k);
                }
            }
}

int main()
{
    memset(d,0,sizeof(d));
    scanf("%d",&t);
    for(int i=1;i<=n;i++)
    {
        int c=1,j=0;
        while(c!=0)
        {
            scanf("%d",&c);
            if(c!=0)
            {
                a[i][++j]=c;
                tot++;
                d[c]++;
            }       
        }
    }
    for(int i=1;i<=10;i++)
        if(d[i]==1 || d[i]==2) {printf("-1");return 0;} 
    dfs(1,tot);
    if(!tf) printf("-1");
    else
    {
        for(int i=1;i<=t;i++)
            printf("%d %d %d\n",x[i]-1,y[i]-1,f[i]);
    }
}