poj 3592 Instantaneous Transference 强连通+缩点+最长路

题目链接：http://poj.org/problem?id=3592

题目大意 ：坦克一开始在(0,0),只可以向右边或下边走，走过的时候可以获得该格子上面的矿物(只能采集一次，之后矿物消失)。
同时地图上存在若干神奇的传送门，若走到上面，可以选择 是否传送，如果传送，那么传送目标的坐标诶出，传送门使用次数无限。
之后题目跪求坦克能获得的最多矿物是多少。

题目分析：按照给定的图构图，然后用tarjan求强连通分量+缩点，构造新图，再从0，0开始求一个最长路 

               题目里面的各种坑：传送门可能会到#处 需要特判 注意每个点的编号 注意用spfa求最长路的方法 剩下的就是套模板了。。

#include<stdio.h>
#include<string.h>
#include<algorithm>
#include<queue>
#define N 2100
#define M 21000
#define CC(x,y) memset(x,y,sizeof(x))
using namespace std;
struct node
{
    int y,ne;
} e[M];
struct node1
{
    int y,ne;
} e1[M];
struct node2
{
    int x,y;
} ee[N];
int dfn[N],low[N],instack[N],stack[N],belong[N],i,j,k,m,n,x,y,z,h[N],h1[N],f[N],dis[N],k1,nn;
int a[N],bcnt,num,top,b[N];
void add(int x,int y)
{
    e[k].y=y;
    e[k].ne=h[x];
    h[x]=k++;
}
void tarjan(int x)
{
    int i,j,k;
    dfn[x]=low[x]=++num;
    stack[++top]=x;
    instack[x]=1;
    for (int i=h[x]; i!=-1; i=e[i].ne)
    {
        j=e[i].y;
        if (dfn[j]==0)
        {
            tarjan(j);
            low[x]=min(low[j],low[x]);
        }
        else if (instack[j]) low[x]=min(low[j],low[x]);
    }
    if (dfn[x]==low[x])
    {
        bcnt++;
        do
        {
            j=stack[top--];
            instack[j]=0;
            belong[j]=bcnt;
            b[bcnt]+=a[j];
        }
        while (j!=x);
    }
}
void add1(int x,int y)
{
    e1[k1].y=y;
    e1[k1].ne=h1[x];
    h1[x]=k1++;
}
void build()
{
    for (int i=0; i<n; i++)
        for (int j=h[i]; j!=-1; j=e[j].ne)
        {
            k=e[j].y;
            if (belong[i]!=belong[k])
                add1(belong[i],belong[k]);
        }
}
void spfa()
{
    int i,j,k;
    CC(dis,0);
    queue<int>q;
    while (!q.empty())q.pop();
    q.push(belong[0]);
    CC(f,0);
    f[belong[0]]=1;
    dis[belong[0]]=b[belong[0]];
    while (!q.empty())
    {
        int x=q.front();
        q.pop();
        for (i=h1[x]; i!=-1; i=e1[i].ne)
        {
            int y=e1[i].y;
            if (dis[y]<dis[x]+b[y])
            {
                dis[y]=dis[x]+b[y];
                if (!f[y])
                {
                    f[y]=1;
                    q.push(y);
                }
            }
        }
        f[x]=0;
    }
    int ans=0;
    for (i=1; i<=bcnt; i++)
        ans=max(ans,dis[i]);
    printf("%d\n",ans);
}
void solve()
{
    bcnt=num=top=0;
    int i,j;
    CC(dfn,0),CC(low,0),CC(stack,0),CC(instack,0),CC(belong,0);
    CC(h1,-1); CC(b,0);k1=0;
    n=n*m;
    for (i=0; i<n; i++)
        if (!dfn[i])tarjan(i);
    build();
    spfa();
}
int main()
{
    char s[50][50];
    int tt;
    scanf("%d",&tt);
    while (tt--)
    {
        scanf("%d%d",&n,&m);
        k=0;
        CC(h,-1);
        CC(a,0);
        for (i=0; i<n; i++)
            scanf("%s",s[i]);
        int sum=0;
        for (i=0; i<n; i++)
            for (j=0; j<m; j++)
              if(s[i][j]!='#')
                {
                    if(i+1<n&&s[i+1][j]!='#')add(i*m+j,(i+1)*m+j);
                    if(j+1<m&&s[i][j+1]!='#')add(i*m+j,i*m+j+1);
                    a[i*m+j]=s[i][j]-'0';
                    if(s[i][j]=='*')
                    {
                       a[i*m+j]=0;
                       scanf("%d%d",&x,&y);
                       if(s[x][y]!='#')
                            add(i*m+j,x*m+y);
                    }
                }
        solve();
    }
    return 0;
}