【NOIP2013】Day1T3 玛雅游戏

玛雅游戏

---

• Description

Mayan puzzle 是最近流行起来的一个游戏。游戏界面是一个 7行 5 列的棋盘，上面堆放
着一些方块，方块不能悬空堆放，即方块必须放在最下面一行，或者放在其他方块之上。游
戏通关是指在规定的步数内消除所有的方块，消除方块的规则如下：

1. 每步移动可以且仅可以沿横向（即向左或向右）拖动某一方块一格：当拖动这一方块时，如果拖动后到达的位置（以下称目标位置）也有方块，那么这两个方块将交换位置（参见输入输出样例说明中的图 6 到图 7）；如果目标位置上没有方块，那么被拖动的方块将从原来的竖列中抽出，并从目标位置上掉落（直到不悬空，参见下面图 1 和图2）；
2. 任一时刻，如果在一横行或者竖列上有连续三个或者三个以上相同颜色的方块，则 它们将立即被消除（参见图 1 到图 3）。
3. 方块消除之后，消除位置之上的方块将掉落，掉落后可能会引起新的方块消除。注 意：掉落的过程中将不会有方块的消除。

上面图 1 到图 3 给出了在棋盘上移动一块方块之后棋盘的变化。棋盘的左下角方块的坐 标为（0, 0），将位于（3, 3）的方块向左移动之后，游戏界面从图 1 变成图 2 所示的状态， 此时在一竖列上有连续三块颜色为 4 的方块，满足消除条件，消除连续 3 块颜色为 4 的方块 后，上方的颜色为 3 的方块掉落，形成图 3 所示的局面。

注意：
a) 如果同时有多组方块满足消除条件，几组方块会同时被消除（例如下面图 4，三个颜色为 1 的方块和三个颜色为 2 的方块会同时被消除，最后剩下一个颜色为 2 的方块）。
b) 当出现行和列都满足消除条件且行列共享某个方块时，行和列上满足消除条件的所 有方块会被同时消除（例如下面图 5 所示的情形，5 个方块会同时被消除）。

• Input Format

输入文件 mayan.in，共 6行。
第一行为一个正整数 n，表示要求游戏通关的步数。
接下来的 5行，描述 7*5 的游戏界面。每行若干个整数，每两个整数之间用一个空格隔开，每行以一个 0 结束，自下向上表示每竖列方块的颜色编号（颜色不多于 10 种，从 1 开始顺序编号，相同数字表示相同颜色）。
输入数据保证初始棋盘中没有可以消除的方块。

• Output Format

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

• Sample Input

3
1 0
2 1 0
2 3 4 0
3 1 0
2 4 3 4 0

• Sample Output

2 1 1
3 1 1
3 0 1

• Hint

按箭头方向的顺序分别为图 6 到图 11

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

---

• 分析

一道搜索题，大致有以下几个剪枝：

1. 如果把两个交换，那肯定是把左边的右移。（题目说的）
2. 如果两个颜色一样，就不用换了。
3. 如果当前颜色最少的不足3块，那肯定就是-1。

---

#include <cstdio>
#include <algorithm>
using namespace std;
const int maxx=5+5,maxy=7+5, maxc=10+5;
int n,c,tmp,a[maxx][maxy],ans[maxx][3],cnt[maxc];
bool f[maxx][maxy];
void fall(int x){//x列下落 
    for (int i=0;i<7;i++)
        if (a[x][i] == 0){
            int j=i+1;
            while (j<7 && a[x][j]==0) j++;
            if (j==7) return;
            else swap(a[x][i],a[x][j]);
        }
}
bool clear(){//整张图消 
    bool flag=false;
    for (int i=0;i<5;i++)
        for (int j=0;j<7;j++){   
            if (!a[i][j]) continue;
            if (i<3 && a[i][j]==a[i+1][j] && a[i][j]==a[i+2][j]) f[i][j]=1,f[i+1][j]=1,f[i+2][j]=1;
            if (j<5 && a[i][j]==a[i][j+1] && a[i][j]==a[i][j+2]) f[i][j]=1,f[i][j+1]=1,f[i][j+2]=1;
        }
    for (int i=0;i<5;i++)
        for (int j=0;a[i][j] && j<7;j++)
            if (f[i][j]){
                flag=true;
                cnt[a[i][j]]--;
                a[i][j]=0;
                f[i][j]=0;
            }
    for (int i=0;i<5;i++) fall(i);
    return flag;
}
int check(){//找出颜色最少的有几个 
    int minc=0;
    for (int i=1;i<=c;i++)
        if (cnt[i])
            if (!minc || minc > cnt[i]) minc = cnt[i];
    return minc;
}
void print(){
    for (int i=1;i<=n;i++) printf("%d %d %d\n",ans[i][0],ans[i][1],ans[i][2]);
    exit(0);
}
void dfs(int move){
    int copya[maxx][maxy],copycnt[maxc];
    for (int i=0;i<5;i++)
        for (int j=0;j<7;j++) copya[i][j]=a[i][j];
    for (int i=1;i<=c;i++) copycnt[i]=cnt[i];
    for (int i=0;i<5;i++)
        for (int j=0;a[i][j] && j<7;j++)
            for (int k=1;k>=-1;k-=2)
                if (i+k>=0 && i+k<5){
                    if ((k==-1 && a[i-1][j]) || a[i][j]==a[i+k][j]) continue;
                    ans[move][0]=i; ans[move][1]=j; ans[move][2]=k;
                    swap(a[i][j],a[i+k][j]);
                    fall(i); fall(i+k);
                    while (clear());
                    int tmp=check();
                    if (move==n){if (tmp==0) print();}
                    else if (tmp>2) dfs(move+1);
                    for (int i=0;i<5;i++)
                        for (int j=0;j<7;j++) a[i][j]=copya[i][j];
                    for (int i=1;i<=c;i++) cnt[i]=copycnt[i];
                }
}
int main(){
    freopen("in.txt","r",stdin);
    freopen("out.txt","w",stdout);
    scanf("%d",&n);
    for (int i=0;i<5;i++)
        for (int j=0;j<=7;j++){
            scanf("%d",&tmp);
            if (tmp==0) break;
            a[i][j]=tmp;
            c=max(c,tmp);
            cnt[tmp]++;
        }
    dfs(1);
    printf("-1\n");
    fclose(stdin); fclose(stdout);
    return 0;
}