展开全部

以前我写了一个判断麻将是否胡牌的算法，不过不支持百搭32313133353236313431303231363533e4b893e5b19e31333361323537。最近有一个朋友问我，如何有百搭，算法如何写。我写了一个，贴出来，让网友看看。

算法输入： 整数数组 a[0..n-1]表示一手牌，其中，n 是牌的张数，比如 14。

牌的编码可自定,比如: 101-109 表示一万到九万,

201-209表示一条到九条,

301-309表示一筒到九筒,

411,421,431,441,451,461,471表示东南西北中发白,

500表示百搭。

算法预处理：

若 n 模 3不等于 2，直接输出：牌数不对，是相公，算法结束。否则：

把百搭删除，把剩下的普通牌进行排序：

int i,m;

m=0;

for (i=0;i

if (a[i]不是百搭) a[m++]=a[i]; // m 就是普通牌的张数

把 a 中前 m 个元素进行排序；

随后，我把 a 看成左、中、右三段，其中，左侧段表示“成牌区”，即：它们由刻、顺组成；

中段表示试探区，算法要重点处理它们；而右侧段则是“杂牌”区，即：它们由非刻非顺组成。

在算法预处理后，显然，a 的左段长度为0，中段长度是m，右段长度是0，调用下面的“理牌”算法：

LiPai(a,0,m,0,n-m);

其中，n-m是指百搭的张数。

理牌算法：

void LiPai(int a[],int LeftCount,int MidCount,int RightCount,int CountOfBaiDa)

{

if (MidCount<3) // 试探区已不足 3 张，理牌过程结束，进入“理杂牌”阶段

{

调用测试算法； // 见后文

}

else // 试探区至少 3 张，可以试着从中取出刻子和顺子

{

int * p=&a[LeftCount]; // 让 p 指向试探区首张

int x=p[0]; // 取出试探区首张

if (p[1]==x && p[2]==x) // 发现一个刻子

{

LiPai(a,LeftCount+3,MidCount-3,RightCount,CountOfBaiDa); // 把刻子放到成牌区，递归地调用理牌算法

}

在 p[0],p[1],...p[MidCount-1] 中寻找 x+1 和 x+2;

if (找到)

{

把 x,x+1,x+2 放入 p[0],p[1],p[2];

把剩下的牌放入 p[3],p[4],...,p[MidCount-1]中;

LiPai(a,LeftCount+3,MidCount-3,RightCount,CountOfBaiDa); // 把顺子放到成牌区，递归地调用理牌算法

对p[0],p[1],...,p[MidCount-1] 排序； // 恢复原样

}

让 p[0],p[1],...p[MidCount-1] 循环左移一次； // 这样，X 就成为杂牌区左边的元素了

LiPai(a,LeftCount,MidCount-1,RightCount+1,CountOfBaiDa); // 把x放入杂牌区，递归地调用理牌算法

让 p[0],p[1],...p[MidCount-1] 循环右移一次； // 这样，X 又回到试探区最左侧了

}

上述递归算法的终止条件是 MidCount<3，当该条件满足时，调用下面算法(即上文提到的测试算法)

杂牌总张数=MidCount+RightCount; // 不足 2 张的中段，实际上也是杂牌

if (CountOfBaiDa==0) // 如果没有百搭

{

if (杂牌总张数==2 && 两张杂牌相同) // 杂牌只能是一个对子,它将是麻将头

{

输出一个胡牌方案：刻、顺是 a[0],a[1],...,a[LeftCount-1],麻将头(对子)是 剩下的两张杂牌；

}

}

else // 如果有百搭, 让一张百搭配2张杂牌

{

if (杂牌总张数-2*CountOfBaiDa<=2) // 配完之后，剩下的牌数若不超过 2，则有希望胡牌,需要进一步探测

{

申请数组 b[];

把 a[LeftCount],a[LeftCount+1],...,a[m-1] 放入 b[0],b[1],...,b[MidCount+RightCount-1] 中；

把b[]排序；

LiZaPai(a,LeftCount,b,0,MidCount+RightCount,0,CountOfBaiDa); // 总杂牌区也被划分成 3 段：左段 中段 右段，见下文

释放b[];

}

}

“理杂牌”LiZaPai(...) 算法，与普通理牌算法类似，不过，它的目标是理出对子或搭子。它也把待理区划分成 3 段：

左段：成对/搭区

中段：待测区

右段：杂牌区

void LiZaPai(int a[],int OKCount,int b[],int LeftCount,int MidCount,int RightCount,int CountOfBaiDa) // OKCount 是刻子/顺子的张数，在 a 的最左侧

{

if (MidCount<2) // 待测区不足 2 张，

{

调用试配算法； // 见下文

}

else

{

int * p=&b[LeftCount]; // 让 p 指向试探区；

int x=p[0]; // 取出首张

if (x==p[1]) // 找到一个对子

{

LiZaPai(a,OKCount,b,LeftCount+2,MidCount-2,RightCount,CountOfBaiDa); // 递归地求解

}

在 p[1],p[2],...p[MidCount-1] 中寻找 x+1;

if (找到)

{

把 x,x+1 放入 p[0],p[1];

把剩下的牌放入 p[2],p[3],...,p[MidCount-1];

LiZaPai(a,OKCount,b,LeftCount+2,MidCount-2,RightCount,CountOfBaiDa); // 递归地求解

把 p[0],p[1],...,p[MidCount-1] 排序；

}

在 p[1],p[2],...p[MidCount-1] 中寻找 x+2;

if (找到)

{

把 x,x+2 放入 p[0],p[1];

把剩下的牌放入 p[2],p[3],...,p[MidCount-1];

LiZaPai(a,OKCount,b,LeftCount+2,MidCount-2,RightCount,CountOfBaiDa); // 递归地求解

把 p[0],p[1],...,p[MidCount-1] 排序；

}

让 p[0],p[1]....,p[MidCount-1] 循环左移； // x 称到杂牌区；

LiZaPai(a,OKCount,b,LeftCount,MidCount-1,RightCount+1,CountOfBaiDa); // 递归地求解

让 p[0],p[1]....,p[MidCount-1] 循环右移； // x 回到首位

}

}

试配算法如下：

杂牌总数=MidCount+RightCount; // 此时，试探区成了杂牌区

if (杂牌总数==0) // 全是对子/搭子

{

for (i=0;i

if (b[i]==b[i+1]) // 找到一个对子, 它是麻将头

{

if (LeftCount/2-1<=CountOfBaiDa) // 剩下的对子搭子必须全部由百搭配成刻/顺

{

输出一个胡牌方案：刻/顺是 a[0],a[1],...,a[OKCount-1],以及 b[0]到b[LeftCount-1] 中除去 i,i+1 两元素后， 剩下的对/搭与百搭配成的刻/顺，以及剩下的百搭组成的刻子；

麻将头是是 b[i],b[i+1];

}

}

// 现在，必须用两个百搭配成麻将头, 所有搭子要由剩下的百搭配成刻/顺

if (CountOfBaiDa>=2 && LeftCount/2<=CountOfBaiDa-2)

{

输出一个胡牌方案：刻/顺是 a[0],a[1],...,a[OKCount-1],以及 b[0]到b[LeftCount-1] 每个对/搭与百搭配成的刻/顺，以及剩下的百搭组成的刻子；

麻将头是百搭，百搭;

}

}

else

if (杂牌总数==1) // 只有一张杂牌, 此时，必须用一个百搭与此杂牌配成麻将头

{

if (CountOfBaiDa>=1 && LeftCount/2<=CountOfBaiDa-1) // 用一个百搭与杂牌配成对子，而对子/搭子的副数不能比剩下的百搭数多, 这样就可以胡牌

{

输出一个胡牌方案：刻子/顺子是 a[0],a[1],...,a[OKCount-1],以及 b[0],b[1],百搭，b[2],b[3],百搭，...b[LeftCount-2],b[LeftCount-1],百搭，以及

配完对子、刻/顺后剩下的百搭组成的刻子；

麻将头是：杂牌，百搭。

}

}

else // 有2张或以上杂牌，不胡，因为，最多只能用一个百搭+一张杂牌形成麻将头

{

}

上面算法我用 VC++ 实现，运算速度很快，一般耗时 0.04368ms。我的 CPU：2.3GHz ,i7

望采纳，谢谢

本回答被提问者和网友采纳

已赞过

已踩过<

你对这个回答的评价是？

评论

收起