UVA 1604：Cubic Eight-Puzzle（模拟，BFS Grade C）

题意：

3*3方格，有一个是空的。其他的每个格子里有一个立方体。立方体最初上下白色，前后红色，左右蓝色。移动的方式为滚。给出初态空的位置，终态上面颜色情况，问最少多少步能到达。如果超过30步不能到达，-1。

思路：

模拟。

另外再加了一个A*优化。就是估计一下。应该还能优化的。感觉像二进制上可以优化。实在不想写了。

代码：

//16:50
#include <cstdio>
#include <cstring>
#include <queue>
#include <map>
using namespace std;

int heng[] = {,,,,,};
int shu[] = {,,,,,};

int go[][] = {{,},{,},{-,},{,-}};

#define N 4
int ch2num[];

int que[];
char step[];

int encodeState(int graph[N][N]) {
    int res = ;
    for (int i = ; i < ; i++) {
        for (int j = ; j < ; j++) {
            res = (res<<) + graph[i][j];
        }
    }
    return res;
}

void decodeState(int state, int graph[N][N]) {
    for (int i = ; i >= ; i--) {
        for (int j = ; j >= ; j--) {
            graph[i][j] = state&;
            state>>=;
        }
    }
}

int initState(int x, int y) {
    int g[N][N];
    for (int i = ; i < ; i++) {
        for (int j = ; j < ; j++) {
            g[i][j] = ;
        }
    }
    g[x][y] = ;
    return encodeState(g);
}

int graph[N][N];
int endgraph[N][N];

int h(int state) {
    int res = ;
    for (int i = ; i >= ; i--) {
        for (int j = ; j >= ; j--) {
            if ( ((state>>)&) != endgraph[i][j] ) res++;
            state >>= ;
        }
    }
    return res-;
}

int endState;
#define CLEAR_EVERY_3(A) ((A)&0x36db6db)
#define ISEND(S) (CLEAR_EVERY_3((S)>>1) == endState)
void initEnd() {
    endState = ;
    for (int i = ; i < ; i++) {
        for (int j = ; j < ; j++) {
            endState = (endState<<)+endgraph[i][j];
        }
    }
}

int main() {
    ch2num['W'] = ;
    ch2num['B'] = ;
    ch2num['R'] = ;
    ch2num['E'] = ;

    int x, y;
    while (scanf("%d%d", &x, &y) != EOF) {
        if (x ==  && y == ) break;
        x--;y--;
        swap(x,y);
        for (int i = ; i < ; i++) {
            for (int j = ; j < ; j++) {
                char tmp[];
                scanf("%s", tmp);
                endgraph[i][j] = ch2num[tmp[]];
            }
        }
        initEnd();

        bool finded = false;
        int ans = ;

        int state = initState(x,y);
        do{
            if (ISEND(state)) {
                finded = true;
                ans = ;
                break;
            }

            int hd = , tl = ;
            que[tl++] = state;

            memset(step,,sizeof(step));
            step[state] = ;

            while (hd < tl) {
                int now = que[hd++];
                if (step[now]- >= ) break;

                if (h(now)+step[now]- > ) continue;

                decodeState(now, graph);

                int si=-, sj;
                for (int i = ; i < ; i++) {
                    for (int j = ; j < ; j++) {
                        if (graph[i][j] == ) {
                            si = i;
                            sj = j;
                            break;
                        }
                    }
                    if (si != -) break;
                }
                if (si == -) puts("error");

                for (int i = ; i < ; i++) {
                    int nx = si + go[i][];
                    int ny = sj + go[i][];

                    if (!( <= nx && nx <  &&  <= ny && ny < )) continue;

                    swap(graph[nx][ny], graph[si][sj]);
                    if (go[i][]) {
                        graph[si][sj] = shu[graph[si][sj]];
                    } else {
                        graph[si][sj] = heng[graph[si][sj]];
                    }

                    int nstate = encodeState(graph);
                    if (ISEND(nstate)) { finded = true; ans = step[now]; break; }

                    if (go[i][]) {
                        graph[si][sj] = shu[graph[si][sj]];
                    } else {
                        graph[si][sj] = heng[graph[si][sj]];
                    }
                    swap(graph[nx][ny], graph[si][sj]);

                    if (step[nstate] != ) continue;
                    step[nstate] = step[now]+;
                    que[tl++] = nstate;
                }
                if (finded) break;
            }
        }while();
        if (finded) printf("%d\n", ans);
        else printf("-1\n");
    }
    return ;
}