/* 类似QQ斗地主 游戏开发 联系QQ9143844
$"QåúÖ www.flash-bbs.comÁí}D[¡[|蛋蛋写的斗地主出牌的算法 地主20张 平民 17张X2 54张牌
$"QåúÖ www.flash-bbs.comÁí}D[¡[|游戏参数有 单 双 两炸 4炸 (3带双 3带1) (4带双 4带2) 单顺 双顺 三顺
$"QåúÖ www.flash-bbs.comÁí}D[¡[|注:单顺子由5张以上组成含5张,最多12张3-A 双顺可以一次性质出完 限制3-A
$"QåúÖ www.flash-bbs.comÁí}D[¡[|调用参数 array 为要出牌的数组 并按照以大到小的顺序排好
$"QåúÖ www.flash-bbs.comÁí}D[¡[|调用方法:wochupai(array);
$"QåúÖ www.flash-bbs.comÁí}D[¡[|注意--这里我只是输出了调试信息,详细的功能要自己加进去
$"QåúÖ www.flash-bbs.comÁí}D[¡[|先写到这里吧 详细的自己研究研究,如果发现有错误 请告诉我 我会努力改正
$"QåúÖ www.flash-bbs.comÁí}D[¡[|黑 红 梅 方 牌
$"QåúÖ www.flash-bbs.comÁí}D[¡[|134 133 132 131 3
$"QåúÖ www.flash-bbs.comÁí}D[¡[|144 143 142 141 4
$"QåúÖ www.flash-bbs.comÁí}D[¡[|154 153 152 151 5
$"QåúÖ www.flash-bbs.comÁí}D[¡[|164 163 162 161 6
$"QåúÖ www.flash-bbs.comÁí}D[¡[|174 173 172 171 7
$"QåúÖ www.flash-bbs.comÁí}D[¡[|184 183 182 181 8
$"QåúÖ www.flash-bbs.comÁí}D[¡[|194 193 192 191 9
$"QåúÖ www.flash-bbs.comÁí}D[¡[|204 203 202 201 10
$"QåúÖ www.flash-bbs.comÁí}D[¡[|214 213 212 211 J
$"QåúÖ www.flash-bbs.comÁí}D[¡[|224 223 222 221 Q
$"QåúÖ www.flash-bbs.comÁí}D[¡[|234 233 232 231 K
$"QåúÖ www.flash-bbs.comÁí}D[¡[|244 243 242 241 A
$"QåúÖ www.flash-bbs.comÁí}D[¡[|254 253 252 251 2
$"QåúÖ www.flash-bbs.comÁí}D[¡[|444 大鬼 333 小鬼
$"QåúÖ www.flash-bbs.comÁí}D[¡[|array = [192, 181, 172, 163, 141, 152];
$"QåúÖ www.flash-bbs.comÁí}D[¡[|wochupai(array);*/
$"QåúÖ www.flash-bbs.comÁí}D[¡[|function wochupai(array) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[|if (array.length == 2) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((pipei(array[0], array[1]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:对子");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("继续判断是否是双炸!");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if (array[0] == 444 && array[1] == 333) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:双炸");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("两张牌不符合类型");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//得到三张 的算法
$"QåúÖ www.flash-bbs.comÁí}D[¡[|if (array.length == 3) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((pipei(array[0], array[1]) == 1) && (pipei(array[1], array[2]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:3张");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("三张牌不符合类型");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//得到四张牌的算法-------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|if (array.length == 4) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((pipei(array[0], array[1]) == 1) && (pipei(array[1], array[2]) == 1) && (pipei(array[2], array[3]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:4炸");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("继续找3带1");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| sandaiyi4_1(array);
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//-------------------三带一的两个方法1---------------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|function sandaiyi4_1(array) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((pipei(array[0], array[1]) == 1) && (pipei(array[1], array[2]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:3带1");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("继续找3带1");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| sandaiyi4_2(array);
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//-------------------三带一的两个方法2---------------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|function sandaiyi4_2(array) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((pipei(array[1], array[2]) == 1) && (pipei(array[2], array[3]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:3带1");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("4张牌不符类型");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|/////////----------------------------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|if (array.length == 5) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipeijian(array[0], array[1]) == 1) && (pipeijian(array[1], array[2]) == 1)(pipeijian(array[2], array[3]) == 1)(pipeijian(array[3], array[4]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:单顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("继续寻找3带对");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| diaoyong5_1(array);
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//-----------------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|function diaoyong5_1(array) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ( ((pipei(array[0], array[1]) == 1) && (pipei(array[1], array[2]) == 1)(pipei(array[3], array[4]) == 1))||((pipei(array[0], array[1]) == 1) && (pipei(array[2], array[3]) == 1)&&(pipei(array[3], array[4]) == 1))) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:3带2");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("继续寻找4带1");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| diaoyong5_2(array);
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//------------------------------------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|function diaoyong5_2(array) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if (((pipei(array[0], array[1]) == 1) && (pipei(array[1], array[2]) == 1)(pipei(array[2], array[3]) == 1)) || ((pipei(array[1], array[2]) == 1) && (pipei(array[2], array[3]) == 1)(pipei(array[3], array[4]) == 1))) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:4带1");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("5张牌不符合类型");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//继续推算第6张牌
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//先算是否是双顺子
$"QåúÖ www.flash-bbs.comÁí}D[¡[|if (array.length == 6) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| //------------------------------------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipei(array[0], array[1]) == 1) && (pipei(array[2], array[3]) == 1) && (pipei(array[4], array[5]) == 1)&&(pipeijian(array[1], array[2]) == 1)&&(pipeijian(array[3], array[4]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:双顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("不是双顺,判断是否是单顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| diaoyong6_2(array);
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[| //------------------------------------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//------------------------------------------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|function diaoyong6_2(array) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && ((pipeijian(array[0], array[1]) == 1)) && ((pipeijian(array[1], array[2]) == 1)) && ((pipeijian(array[2], array[3]) == 1)) && ((pipeijian(array[4], array[5]) == 1))) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:单顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("不是单顺,判断是否是三顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| diaoyong6_3(array);
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//-----------------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|function diaoyong6_3(array) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipei(array[0], array[1]) == 1) && (pipei(array[1], array[2]) == 1) && (pipei(array[3], array[4]) == 1) && (pipei(array[4], array[5]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((pipeijian(array[2], array[3]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:三顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("不是三顺,判断是否是4带2");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| diaoyong6_4(array);
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("不是三顺,判断是否是4带2");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| diaoyong6_4(array);
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//--------------------------------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|function diaoyong6_4(array) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((pipei(array[2], array[3]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("继续判断是否是4带2!");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| diaoyong6_5(array);
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("6张牌不符合类型");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//------------------------------------------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//---------------------判断4带2的三种方法-------------------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|function diaoyong6_5(array) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if (((pipei(array[3], array[4]) == 1) && (pipei(array[4], array[5]) == 1)) || ((pipei(array[1], array[4]) == 1) && (pipei(array[4], array[3]) == 1)) || ((pipei(array[0], array[1]) == 1) && (pipei(array[1], array[2]) == 1))) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:4带2,");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("6张牌不符合类型!");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//------------------------判断4带2的三种方法结束----------------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//-------------------------判断7张牌单顺-----------------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|if (array.length == 7) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipeijian(array[0], array[1]) == 1) && (pipeijian(array[1], array[2]) == 1) && (pipeijian(array[2], array[3]) == 1) && (pipeijian(array[3], array[4]) == 1) && (pipeijian(array[4], array[5]) == 1) && (pipeijian(array[5], array[6]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:单顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("7张牌不符合类型");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//--------------------------7张牌判断完毕
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//--------------------------继续判断8张牌---------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|if (array.length == 8) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| //先判断是否是顺子
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipeijian(array[0], array[1]) == 1) && (pipeijian(array[1], array[2]) == 1) && (pipeijian(array[2], array[3]) == 1) && (pipeijian(array[3], array[4]) == 1) && (pipeijian(array[4], array[5]) == 1) && (pipeijian(array[5], array[6]) == 1) && (pipeijian(array[6], array[7]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:单顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("由于没有四顺,我们判断是否是双顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipei(array[0], array[1]) == 1) && (pipei(array[2], array[3]) == 1) && (pipei(array[4], array[5]) == 1) && (pipei(array[6], array[7]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:双顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("继续判断4带4功能");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| sidaisi8_1(array);
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//四带四功能判断方法 66 5555 33 6666 33 22 44 55 6666
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//----------------------------------------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|function sidaisi8_1(array) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| //前面4只
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if (((pipei(array[0], array[1]) == 1) && (pipei(array[2], array[3]) == 1) && (pipei(array[4], array[5]) == 1) && (pipei(array[5], array[6]) == 1) && (pipei(array[6], array[7]) == 1)) || ((pipei(array[0], array[1]) == 1) && (pipei(array[2], array[3]) == 1) && (pipei(array[3], array[4]) == 1) && (pipei(array[4], array[5]) == 1) && (pipei(array[6], array[7]) == 1)) || ((pipei(array[0], array[1]) == 1) && (pipei(array[1], array[2]) == 1) && (pipei(array[2], array[3]) == 1) && (pipei(array[4], array[5]) == 1) && (pipei(array[6], array[7]) == 1))) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:4带4");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("8张牌不符合类型");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//--------------------------8张牌判断完毕----------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//--------------------------9张牌判断开始-----------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|if (array.length == 9) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| //先判断是否是顺子
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipeijian(array[0], array[1]) == 1) && (pipeijian(array[1], array[2]) == 1) && (pipeijian(array[2], array[3]) == 1) && (pipeijian(array[3], array[4]) == 1) && (pipeijian(array[4], array[5]) == 1) && (pipeijian(array[5], array[6]) == 1) && (pipeijian(array[6], array[7]) == 1) && (pipeijian(array[7], array[8]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:单顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("判断是否是三顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipei(array[0], array[1]) == 1) && (pipei(array[1], array[2]) == 1) && (pipei(array[3], array[4]) == 1) && (pipei(array[4], array[5]) == 1) && (pipei(array[6], array[7]) == 1) && (pipei(array[7], array[8]) == 1) && (pipeijian(array[2], array[3]) == 1) && (pipeijian(array[5], array[6]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:三顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("9张牌不符合类型");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//--------------------------9张牌判断完毕-------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//--------------------------10张牌判断开始----单顺,双顺---------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|if (array.length == 10) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| //先判断是否是单顺
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipeijian(array[0], array[1]) == 1) && (pipeijian(array[1], array[2]) == 1) && (pipeijian(array[2], array[3]) == 1) && (pipeijian(array[3], array[4]) == 1) && (pipeijian(array[4], array[5]) == 1) && (pipeijian(array[5], array[6]) == 1) && (pipeijian(array[6], array[7]) == 1) && (pipeijian(array[7], array[8]) == 1) & (pipeijian(array[8], array[9]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:单顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("判断是否是双顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| //------------------------------------------------------------44 55 66 77 88 01 23 45 67 89--------------------------------------44 55 66 77 88 01 23 45 67 89
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipei(array[0], array[1]) == 1) && (pipeijian(array[1], array[2]) == 1) && (pipei(array[2], array[3]) == 1) && (pipeijian(array[3], array[4]) == 1) && (pipei(array[4], array[5]) == 1) && (pipeijian(array[5], array[6]) == 1) && (pipei(array[6], array[7]) == 1) && (pipeijian(array[7], array[8]) == 1) && (pipei(array[8], array[9]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:双顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("10张牌不符合类型");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//--------------------------10张牌判断完毕-------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//--------------------------11张牌判断开始---------单顺---------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|if (array.length == 11) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipeijian(array[0], array[1]) == 1) && (pipeijian(array[1], array[2]) == 1) && (pipeijian(array[2], array[3]) == 1) && (pipeijian(array[3], array[4]) == 1) && (pipeijian(array[4], array[5]) == 1) && (pipeijian(array[5], array[6]) == 1) && (pipeijian(array[6], array[7]) == 1) && (pipeijian(array[7], array[8]) == 1) && (pipeijian(array[8], array[9]) == 1) && (pipeijian(array[9], array[10]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:单顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("11张牌不符合类型");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//--------------------------11张牌判断完毕-------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//--------------------------12张牌判断开始------单顺,双顺,三顺,四顺-------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|if (array.length == 12) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipeijian(array[0], array[1]) == 1) && (pipeijian(array[1], array[2]) == 1) && (pipeijian(array[2], array[3]) == 1) && (pipeijian(array[3], array[4]) == 1) && (pipeijian(array[4], array[5]) == 1) && (pipeijian(array[5], array[6]) == 1) && (pipeijian(array[6], array[7]) == 1) && (pipeijian(array[7], array[8]) == 1) && (pipeijian(array[8], array[9]) == 1) && (pipeijian(array[9], array[10]) == 1) && (pipeijian(array[10], array[11]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:单顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("继续判断是否是双顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| shun12_2(array);
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//-------------------12张判断双顺--------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|function shun12_2(array) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipei(array[0], array[1]) == 1) && (pipeijian(array[1], array[2]) == 1) && (pipei(array[2], array[3]) == 1) && (pipeijian(array[3], array[4]) == 1) && (pipei(array[4], array[5]) == 1) && (pipeijian(array[5], array[6]) == 1) && (pipei(array[6], array[7]) == 1) && (pipei(array[7], array[8]) == 1) && (pipei(array[8], array[9]) == 1) && (pipeijian(array[9], array[10]) == 1) && (pipei(array[10], array[11]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:双顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("继续判断是否是3顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| shun12_3(array);
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//-------------------12张判断三顺--------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|function shun12_3(array) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| //0 2 4 6 8 333 444 555 666 012 345 678 91011
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipei(array[0], array[1]) == 1) && (pipei(array[1], array[2]) == 1) && (pipeijian(array[2], array[3]) == 1) && (pipei(array[3], array[4]) == 1) && (pipei(array[4], array[5]) == 1) && (pipeijian(array[5], array[6]) == 1) && (pipei(array[6], array[7]) == 1) && (pipei(array[7], array[8]) == 1) && (pipeijian(array[8], array[9]) == 1) && (pipei(array[9], array[10]) == 1) && (pipei(array[10], array[11]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:三顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("12张牌不符合类型");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//-------------------12张判断三顺--------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|function shuangshun12(array) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipei(array[0], array[1]) == 1) && (pipeijian(array[1], array[2]) == 1) && (pipei(array[2], array[3]) == 1) && (pipeijian(array[3], array[4]) == 1) && (pipei(array[4], array[5]) == 1) && (pipeijian(array[5], array[6]) == 1) && (pipei(array[6], array[7]) == 1) && (pipeijian(array[7], array[8]) == 1) && (pipei(array[8], array[9]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:三顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("12张牌不符合类型");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//--------------------------12张牌判断完毕-------------------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//-----------------14张双顺
$"QåúÖ www.flash-bbs.comÁí}D[¡[|if (array.length == 14) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipei(array[0], array[1]) == 1) && (pipeijian(array[1], array[2]) == 1) && (pipei(array[2], array[3]) == 1) && (pipeijian(array[3], array[4]) == 1) && (pipei(array[4], array[5]) == 1) && (pipeijian(array[5], array[6]) == 1) && (pipei(array[6], array[7]) == 1) && (pipeijian(array[7], array[8]) == 1) && (pipei(array[8], array[9]) == 1) && (pipeijian(array[9], array[10]) == 1) && (pipei(array[10], array[11]) == 1) && (pipeijian(array[11], array[12]) == 1) && (pipei(array[12], array[13]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:双顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("14张牌不符合类型");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//-----------------16张双顺
$"QåúÖ www.flash-bbs.comÁí}D[¡[|if (array.length == 16) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipei(array[0], array[1]) == 1) && (pipeijian(array[1], array[2]) == 1) && (pipei(array[2], array[3]) == 1) && (pipeijian(array[3], array[4]) == 1) && (pipei(array[4], array[5]) == 1) && (pipeijian(array[5], array[6]) == 1) && (pipei(array[6], array[7]) == 1) && (pipeijian(array[7], array[8]) == 1) && (pipei(array[8], array[9]) == 1) && (pipeijian(array[9], array[10]) == 1) && (pipei(array[10], array[11]) == 1) && (pipeijian(array[11], array[12]) == 1) && (pipei(array[12], array[13]) == 1) && (pipeijian(array[13], array[14]) == 1) && (pipei(array[14], array[15]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:双顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("14张牌不符合类型");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//-----------------16张双顺
$"QåúÖ www.flash-bbs.comÁí}D[¡[|if (array.length == 18) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipei(array[0], array[1]) == 1) && (pipeijian(array[1], array[2]) == 1) && (pipei(array[2], array[3]) == 1) && (pipeijian(array[3], array[4]) == 1) && (pipei(array[4], array[5]) == 1) && (pipeijian(array[5], array[6]) == 1) && (pipei(array[6], array[7]) == 1) && (pipeijian(array[7], array[8]) == 1) && (pipei(array[8], array[9]) == 1) && (pipeijian(array[9], array[10]) == 1) && (pipei(array[10], array[11]) == 1) && (pipeijian(array[11], array[12]) == 1) && (pipei(array[12], array[13]) == 1) && (pipeijian(array[13], array[14]) == 1) && (pipei(array[14], array[15]) == 1) && (pipeijian(array[15], array[16]) == 1) && (pipei(array[16], array[17]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("是双顺,可以出牌");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("18张双顺完毕");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//-------------------18张完毕---------
$"QåúÖ www.flash-bbs.comÁí}D[¡[|if (array.length == 20) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if ((int(array[0]/10)<25) && (pipei(array[0], array[1]) == 1) && (pipeijian(array[1], array[2]) == 1) && (pipei(array[2], array[3]) == 1) && (pipeijian(array[3], array[4]) == 1) && (pipei(array[4], array[5]) == 1) && (pipeijian(array[5], array[6]) == 1) && (pipei(array[6], array[7]) == 1) && (pipeijian(array[7], array[8]) == 1) && (pipei(array[8], array[9]) == 1) && (pipeijian(array[9], array[10]) == 1) && (pipei(array[10], array[11]) == 1) && (pipeijian(array[11], array[12]) == 1) && (pipei(array[12], array[13]) == 1) && (pipeijian(array[13], array[14]) == 1) && (pipei(array[14], array[15]) == 1) && (pipeijian(array[15], array[16]) == 1) && (pipei(array[16], array[17]) == 1) && (pipeijian(array[17], array[18]) == 1) && (pipei(array[18], array[19]) == 1)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("出牌:双顺");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| trace("20张牌不符合类型");
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//-----------------20张双顺
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//-------------------匹配两个数是否相等
$"QåúÖ www.flash-bbs.comÁí}D[¡[|function pipei(str1, str2) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if (int(str1/10) == int(str2/10)) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| return (1);
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| return (0);
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//-------------------匹配两个数是否相等
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//-------------------匹配两个数相减是否是1
$"QåúÖ www.flash-bbs.comÁí}D[¡[|function pipeijian(str1, str2) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| if (int(str1/10)-int(str2/10) == 1) {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| return (1);
$"QåúÖ www.flash-bbs.comÁí}D[¡[| } else {
$"QåúÖ www.flash-bbs.comÁí}D[¡[| return (0);
$"QåúÖ www.flash-bbs.comÁí}D[¡[| }
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|//-------------------匹配两个数相减是否是1
$"QåúÖ www.flash-bbs.comÁí}D[¡[|}
$"QåúÖ www.flash-bbs.comÁí}D[¡[|