bzoj1187: [HNOI2007]神奇游乐园

1187: [HNOI2007]神奇游乐园

经历了一段艰辛的旅程后，主人公小P乘坐飞艇返回。在返回的途中，小P发现在漫无边际的沙漠中，有一块狭长的绿地特别显眼。往下仔细一看，才发现这是一个游乐场，专为旅途中疲惫的人设计。娱乐场可以看成是一块大小为n×m的区域，且这个n×m的区域被分成n×m个小格子，每个小格子中就有一个娱乐项目。然而，小P并不喜欢其中的所有娱乐项目，于是，他给每个项目一个满意度。满意度为正时表示小P喜欢这个项目，值越大表示越喜欢。为负时表示他不喜欢，这个负数的绝对值越大表示他越不喜欢。为0时表示他对这个项目没有喜恶。小P决定将飞艇停在某个小格中，然后每步他可以移动到相邻的上下左右四个格子的某个格子中。小P希望找一条路径，从飞艇所在格出发，最后又回到这个格子。小P有一个习惯，从不喜欢浪费时间。因此，他希望经过每个格子都是有意义的：他到一个地方后，就一定要感受以下那里的惊险和刺激，不管自己是不是喜欢那里的娱乐项目。而且，除了飞艇所在格，其他的格子他不愿意经过两次。小P希望自己至少要经过四个格子。在满足这些条件的情况下，小P希望自己玩过的娱乐项目的满意度之和最高。你能帮他找到这个最高的满意度之和吗？

Input

输入文件中的第一行为两个正整数n和m，表示游乐场的大小为n×m。因为这个娱乐场很狭窄，所以n和m满足：2<=n<=100，2<=m<=6。接下来的n行，每行有m个整数，第i行第j列表示游乐场的第i行第j列的小格子中的娱乐项目的满意度，这个满意度的范围是[-1000，1000]。同一行的两个整数之间用空格隔开。

Output

输出文件中仅一行为一个整数，表示最高的满意度之和。

Sample Input

4 4

100 300 -400 400

-100 1000 1000 1000

-100 -100 -100 -100

-100 -100 -100 1000
Sample Output

4000
HINT

大家测下这个数据 5 5 1 1 -100 3 3 1 1 -100 3 3 1 1 -100 3 3 1 1 -100 3 3 1 1 -100 3 3 结果是30?

这题很久以前就看过了，题解是插头DP
然而当时我不会QAQ
于是这次我又回来了。。
一看，不还是裸题差不多？
我们就只要在有一对括号连续的时候统计答案就好了
哈哈哈——于是就WA了
smg？
TYB大佬告诉我，这样是不行的，因为有这样的情况：

红色的是轮廓线
然后绿色和黄色分别对应插头。。
然后你累计了黄色的答案，然而你会发现，你不小心吧绿色也加上去了
这肯定不是我们想要的啊。。
于是我们特判一下，只有黄色的时候才累计答案就好了

#include<cstdio>
#include<cstring>
#include<iostream>
#include<algorithm>
using namespace std;
typedef long long LL;
const int MOD=100037;
const int N=105;
int n,m;
bool map[N][N];
LL val[N][N];
LL a[2][MOD];//这个状态的最小代价 
int b[2][MOD];//状态
int HASH[MOD];
int num[2];
int now;
LL ans;
LL get(int s,int p)//获取状态s从右向左数的第p位 
{return (s>>((p-1)*2))&3;}
void change(int &s,int p,int v)//把状态s的第p位改成v 
{
    s^=get(s,p)<<((p-1)*2);
    s^=(v)<<((p-1)*2);
}
void update(LL &x,LL y){x=max(x,y);}
void add(int st,LL sum)
{
    int ss=st%MOD;
    while(HASH[ss]!=-1&&b[now][HASH[ss]]!=st)
    {
        ss++;ss%=MOD;
        if(ss==0)ss=1;
    }
    if(HASH[ss]==-1)
    {
        HASH[ss]=++num[now];
        b[now][num[now]]=st;
        a[now][num[now]]=sum;
    }
    else update(a[now][HASH[ss]],sum);
}
void solve ()
{
    a[0][1]=0;num[0]=1;b[0][1]=0;
    for (int u=1;u<=n;u++)
    {
        for (int i=1;i<=m;i++)
        {
            now^=1;num[now]=0;
            memset(HASH,-1,sizeof(HASH));
            for (int k=1;k<=num[now^1];k++)
            {
                int st=b[now^1][k];
                LL sum=a[now^1][k];
                int p=get(st,i),q=get(st,i+1),d=get(st,i+2);//为了不重复计算   引入d这个括号             
                if (p==0&&q==0)
                {
                    add(st,sum);
                    if (map[u][i+1]&&map[u+1][i])
                    {
                        change(st,i,1);
                        change(st,i+1,2);
                        if (d==0) add(st,sum+val[u+1][i]+val[u][i+1]+val[u][i]);
                        else add(st,sum+val[u+1][i]+val[u][i]); 
                    }
                }
                else if (p==0&&q!=0)
                {
                    if (map[u][i+1])
                    {
                        if (d==0) add(st,sum+val[u][i+1]);
                        else add(st,sum);
                    }
                    if (map[u+1][i])
                    {
                        change(st,i,q);
                        change(st,i+1,0);
                        add(st,sum+val[u+1][i]);
                    }
                }
                else if (p!=0&&q==0)
                {
                    if (map[u+1][i]) add(st,sum+val[u+1][i]);
                    if (map[u][i+1])
                    {
                        change(st,i,0);
                        change(st,i+1,p);
                        if (d==0) add(st,sum+val[u][i+1]);
                        else add(st,sum);
                    }
                }
                else if (p==1&&q==2)
                {
                    change(st,i,0);
                    change(st,i+1,0);
                    if (st==0)update(ans,sum);
                }
                else if (p==2&&q==1)
                {
                    change(st,i,0);
                    change(st,i+1,0);
                    add(st,sum);
                }
                else if (p==1&&q==1)
                {
                    int top=1;
                    for(int pos=i+2;pos<=m+1;pos++)
                    {
                        int temp=get(st,pos);
                        if(temp==1)top++;
                        if(temp==2)top--;
                        if(top==0)
                        {
                            change(st,i,0);
                            change(st,i+1,0);
                            change(st,pos,1);
                            add(st,sum);
                            break;
                        }
                    }
                }   
                else if(p==2&&q==2)
                {
                    int top=1;
                    for(int pos=i-1;pos;pos--)
                    {
                        int temp=get(st,pos);
                        if(temp==2)top++;
                        if(temp==1)top--;
                        if(top==0)
                        {
                            change(st,i,0);
                            change(st,i+1,0);
                            change(st,pos,2);
                            add(st,sum);
                            break;
                        }
                    }
                }
            }
        }
        for(int j=1;j<=num[now];j++)b[now][j]<<=2;
    }
}
int main()
{
    scanf("%d%d",&n,&m);
    memset(map,false,sizeof(map));
    ans=-(1LL<<31);now=0;
    for (int u=1;u<=n;u++)
        for (int i=1;i<=m;i++)
        {
            scanf("%lld",&val[u][i]);
            map[u][i]=true;
        }
    solve();
    printf("%lld\n",ans);
    return 0;
}