展开全部
以前我写了一个判断麻将是否胡牌的算法,不过不支持百搭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
望采纳,谢谢
本回答被提问者和网友采纳
已赞过
已踩过<
你对这个回答的评价是?
评论
收起