luogu P1312 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题

/*
定义的ans数组有x，y，移动方向
读入
dfs(步数)
　　当步数大于n时，判断是否完全消除()，若完全消除，输出
　　统计是否有数的个数已经小于3,若有，退出
　　没有
　　　　遍历所有点，当此点与右边的点不同颜色时
　　　　加入answer
　　　　交换
　　　　下落(多次下落，下落消除后，继续下落)
　　　　while（消除（）） 下落（）

　　　　dfs(步数 + 1)
　　　　回溯
*/

#include <cstdio>
#include <algorithm>
#include <cmath>
#include <cstring>
#include <string>
#include <iostream>

using namespace std;
const int N = 10;

struct Node{
    int x, y, ho;
}answer[N];
int n;
int a[N][N];

inline int read()
{
    int x = 0; char c = getchar();
    while(c < '0' || c > '9')c = getchar();
    while(c >= '0' && c <= '9')x = x * 10 + c - '0', c = getchar();
    return x;
}

void drop()
{
    int num[N][N];
    memset(num, -1, sizeof(num));
    for(int i = 0; i < 5; i ++)
    {
        int h = 0;
        for(int j = 0; j < 7; j ++)
            if(a[i][j])
                num[i][h ++] = j;
    }
    for(int i = 0; i < 5; i ++)
        for(int j = 0; j < 7; j ++)
            a[i][j] = num[i][j] == -1 ? 0 : a[i][num[i][j]];
    return ;
}

bool empty()
{
    for(int i = 0; i < 5; i ++)
        for(int j = 0; j < 7; j ++)
            if(a[i][j])
                return 0;
    return 1;
}

bool clear()
{
    bool ret_flag = 0;
    for(int i = 0; i < 3; i ++)
        for(int j = 0; j < 7; j ++)
            if(a[i][j])
            {
                int x = i;
                while(x < 4 && a[i][j] == a[x + 1][j]) x ++;
                if(x - i >= 2)
                {
                    for(int xx = i; xx <= x; xx ++)
                    {
                        int up = j;
                        int dn = j;
                        while(a[xx][up + 1] == a[i][j] && up < 6) up ++;
                        while(a[xx][dn - 1] == a[i][j] && dn > 0) dn --;
                        if(up - dn >= 2)
                            for(int y_ = dn; y_ <= up; y_ ++)
                                a[xx][y_] = 0;
                    }
                    for(int x_ = i; x_ <= x;  x_ ++)
                        a[x_][j] = 0;
                    ret_flag = 1;
                }
            }
    for(int i = 0; i < 5; i ++)
        for(int j = 0; j < 5; j ++)
            if(a[i][j])
            {
                int y = j;
                while(a[i][y + 1] == a[i][j] && y < 6) y ++;
                if(y - j >= 2)
                {
                    for(int yy = j; yy <= y; yy ++)
                    {
                        int lef = i;
                        int rig = i;
                        while(a[lef - 1][yy] == a[i][j] && lef > 0) lef --;
                        while(a[rig + 1][yy] == a[i][j] && rig < 6) rig ++;
                        if(rig - lef >= 2)
                            for(int x_ = lef; x_ <= rig; x_ ++)
                                a[x_][yy] = 0;
                    }
                    for(int y_ = j; y_ <= y; y_ ++)
                        a[i][y_] = 0;
                    ret_flag = 1;
                }
            }
    if(ret_flag) return 1;
    else return 0;
}

void dfs(int tot)
{
    if(tot > n)
    {
        if(empty())
        {
            for(int i = 1; i <= n; i ++) 
            {
                if(answer[i].ho)
                    printf("%d %d %d
", answer[i].x + 1, answer[i].y, -1);
                else
                    printf("%d %d %d
", answer[i].x, answer[i].y, 1);
            }
            exit(0);
        }
        return ;
    }        
    int sum[N + 1];
    memset(sum, 0, sizeof(sum));
    for(int i = 0; i < 5; i ++)
        for(int j = 0; j < 7; j ++)
            sum[a[i][j]] ++;
    for(int i = 1; i <= 10; i ++)
        if(sum[i] && sum[i] <= 2)
            return ;
    for(int i = 0; i < 4; i ++)
        for(int j = 0; j < 7; j ++)
            if(a[i][j] != a[i + 1][j])
            {
                answer[tot].x = i;
                answer[tot].y = j;
                answer[tot].ho = (!a[i][j]);
                int tmp[N][N];
                memcpy(tmp, a, sizeof(tmp));
                swap(a[i][j], a[i + 1][j]);
                drop();
                while(clear()) drop();
                dfs(tot + 1);
                answer[tot].x = 0;
                answer[tot].y = 0;
                answer[tot].ho = 0;
                memcpy(a, tmp, sizeof(a));
            }
}

int main()
{
    n = read();
    for(int i = 0; i < 5; i ++)
    {
        for(int j = 0; ; j ++)
        {
            a[i][j] = read();
            if(!a[i][j]) break;
        }    
    }
    dfs(1);
    printf("-1
"); 
    return 0;
}
/*
3
1 0
2 1 0
2 3 4 0
3 1 0
2 4 3 4 0
*/