Description
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所示的局面。
Input
第一行为一个正整数n，表示要求游戏关的步数。
接下来的5行，描述7*5的游戏界面。每行若干个整数，每两个整数之间用一个空格隔开，每行以一个0 结束，自下向上表示每竖列方块的颜色编号（颜色不多于10种，从1开始顺序编号，相同数字表示相同颜色）。
输入数据保证初始棋盘中没有可以消除的方块。
Output
如果有解决方案，输出n行，每行包含3个整数x，y，g，表示一次移动，每两个整数之间用一个空格隔开，其中（x，y）表示要移动的方块的坐标，g表示移动的方向，1表示向右移动，-1表示向左移动。注意：多组解时，按照x为第一关键字，y为第二关键字，1优先于-1，给出一组字典序最小的解。游戏界面左下角的坐标为(0, 0)。
如果没有解决方案，输出一行，包含一个整数-1。
Sample Input
3
1 0
2 1 0
2 3 4 0
3 1 0
2 4 3 4 0
Sample Output
2 1 1
3 1 1
3 0 1
码代码时变量名写错真是一件酸爽的事情TAT
其实比想象中的好写很多，就是烦。
详见代码注释。
#include<cstdio>
#include<algorithm>
#include<cstring>
using namespace std;
int n,a[][],c[][],sum[];
struct node{int x,y,dir;}ans[];
bool empty()//判断是否已经清空
{
for(int i=;i<;i++)
for(int j=;j<;j++)
if(a[i][j])return false;
return true;
}
void copy(int x[][],int y[][])
{
for(int i=;i<;i++)
for(int j=;j<;j++)
y[i][j]=x[i][j];
}
void drop()//判断掉落
{
memset(c,,sizeof(c));
for(int i=;i<;i++)
for(int j=,k=;j<;j++)
if(a[i][j])c[i][k++]=a[i][j];
copy(c,a);
}
bool clear()
{
bool flag=false;
int xx,yy,up,dn;
for(int i=;i<;i++)//横向判断块数不小于3
for(int j=;j<;j++)
if(a[i][j])
{
for(xx=i;xx<&&a[xx+][j]==a[i][j];xx++);//横向
if(xx-i+>=)
{
for(int k=i;k<=xx;k++)
{
up=j;dn=j;
while(up+<&&a[k][up+]==a[k][j])up++;
while(dn->=&&a[k][dn-]==a[k][j])dn--;
if(up-dn+>=)
for(int l=dn;l<=up;l++)
a[k][l]=;
else a[k][j]=;
}
flag=true;
}
}
for(int i=;i<;i++)
for(int j=;j<;j++)//纵向判断块数不小于3
if(a[i][j])
{
for(yy=j;yy+<&&a[i][yy+]==a[i][j];yy++);//纵向
if(yy-j+>=)
{
for(int k=j;k<=yy;k++)
{
up=i;dn=i;
while(up+<&&a[up+][k]==a[i][k])up++;
while(dn->=&&a[dn-][k]==a[i][k])dn--;
if(up-dn+>=)
for(int l=dn;l<=up;l++)
a[l][k]=;
else a[i][k]=;
}
flag=true;
}
}
return flag;
}
void dfs(int step)
{
if(step>n)//达到步数
{
if(empty())
{
for(int i=;i<=n;i++)
if(ans[i].dir)printf("%d %d -1\n",ans[i].x+,ans[i].y);
else printf("%d %d 1\n",ans[i].x,ans[i].y);
exit();
}
return;
}
memset(sum,,sizeof(sum));
for(int i=;i<;i++)
for(int j=;j<;j++)
sum[a[i][j]]++;
for(int i=;i<=;i++)//若当前状态里同种颜色方块数量不足3，直接返回
if(sum[i]>&&sum[i]<)return;
for(int i=;i<;i++)//右移优先于左移
for(int j=;j<;j++)
if(a[i][j]!=a[i+][j])//若颜色相同则没有移动的必要
{
int b[][];
copy(a,b);
ans[step]=(node){i,j,!a[i][j]};//注意判断当前方块是否为空
swap(a[i][j],a[i+][j]);
drop();
while(clear())drop();
dfs(step+);
copy(b,a);
}
}
int main()
{
scanf("%d",&n);
for(int i=;i<;i++)
for(int j=;;j++)
{
scanf("%d",&a[i][j]);
if(!a[i][j])break;
}
dfs();
printf("-1\n");
return ;
}
