Mayan 游戏

题目

题目描述

Mayan puzzle是最近流行起来的一个游戏。游戏界面是一个77 行\times 5×5列的棋盘，上面堆放着一些方块，方块不能悬空堆放，即方块必须放在最下面一行，或者放在其他方块之上。游戏通关是指在规定的步数内消除所有的方块，消除方块的规则如下：

1 、每步移动可以且仅可以沿横向（即向左或向右）拖动某一方块一格：当拖动这一方块时，如果拖动后到达的位置（以下称目标位置）也有方块，那么这两个方块将交换位置（参见输入输出样例说明中的图66到图77 ）；如果目标位置上没有方块，那么被拖动的方块将从原来的竖列中抽出，并从目标位置上掉落（直到不悬空，参见下面图1 和图2）；

2 、任一时刻，如果在一横行或者竖列上有连续三个或者三个以上相同颜色的方块，则它们将立即被消除（参见图1 到图3）。

注意：

a) 如果同时有多组方块满足消除条件，几组方块会同时被消除（例如下面图44 ，三个颜色为11 的方块和三个颜色为 22 的方块会同时被消除，最后剩下一个颜色为22的方块）。

b) 当出现行和列都满足消除条件且行列共享某个方块时，行和列上满足消除条件的所有方块会被同时消除（例如下面图5 所示的情形，5 个方块会同时被消除）。

3 、方块消除之后，消除位置之上的方块将掉落，掉落后可能会引起新的方块消除。注意：掉落的过程中将不会有方块的消除。

上面图1 到图 3 给出了在棋盘上移动一块方块之后棋盘的变化。棋盘的左下角方块的坐标为（0, 0 ），将位于（3, 3 ）的方块向左移动之后，游戏界面从图 1 变成图 2 所示的状态，此时在一竖列上有连续三块颜色为4 的方块，满足消除条件，消除连续3 块颜色为4 的方块后，上方的颜色为3 的方块掉落，形成图 3 所示的局面。

输入格式

共 6 行。

第一行为一个正整数nn，表示要求游戏通关的步数。

接下来的55行，描述7 \times 57×5 的游戏界面。每行若干个整数，每两个整数之间用一个空格隔开，每行以一个00结束，自下向上表示每竖列方块的颜色编号（颜色不多于1010种，从11开始顺序编号，相同数字表示相同颜色）。

输入数据保证初始棋盘中没有可以消除的方块。

输出格式

如果有解决方案，输出nn行，每行包含 33 个整数x,y,gx,y,g，表示一次移动，每两个整数之间用一个空格隔开，其中(x ,y)(x,y)表示要移动的方块的坐标，gg 表示移动的方向，11 表示向右移动，-1−1表示向左移动。注意：多组解时，按照xx为第一关健字，yy为第二关健字，11优先于-1−1 ，给出一组字典序最小的解。游戏界面左下角的坐标为(0 ,0)(0,0)。

如果没有解决方案，输出一行，包含一个整数-1−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

说明/提示

【输入输出样例说明】

按箭头方向的顺序分别为图66到图1111

样例输入的游戏局面如上面第一个图片所示，依次移动的三步是：(2 ,1 )(2,1)处的方格向右移动，(3,1)(3,1)处的方格向右移动，(3,0)(3,0)处的方格向右移动，最后可以将棋盘上所有方块消除。

【数据范围】

对于30\%30%的数据，初始棋盘上的方块都在棋盘的最下面一行；

对于100\%100%的数据，0 < n≤50<n≤5 。

noip2011提高组day1第3题

 

题解&分析

这道题就是一道模拟 + 搜索题。

枚举每一步的答案，然后有几个剪枝：

1.空格是不合法的，不能移动

2.同色的格子移动没有用

3.对于向左移，因为有一个右边大于左边的优先级，所以如果向左移要到的格子是有色的，那么将目标格子向右移就会更优，且效果一样

代码:

#include <iostream>
#include <cstdio>
#include <cstring>
#include <cstdlib>
#include <cmath>
#include <map>
#include <vector>
#include <algorithm>
using namespace std;
#define ll long long
int n , m , a[13][13];
int ansx[13] , ansy[13] , ansp[13];
struct node{
    int x , y;
};
node chan[40];
int cnt;
int now[6][13][13];
bool check( int x , int y , int d ){
    if( now[d][x-1][y] == now[d][x][y] && now[d][x][y] == now[d][x+1][y] )
        return 1;
    if( now[d][x+1][y] == now[d][x][y] && now[d][x+2][y] == now[d][x+1][y] )
        return 1;
    if( now[d][x-1][y] == now[d][x][y] && now[d][x][y] == now[d][x-2][y] )
        return 1;
    if( now[d][x][y-1] == now[d][x][y] && now[d][x][y] == now[d][x][y+1] )
        return 1;
    if( now[d][x][y+1] == now[d][x][y] && now[d][x][y+2] == now[d][x][y+1] )
        return 1;
    if( now[d][x][y-1] == now[d][x][y] && now[d][x][y] == now[d][x][y-2] )
        return 1;
    return 0;
}
void dfs( int x , int lx , int ly ){
    if( x == n + 1 ){
        for( int i = 1 ; i <= 7 ; i ++ )
            for( int j = 1 ; j <= 5 ; j ++ ){
                if( now[x-1][i][j] > 0 )
                    return ;
            }
        for( int i = 1 ; i <= n ; i ++ ){
            printf( "%d %d %d\n" , ansy[i] - 1 , ansx[i] - 1 , ansp[i] );
        }
        exit( 0 );
    }
    for( int j = 1 ; j <= 5 ; j ++ ){
        for( int i = 1 ; i <= 7 ; i ++ ){
            /*if( x == 1 && ( i != 5 || j != 1 ) ) continue;
            if( x == 2 && ( i != 3 || j != 1 ) ) continue;
            if( x == 3 && ( i != 4 || j != 2 ) ) continue;
            if( x == 4 && ( i != 3 || j != 4 ) ) continue;
            if( x == 5 && ( i != 1 || j != 4 ) ) continue;*/
            if( now[x-1][i][j] == 0 ) continue;
            memcpy( now[x] , now[x-1] , sizeof( now[x] ) );
            if( now[x][i][j] != now[x][i][j+1] && j != 5 ){
                ansx[x] = i , ansy[x] = j , ansp[x] = 1;
                if( now[x][i][j+1] == 0 ){
                    int k;
                    for( k = i - 1 ; k >= 1 ; k -- ){
                        if( now[x][k][j+1] ){
                            now[x][k+1][j+1] = now[x][i][j];
                            break;
                        }
                        else
                            now[x][k+1][j+1] = 0;
                    }
                    if( k <= 0 ){
                        now[x][1][j+1] = now[x][i][j];
                    }
                    for( k = i + 1 ; k <= 7 ; k ++ )
                        now[x][k-1][j] = now[x][k][j];
                    now[x][k-1][j] = 0;
                }
                else
                    swap( now[x][i][j] , now[x][i][j+1] );
                while( 1 ){
                        memset( chan , 0 , sizeof( chan ) ); cnt = 0;
                        for( int ii = 7 ; ii >= 1 ; ii -- ){
                            for( int jj = 1 ; jj <= 5 ; jj ++ ){
                                if( now[x][ii][jj] == 0 ) continue;
                                if( check( ii , jj , x ) ){
                                    chan[++cnt].x = ii , chan[cnt].y = jj;
                                }
                            }
                        }
                        if(!cnt) break;
                        for( int ii = 1 ; ii <= cnt ; ii ++ ){
                            int xx = chan[ii].x , y = chan[ii].y;
                            int k;
                            for( k = xx + 1 ; k <= 7 ; k ++ )
                                now[x][k-1][y] = now[x][k][y];
                            now[x][7][y] = 0;
                        }
                }
                /*printf( "x = %d    %d %d %d\n" , x , i , j , ansp[x] );
                for( int i = 7 ; i >= 1 ; i -- ){
                    for( int j = 1 ; j <= 5 ; j ++ )
                        printf( "%d " , now[x][i][j] );
                    printf( "\n" );
                }*/

                dfs( x + 1 , i , j );
            }
            memcpy( now[x] , now[x-1] , sizeof( now[x] ) );
            if( now[x][i][j] != now[x][i][j-1] && j != 1 && now[x][i][j-1] == 0 ){
                ansx[x] = i , ansy[x] = j , ansp[x] = -1;
                if( now[x][i][j-1] == 0 ){
                    int k;
                    for( k = i - 1 ; k >= 1 ; k -- ){
                        if( now[x][k][j-1] ){
                            now[x][k+1][j-1] = now[x][i][j];
                            break;
                        }
                        else
                            now[x][k+1][j-1] = 0;
                    }
                    if( k <= 0 ){
                        now[x][1][j-1] = now[x][i][j];
                    }
                    for( k = i + 1 ; k <= 7 ; k ++ )
                        now[x][k-1][j] = now[x][k][j];
                    now[x][k-1][j] = 0;
                }
                else
                    swap( now[x][i][j] , now[x][i][j-1] );
                while( 1 ){
                        memset( chan , 0 , sizeof( chan ) ); cnt = 0;
                        for( int ii = 7 ; ii >= 1 ; ii -- ){
                            for( int jj = 1 ; jj <= 5 ; jj ++ ){
                                if( now[x][ii][jj] == 0 ) continue;
                                if( check( ii , jj , x ) ){
                                    chan[++cnt].x = ii , chan[cnt].y = jj;
                                }
                            }
                        }
                        if(!cnt) break;
                        for( int ii = 1 ; ii <= cnt ; ii ++ ){
                            int xx = chan[ii].x , y = chan[ii].y;
                            int k;
                            for( k = xx + 1 ; k <= 7 ; k ++ )
                                now[x][k-1][y] = now[x][k][y];
                            now[x][7][y] = 0;
                        }
                }
                dfs( x + 1 , i , j );
            }
        }
    }
}
int main(){
    scanf( "%d" , &n );
    for( int i = 1 ; i <= 5 ; i ++ ){
        int x , p = 1;
        while( 1 ){
            scanf( "%d" , &x );
            if( !x ) break;
            a[p++][i] = x;
        }
    }
    memcpy( now[0] , a , sizeof( now[0] ) );
    dfs( 1 , 0 , 0 );
    printf( "-1" );
    return 0;
}