【NOIP2011】洛谷1312 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。

枚举移动方法，然后消除。
消除的时候可以先移动，然后把所有三个连起来的标记之后一起删除，循环直到删除不了为止。
剪枝有：如果某种颜色存在且数量少于3，直接剪掉。左边的右移和右边的左移是等价的，只枚举一种。只枚举两个颜色不同的交换。

#include<cstdio>
#include<cstring>
#include<algorithm>
using namespace std;
const int r=5,c=7;
int a[5][7],px[10],py[10],pz[10],n,cnt[11],tot;
bool clr()
{
    int i,j,k;
    bool flag=0,out[5][7]={0};
    for (i=0;i<r;i++)
    {
        for (j=0;j<c;j++)
          if (!a[i][j])
            for (k=j+1;k<c;k++)
              if (a[i][k])
              {
                swap(a[i][j],a[i][k]);
                break;
              }
    }
    for (i=0;i<r;i++)
      for (j=0;j<c;j++)
      {
        if (i<=r-3&&a[i][j]&&a[i][j]==a[i+1][j]&&a[i+1][j]==a[i+2][j])
          out[i][j]=out[i+1][j]=out[i+2][j]=1,flag=1;
        if (j<=c-3&&a[i][j]&&a[i][j]==a[i][j+1]&&a[i][j+1]==a[i][j+2])
          out[i][j]=out[i][j+1]=out[i][j+2]=1,flag=1;
      }
    for (i=0;i<r;i++)
      for (j=0;j<c;j++)
        if (out[i][j])
        {
            tot--;
            cnt[a[i][j]]--;
            a[i][j]=0;
        }
    return flag;
}
bool dfs(int s)
{
    int i,j;
    for (i=1;i<=10;i++)
      if (cnt[i]&&cnt[i]<3) return 0;
    if (s==n+1) return !tot;
    int t1[5][7],t2[11],t3=tot;
    memcpy(t1,a,sizeof(t1));
    memcpy(t2,cnt,sizeof(cnt));
    for (i=0;i<r-1;i++)
      for (j=0;j<c;j++)
        if (a[i][j]!=a[i+1][j])
        {
            swap(a[i][j],a[i+1][j]);
            if (a[i+1][j])
            {
                px[s]=i;
                py[s]=j;
                pz[s]=1;
            }
            else
            {
                px[s]=i+1;
                py[s]=j;
                pz[s]=-1;
            }
            while (clr());
            if (dfs(s+1)) return 1;
            memcpy(a,t1,sizeof(a));
            memcpy(cnt,t2,sizeof(t2));
            tot=t3;
        }
    return 0;
}
int main()
{
    int i,j;
    scanf("%d",&n);
    for (i=0;i<r;i++)
      for (j=0;;j++)
      {
        scanf("%d",&a[i][j]);
        if (a[i][j])
        {
            tot++;
            cnt[a[i][j]]++;
        }
        else break;
      }
    if (dfs(1))
      for (i=1;i<=n;i++)
        printf("%d %d %d\n",px[i],py[i],pz[i]);
    else
      printf("-1\n");
}