NOIP 2011 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题

---

【分析】

调了一下午呀调了一下午，原因是输入写挂了…输入忽略了一列全满时要在此列输入8个数…(最后一个是0)
裸搜，优先向右，左边如果是空的话（就是如果左移这块这块就会降落的话）可以左移，否则不左移。
对于消去，我们应该先不管有降落的块，先消一遍，然后统一降落，然后再消，知道消不了为止…←这些都是令人难受的模拟
我是先消再降落的…所以有一个地方要注意。如果把这块移动之后需要降落，这时我进行一次消除，发现并没有块消除，但是之后可以降落，那么我们降落之后继续消除！

---

【代码】

//NOIP 2011 Mayan游戏 
#include<cmath>
#include<cstdio>
#include<cstring>
#include<iostream>
#include<algorithm>
#define ll long long
#define M(a) memset(a,0,sizeof a)
#define fo(i,j,k) for(i=j;i<=k;i++)
using namespace std;
const int mxn=1e6;
int n,num;
int map[10][10],step[10][5];
inline void print(int x)
{
    int i,j;
    fo(i,1,n)
      printf("%d %d %d\n",step[i][1],step[i][2],step[i][3]);
//  fo(p,0,4){fo(q,0,6) printf("%d ",map[p][q]);cout<<endl;}cout<<endl<<endl;
    exit(0);
}
inline int xiao()
{
    int i,j,res=0,x1,y1;bool czy=0;
    bool vis[10][10];memset(vis,1,sizeof vis);
    fo(x1,0,4)
      fo(y1,0,6)
      if(map[x1][y1])
      {
          int lef=x1,rig=x1,up=y1,down=y1;
            if((y1 && map[x1][y1-1]) || (y1==0))
            {
                while(lef && map[lef-1][y1]==map[x1][y1]) lef--;
                while(rig<4 && map[rig+1][y1]==map[x1][y1]) rig++;
                while(down && map[x1][down-1]==map[x1][y1]) down--;
                while(up<6 && map[x1][up+1]==map[x1][y1]) up++; 
                if(rig-lef>=2) {fo(i,lef,rig) vis[i][y1]=0;}
                if(up-down>=2) {fo(i,down,up) vis[x1][i]=0;}
            }
    }
    fo(i,0,4) fo(j,0,6) if(!vis[i][j]) res++,map[i][j]=0;
    fo(i,0,4)
    {
        fo(j,0,6)
          if(!map[i][j]) break;
        int sta=j;
        fo(j,j,6)
         if(map[i][j]) break;
        if(j==7) continue;
        int end=j-1,t=0;
        fo(j,sta,6)
        {
            t++;
            if(!map[i][end+t] || map[i][j]) break;
            map[i][j]=map[i][end+t];
            map[i][end+t]=0;czy=1;
        }
    }
    if(!res && !czy) return 0;  //如果没有消，弹出 
    res+=xiao();
    return res; //不能再消了 
}
inline void dfs(int dep,int yu)
{
    if(dep>n)
    {
        if(yu==0) print(yu);
        return;
    }
    int i,j,p,q,tmp[10][10];
    fo(i,0,4) fo(j,0,6) tmp[i][j]=map[i][j];
    fo(i,0,4)
      fo(j,0,6)
        if(map[i][j])
        {
            bool flag=0;
            if(i<4 && map[i][j]!=map[i+1][j])  //如果两个不一样，可以右移 
            {
                swap(map[i][j],map[i+1][j]); 
                step[dep][1]=i,step[dep][2]=j,step[dep][3]=1;
                int now=yu-xiao();
                dfs(dep+1,now);
                flag=0;
            }
            if(!flag) fo(p,0,4) fo(q,0,6) map[p][q]=tmp[p][q];flag=1;
            if(i && !map[i-1][j])  //如果左边是空，那么可以左移 
            {
                swap(map[i][j],map[i-1][j]);
                step[dep][1]=i,step[dep][2]=j,step[dep][3]=-1;
                int now=yu-xiao();
                dfs(dep+1,now);
                flag=0;
            }
            if(!flag) fo(p,0,4) fo(q,0,6) map[p][q]=tmp[p][q];
        }
}
int main()
{
    int i,j;
    scanf("%d",&n);
    fo(i,0,4)  //第i列 
      fo(j,0,7)  //从下往上第几个 
      {
          scanf("%d",&map[i][j]);
          if(!map[i][j]) break;
          num++;
      }
    dfs(1,num);
    printf("-1\n");
    return 0;
}