玛雅游戏

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 开始顺序编号，相同数字表示相同颜色）。
输入数据保证初始棋盘中没有可以消除的方块。

输出

如果有解决方案，输出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

       

本题是一个大模拟，大爆搜，至于搜法就是按照题目中给的优先顺序枚举每一个点的移动情况，然后不停的消，不停的下落，知道没有可消的在枚举下一个点；

但是在这里有一个十分重要的剪枝，就是在枚举的时候，如果一个块都右边还有一个块的话，就不枚举，因为这有肯定没有右边的点左移更优，这样就能过了

其中有一个STL memcpy 可以直接复制矩阵，很方便；

#include<cmath>
#include<ctime>
#include<cstdio>
#include<cstdlib>
#include<cstring>
#include<iostream>
#include<algorithm>
using namespace std;
int n;
bool ok(int b[10][10]){
    bool pd=0;
    bool vis[10][10];
    memset(vis,0,sizeof(vis));
    for(int i=0;i<7;i++){
        for(int j=0;j<5;j++){
            if(!b[i][j]) continue;
            int l=j,r=j,p=i,d=i;
            while(l>0 && b[i][l-1]==b[i][j]) l--;
            while(r<5 && b[i][r+1]==b[i][j]) r++;
            while(p<7 && b[p+1][j]==b[i][j]) p++;
            while(d>0 && b[d-1][j]==b[i][j]) d--;
            if((r-l+1)>=3){
                pd=1;
                for(int k=l;k<=r;k++) vis[i][k]=1;
                 
            }
            if((p-d+1)>=3){
                pd=1;
                for(int k=d;k<=p;k++) vis[k][j]=1;
            }
        }
    }
    for(int i=0;i<7;i++){
        for(int j=0;j<5;j++){
            if(vis[i][j]==1) b[i][j]=0;
        }
    }
    return pd;
}
int sum;
void xiao(int b[10][10]){
    while(ok(b)){
        sum=0;
        for(int i=0;i<5;i++){
            for(int j=0;j<7;j++){
                if(b[j][i]==0){
                    for(int k=j+1;k<7;k++){
                        if(b[k][i]){
                            sum++;
                            b[j][i]=b[k][i];
                            b[k][i]=0;
                            break;
                        }
                    }
                }
                else{
                    sum++;
                }
            }
        }
    }
}
void mov(int i,int j,int ord,int b[10][10]){
    if(b[i][j+ord]){
        swap(b[i][j+ord],b[i][j]);
    }
    else {
        int t=i,c=j+ord;
        while(b[t-1][c]==0 && t>0) t--;
        b[t][c]=b[i][j];
        b[i][j]=0;
        for(int k=i;k<7;k++){
            b[k][j]=b[k+1][j];
        }
    }
    xiao(b);
 
}
bool xing(int b[10][10]){
    bool ret=1;
    for(int i=0;i<7;i++){
        for(int j=0;j<5;j++){
            if(b[i][j]) ret=0;
        }
    }
    return ret;
}
bool sc=0;
int shuchu[10][5];
bool zhao;
bool zhao2;
void dfs(int num,int a[10][10]){
    int b[10][10];  
    for(int j=0;j<5;j++){
        for(int i=0;i<7;i++){
            if(a[i][j]==0) continue;
            if(j==0){
                memcpy(b,a,sizeof(b));
                mov(i,j,1,b);
                if(num==n && !sum){
                    sc=1;
                    shuchu[num][2]=i;
                    shuchu[num][1]=j;
                    shuchu[num][3]=1;   
                    return;
                }
                if(num!=n)
                    dfs(num+1,b);
                if(sc){
                    shuchu[num][2]=i;
                    shuchu[num][1]=j;
                    shuchu[num][3]=1;   
                    return;
                }
                 
            }
            else if(j!=4){
                memcpy(b,a,sizeof(b));
                mov(i,j,1,b);
                if(num==n && !sum){
                    sc=1;
                    shuchu[num][2]=i;
                    shuchu[num][1]=j;
                    shuchu[num][3]=1;   
                    return;
                }
                if(num!=n)
                    dfs(num+1,b);
                if(sc){
                    shuchu[num][2]=i;
                    shuchu[num][1]=j;
                    shuchu[num][3]=1;   
                    return;
                }
                if(b[i][j-1]==0){
                    memcpy(b,a,sizeof(b));
                    mov(i,j,-1,b);
                    if(num==n && !sum){
                        sc=1;
                        shuchu[num][2]=i;
                        shuchu[num][1]=j;
                        shuchu[num][3]=-1;  
                        return;
                    }
                    if(num!=n)
                    dfs(num+1,b);
                    if(sc){
                        shuchu[num][2]=i;
                        shuchu[num][1]=j;
                        shuchu[num][3]=-1;  
                        return;
                    }
                }
            }
            else{
                memcpy(b,a,sizeof(b));
                mov(i,j,-1,b);
                if(num==n && !sum){
                    sc=1;
                    shuchu[num][2]=i;
                    shuchu[num][1]=j;
                    shuchu[num][3]=-1;  
                    return;
                }
                if(num!=n)
                dfs(num+1,b);
                if(sc){
                    shuchu[num][2]=i;
                    shuchu[num][1]=j;
                    shuchu[num][3]=-1;  
                    return;
                }
            }
        }
    }
}
int main(){
    //freopen("a.in","r",stdin);//freopen("a.out","w",stdout);
    //freopen("mayan.in","r",stdin); freopen("mayan.out","w",stdout);
    scanf("%d",&n);
    sum=1;
    int x;
    int a[10][10];
    memset(a,0,sizeof(a));
    for(int i=0;i<5;i++){
        int ji=0;
        while(scanf("%d",&x)==1){
            if(x==0) break;
            a[ji++][i]=x;
        }
    }
    /*for(int k=0;k<7;k++){
        for(int h=0;h<5;h++){
            cout<<a[k][h]<<" ";
        }
        cout<<endl;
    }
    cout<<endl;
    mov(0,0,1,a);
    cout<<"sum== "<<sum<<endl;
    for(int k=0;k<7;k++){
        for(int h=0;h<5;h++){
            cout<<a[k][h]<<" ";
        }
        cout<<endl;
    }
    cout<<endl;
    while(1);*/
    dfs(1,a);
    if(!sc){
        cout<<-1<<endl;
    }
    else{
        for(int i=1;i<=n;i++){
            for(int j=1;j<=3;j++){
                cout<<shuchu[i][j]<<" ";
            }
            cout<<endl;
        }
    }
}