洛谷 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。

输入输出样例
输入样例#1：
3
1 0
2 1 0
2 3 4 0
3 1 0
2 4 3 4 0
输出样例#1：
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题

---

垃圾题目！消耗了我一个晚上的光阴。
其实这题考的搜索不难，难在模拟。
注意：数据保证最优解为n步。
所以就是模拟每个块的移动，消除。
模拟过程就不说了：具体看各人喜好吧。
说一下剪枝：

1. 消除的时候可以只考虑向上和向右的情况。
2. 重要
   如果这个方块的左边有方块，那就不考虑向左移动的情况了，因为已经在左边的方块向右移动的情况中考虑过了。
3. 小技巧，保存状态时可以多用memcpy，而不是for直接操做内存会快得多。

---

#include<algorithm>
#include<iostream>
#include<cstring>
#include<cstdio>
using namespace std;
int n,f[15][15],ans[15][3];
bool emp()
{
    for(int i=1;i<=5;i++)
        if(f[i][0]>0)
            return 0;
    return 1;
}
void clr()//只考虑向上和向右 
{
    bool flag=0,b[15][15];
    while(!flag)
    {
        memset(b,0,sizeof(b));
        flag=1;
        for(int i=1;i<=5;i++)
            for(int j=1;j<=f[i][0];j++)
            {
                if(j+2<=f[i][0])
                {
                    bool flg=0;
                    for(int k=1;k<=2;k++)//向上 
                        if(f[i][j+k]!=f[i][j])
                            flg=1;
                    if(!flg)
                    {
                        for(int k=j;k<=j+2;k++)
                            b[i][k]=1;
                        flag=0;
                    }
                }
                if(i<=3)
                {
                    bool flg=0;
                    for(int k=1;k<=2;k++)//向上 
                        if(f[i+k][j]!=f[i][j])
                            flg=1;
                    if(!flg)
                    {
                        for(int k=i;k<=i+2;k++)
                            b[k][j]=1;
                        flag=0;
                    }
                }
            }
        for(int i=1;i<=5;i++)
        {
            int t=f[i][0];
            f[i][0]=0;
            for(int j=1;j<=t;j++)
                if(!b[i][j])
                    f[i][++f[i][0]]=f[i][j];
            for(int j=f[i][0]+1;j<=t;j++)
                f[i][j]=0;
        }
    }
}
bool dfs(int dep)
{
    if(dep>n)
    {
        if(emp())
            return 1;
        return 0;
    }
    int tmp[15][15];
    memcpy(tmp,f,sizeof(tmp));//保存状态 
    for(int i=1;i<=5;i++)//列 
        for(int j=1;j<=f[i][0];j++)//行 
            for(int k=1;k>=-1;k-=2)//方向 
                if((i!=1||k!=-1)&&(i!=5||k!=1))
                {
                    ans[dep][1]=i-1,ans[dep][2]=j-1,ans[dep][3]=k;
                    if(f[i+k][j]>0)
                    {
                        if(k==-1)
                            continue;
                        swap(f[i+k][j],f[i][j]);
                    }
                    else
                    {
                        f[i+k][++f[i+k][0]]=f[i][j];
                        for(int g=j+1;g<=f[i][0];g++)
                            f[i][g-1]=f[i][g];
                        f[i][f[i][0]--]=0;
                    }
                    clr();
                    if(dfs(dep+1))
                        return 1;
                    memcpy(f,tmp,sizeof(tmp));
                }
    return 0;
}
int main()
{
    scanf("%d",&n);
    int x;
    for(int i=1;i<=5;i++)
        while(scanf("%d",&x)&&x!=0)
            f[i][++f[i][0]]=x;
    if(dfs(1))
        for(int i=1;i<=n;i++)
            printf("%d %d %d\n",ans[i][1],ans[i][2],ans[i][3]);
    else
        printf("-1\n");
    return 0;
}