HDU 5010 Get the Nut(2014 ACM/ICPC Asia Regional Xi'an Online)

思路：广搜， 因为空格加上动物最多只有32个那么对这32个进行编号，就能可以用一个数字来表示状态了，因为只有 ‘P’   'S' 'M' '.' 那么就可以用4进制刚好可以用64位表示。

接下去每次就是模拟了。

注意：  ‘S’ 不是只有一个。

一个东西如果不是'P'在动的话要先判断周围有没有‘P’，有的话要先吃掉

　　      'P'在动的时候如果一个位置周围有多个东西，都要吃掉。

#include<iostream>
#include<cstdio>
#include<algorithm>
#include<cstring>
#include<cmath>
#include<vector>
#include<queue>
#include<map>
#include<set>
#include<time.h>
#include<string>
#define REP(i,n) for(int i=0;i<n;++i)
#define REP1(i,a,b) for(int i=a;i<=b;++i)
#define REP2(i,a,b) for(int i=a;i>=b;--i)
#define MP make_pair
#define LL long long
#define ULL unsigned long long
#define X first
#define Y second
#define MAXN 1000050
using namespace std;
map<ULL, int> mp;
int dx[] = { , , , - };
int dy[] = { , -, ,  };
char s[][];
int id[][];
int qx[];
int qy[];
int qcnt;
ULL q[MAXN];
ULL bas[];
struct node {
    char a[][];
    int scnt;
    node() {
    }
    ;
    node(ULL now) {
        scnt = ;
        REP(i,)
            REP(j,)
                a[i][j] = s[i][j];
        REP(i,qcnt)
        {
            ULL k = now & ;
            now >>= ;
            if (k == )
                continue;
            if (k == ) {
                a[qx[i]][qy[i]] = 'S';
                scnt++;
            }
            if (k == )
                a[qx[i]][qy[i]] = 'M';
            if (k == )
                a[qx[i]][qy[i]] = 'P';
        }
    }

    void debug(){
        puts("-------");
        REP(i,)
        {
            REP(j,)putchar(a[i][j]);
            puts("");
        }
        puts("------------------");
    }
};

void init() {
    qcnt = ;
    int cid = ;
    memset(id, -, sizeof(id));
    REP(i,)
        REP(j,)
        {
            if (s[i][j] == '#' || s[i][j] == 'N')
                continue;
            qx[qcnt] = i;
            qy[qcnt++] = j;
            id[i][j] = cid++;
        }
}

ULL geths(char s[][]) {
    ULL ans = ;
    REP(i,)
        REP(j,)
        {
            if (s[i][j] == 'S') {
                ans += bas[id[i][j] << ];
                continue;
            }
            if (s[i][j] == 'M') {
                ans +=  * bas[id[i][j] << ];
                continue;
            }
            if (s[i][j] == 'P') {
                ans +=  * bas[id[i][j] << ];
            }
        }
    return ans;
}

bool check(int x, int y) {
    if (x <  || x >=  || y <  || y >= )
        return false;
    return true;
}

node move(node a, int x, int y, int dxx, int dyy, int &p) {
    char c = a.a[x][y];
    while (true) {
        int xx = x + dxx;
        int yy = y + dyy;
        if ((!check(xx, yy)) || a.a[xx][yy] != '.') {
            p = ;
            return a;
        }
        a.a[xx][yy] = a.a[x][y];
        a.a[x][y] = '.';
        if (c == 'P') {
            int flag=;
            for (int j = ; j < ; ++j) {
                int px = xx + dx[j];
                int py = yy + dy[j];
                if (!check(px, py))
                    continue;
                if (a.a[px][py] == 'N') {
                    p = ;
                    return a;
                }
                if (a.a[px][py] == 'S' || a.a[px][py] == 'M') {
                    if (a.a[px][py] == 'S') {
                        a.scnt--;
                        if (a.scnt == ) {
                            p = ;
                            return a;
                        }
                    }
                    a.a[px][py] = '.';
                    flag=;
                }
            }
            if(flag)
            {
                p=;
                return a;
            }
        } else {
            for (int i = ; i < ; ++i) {
                int px = xx + dx[i];
                int py = yy + dy[i];
                if (!check(px, py))
                    continue;
                if (a.a[px][py] == 'P') {
                    if (c == 'S') {
                        a.scnt--;
                        if (a.scnt == ) {
                            p = ;
                            return a;
                        }
                    }
                    a.a[xx][yy] = '.';
                    p = ;
                    return a;
                }
            }

            for (int i = ; i < ; ++i) {
                int px = xx + dx[i];
                int py = yy + dy[i];
                if (!check(px, py))
                    continue;
                if (a.a[px][py] == 'N') {
                    if (c == 'S') {
                        p = ;
                        return a;
                    }
                    p = ;
                    return a;
                }
            }
        }
        x = xx;
        y = yy;
    }
    return a;
}
int d[MAXN];
int bfs(ULL st) {
    int tail = ;
    d[] = ;
    q[tail++] = st;
    mp.clear();
    mp[st] = ;
    for (int i = ; i < tail; ++i) {
        node a = node(q[i]);
        REP(j,)
            REP(k,)
            {
                if (a.a[j][k] == 'S' || a.a[j][k] == 'M' || a.a[j][k] == 'P') {
                    for (int x = ; x < ; ++x) {
                        int p;
                        node e = move(a, j, k, dx[x], dy[x], p);
                        if (p == ) {
                            return d[i] + ;
                        }
                        if (p == ) {
                            ULL hs = geths(e.a);

                            if (mp.find(hs) == mp.end()) {
                                mp[hs] = ;
                                q[tail] = hs;
                                d[tail++] = d[i] + ;
                            }
                        }
                    }
                }
            }
    }
    printf("tail:%d\n",tail);
    return -;
}

int main() {
//    freopen("1.txt","w",stdout);
    bas[] = ;
    for (int i = ; i <= ; ++i)
        bas[i] = bas[i - ] * ;
    while(scanf(" %s",s[])!=EOF){
        for(int i=;i<;++i)scanf(" %s",s[i]);
        init();
        ULL hs=geths(s);
        REP(i,)REP(j,)if(s[i][j]=='S'||s[i][j]=='M'||s[i][j]=='P')s[i][j]='.';
        int ans=bfs(hs);
        printf("%d\n",ans);
    }
    return ;
}