1865：【11NOIP提高组】Mayan 游戏

【题目描述】

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

1、每步移动可以且仅可以沿横向（即向左或向右）拖动某一方块一格：当拖动这一方块时，如果拖动后到达的位置（以下称目标位置）也有方块，那么这两个方块将交换位置（参见输入输出样例说明中的图6 到图7）；如果目标位置上没有方块，那么被拖动的方块将从原来的竖列中抽出，并从目标位置上掉落（直到不悬空，参见下面图1 和图2）；

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

注意：

a) 如果同时有多组方块满足消除条件，几组方块会同时被消除（例如下面图4，三个颜色为11 的方块和三个颜色为22 的方块会同时被消除，最后剩下一个颜色为22 的方块）。

b) 当出现行和列都满足消除条件且行列共享某个方块时，行和列上满足消除条件的所有方块会被同时消除（例如下面图5 所示的情形，55 个方块会同时被消除）。

3、方块消除之后，消除位置之上的方块将掉落，掉落后可能会引起新的方块消除。注意：掉落的过程中将不会有方块的消除。

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

【输入】

共66 行。

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

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

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

【输出】

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

如果没有解决方案，输出一行，包含一个整数−1−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，12，1）处的方格向右移动，（3，13，1）处的方格向右移动，33，00）处的方格向右移动，最后可以将棋盘上所有方块消除。

【数据范围】

对于 30%的数据，初始棋盘上的方块都在棋盘的最下面一行；

对于 100%的数据，0<n≤50<𝑛≤5。

上代码：

#include<bits/stdc++.h>
using namespace std;
struct node{int x,y,g;}ans[10];
struct jie{node x[10];}all;
struct op{int p,x,y,x1,y1;}g;
int n,f[10][10];
stack<op>d;
inline bool check(){
    for(int i=0;i<5;++i)
        for(int j=0;j<7;++j)if(f[i][j])return false;
    return true;
}
inline void down(int x,int y){
    int xx=x,yy=y;
    while(yy>0&&f[xx][yy-1]==0)yy--;
    if(xx!=x||yy!=y){
        d.push({1,x,y,xx,yy});
        swap(f[x][y],f[xx][yy]);
    }
}
inline void update(){
    bool b[10][10];
    memset(b,false,sizeof(b));
    for(int i=0,x,y;i<5;++i)
        for(int j=0;j<7;++j){
            if(f[i][j]==0)continue;
            x=i,y=j;
            while(x<5&&f[x][y]==f[i][j])x++;
            if(x-i>2)for(int k=i;k<x;++k)b[k][j]=true;
            x=i,y=j;
            while(y<7&&f[x][y]==f[i][j])y++;
            if(y-j>2)for(int k=j;k<y;++k)b[i][k]=true;
        }
    for(int i=0;i<5;++i)
        for(int j=0;j<7;++j)
            if(b[i][j]){
                d.push({0,i,j,f[i][j],0});
                f[i][j]=0;
            }
    bool flag=false;
    for(int i=0;i<5;++i)
        for(int j=1;j<7;++j)
            if(f[i][j]&&f[i][j-1]==0)down(i,j),flag=true;
    if(flag)update();
}
inline void turn(int x){
    while(d.size()>x){
        g=d.top(),d.pop();
        if(g.p)swap(f[g.x][g.y],f[g.x1][g.y1]);
        else f[g.x][g.y]=g.x1;
    }
}
inline void up(int x,int y){
    for(int i=y+1;i<7;++i){
        d.push({1,x,i,x,i-1});
        swap(f[x][i],f[x][i-1]);
    }
}
void dfs(int x){
    if(x==n){
        if(check())
            for(int i=0;i<n;++i)all.x[i]=ans[i];
        return;
    }
    int s=d.size();
    for(int i=0;i<5;++i)
        for(int j=0;j<7;++j){
            if(f[i][j]==0)continue;
            ans[x].x=i,ans[x].y=j;
            if(i>all.x[x].x||j>all.x[x].y)
                continue;
            if(i&&f[i-1][j]!=f[i][j]&&f[i-1][j]==0){
                ans[x].g=-1,swap(f[i-1][j],f[i][j]);
                d.push({1,i,j,i-1,j});
                if(!f[i][j])up(i,j),down(i-1,j);
                update();
                dfs(x+1);
                turn(s);
            }
            if(i<4&&f[i+1][j]!=f[i][j]){
                if(1>all.x[x].g)continue;
                ans[x].g=1,swap(f[i+1][j],f[i][j]);
                d.push({1,i,j,i+1,j});
                if(!f[i][j])up(i,j),down(i+1,j);
                update();
                dfs(x+1);
                turn(s);
            }
        }
}
int main(){
    scanf("%d",&n);
    for(int i=0;i<n;++i)
        all.x[i].x=all.x[i].y=all.x[i].g=1e9;
    for(int i=0;i<5;++i)
        for(int j=0;j<8;++j){
            scanf("%d",&f[i][j]);
            if(f[i][j]==0)break;
        }
    dfs(0);
    if(all.x[0].x==1e9)puts("-1");
    else{
        for(int i=0;i<n;++i)
            printf("%d %d %d\n",all.x[i].x,all.x[i].y,all.x[i].g);
    }
    return 0;
}

记得点个赞再走哦~亲