[COGS 622] [NOIP2011] 玛雅游戏 模拟

整个模拟的关键除了打出来就是一个剪枝：对于两个左右相邻的块你不用再走←，因为走→是等效的

#include<cstdio>
#include<cstring>
#include<cstdlib>
#include<ctime>
#define r register
using namespace std;
int f[][][];
int s[][];
bool die[][];
int n;
bool god;
inline void Init()
{
    scanf("%d",&n);
    for(int i=,x;i<=;i++)
      while()
      {
        scanf("%d",&x);
        if(x==)break;
        f[][i][++f[][i][]]=x;
      }
}
void arrange(int h,int x,int y,int t)
{
     s[h][]=x;
     s[h][]=y;
     s[h][]=t;
     memcpy(f[h],f[h-],sizeof(f[h]));
     f[h][x][y]^=f[h][x+t][y]^=f[h][x][y]^=f[h][x+t][y];
     if(!f[h][x][y])++f[h][x+t][],--f[h][x][];
     if(f[h][x][y]==&&f[h][x][y+]!=)
     {
       r int j=y+;
       while(f[h][x][j]!=)
        f[h][x][j-]^=f[h][x][j]^=f[h][x][j-]^=f[h][x][j],++j;
     }
     if(f[h][x+t][y-]==)
     {
       r int j=y-;
       while(f[h][x+t][j]==)
         f[h][x+t][j]^=f[h][x+t][j+]^=f[h][x+t][j]^=f[h][x+t][j+],--j;
     }
     r int get;
     do
     {
       get=;
       for(r int i=;i<=;++i)
        for(r int j=;j<=f[h][i][];++j)
        {
           r int k=;
           while(f[h][i][j]==f[h][i][j+k])++k;
           if(k>=)
           {
             for(int l=;l<k;++l)
              die[i][j+l]=;
           }
           j+=k-;
        }
       for(r int i=;i<=;++i)
        for(r int j=;j<=;++j)
        {
           if(f[h][j][i]==)continue;
           r int k=;
           while(f[h][j][i]==f[h][j+k][i])++k;
           if(k>=)
           {
             for(int l=;l<k;l++)
              die[j+l][i]=;
           }
           j+=k-;
        }
        for(r int i=;i<=;++i)
          for(r int j=;j<=f[h][i][];++j)
           if(die[i][j])
            f[h][i][j]=,die[i][j]=;
        for(r int i=;i<=;++i)
        {
          r int k=;
          for(r int j=;j<=f[h][i][];++j)
           if(f[h][i][j])f[h][i][++k]=f[h][i][j];
           else ++get;
          for(r int j=k+;j<=f[h][i][];++j)f[h][i][j]=;
          f[h][i][]=k;
        }
     }while(get);
}
void dfs(int x)
{
    if(x==n)
    {
      r int sum=;
      for(r int i=;i<=;++i)sum+=f[x][i][];
      if(sum==)god=;
      return;
    }
    for(r int i=;i<=;i++)
     for(r int j=;j<=f[x][i][];j++)
     {
       if(i!=)
       {
         arrange(x+,i,j,);
         dfs(x+);
         if(god)return;
       }
       if(i!=&&f[x][i-][j]==)
       {
         arrange(x+,i,j,-);
         dfs(x+);
         if(god)return;
       }
     }
}
inline void work()
{
    dfs();
    if(god)
    {
      for(int i=;i<=n;i++)
       printf("%d %d %d\n",s[i][]-,s[i][]-,s[i][]);
    }
    else
     printf("-1");
}
int main()
{
    Init();
    work();
    return ;
}