[NOIP2011] 玛雅游戏

题意：消消乐，要你找出在恰好n步消掉所有方块的方案

题解：

2011年的Day1T3，很早以前就想写了，但是一看到题面那么诡异，蛋蛋就莫名的疼......

其实只写了一个小时就写完了，但这毕竟是道神题，调了差不多一个晚上，而且必须要加一个剪枝才能过

直接暴搜，维护一下块的位置即可

剪枝：若是两个方块交换，则g[i][j]右移和g[i+1][j]左移是一回事，所以只要右移就可以了（加了之后跑的飞快）

用dev c++调的这个题真tm爽......

中秋月圆之夜，调这道蛋疼的题......，联赛不远了，愿oi生涯圆满

#include<iostream>
#include<cstdio>
#include<cstdlib>
#include<cstring>
#include<algorithm>
#include<cmath>
#define ll long long
#define RG register
using namespace std;

int n,inf=1<<30,g[10][10];
bool bj[10][10];

struct Node {
	int x,y,d;
} mov[10],ans[10];

inline void change(int &a, int &b) {
	a^=b,b^=a,a^=b;
}

inline int gi() {
	int x=0,o=1;
	char ch=getchar();
	while(ch!='-' && (ch<'0' || ch>'9')) ch=getchar();
	if(ch=='-') o=-1,ch=getchar();
	while(ch>='0' && ch<='9') x=x*10+ch-'0',ch=getchar();
	return o*x;
}

inline void clean() {
	bool flg;
	do {
		RG int i,j;
		flg=0;
		memset(bj,0,sizeof(bj));
		for(i=1; i<=5; i++) {//找竖的
			for(j=1; j<=7; j++) {
				if(g[i][j]) {
					RG int k=j,cnt=1;
					while(g[i][k+1]==g[i][k] && k<=6) cnt++,k++;
					if(cnt>=3) {
						flg=1;
						for(int l=j; l<=k; l++) bj[i][l]=1;
					}
					j=k;
				} else break;
			}
		}
		for(j=1; j<=7; j++)
			for(i=1; i<=5; i++) {
				if(g[i][j]) {
					RG int k=i,cnt=1;
					while(g[k+1][j]==g[k][j] && k<=4) cnt++,k++;
					if(cnt>=3) {
						flg=1;
						for(int l=i; l<=k; l++) bj[l][j]=1;
					}
					i=k;
				}
			}
		for(i=1; i<=5; i++)
			for(j=1; j<=7; j++)
				if(bj[i][j]) g[i][j]=0;
		for(i=1; i<=5; i++)
			for(j=1; j<=7; j++) {
				if(g[i][j]) {
					RG int k=j;
					while(!g[i][k-1] && k>=2) change(g[i][k],g[i][k-1]),k--;
				}
			}
	} while(flg);
}

inline bool check() {
	for(RG int i=1; i<=5; i++)
		for(RG int j=1; j<=7; j++)
			if(g[i][j]) return false;
	return true;
}

inline void dfs(int dep) {
	if(dep==n+1) {
		if(!check()) return;
		for(RG int i=1; i<=n; i++) {
			printf("%d %d %d\n", mov[i].x-1,mov[i].y-1,mov[i].d);
		}
		exit(0);
	}
	int tmp[10][10];
	memcpy(tmp,g,sizeof(g));
	for(RG int i=1; i<=5; i++)
		for(RG int j=1; j<=7; j++) {
			if(!g[i][j]) break;
			if(i+1<=5) {//右移
				if(i+1==mov[dep-1].x && j==mov[dep-1].y && mov[dep-1].d==-1) goto tp;
				if(i==mov[dep-1].x && j==mov[dep-1].y && mov[dep-1].d==1) goto tp; 
				if(g[i+1][j]) {
					mov[dep].x=i,mov[dep].y=j,mov[dep].d=1;
					change(g[i][j],g[i+1][j]);
					clean();
					dfs(dep+1);
					memcpy(g,tmp,sizeof(tmp));
				} else {
					mov[dep].x=i,mov[dep].y=j,mov[dep].d=1;
					change(g[i][j],g[i+1][j]);
					int k=j;
					while(!g[i+1][k-1] && k>=2) change(g[i+1][k],g[i+1][k-1]),k--;
					for(int l=j+1; l<=7; l++) g[i][l-1]=g[i][l];
					clean();
					dfs(dep+1);
					memcpy(g,tmp,sizeof(tmp));
				}
			}
			tp:
			if(i-1>=1) {//左移
				if(i-1==mov[dep-1].x && j==mov[dep-1].y && mov[dep-1].d==1) continue;
				if(i==mov[dep-1].x && j==mov[dep-1].y && mov[dep-1].d==-1) continue;
				if(!g[i-1][j]) {
					mov[dep].x=i,mov[dep].y=j,mov[dep].d=-1;
					change(g[i][j],g[i-1][j]);
					int k=j;
					while(!g[i-1][k-1] && k>=2) change(g[i-1][k],g[i-1][k-1]),k--;
					for(int l=j+1; l<=7; l++) g[i][l-1]=g[i][l];
					clean();
					dfs(dep+1);
					memcpy(g,tmp,sizeof(tmp));
				}
			}
		}
}

int main() {
	n=gi();
	for(RG int i=1; i<=5; i++) {
		int x,j=0;
		while(scanf("%d", &x) && x) g[i][++j]=x;
	}
	for(RG int i=1; i<=n; i++) {
		ans[i].x=ans[i].y=inf,ans[i].d=-inf;
	}
	dfs(1);
	if(ans[1].x==inf && ans[1].y==inf && ans[1].d==-inf) {
		puts("-1");
		return 0;
	}
	return 0;
}