P7147 [THUPC2021初赛]麻将模拟器 题解
做完 pkusc2022 day2t3 雀圣之后跑来做这题。
首先我们考虑雀圣那题。那个题是说给你一副 \(13\) 张的手牌，让你算向听数。设 \(dp[i][j][0/1][p1][p2][up][dn]=0/1\) 表示考虑到 \(i\) 花色第 \(j\) 张牌，是否已经有雀头，上张牌剩下 \(p1\) 张，这张牌剩下 \(p2\) 张，已经加了 \(up\) 张，已经扔了 \(dn\) 张的状态是否可以达到。枚举当前这张牌加几张、删几张，是否作为雀头，能作为刻子就一定作为刻子，和前两张牌组成顺子，然后转移一下。每一种花色转移完之后清掉除 \(p1=p2=0\) 之外的所有状态即可。
有了这个 dp 这题剩下的就不难了。特殊牌的话就先处理一下，PASS 就多跳一个，DOUBLE 和 REVERSE 就定义一个 \(delta=1/-1\)，每次加 \(delta\) 表示顺/逆时针即可。进入打牌阶段之后，对每个玩家记一个当前和牌距离。打牌就是每次枚举打哪一张，dp算一下取一个和牌距离最短且最大的，打出去之后再对另外的玩家判一下碰和吃即可。虽然复杂度比较高，但是看起来可以过。
code(8.3k)：
点击查看代码
#include<cstdio>
#include<iostream>
#include<cstring>
#include<map>
#define memset __builtin_memset
#define mp std::make_pair
#define fi first
#define se second
typedef std::pair<int,int> pii;
std::map<char,int> ms;
inline void chkmin(int &a,const int &b){if(b<a)a=b;}
inline char cc(int x){return (char)(x+'A');}
inline char cn(int x){return (char)(x+'0');}
char nam[8]={'0','E','S','W','N','B','F','Z'},nam1[3]={'M','P','S'};
int limt[5]={9,9,9,7,3};
std::string nam2[4]={"","PASS","REVERSE","DOUBLE"};
inline void init(){
ms['E']=1,ms['S']=2,ms['W']=3,ms['N']=4,ms['B']=5,ms['F']=6,ms['Z']=7;
}
inline std::string f(pii x){
std::string res="";
if(x.fi<=2) res+=cn(x.se),res+=nam1[x.fi];
else if(x.fi==3) res+=nam[x.se];
else res=nam2[x.se];
return res;
}
int a[4][5][10],to[4];
inline void print_in(int o,const char *in){printf("%c IN %s\n",cc(o),in);}
inline void print_out(int o,const char *out,int oo){
if(out[0]=='P') printf("%c OUT %s %c\n",cc(o),out,cc(oo));
else printf("%c OUT %s\n",cc(o),out);
}
inline void print_pong(int o,const char *pong){printf("%c PONG %s %s %s\n",cc(o),pong,pong,pong);}
inline void print_chow(int o,const char *chow1,const char *chow2,const char *chow3){printf("%c CHOW %s %s %s\n",cc(o),chow1,chow2,chow3);}
inline void print_selfdrawn(int o){printf("%c SELFDRAWN\n",cc(o));}
inline void print_ron(int o){printf("%c RON\n",cc(o));}
inline void print_win(int o){printf("%c WIN\n",cc(o));}
inline void rd(int o,const char *in){
if(in[0]=='P') a[o][4][1]++;
else if(in[0]=='R') a[o][4][2]++;
else if(in[0]=='D') a[o][4][3]++;
else if(in[0]>='1'&&in[0]<='9'){
int tmp;
if(in[1]=='M') tmp=0;else if(in[1]=='P') tmp=1;else tmp=2;
a[o][tmp][in[0]-'0']++;
}
else a[o][3][ms[in[0]]]++;
}
inline int findans(int a[5][10],bool flag=0){
static bool dp[6][10][2][3][3][14][13];
memset(dp,0,sizeof dp);
dp[0][0][0][0][0][0][0]=1;
for(int o=0;o<=4;++o){
for(int i=1;i<=limt[o];++i){
for(int qt=0;qt<=1;++qt)
for(int p1=0;p1<=2;++p1)
for(int p2=p1;p2<=2;++p2)
for(int up=0;up<=13;++up)
for(int dn=0;dn<=12;++dn){
if(!dp[o][i-1][qt][p1][p2][up][dn]) continue;
//不加不减
int now=a[o][i];
//雀头
if(o<=3&&!qt&&now>=2){
now-=2;
if(!p1) dp[o][i][1][p2][now][up][dn]=1;
if(o<=2&&p1==1&&p2>=1&&now>=1) dp[o][i][1][p2-1][now-1][up][dn]=1;
if(o<=2&&p1==2&&p2>=2&&now>=2) dp[o][i][1][p2-2][now-2][up][dn]=1;
now+=2;
}
//是否有刻子
if(o<=3&&now>=3){
now-=3;
if(!p1) dp[o][i][qt][p2][now][up][dn]=1;
if(o<=2&&p1==1&&p2>=1&&now>=1) dp[o][i][qt][p2-1][now-1][up][dn]=1;
}
else{
if(!p1) dp[o][i][qt][p2][now][up][dn]=1;
if(o<=2&&p1==1&&p2>=1&&now>=1) dp[o][i][qt][p2-1][now-1][up][dn]=1;
if(o<=2&&p1==2&&p2>=2&&now>=2) dp[o][i][qt][p2-2][now-2][up][dn]=1;
}
for(int j=1;j<=4-a[o][i]&&up+j<=13;++j){//加
now=a[o][i]+j;
if(o<=3&&!qt&&now>=2){
now-=2;
if(!p1) dp[o][i][1][p2][now][up+j][dn]=1;
if(o<=2&&p1==1&&p2>=1&&now>=1) dp[o][i][1][p2-1][now-1][up+j][dn]=1;
if(o<=2&&p1==2&&p2>=2&&now>=2) dp[o][i][1][p2-2][now-2][up+j][dn]=1;
now+=2;
}
if(o<=3&&now>=3){
now-=3;
if(!p1) dp[o][i][qt][p2][now][up+j][dn]=1;
if(o<=2&&p1==1&&p2>=1&&now>=1) dp[o][i][qt][p2-1][now-1][up+j][dn]=1;
}
else{
if(!p1) dp[o][i][qt][p2][now][up+j][dn]=1;
if(o<=2&&p1==1&&p2>=1&&now>=1) dp[o][i][qt][p2-1][now-1][up+j][dn]=1;
if(o<=2&&p1==2&&p2>=2&&now>=2) dp[o][i][qt][p2-2][now-2][up+j][dn]=1;
}
}
for(int j=1;j<=a[o][i]&&dn+j<=12;++j){//减
now=a[o][i]-j;
if(o<=3&&!qt&&now>=2){
now-=2;
if(!p1) dp[o][i][1][p2][now][up][dn+j]=1;
if(o<=2&&p1==1&&p2>=1&&now>=1) dp[o][i][1][p2-1][now-1][up][dn+j]=1;
if(o<=2&&p1==2&&p2>=2&&now>=2) dp[o][i][1][p2-2][now-2][up][dn+j]=1;
now+=2;
}
if(o<=3&&now>=3){
now-=3;
if(!p1) dp[o][i][qt][p2][now][up][dn+j]=1;
if(o<=2&&p1==1&&p2>=1&&now>=1) dp[o][i][qt][p2-1][now-1][up][dn+j]=1;
}
else{
if(!p1) dp[o][i][qt][p2][now][up][dn+j]=1;
if(o<=2&&p1==1&&p2>=1&&now>=1) dp[o][i][qt][p2-1][now-1][up][dn+j]=1;
if(o<=2&&p1==2&&p2>=2&&now>=2) dp[o][i][qt][p2-2][now-2][up][dn+j]=1;
}
}
}
}
for(int qt=0;qt<=1;++qt)
for(int up=0;up<=13;++up)
for(int dn=0;dn<=12;++dn)
dp[o+1][0][qt][0][0][up][dn]=dp[o][limt[o]][qt][0][0][up][dn];
}
for(int ans=0;ans<=12;++ans)
if(dp[5][0][1][0][0][ans+flag][ans]) return ans+flag;
}
inline pii findout(int o){
for(int i=1;i<=3;++i)
if(a[o][4][i]) return --a[o][4][i],mp(4,i);
int res=13;pii ans;
for(int oo=3;oo>=0;--oo)
for(int i=limt[oo];i;--i){
if(!a[o][oo][i]) continue;
a[o][oo][i]--;int tmp;
if((tmp=findans(a[o],1))<res) res=tmp,ans=mp(oo,i);
a[o][oo][i]++;
}
return --a[o][ans.fi][ans.se],to[o]=res,ans;
}
inline bool drawn(int a[5][10]){
if(a[4][1]||a[4][2]||a[4][3]) return 0;
int b[5][10];
for(int oo=0;oo<=3;++oo)
for(int ii=1;ii<=limt[oo];++ii){
for(int ooo=0;ooo<=3;++ooo)for(int iii=1;iii<=limt[ooo];++iii)b[ooo][iii]=a[ooo][iii];
if(b[oo][ii]<2) continue;
b[oo][ii]-=2;bool ok=1;
for(int o=0;o<=3;++o){
for(int i=1;i<=limt[o];++i){
if(b[o][i]>=3) b[o][i]-=3;
if(o==3&&b[o][i]){ok=0;break;}
while(b[o][i]){
if(i>7||!b[o][i+1]||!b[o][i+2]){ok=0;break;}
--b[o][i],--b[o][i+1],--b[o][i+2];
}
if(!ok) break;
}
if(!ok) break;
}
if(ok) return 1;
}
return 0;
}
inline bool ron(int o,pii x){
a[o][x.fi][x.se]++;
bool ans=drawn(a[o]);
a[o][x.fi][x.se]--;
return ans;
}
inline bool pong(int o,pii x){
if(a[o][x.fi][x.se]<2) return 0;
a[o][x.fi][x.se]-=2;
int now=findans(a[o]);
if(now<to[o]) return to[o]=now,1;
return a[o][x.fi][x.se]+=2,0;
}
inline int chow(int o,pii x){
if(x.se<=7&&a[o][x.fi][x.se+1]&&a[o][x.fi][x.se+2]){
a[o][x.fi][x.se+1]--,a[o][x.fi][x.se+2]--;
int now=findans(a[o]);
if(now<to[o]) return to[o]=now,1;
a[o][x.fi][x.se+1]++,a[o][x.fi][x.se+2]++;
}
if(x.se<=8&&x.se>=2&&a[o][x.fi][x.se-1]&&a[o][x.fi][x.se+1]){
a[o][x.fi][x.se-1]--,a[o][x.fi][x.se+1]--;
int now=findans(a[o]);
if(now<to[o]) return to[o]=now,2;
a[o][x.fi][x.se-1]++,a[o][x.fi][x.se+1]++;
}
if(x.se>=3&&a[o][x.fi][x.se-2]&&a[o][x.fi][x.se-1]){
a[o][x.fi][x.se-2]--,a[o][x.fi][x.se-1]--;
int now=findans(a[o]);
if(now<to[o]) return to[o]=now,3;
a[o][x.fi][x.se-2]++,a[o][x.fi][x.se-1]++;
}
return 0;
}
int main(){
// freopen("a.in","r",stdin);freopen("a.out","w",stdout);
// return system("fc P7147_2.out data.out"),0;
#ifdef LOCAL
freopen("29.in","r",stdin);
// freopen("a.out","w",stdout);
#endif
init();
int o=0,delta=1,Cnt=52;
while(Cnt--){
char in[10];scanf("%s",in);
print_in(o,in);rd(o,in);
o=(o+delta+4)%4;
}
for(int pp=0;pp<=3;++pp){
int res=13;
for(int oo=0;oo<=3;++oo)
for(int i=1;i<=limt[oo];++i)
++a[pp][oo][i],chkmin(res,findans(a[pp])+1),--a[pp][oo][i];
to[pp]=res;
}
Cnt=96;bool flag=0;int win=-1;
while(Cnt--){
int ff=1;char in[10];
if(!flag){
scanf("%s",in);
print_in(o,in);rd(o,in);
}
else ++Cnt,flag=0;
if(drawn(a[o])){print_selfdrawn(o),win=o;break;}
pii res=findout(o);
print_out(o,f(res).c_str(),(o+delta*ff+4)%4);
if(res.fi==4){
if(res.se==2) delta*=-1;
else if(res.se==3) ff=0;
else o=(o+delta*ff+4)%4;
o=(o+delta*ff+4)%4;
continue;
}
if(res.fi<=3){
for(int nn=(o+delta+4)%4;nn!=o;nn=(nn+delta+4)%4)
if(ron(nn,res)){print_ron(nn),win=nn;break;}
if(win!=-1) break;
bool jump=0;
for(int nn=0;nn<=3;++nn)
if(nn!=o&&pong(nn,res)){print_pong(nn,f(res).c_str()),o=nn,flag=1,jump=1;break;}
if(jump) continue;
}
if(res.fi<=2){
int tmp;
if(tmp=chow((o+delta+4)%4,res)){
o=(o+delta+4)%4,flag=1;
if(tmp==1) print_chow(o,f(mp(res.fi,res.se)).c_str(),f(mp(res.fi,res.se+1)).c_str(),f(mp(res.fi,res.se+2)).c_str());
else if(tmp==2) print_chow(o,f(mp(res.fi,res.se-1)).c_str(),f(mp(res.fi,res.se)).c_str(),f(mp(res.fi,res.se+1)).c_str());
else print_chow(o,f(mp(res.fi,res.se-2)).c_str(),f(mp(res.fi,res.se-1)).c_str(),f(mp(res.fi,res.se)).c_str());
continue;
}
}
o=(o+delta*ff+4)%4;
}
if(win==-1) puts("DRAW");
else print_win(win);
return 0;
}
