HDU3377 Plan

题目链接：http://acm.hdu.edu.cn/showproblem.php?pid=3377

---

简单路径要求权值最大，那么为了回避括号序列单独插头的情况特判多，考虑使用最小表示法。

#include<iostream>
#include<cstdio>
#include<algorithm>
#include<vector>
#include<cstdlib>
#include<cmath>
#include<cstring>
using namespace std;
#define maxn 21
#define inf ((0x7fffffff)-1)
#define llg int
#define sizee 233
#define maxnZT ((1<<20)+1)
#define yyj(a) freopen(a".in","r",stdin),freopen(a".out","w",stdout);
llg n,m,code[maxn],zt[2][maxnZT],v[2][maxnZT],g[110][110],size[2],now,ne,ans=inf*-1;
llg maze[10][10],val[10][10],ch[22];
void outcode(llg x){for (llg i=0;i<=m;i++) code[i]=x&3,x>>=2;}

struct node
{
    llg x,val,pos;
};

vector<node>a[2][sizee];

void decode(llg x) {for (llg i=0;i<=m;i++) code[i]=x&7,x>>=3;}

void encode(llg p,llg val)
{
    for (llg i=0;i<=20;i++) ch[i]=-1;
    ch[0]=0;
    llg C=0;
    for (llg i=0;i<=m;i++)
    {
        if (ch[code[i]]==-1) ch[code[i]]=++C;
        code[i]=ch[code[i]];
    }
    llg x=0;
    for (llg i=0;i<=m;i++) x+=code[i]*(1<<(i*3));
    llg wz=x%sizee,E=a[p][wz].size();
    for (llg i=0;i<E;i++)
        if (a[p][wz][i].x==x)
        {
            a[p][wz][i].val=max(a[p][wz][i].val,val);
            v[p][a[p][wz][i].pos]=max(v[p][a[p][wz][i].pos],val);
            return ;
        }
    size[p]++;
    node NEW; NEW.x=x; NEW.val=val; NEW.pos=size[p];
    a[p][wz].push_back(NEW);
    zt[p][size[p]]=x; v[p][size[p]]=val;
}

void init_a(llg p){for (llg i=0;i<sizee;i++) a[p][i].clear(); size[p]=0;}


void shift()///换行 移位
{
    for(int i=m;i>0;i--)
        code[i]=code[i-1];
    code[0]=0;
}


void dp(llg x,llg y)
{
    llg left,up,V;
    for (llg K=1;K<=size[now];K++)
    {
        decode(zt[now][K]);
        left=code[y-1],up=code[y];//左上插头
        V=v[now][K];
//------------------------------------------------------------
        if ((x==1 && y==1))//开始位置
        {
            if (maze[x][y+1])//往左走
            {
                code[y]=17,code[y-1]=0;
                encode(ne,V+val[x][y]);
            }
            if (maze[x+1][y])//往下走
            {
                code[y-1]=17,code[y]=0;
                encode(ne,V+val[x][y]);
            }
            continue;
        }
//------------------------------------------------------------
        if (x==n && y==m)//结束位置
        {
            if ((!left && up) || (left && !up))//必须有且仅有一个插头
            {
                code[y]=code[y-1]=0;
                bool pd=true;
                for (llg t=0;t<=m;t++) if (code[t]) pd=false;
                if (pd) ans=max(ans,V+val[x][y]);
            }
            continue;
        }
//------------------------------------------------------------
        if (left && up)//插头合并
        {
            if (left!=up)//如果属于同一个连通块则非法(因为形成了环)
            {
                code[y]=code[y-1]=0;
                for (llg t=0;t<=m;t++) if (code[t]==up) code[t]=left;
                if (y==m) shift();
                encode(ne,V+val[x][y]);
            }
            continue;
        }
//------------------------------------------------------------
        if (left || up)//延续原来的连通分量
        {
            llg tmp;
            if (left) tmp=left;else tmp=up;
            if (maze[x][y+1])
            {
                code[y-1]=0,code[y]=tmp;
                encode(ne,V+val[x][y]);
            }
            if (maze[x+1][y])
            {
                code[y-1]=tmp,code[y]=0;
                if (y==m) shift();
                encode(ne,V+val[x][y]);
            }
        }
//------------------------------------------------------------
        if (!left && !up)//没有插头，新建连通分量或者不走这一个格子
        {
            if (maze[x][y+1] && maze[x+1][y])
            {
                code[y]=code[y-1]=17;
                encode(ne,V+val[x][y]);
            }
            code[y]=code[y-1]=0;
            if (y==m) shift();
            encode(ne,V);
        }
    }
}

void work()
{
    now=0,ne=0;
    encode(now,0);
    for (llg i=1;i<=n;i++)
    {
        for (llg j=1;j<=m;j++)
        {
            ne=now^1;
            init_a(ne);
            dp(i,j);
            now=ne;
        }
    }
}

void init()
{
    memset(maze,0,sizeof(maze));
    for (llg i=1;i<=n;i++) 
        for (llg j=1;j<=m;j++)
            scanf("%d",&val[i][j]),maze[i][j]=1;
}

int main()
{
    yyj("hdu3377");
    llg cas=0;
    while (scanf("%d%d",&n,&m)!=EOF)
    {
        ans=inf*-1;
        cas++;
        init();
        if (n==1 && m==1) 
        {
            printf("Case %d: %d
",cas,val[n][m]);
            init_a(1),init_a(0);
            continue;
        }
        work();
        printf("Case %d: %d
",cas,ans);
        init_a(1),init_a(0);
    }
    return 0;
}