[SDOI2010]猪国杀

题面

（这个做题面的大佬太赞啦）

无聊啊~~~然后就写大模拟，然后就从早上写到下午，生活得到了极大的充实

注意事项：

牌库为空之后再抽牌，会重复抽最后一张被抽走牌

无论在任何过程中，游戏结束（主公死或反贼全死），都中断游戏，直接进入输出阶段

所有人一开始都知道主公的身份

每个人都会无条件帮队友无懈掉决斗万箭南蛮

每个人都会无条件无懈掉对手的无懈

每个人都不会无懈掉队友的无懈

玩家自己的出牌阶段，当玩家用完某一张牌之后，他会从头检索自己之前检索过的牌，看看他们是不是现在可以用了。

反贼当然只会决斗主公啦~~~~

忠臣被主公决斗并不能算跳忠

没了

代码：

#include<cstdio>
#include<cstring>
#include<algorithm>
#include<cmath>
#include<cstdlib>
using namespace std;
struct Player{
    int cardsiz,Hp;
    char typ;
    char card[2010];
    bool eq;
}player[20];
char kn[11],Car_p[2010],sss[10];
int nxt[20],las[20];
int n,m,Fz;
bool ed;
void Input();
void Work();
void Output();
void get_card(int );
void Kil(int ,int );
void JD(int ,int );
void NMRQ(int );
void WJQF(int );
bool WXKJ(int ,int ,int );
void JS(int ,int );
int main()
{
    Input();
    Work();
    Output();
    return 0;
}
void Input(){
    int i,j,k;
    scanf("%d%d",&n,&m);
    for(i=1;i<=n;i++)    nxt[i]=i+1,las[i]=i-1;
    nxt[n]=1,las[1]=n;
    for(i=1;i<=n;i++){
        for(j=1;j<2010;j++)    player[i].card[j]='U';
        scanf("%s",sss),player[i].typ=sss[0];
        for(j=1;j<=4;j++)    scanf("%s",sss),player[i].card[j]=sss[0];
        player[i].cardsiz=player[i].Hp=4;
        if(player[i].typ=='F')    Fz++;
        player[i].eq=false;
    }
    for(i=2;i<=n;i++)    kn[i]='U';
    kn[1]='M';
    for(i=1;i<=m;i++)
        scanf("%s",sss),Car_p[m-i+1]=sss[0];
}
void Work(){
    int i,j,k;
    char cad;
    ed=true;
    if(Fz)    ed=false;
    if(ed)    return ;
    for(i=1;i;i=nxt[i]){
        get_card(i),get_card(i);
        bool kill=true;
        for(j=1;j<=player[i].cardsiz;j++)
            if(player[i].card[j]!='U'){
                if(!player[i].Hp)    break;
                cad=player[i].card[j];
                if(cad=='P'){
                    if(player[i].Hp!=4)
                        player[i].Hp++,player[i].card[j]='U';
                    continue;
                }
                if(cad=='K'){
                    if(!kill&&!player[i].eq)    continue;
                    if(player[i].typ=='M'&&kn[nxt[i]]!='L'&&kn[nxt[i]]!='F')    continue;
                    if(player[i].typ=='Z'&&kn[nxt[i]]!='F')    continue;
                    if(player[i].typ=='F'&&kn[nxt[i]]!='Z'&&kn[nxt[i]]!='M')    continue;
                    player[i].card[j]='U';
                    Kil(i,nxt[i]);
                    kn[i]=player[i].typ,kill=false;
                    if(ed)    return ;
                    continue;
                }
                if(cad=='F'){
                    if(player[i].typ=='F'){
                        player[i].card[j]='U',JD(i,1);
                        kn[i]=player[i].typ;
                        if(ed)    return ;
                        j=0;
                        continue;
                    }
                    for(k=nxt[i];k!=i;k=nxt[k])
                        if((player[i].typ=='M'&&(kn[k]=='L'||kn[k]=='F'))||(player[i].typ=='Z'&&kn[k]=='F')){
                            player[i].card[j]='U',JD(i,k);
                            kn[i]=player[i].typ;
                            if(ed)    return ;
                            j=0;
                            break;
                        }
                    continue;
                }
                if(cad=='N'){
                    player[i].card[j]='U';
                    NMRQ(i);
                    if(ed)    return ;
                    j=0;
                    continue;
                }
                if(cad=='W'){
                    player[i].card[j]='U';
                    WJQF(i);
                    if(ed)    return ;
                    j=0;
                    continue;
                }
                if(cad=='Z'){
                    player[i].eq=true;
                    player[i].card[j]='U';
                    j=0;
                    continue;
                }
            }
    }
}
void Output(){
    int i,j;
    printf("%s",player[1].Hp<=0?"FP
":"MP
");
    for(i=1;i<=n;i++){
        if(player[i].Hp<=0)
            printf("DEAD
");
        else{
            for(j=1;j<=player[i].cardsiz;j++)
                if(player[i].card[j]!='U')
                    printf("%c ",player[i].card[j]);
            printf("
");
        }
    }
}
void get_card(int x){
    if(!m)    m++;
    player[x].card[++player[x].cardsiz]=Car_p[m];
    m--;
}
void Kil(int ker,int ked){
    int i,j;
    for(i=1;i<=player[ked].cardsiz;i++)
        if(player[ked].card[i]=='D'){
            player[ked].card[i]='U';
            return ;
        }
    player[ked].Hp--;
    if(!player[ked].Hp)    JS(ker,ked);
}
void JD(int fucker,int fucked){
    int i,j,k;
    if(WXKJ(fucker,fucked,1))    return ;
    if(fucker==1&&player[fucked].typ=='Z'){
        player[fucked].Hp--;
        if(!player[fucked].Hp)    JS(fucker,fucked);
        return ;
    }
    j=k=1;
    while(1){
        while(player[fucked].card[j]!='K'&&j<=player[fucked].cardsiz)    j++;
        if(j>player[fucked].cardsiz){
            player[fucked].Hp--;
            if(!player[fucked].Hp)    JS(fucker,fucked);
            return ;
        }
        else
            player[fucked].card[j]='U';
        while(player[fucker].card[k]!='K'&&k<=player[fucker].cardsiz)    k++;
        if(k>player[fucker].cardsiz){
            player[fucker].Hp--;
            if(!player[fucker].Hp)    JS(fucked,fucker);
            return ;
        }
        else
            player[fucker].card[k]='U';
    }
}
void NMRQ(int user){
    int usto,i;
    for(usto=nxt[user];usto!=user;usto=nxt[usto])
        if(!WXKJ(user,usto,1)){
            for(i=1;i<=player[usto].cardsiz;i++)
                if(player[usto].card[i]=='K'){
                    player[usto].card[i]='U';
                    break;
                }
            if(i>player[usto].cardsiz){
                player[usto].Hp--;
                if(usto==1&&kn[user]=='U')    kn[user]='L';
                if(!player[usto].Hp)    JS(user,usto);
                if(ed)    return ;
            }
        }
}
void WJQF(int user){
    int usto,i;
    for(usto=nxt[user];usto!=user;usto=nxt[usto])
        if(!WXKJ(user,usto,1)){
            for(i=1;i<=player[usto].cardsiz;i++)
                if(player[usto].card[i]=='D'){
                    player[usto].card[i]='U';
                    break;
                }
            if(i>player[usto].cardsiz){
                player[usto].Hp--;
                if(usto==1&&kn[user]=='U')    kn[user]='L';
                if(!player[usto].Hp)    JS(user,usto);
                if(ed)    return ;
            }
        }
}
bool WXKJ(int user,int usto,int fl){
    int i=user,j,pd=fl?usto:user;
    i=user;
    while(1){
        if(fl==1){
            if(kn[usto]==player[i].typ||(kn[usto]=='M'&&player[i].typ=='Z')||(kn[usto]=='Z'&&player[i].typ=='M'))
                for(j=1;j<=player[i].cardsiz;j++)
                    if(player[i].card[j]=='J'){
                        player[i].card[j]='U';
                        kn[i]=player[i].typ;
                        return !WXKJ(i,user,0);
                    }
        }
        else{
            if(((player[i].typ=='M'||player[i].typ=='Z')&&kn[user]=='F')||(player[i].typ=='F'&&(kn[user]=='M'||kn[user]=='Z')))
                for(j=1;j<=player[i].cardsiz;j++)
                    if(player[i].card[j]=='J'){
                        player[i].card[j]='U';
                        kn[i]=player[i].typ;
                        return !WXKJ(i,user,0);
                    }
        }
        i=nxt[i];
        if(i==user)    break;
    }
    return false;
}
void JS(int ker,int ked){
    int i;
    for(i=1;i<=player[ked].cardsiz;i++)
        if(player[ked].card[i]=='P'){
            player[ked].card[i]='U';
            player[ked].Hp++;
            return ;
        }
    las[nxt[ked]]=las[ked];
    nxt[las[ked]]=nxt[ked];
    if(ked==1){
        ed=true;
        return ;
    }
    if(player[ked].typ=='F')
        Fz--;
    if(!Fz){
        ed=true;
        return ;
    }
    if(player[ked].typ=='F')
        get_card(ker),get_card(ker),get_card(ker);
    if(player[ked].typ=='Z'&&player[ker].typ=='M')
        player[ker].cardsiz=0,player[ker].eq=false;
}