1000行代码实现的斗地主算法

斗地主的算法类来自GitHub某位网友分享，波波碰到了顺便记录一下。

这个斗地主的算法类库主要实现的功能是构造牌、发牌、检测牌面、出牌等。具体不多介绍。源码如下：

  1. <?php
  2. namespace App\Game\Core;
  4. /**
  5.  * 斗地主 poker 算法逻辑
  6.  * @author：jiagnxinyu
  7.  */
  9. class DdzPoker
  10. {
  11.     //花色类型
  12.     const COLOR_TYPE_HEITAO = 0;//黑桃
  13.     const COLOR_TYPE_HONGTAO = 1;//红桃
  14.     const COLOR_TYPE_MEIHUA = 2;//梅花
  15.     const COLOR_TYPE_FANGKUAI = 3;//方块
  16.     const COLOR_TYPE_XIAOWANG = 4;//小王
  17.     const COLOR_TYPE_DAWANG = 5;//大王
  19.     //牌显示出来的值
  20.     const CARD_SAN = '3'; //牌值3
  21.     const CARD_SI = '4'; //牌值4
  22.     const CARD_WU = '5'; //牌值5
  23.     const CARD_LIU = '6'; //牌值6
  24.     const CARD_QI = '7'; //牌值7
  25.     const CARD_BA = '8'; //牌值8
  26.     const CARD_JIU = '9'; //牌值9
  27.     const CARD_SHI = '10'; //牌值10
  28.     const CARD_J = 'J'; //牌值J
  29.     const CARD_Q = 'Q'; //牌值Q
  30.     const CARD_K = 'K'; //牌值K
  31.     const CARD_A = 'A'; //牌值A
  32.     const CARD_ER = '2'; //牌值2
  33.     const CARD_XIAOWANG = 'SJ'; //牌值小王
  34.     const CARD_DAWANG = 'BJ'; //牌值大王
  36.     //牌型
  37.     const CARD_TYPE_DAN = 1; //单张
  38.     const CARD_TYPE_DUI = 2; //对子
  39.     const CARD_TYPE_SAN = 3; //三张
  40.     const CARD_TYPE_SANDAIYI = 4; //三代一
  41.     const CARD_TYPE_SANDAIER = 5; //三代二
  42.     const CARD_TYPE_SHUNZI = 6; //顺子
  43.     const CARD_TYPE_LIANDUI = 7; //连对
  44.     const CARD_TYPE_FEIJIBUDAI = 8; //飞机不带
  45.     const CARD_TYPE_FEIJIDAIDAN = 9; //飞机带单
  46.     const CARD_TYPE_FEIJIDAISHUANG = 10; //飞机带双
  47.     const CARD_TYPE_SIDAIYI = 11; //四带一, 指的是四带一对
  48.     const CARD_TYPE_SIDAIER = 12; //四带二, 指的是四带两队
  49.     const CARD_TYPE_ZHADAN = 13; //炸弹
  50.     const CARD_TYPE_HUOJIAN = 14; //火箭
  52.     /**
  53.      * 构造花色值
  54.      */
  55.     public static $card_color = array(
  56.         self::COLOR_TYPE_HEITAO => '黑桃',
  57.         self::COLOR_TYPE_HONGTAO => '红桃',
  58.         self::COLOR_TYPE_MEIHUA => '梅花',
  59.         self::COLOR_TYPE_FANGKUAI => '方块',
  60.         self::COLOR_TYPE_XIAOWANG => '小王',
  61.         self::COLOR_TYPE_DAWANG => '大王',
  62.     );
  64.     /**
  65.      * 构造扑克牌值列表(54张牌，采用16进制的模式， 每16位一种花色牌型，花色不一样, 大小王，固定值，这样设计，一个数字，既可以表示出牌值， 也能表示出花色）
  66.      * @var array
  67.      */
  68.     public static $card_value_list = array(
  69.         1 => self::CARD_SAN, 2 => self::CARD_SI, 3 => self::CARD_WU, 4 => self::CARD_LIU, 5 => self::CARD_QI, 6 => self::CARD_BA, 7 => self::CARD_JIU, 8 => self::CARD_SHI, 9 => self::CARD_J, 10 => self::CARD_Q, 11 => self::CARD_K, 12 => self::CARD_A, 13 => self::CARD_ER,
  70.         17 => self::CARD_SAN, 18 => self::CARD_SI, 19 => self::CARD_WU, 20 => self::CARD_LIU, 21 => self::CARD_QI, 22 => self::CARD_BA, 23 => self::CARD_JIU, 24 => self::CARD_SHI, 25 => self::CARD_J, 26 => self::CARD_Q, 27 => self::CARD_K, 28 => self::CARD_A, 29 => self::CARD_ER,
  71.         33 => self::CARD_SAN, 34 => self::CARD_SI, 35 => self::CARD_WU, 36 => self::CARD_LIU, 37 => self::CARD_QI, 38 => self::CARD_BA, 39 => self::CARD_JIU, 40 => self::CARD_SHI, 41 => self::CARD_J, 42 => self::CARD_Q, 43 => self::CARD_K, 44 => self::CARD_A, 45 => self::CARD_ER,
  72.         49 => self::CARD_SAN, 50 => self::CARD_SI, 51 => self::CARD_WU, 52 => self::CARD_LIU, 53 => self::CARD_QI, 54 => self::CARD_BA, 55 => self::CARD_JIU, 56 => self::CARD_SHI, 57 => self::CARD_J, 58 => self::CARD_Q, 59 => self::CARD_K, 60 => self::CARD_A, 61 => self::CARD_ER,
  73.         78 => self::CARD_XIAOWANG,
  74.         79 => self::CARD_DAWANG,
  75.     );
  77.     /**
  78.      * 构造牌型值
  79.      * @var array
  80.      */
  81.     public static $card_type = array(
  82.         self::CARD_TYPE_DAN => '单张',
  83.         self::CARD_TYPE_DUI => '对子',
  84.         self::CARD_TYPE_SAN => '三张',
  85.         self::CARD_TYPE_SANDAIYI => '三带一',
  86.         self::CARD_TYPE_SANDAIER => '三带二',
  87.         self::CARD_TYPE_SHUNZI => '顺子',
  88.         self::CARD_TYPE_LIANDUI => '连对',
  89.         self::CARD_TYPE_FEIJIBUDAI => '飞机不带',
  90.         self::CARD_TYPE_FEIJIDAIDAN => '飞机带单',
  91.         self::CARD_TYPE_FEIJIDAISHUANG => '飞机带双',
  92.         self::CARD_TYPE_SIDAIYI => '四带一对',
  93.         self::CARD_TYPE_SIDAIER => '四带二对',
  94.         self::CARD_TYPE_ZHADAN => '炸弹',
  95.         self::CARD_TYPE_HUOJIAN => '火箭',
  96.     );
  98.     /**
  99.      * 洗好的牌
  100.      */
  101.     public $washed_cards;
  103.     /*
  104.      * 洗牌
  105.      */
  106.     public function washCards()
  107.     {
  108.         $cards = array_keys(self::$card_value_list);
  109.         shuffle($cards);
  110.         $show_cards = $this->crateCard($cards);
  111.         $this->washed_cards = array('cards' => $cards, 'show_cards' => $show_cards);
  112.     }
  114.     /*
  115.      * 发牌
  116.      */
  117.     public function dealCards()
  118.     {
  119.         $cards = $this->washed_cards['cards'];
  120.         $user_card1 = $user_card2 = $user_card3 = $hand = array();
  121.         //每人发17张牌
  122.         $chuank = array_chunk($cards, 51);
  123.         $hand = $chuank[1];
  124.         $cards = $chuank[0];
  125.         $cnt = count($cards);
  126.         for ($i = 0; $i < $cnt; $i += 3) {
  127.             $user_card1[] = $cards[$i];
  128.             $user_card2[] = $cards[$i + 1];
  129.             $user_card3[] = $cards[$i + 2];
  130.         }
  131.         $user_card1 = $this->_sortCardByGrade($user_card1);
  132.         $user_card2 = $this->_sortCardByGrade($user_card2);
  133.         $user_card3 = $this->_sortCardByGrade($user_card3);
  134.         $card = array('user1' => $user_card1, 'user2' => $user_card2, 'user3' => $user_card3, 'hand' => $hand);
  135.         $show_card = array('user1' => $this->crateCard($user_card1), 'user2' => $this->crateCard($user_card2), 'user3' => $this->crateCard($user_card3), 'hand' => $this->crateCard($hand));
  136.         return array('card' => $card, 'show_card' => $show_card);
  137.     }
  139.     /**
  140.      * 根据牌值构建牌
  141.      * @param $card
  142.      * @return array
  143.      */
  144.     public function crateCard($card)
  145.     {
  146.         $data = array();
  147.         foreach ($card as $v) {
  148.             if ($v == 78) {
  149.                 $color_type = self::COLOR_TYPE_XIAOWANG;
  150.             } elseif ($v == 79) {
  151.                 $color_type = self::COLOR_TYPE_DAWANG;
  152.             } else {
  153.                 $color_type = intval($v / 16);
  154.             }
  155.             $color = self::$card_color[$color_type];
  156.             $data[$v] = $color . '_' . self::$card_value_list[$v];
  157.         }
  158.         return $data;
  159.     }
  161.     /**
  162.      * 判断是否为单张牌
  163.      * @param $arr_card
  164.      * @return bool
  165.      */
  166.     public function isDan($arr_card)
  167.     {
  168.         if (count($arr_card) == 1) {
  169.             return true;
  170.         } else {
  171.             return false;
  172.         }
  173.     }
  175.     /**
  176.      * 判断是否为对子
  177.      * @param $arr_card
  178.      * @return bool
  179.      */
  180.     public function isDui($arr_card)
  181.     {
  182.         if (count($arr_card) == 2 && ($this->_getModVal($arr_card[0]) == $this->_getModVal($arr_card[1]))) {
  183.             return true;
  184.         } else {
  185.             return false;
  186.         }
  187.     }
  189.     /**
  190.      * 判断是否为三张
  191.      * @param $arr_card
  192.      * @return bool
  193.      */
  194.     public function isSan($arr_card)
  195.     {
  196.         $value = $this->_getModVal($arr_card[0]);
  197.         if (count($arr_card) == 3 && ($this->_getModVal($arr_card[1]) == $value && $this->_getModVal($arr_card[2]) == $value)) {
  198.             return true;
  199.         } else {
  200.             return false;
  201.         }
  202.     }
  204.     /**
  205.      * 判断是否为三带一
  206.      * @param $arr_card
  207.      * @return bool
  208.      */
  209.     public function isSanDaiYi($arr_card)
  210.     {
  211.         $back = false;
  212.         if (count($arr_card) == 4) {
  213.             //排序
  214.             $arr_card = $this->_sortCardByGrade($arr_card);
  215.             if ($this->_getModVal($arr_card[0]) == $this->_getModVal($arr_card[1]) && $this->_getModVal($arr_card[1]) == $this->_getModVal($arr_card[2]) && $this->_getModVal($arr_card[2]) != $this->_getModVal($arr_card[3])) {
  216.                 //带单在后面
  217.                 $back = true;
  218.             } elseif ($this->_getModVal($arr_card[0]) != $this->_getModVal($arr_card[1]) && $this->_getModVal($arr_card[1]) == $this->_getModVal($arr_card[2]) && $this->_getModVal($arr_card[2]) == $this->_getModVal($arr_card[3])) {
  219.                 //带单在前面
  220.                 $back = true;
  221.             }
  222.         }
  223.         return $back;
  224.     }
  226.     /**
  227.      * 判断是否为三带二
  228.      * @param $arr_card
  229.      * @return bool
  230.      */
  231.     public function isSanDaiEr($arr_card)
  232.     {
  233.         $back = false;
  234.         if (count($arr_card) == 5) {
  235.             //排序
  236.             $arr_card = $this->_sortCardByGrade($arr_card);
  237.             if ($this->_getModVal($arr_card[0]) == $this->_getModVal($arr_card[1]) && $this->_getModVal($arr_card[1]) == $this->_getModVal($arr_card[2]) && $this->_getModVal($arr_card[2]) != $this->_getModVal($arr_card[3]) && $this->_getModVal($arr_card[3]) == $this->_getModVal($arr_card[4])) {
  238.                 //带单在后面
  239.                 $back = true;
  240.             } elseif ($this->_getModVal($arr_card[0]) == $this->_getModVal($arr_card[1]) && $this->_getModVal($arr_card[1]) != $this->_getModVal($arr_card[2]) && $this->_getModVal($arr_card[2]) == $this->_getModVal($arr_card[3]) && $this->_getModVal($arr_card[3]) == $this->_getModVal($arr_card[4])) {
  241.                 //带单在前面
  242.                 $back = true;
  243.             }
  244.         }
  245.         return $back;
  246.     }
  248.     /**
  249.      * 判断是否为顺子
  250.      * @param $arr_card
  251.      * @return bool
  252.      */
  253.     public function isShunZi($arr_card)
  254.     {
  255.         $cnt = count($arr_card);
  256.         if ($cnt < 5 || $cnt > 12) {
  257.             return false;
  258.         } else {
  259.             //排序
  260.             $arr_card = $this->_sortCardByGrade($arr_card);
  261.             for ($i = 0; $i < $cnt - 1; $i++) {
  262.                 //过滤掉2，小王,大王
  263.                 if (in_array($this->_getModVal($arr_card[$i]), array(13, 14, 15))) {
  264.                     return false;
  265.                 }
  266.                 if ($this->_getModVal($arr_card[$i + 1]) - $this->_getModVal($arr_card[$i]) != 1) {
  267.                     return false;
  268.                 }
  269.             }
  270.             return true;
  271.         }
  272.     }
  274.     /**
  275.      * 判断是否为连对
  276.      * @param $arr_card
  277.      * @return bool
  278.      */
  279.     public function isLianDui($arr_card)
  280.     {
  281.         $cnt = count($arr_card);
  282.         if ($cnt < 6 || $cnt % 2 != 0) {
  283.             return false;
  284.         } else {
  285.             //排序
  286.             $arr_card = $this->_sortCardByGrade($arr_card);
  287.             for ($i = 0; $i < $cnt - 1; $i = $i + 2) {
  288.                 //过滤掉2，小王,大王
  289.                 if (in_array($this->_getModVal($arr_card[$i]), array(13, 14, 15))) {
  290.                     return false;
  291.                 }
  292.                 if ($this->_getModVal($arr_card[$i]) != $this->_getModVal($arr_card[$i + 1])) {
  293.                     return false;
  294.                 }
  295.                 if ($i < $cnt - 2) {
  296.                     if ($this->_getModVal($arr_card[$i]) - $this->_getModVal($arr_card[$i + 2]) != -1) {
  297.                         return false;
  298.                     }
  299.                 }
  300.             }
  301.             return true;
  302.         }
  303.     }
  305.     /**
  306.      * 判断是否为飞机不带
  307.      * @param $arr_card
  308.      * @return bool
  309.      */
  310.     public function isFeiJiBuDai($arr_card)
  311.     {
  312.         $cnt = count($arr_card);
  313.         if ($cnt < 6 || $cnt % 3 != 0) {
  314.             return false;
  315.         } else {
  316.             //排序
  317.             $arr_card = $this->_sortCardByGrade($arr_card);
  318.             $index = array();
  319.             for ($i = 0; $i < $cnt - 2; $i = $i + 3) {
  320.                 //过滤掉2，小王,大王
  321.                 if (in_array($this->_getModVal($arr_card[$i]), array(13, 14, 15))) {
  322.                     return false;
  323.                 }
  324.                 if ($i != $cnt) {
  325.                     if (!$this->isSan(array($arr_card[$i], $arr_card[$i + 1], $arr_card[$i + 2]))) {
  326.                         return false;
  327.                     }
  328.                     $index[] = $arr_card[$i];
  329.                 }
  330.             }
  331.             //排序
  332.             $index = $this->_sortCardByGrade($index);
  333.             $index_cnt = count($index);
  334.             for ($i = 0; $i < $index_cnt - 1; $i++) {
  335.                 if ($this->_getModVal($index[$i]) - $this->_getModVal($index[$i + 1]) != -1) {
  336.                     return false;
  337.                 }
  338.             }
  339.             return true;
  340.         }
  341.     }
  343.     /**
  344.      * 是非为飞机带单
  345.      * @param $arr_card
  346.      * @param int $flag 默认为1时， 飞机带单， 等于2是，判断飞机带双
  347.      * @return bool
  348.      */
  349.     public function isFeiJiDaiDan($arr_card, $flag = 1)
  350.     {
  351.         $cnt = count($arr_card);
  352.         if ($cnt < 8) {
  353.             return false;
  354.         }
  355.         //对牌值进行取模运算
  356.         $card_value = array();
  357.         array_walk(
  358.             $arr_card,
  359.             function ($item, $key) use (&$card_value) {
  360.                 $card_value[$key] = $this->_getModVal($item);
  361.             }
  362.         );
  363.         $arrs = array_count_values($card_value);
  364.         $list = [];
  365.         foreach ($arrs as $k => $v) {
  366.             if ($v == 3) {
  367.                 $list[] = $k;
  368.             }
  369.         }
  370.         //排序
  371.         $list = $this->_sortCardByGrade($list);
  372.         for ($i = 0; $i < count($list) - 1; $i++) {
  373.             if ($list[$i] - $list[$i + 1] != -1) {
  374.                 return false;
  375.             }
  376.         }
  377.         $list_cnt = count($list);
  378.         $pokers = $list_cnt * 3 + $list_cnt * $flag;
  379.         if ($pokers != count($arr_card)) {
  380.             return false;
  381.         }
  382.         return true;
  383.     }
  385.     /**
  386.      * 判断是否为飞机带双
  387.      * @param $arr_card
  388.      * @return bool
  389.      */
  390.     public function isFeiJiDaiShuang($arr_card)
  391.     {
  392.         return $this->isFeiJiDaiDan($arr_card, $flag = 2);
  393.     }
  396.     /**
  397.      * 判断是否为四带一, 表示四带一对
  398.      * @param $arr_card
  399.      * @return bool
  400.      */
  401.     public function isSiDaiYi($arr_card)
  402.     {
  403.         //排序
  404.         $arr_card = $this->_sortCardByGrade($arr_card);
  405.         $cnt = count($arr_card);
  406.         $back = false;
  407.         if ($cnt == 6) {
  408.             $grade0 = $this->_getModVal($arr_card[0]);
  409.             $grade1 = $this->_getModVal($arr_card[1]);
  410.             $grade2 = $this->_getModVal($arr_card[2]);
  411.             $grade3 = $this->_getModVal($arr_card[3]);
  412.             $grade4 = $this->_getModVal($arr_card[4]);
  413.             $grade5 = $this->_getModVal($arr_card[5]);
  414.             if ($grade0 == $grade1 && $grade1 == $grade2 && $grade2 == $grade3 && $grade3 != $grade4 && $grade4 == $grade5) {
  415.                 $back = true;
  416.             } else if ($grade0 == $grade1 && $grade1 != $grade2 && $grade2 == $grade3 && $grade3 == $grade4 && $grade4 == $grade5) {
  417.                 $back = true;
  418.             }
  419.         }
  420.         return $back;
  421.     }
  423.     /**
  424.      * 判断是否为四带二, 表示4带2对
  425.      * @param $arr_card
  426.      * @return bool
  427.      */
  428.     function isSiDaiEr($arr_card)
  429.     {
  430.         //排序
  431.         $arr_card = $this->_sortCardByGrade($arr_card);
  432.         $cnt = count($arr_card);
  433.         $back = false;
  434.         if ($cnt == 8) {
  435.             $grade0 = $this->_getModVal($arr_card[0]);
  436.             $grade1 = $this->_getModVal($arr_card[1]);
  437.             $grade2 = $this->_getModVal($arr_card[2]);
  438.             $grade3 = $this->_getModVal($arr_card[3]);
  439.             $grade4 = $this->_getModVal($arr_card[4]);
  440.             $grade5 = $this->_getModVal($arr_card[5]);
  441.             $grade6 = $this->_getModVal($arr_card[6]);
  442.             $grade7 = $this->_getModVal($arr_card[7]);
  443.             if ($grade0 == $grade1 && $grade1 == $grade2 && $grade2 == $grade3 && $grade3 != $grade4 && $grade4 == $grade5 && $grade6 == $grade7) {
  444.                 $back = true;
  445.             } elseif ($grade0 == $grade1 && $grade1 != $grade2 && $grade2 == $grade3 && $grade4 == $grade5 && $grade5 == $grade6 && $grade6 == $grade7) {
  446.                 $back = true;
  447.             } elseif ($grade0 == $grade1 && $grade1 != $grade2 && $grade2 == $grade3 && $grade3 == $grade4 && $grade4 == $grade5 && $grade5 != $grade6 && $grade6 == $grade7) {
  448.                 $back = true;
  449.             }
  450.         }
  451.         return $back;
  452.     }
  454.     /**
  455.      * 是否为炸弹
  456.      * @param $arr_card
  457.      * @return bool
  458.      */
  459.     public function isZha($arr_card)
  460.     {
  461.         if (count($arr_card) == 4 && $this->_getModVal($arr_card[0]) == $this->_getModVal($arr_card[1]) && $this->_getModVal($arr_card[1]) == $this->_getModVal($arr_card[2]) && $this->_getModVal($arr_card[2]) == $this->_getModVal($arr_card[3])) {
  462.             return true;
  463.         } else {
  464.             return false;
  465.         }
  466.     }
  468.     /**
  469.      * 判断是否为火箭
  470.      * @param $arr_card
  471.      * @return bool
  472.      */
  473.     public function isHuojian($arr_card)
  474.     {
  475.         if (count($arr_card) == 2 && (($arr_card[0] == 78 && $arr_card[1] == 79) || ($arr_card[1] == 79 && $arr_card[2] == 80))) {
  476.             return true;
  477.         } else {
  478.             return false;
  479.         }
  480.     }
  482.     /**
  483.      * 检测牌型
  484.      * @param $arr_card
  485.      * @return array
  486.      */
  487.     public function checkCardType($arr_card)
  488.     {
  489.         $type = 0;
  490.         if ($this->isDan($arr_card)) {
  491.             $type = self::CARD_TYPE_DAN;
  492.         } elseif ($this->isDui($arr_card)) {
  493.             $type = self::CARD_TYPE_DUI;
  494.         } elseif ($this->isHuojian($arr_card)) {
  495.             $type = self::CARD_TYPE_HUOJIAN;
  496.         } elseif ($this->isSan($arr_card)) {
  497.             $type = self::CARD_TYPE_SAN;
  498.         } elseif ($this->isZha($arr_card)) {
  499.             $type = self::CARD_TYPE_ZHADAN;
  500.         } elseif ($this->isSandaiyi($arr_card)) {
  501.             $type = self::CARD_TYPE_SANDAIYI;
  502.         } elseif ($this->isShunzi($arr_card)) {
  503.             $type = self::CARD_TYPE_SHUNZI;
  504.         } elseif ($this->isLiandui($arr_card)) {
  505.             $type = self::CARD_TYPE_LIANDUI;
  506.         } else if ($this->isFeijiBuDai($arr_card)) {
  507.             $type = self::CARD_TYPE_FEIJIBUDAI;
  508.         } elseif ($this->isSiDaiYi($arr_card)) {
  509.             $type = self::CARD_TYPE_SIDAIYI;
  510.         } elseif ($this->isSiDaiEr($arr_card)) {
  511.             $type = self::CARD_TYPE_SIDAIER;;
  512.         } elseif ($this->isSandaiEr($arr_card)) {
  513.             $type = self::CARD_TYPE_SANDAIER;;
  514.         } elseif ($this->isFeijiDaiDan($arr_card)) {
  515.             $type = self::CARD_TYPE_FEIJIDAIDAN;;
  516.         } elseif ($this->isFeijiDaiShuang($arr_card)) {
  517.             $type = self::CARD_TYPE_FEIJIDAISHUANG;
  518.         }
  519.         if (array_key_exists($type, self::$card_type)) {
  520.             $back = array('type' => $type, 'type_msg' => self::$card_type[$type]);
  521.         } else {
  522.             $back = array('type' => $type, 'type_msg' => 'unknow'); //未知牌型
  523.         }
  524.         return $back;
  525.     }
  527.     /**
  528.      * 检测牌的大小
  529.      * 比较2家的牌，主要有2种情况:
  530.      * 1.我出和上家一种类型的牌，即对子管对子；
  531.      * 2.我出炸弹，此时，和上家的牌的类型可能不同
  532.      * 王炸的情况先排除
  533.      * @param array $my 我的出牌， 格式：array(）
  534.      * @param array $prev 上手出牌， 格式：array(）
  535.      * @return bool，true是可以出牌， false不能出牌
  536.      */
  537.     public function checkCardSize($my = array(), $prev = array())
  538.     {
  539.         //判断我的牌数据是否非法
  540.         if (!$my) {
  541.             return false;
  542.         }
  543.         //计算出我的牌型
  544.         $my_arr = $this->checkCardType($my);
  545.         $my_type = isset($my_arr['type']) ? $my_arr['type'] : 0;
  546.         //我先出牌上家没牌， 我大
  547.         if (!$prev) {
  548.             return true;
  549.         }
  550.         $prev_arr = $this->checkCardType($prev);
  551.         $prev_type = isset($prev_arr['type']) ? $prev_arr['type'] : 0;
  552.         //集中判断是否为火箭，免得多次判断火箭
  553.         if ($my_type == self::CARD_TYPE_HUOJIAN) {
  554.             return true;
  555.         } elseif ($prev_type == self::CARD_TYPE_HUOJIAN) {
  556.             return false;
  557.         }
  558.         //集中判断上家不是炸弹，我出炸弹的情况
  559.         if ($my_type == self::CARD_TYPE_ZHADAN && $prev_type != self::CARD_TYPE_ZHADAN) {
  560.             return true;
  561.         }
  562.         $my_card = $this->_sortCardByGrade($my);
  563.         $prev_card = $this->_sortCardByGrade($prev);
  564.         $my_cnt = count($my_card);
  565.         $prev_cnt = count($prev_card);
  567.         if ($my_type == self::CARD_TYPE_DAN && $prev_type == self::CARD_TYPE_DAN && $this->_getModVal($my_card[0]) > $this->_getModVal($prev_card[0])) {
  568.             //单张
  569.             return true;
  570.         } elseif ($my_type == self::CARD_TYPE_DUI && $prev_type == self::CARD_TYPE_DUI && $this->_getModVal($my_card[0]) > $this->_getModVal($prev_card[0])) {
  571.             //对子
  572.             return true;
  573.         } elseif ($my_type == self::CARD_TYPE_SAN && $prev_type == self::CARD_TYPE_SAN && $this->_getModVal($my_card[0]) > $this->_getModVal($prev_card[0])) {
  574.             //三张
  575.             return true;
  576.         } elseif ($my_type == self::CARD_TYPE_ZHADAN && $prev_type == self::CARD_TYPE_ZHADAN && $this->_getModVal($my_card[0]) > $this->_getModVal($prev_card[0])) {
  577.             //炸弹
  578.             return true;
  579.         } elseif ($my_type == self::CARD_TYPE_SANDAIYI && $prev_type == self::CARD_TYPE_SANDAIYI && $this->_getModVal($my_card[1]) > $this->_getModVal($prev_card[1])) {
  580.             //三带一，只比较第二张牌的大小
  581.             return true;
  582.         } elseif ($my_type == self::CARD_TYPE_SANDAIER && $prev_type == self::CARD_TYPE_SANDAIER && $this->_getModVal($my_card[2]) > $this->_getModVal($prev_card[2])) {
  583.             //三带二，只比较第三张牌的大小
  584.             return true;
  585.         } elseif ($my_type == self::CARD_TYPE_SIDAIYI && $prev_type == self::CARD_TYPE_SIDAIYI && $this->_getModVal($my_card[2]) > $this->_getModVal($prev_card[2])) {
  586.             //四带一对，只比较第二张牌的大小
  587.             return true;
  588.         } elseif ($my_type == self::CARD_TYPE_SIDAIER && $prev_type == self::CARD_TYPE_SIDAIER) {
  589.             //对牌值进行取模运算
  590.             $my_card_grade = $prev_card_grade = array();
  591.             array_walk(
  592.                 $my_card,
  593.                 function ($item, $key) use (&$my_card_grade) {
  594.                     $my_card_grade[$key] = $this->_getModVal($item);
  595.                 }
  596.             );
  597.             array_walk(
  598.                 $prev_card,
  599.                 function ($item, $key) use (&$prev_card_grade) {
  600.                     $prev_card_grade[$key] = $this->_getModVal($item);
  601.                 }
  602.             );
  603.             $m = array_flip(array_count_values($my_card_grade));
  604.             $p = array_flip(array_count_values($prev_card_grade));
  605.             if (isset($m[4]) && isset($p[4]) && $m[4] > $p[4]) {
  606.                 return true;
  607.             }
  608.         } elseif ($my_type == self::CARD_TYPE_SHUNZI && $prev_type == self::CARD_TYPE_SHUNZI && $my_cnt == $prev_cnt && $this->_getModVal($my_card[0]) > $this->_getModVal($prev_card[0])) {
  609.             //顺子
  610.             return true;
  611.         } elseif ($my_type == self::CARD_TYPE_LIANDUI && $prev_type == self::CARD_TYPE_LIANDUI && $my_cnt == $prev_cnt && $this->_getModVal($my_card[0]) > $this->_getModVal($prev_card[0])) {
  612.             //连对
  613.             return true;
  614.         } elseif ($my_type == self::CARD_TYPE_FEIJIBUDAI && $prev_type == self::CARD_TYPE_FEIJIBUDAI && $my_cnt == $prev_cnt && $this->_getModVal($my_card[0]) > $this->_getModVal($prev_card[0])) {
  615.             //飞机不带
  616.             return true;
  617.         } elseif ($my_type == self::CARD_TYPE_FEIJIDAIDAN && $prev_type == self::CARD_TYPE_FEIJIDAIDAN && $my_cnt == $prev_cnt && $this->_getModVal($my_card[1]) > $this->_getModVal($prev_card[1])) {
  618.             //飞机带单
  619.             return true;
  620.         } elseif ($my_type == self::CARD_TYPE_FEIJIDAISHUANG && $prev_type == self::CARD_TYPE_FEIJIDAISHUANG && $my_cnt == $prev_cnt && $this->_getModVal($my_card[2]) > $this->_getModVal($prev_card[2])) {
  621.             //飞机带双
  622.             return true;
  623.         }
  624.         return false;
  625.     }
  627.     /**
  628.      * 是否可以出牌
  629.      * @param $my_card
  630.      * @param $prev_type
  631.      * @param $prev_card
  632.      * @return bool
  633.      */
  634.     public function isPlayCard($my_card, $prev_card)
  635.     {
  636.         //我的手牌和上家手牌不能为空
  637.         if (emptyempty($my_card) || emptyempty($prev_card)) {
  638.             return false;
  639.         }
  640.         $arr = $this->checkCardType($prev_card);
  641.         $prev_type = isset($arr['type']) ? $arr['type'] : 0;
  642.         //手牌类型
  643.         if (!array_key_exists($prev_type, self::$card_type)) {
  644.             return false;
  645.         }
  646.         $my_card = $this->_sortCardByGrade($my_card);
  647.         $prev_card = $this->_sortCardByGrade($prev_card);
  648.         $my_cnt = count($my_card);
  649.         $prev_cnt = count($prev_card);
  650.         //我先出牌， 上家没有牌
  651.         if ($prev_cnt == 0 && $my_cnt > 0) {
  652.             return true;
  653.         }
  654.         //集中判断是否为火箭， 免得后面多次判断
  655.         if ($prev_type == self::CARD_TYPE_HUOJIAN) {
  656.             return false;
  657.         }
  658.         //判断我的牌里是否有飞机, 如果有飞机, 肯定可以出牌
  659.         if ($my_cnt >= 2 && $this->isHuojian(array($my_card[$my_cnt - 1]), $my_card[$my_cnt - 2])) {
  660.             return true;
  661.         }
  662.         //集中判断对方不是炸弹，我出炸弹的情况
  663.         if ($prev_type != self::CARD_TYPE_ZHADAN) {
  664.             if ($my_cnt < 4) {
  665.                 return false;
  666.             } else {
  667.                 //循环判断， 我方是否有炸弹
  668.                 for ($i = 0; $i < $my_cnt - 3; $i++) {
  669.                     $grade0 = $this->_getModVal($my_card[$i]);
  670.                     $grade1 = $this->_getModVal($my_card[$i + 1]);
  671.                     $grade2 = $this->_getModVal($my_card[$i + 2]);
  672.                     $grade3 = $this->_getModVal($my_card[$i + 3]);
  673.                     if ($grade0 == $grade1 && $grade2 == $grade0 && $grade3 == $grade0) {
  674.                         return true;
  675.                     }
  676.                 }
  677.             }
  678.         }
  679.         //上家出单张
  680.         if ($prev_type == self::CARD_TYPE_DAN) {
  681.             //最要判断最后一张牌是否能大过上家的牌就行
  682.             if ($this->_getModVal($my_card[$my_cnt - 1]) > $this->_getModVal($prev_card[0])) {
  683.                 return true;
  684.             }
  685.         } //上家出对子
  686.         else if ($prev_type == self::CARD_TYPE_DUI) {
  687.             // 2张牌可以大过上家的牌
  688.             for ($i = $my_cnt - 1; $i >= 1; $i--) {
  689.                 $grade0 = $this->_getModVal($my_card[$i]);
  690.                 $grade1 = $this->_getModVal($my_card[$i - 1]);
  691.                 if ($grade0 == $grade1 && $grade0 > $this->_getModVal($prev_card[0])) {
  692.                     return true;
  693.                 }
  694.             }
  695.         } //上家出三不带, 三带一， 三带二
  696.         else if (in_array($prev_type, array(self::CARD_TYPE_SAN, self::CARD_TYPE_SANDAIYI, self::CARD_TYPE_SANDAIER))) {
  697.             //区别在于三带一喝三带二要判断牌数
  698.             if ($prev_type == self::CARD_TYPE_SANDAIYI && $my_cnt < 4) {
  699.                 return false;
  700.             }
  701.             if ($prev_type == self::CARD_TYPE_SANDAIER && $my_cnt < 5) {
  702.                 return false;
  703.             }
  704.             // 3张牌可以大过上家的牌
  705.             for ($i = $my_cnt - 1; $i >= 2; $i--) {
  706.                 $grade0 = $this->_getModVal($my_card[$i]);
  707.                 $grade1 = $this->_getModVal($my_card[$i - 1]);
  708.                 $grade2 = $this->_getModVal($my_card[$i - 2]);
  709.                 if ($grade0 == $grade1 && $grade0 == $grade2 && $grade0 > $this->_getModVal($prev_card[2])) {
  710.                     return true;
  711.                 }
  712.             }
  713.         } //上家出炸弹，四带一对，四带二对， 只要手牌有炸弹，或有对，就可以出牌就可以出牌
  714.         else if ($prev_type == self::CARD_TYPE_ZHADAN || $prev_type == self::CARD_TYPE_SIDAIYI || $prev_type == self::CARD_TYPE_SIDAIER) {
  715.             // 4张牌可以大过上家的牌
  716.             $dui_cnt = 0; //手牌对子计数
  717.             $si_arr = array(); //四张牌值grade
  718.             for ($i = $my_cnt - 1; $i >= 3; $i--) {
  719.                 $grade0 = $this->_getModVal($my_card[$i]);
  720.                 $grade1 = $this->_getModVal($my_card[$i - 1]);
  721.                 $grade2 = $this->_getModVal($my_card[$i - 2]);
  722.                 $grade3 = $this->_getModVal($my_card[$i - 3]);
  723.                 //记录四张相同的牌值
  724.                 if ($grade0 == $grade1 && $grade0 == $grade2 && $grade0 == $grade3) {
  725.                     $si_arr[] = $grade0;
  726.                 } else {
  727.                     //统计对子数量
  728.                     if ($grade0 == $grade1 || $grade1 == $grade2 || $grade2 == $grade3) {
  729.                         $dui_cnt++;
  730.                     }
  731.                 }
  732.             }
  733.             //和上级比较四张的牌值
  734.             foreach ($si_arr as $v) {
  735.                 if ($prev_type == self::CARD_TYPE_ZHADAN && $v > $this->_getModVal($prev_card[0])) {
  736.                     return true;
  737.                 } elseif ($prev_type == self::CARD_TYPE_SIDAIYI && $v > $this->_getModVal($prev_card[2]) && $dui_cnt > 0) {
  738.                     return true;
  739.                 } elseif ($prev_type == self::CARD_TYPE_SIDAIER && $dui_cnt > 1) {
  740.                     //四带两对的三种情况
  741.                     $prev_grade1 = $this->_getModVal($prev_card[1]);
  742.                     $prev_grade2 = $this->_getModVal($prev_card[2]);
  743.                     $prev_grade3 = $this->_getModVal($prev_card[3]);
  744.                     $prev_grade5 = $this->_getModVal($prev_card[5]);
  745.                     $prev_grade6 = $this->_getModVal($prev_card[6]);
  746.                     if ($prev_grade1 == $prev_grade2 && $v > $prev_grade1) {
  747.                         return true;
  748.                     } elseif ($prev_grade5 == $prev_grade6 && $v > $prev_grade5) {
  749.                         return true;
  750.                     } elseif ($prev_grade1 != $prev_grade2 && $prev_grade5 != $prev_grade6 && $v > $prev_grade3) {
  751.                         return true;
  752.                     }
  753.                 }
  754.             }
  755.         } //上家出顺子, 出连对, 飞机
  756.         else if ($prev_type == self::CARD_TYPE_SHUNZI || $prev_type == self::CARD_TYPE_LIANDUI || $prev_type == self::CARD_TYPE_FEIJIBUDAI || $prev_type == self::CARD_TYPE_FEIJIDAIDAN || $prev_type == self::CARD_TYPE_FEIJIDAISHUANG) {
  757.             if ($my_cnt < $prev_cnt) {
  758.                 return false;
  759.             } else {
  760.                 $my_card_grade = $this->_getCardGrade($my_card);
  761.                 $prev_card_grade = $this->_getCardGrade($prev_card);
  762.                 $tmp_my_cnt = array_count_values($my_card_grade); //统计出牌的grade值相同张数
  763.                 $my_card_grade = array_keys(array_flip($my_card_grade)); //去重
  764.                 //飞机带单和飞机带双要特殊处理一下
  765.                 if ($prev_type == self::CARD_TYPE_FEIJIDAIDAN || $prev_type == self::CARD_TYPE_FEIJIDAISHUANG) {
  766.                     $tmp_prev_cnt = array_count_values($prev_card_grade);
  767.                     $prev_card_grade = array();
  768.                     foreach ($tmp_prev_cnt as $k => $v) {
  769.                         if ($v == 3) {
  770.                             $prev_card_grade[] = $k;
  771.                         }
  772.                     }
  773.                 } else {
  774.                     $prev_card_grade = array_keys(array_flip($prev_card_grade)); //去重
  775.                 }
  776.                 $my_cnt = count($my_card_grade);
  777.                 $prev_cnt = count($prev_card_grade);
  778.                 for ($i = $my_cnt - 1; $i >= $prev_cnt - 1; $i--) {
  779.                     $my_tmp_cards = array();
  780.                     for ($j = 0; $j < $prev_cnt; $j++) {
  781.                         $my_tmp_cards[] = $my_card_grade[$i - $j];
  782.                     }
  783.                     $my_tmp_cards = $this->_sortCardByGrade($my_tmp_cards);
  784.                     if ($prev_type == self::CARD_TYPE_SHUNZI) {
  785.                         //检查牌的类型
  786.                         $tmp_type = $this->checkCardType($my_tmp_cards);
  787.                         $my_type = isset($tmp_type['type']) ? $tmp_type['type'] : 0;
  788.                         $grade = $my_tmp_cards[count($my_tmp_cards) - 1];// 最大的牌在最后
  789.                         $prev_grade = $prev_card_grade[$prev_cnt - 1];// 最大的牌在最后
  790.                         if ($my_type == $prev_type && $grade > $prev_grade) {
  791.                             return true;
  792.                         }
  793.                     } elseif ($prev_type == self::CARD_TYPE_LIANDUI) {
  794.                         if ($this->_isContinuous($my_tmp_cards) && $this->_isNumOk($tmp_my_cnt, $my_tmp_cards, 2)) {
  795.                             return true;
  796.                         }
  797.                     } elseif ($prev_type == self::CARD_TYPE_FEIJIBUDAI) {
  798.                         //判断连续性
  799.                         if ($this->_isContinuous($my_tmp_cards) && $this->_isNumOk($tmp_my_cnt, $my_tmp_cards, 3)) {
  800.                             return true;
  801.                         }
  802.                     } elseif ($prev_type == self::CARD_TYPE_FEIJIDAIDAN) {
  803.                         //判断连续性
  804.                         if ($this->_isContinuous($my_tmp_cards) && $this->_isNumOk($tmp_my_cnt, $my_tmp_cards, 3) && $this->_isDaiNumOk($tmp_my_cnt, $my_tmp_cards)) {
  805.                             return true;
  806.                         }
  807.                     } elseif ($prev_type == self::CARD_TYPE_FEIJIDAISHUANG) {
  808.                         //判断连续性
  809.                         if ($this->_isContinuous($my_tmp_cards) && $this->_isNumOk($tmp_my_cnt, $my_tmp_cards, 3) && $this->_isDaiNumOk($tmp_my_cnt, $my_tmp_cards, 2)) {
  810.                             return true;
  811.                         }
  812.                     }
  813.                 }
  814.             }
  815.         }
  816.         return false;
  817.     }
  820.     /**
  821.      * 最值进行取模运算， 获取到牌的值
  822.      * @param $val
  823.      * @return int
  824.      */
  825.     private function _getModVal($val)
  826.     {
  827.         return $val % 16;
  828.     }
  830.     /**
  831.      * 对手牌进行排序处理
  832.      * @param array $card
  833.      * @return array
  834.      */
  835.     private function _sortCardByGrade($card = array())
  836.     {
  837.         //牌进行排序
  838.         $new_card = array();
  839.         foreach ($card as $v) {
  840.             $new_card[$v] = $this->_getModVal($v);
  841.         }
  842.         //对数组按值排序, 并保留键值
  843.         asort($new_card);
  844.         $card = array();
  845.         foreach ($new_card as $k => $v) {
  846.             $card[] = $k;
  847.         }
  848.         return $card;
  849.     }
  851.     /**
  852.      * 获取牌的grade值
  853.      * @param $cards
  854.      * @return array
  855.      */
  856.     private function _getCardGrade($cards) {
  857.         $new_card = array();
  858.         foreach ($cards as $v) {
  859.             $new_card[] = $this->_getModVal($v);
  860.         }
  861.         return $new_card;
  862.     }
  864.     /**
  865.      * 判断牌值是否连续
  866.      * @param $card
  867.      * @return bool
  868.      */
  869.     private function _isContinuous($card)
  870.     {
  871.         $card = $this->_sortCardByGrade($card);
  872.         $cnt = count($card);
  873.         for ($i = 0; $i < $cnt - 1; $i++) {
  874.             if ($card[$i] - $card[$i + 1] != -1) {
  875.                 return false;
  876.             }
  877.         }
  878.         return true;
  879.     }
  881.     /**
  882.      * 判断数量是否正确, 顺子,连对,飞机使用判断
  883.      * @param $cnt_card
  884.      * @param $card
  885.      * @param int $num
  886.      * @return bool
  887.      */
  888.     private function _isNumOk($cnt_card, $card, $num = 2)
  889.     {
  890.         //判断数量
  891.         foreach ($card as $v) {
  892.             if ($cnt_card[$v] < $num) {
  893.                 return false;
  894.             }
  895.         }
  896.         return true;
  897.     }
  899.     /**
  900.      * 判断戴牌的数量是否ok, 主要用户飞机带单和飞机带双使用
  901.      * @param $cnt_card
  902.      * @param $card
  903.      * @param int $num 1表示带单， 2表示带双
  904.      * @return bool
  905.      */
  906.     private function _isDaiNumOk($cnt_card, $card, $num = 1)
  907.     {
  908.         //判断数量
  909.         $count = 0;
  910.         foreach ($cnt_card as $k=>$v) {
  911.             if (!in_array($k, $card) && $v >= $num) {
  912.                 $count++;
  913.             }
  914.         }
  915.         if($count >= count($card)) {
  916.             return true;
  917.         } else {
  918.             return false;
  919.         }
  920.     }
  921. }

项目地址：https://github.com/jxy918/ddzpoker

你想把广告放到这里吗？

发表评论

您必须 登录 才能发表留言！