web/briskin5/Obj/rules_together17.phh

   1 <?php
   2 /*
   3  *  brisk - rules_together17.phh
   4  *
   5  *  Copyright (C) 2017 Matteo Nastasi
   6  *                          mailto: nastasi@alternativeoutput.it
   7  *                                  matteo.nastasi@milug.org
   8  *                          web: http://www.alternativeoutput.it
   9  *
  10  * This program is free software; you can redistribute it and/or modify
  11  * it under the terms of the GNU General Public License as published by
  12  * the Free Software Foundation; either version 2 of the License, or
  13  * (at your option) any later version.
  14  *
  15  * This program is distributed in the hope that it will be useful, but
  16  * WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABLILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  18  * General Public License for more details. You should have received a
  19  * copy of the GNU General Public License along with this program; if
  20  * not, write to the Free Software Foundation, Inc, 59 Temple Place -
  21  * Suite 330, Boston, MA 02111-1307, USA.
  22  *
  23  */
  24
  25 require_once("briskin5.phh");
  26 require_once("rules_base.phh");
  27
  28 class Rules_together17 extends Rules_no_draw {
  29     function __construct($table)
  30     {
  31         parent::__construct($table);
  32         $this->id = 4;
  33     }
  34
  35     function tourn_points(&$user, $user_pos)
  36     {
  37         $card = $this->table->card;
  38         unset($user->asta_tourn_pts);
  39         $user->asta_tourn_pts = array(0, 0, 0, 0);
  40         if (BIN5_CARD_HAND == 8)
  41             $tourn_values = array(11, 10, 4,3,2, 1,1,1,1,1);
  42         else
  43             $tourn_values = array(33, 30, 12,9,6, 3,3,3,3,3);
  44
  45         for ($i = 0 ; $i < BIN5_PLAYERS_N * BIN5_CARD_HAND ; $i++) {
  46
  47             if ($card[$i]->owner == $user_pos) {
  48                 $user->asta_tourn_pts[(int)($i / 10)] += $tourn_values[$i % 10];
  49             }
  50         }
  51     }
  52
  53     function tourn_points_max($user)
  54     {
  55         $mx = 0;
  56         for ($i = 0 ; $i < 4 ; $i++) {
  57             error_log("tourn_pts_max ");
  58             error_log(print_r($user->asta_tourn_pts, TRUE));
  59             if ($user->asta_tourn_pts[$i] > $mx) {
  60                 $mx = $user->asta_tourn_pts[$i];
  61             }
  62         }
  63
  64         return $mx;
  65     }
  66
  67     function rules_asta(&$bri, $curtime, $action, $user, &$ret_s, $a_card, $a_pnt) {
  68         /*
  69 Per le chiamate da 62 a 70 bisognerà avere 13 punti ( esempi.: asso e fante oppure tre
  70 e cavallo oppure re, cavallo, fante, sette, sei, cinque, quattro) ;
  71 Per chiamate da 71 ad 80 bisognerà avere 19 punti ( esempi.: asso, re, cavallo e 6
  72 oppure tre, re, fante, 7, 6 e 5 );
  73 Per chiamate da 81 a 90 bisognerà avere 23 punti ( esempi.: asso, tre e fante oppure
  74 asso, re, cavallo, fante, 6, 5 e 4);
  75 Per chiamate da 91 a 100 bisognerà avere 25 punti ( esempi.: asso, tre, re e 7 oppure
  76 asso, tre, cavallo e fante );
  77 Per chiamate da 101 a 120 bisognerà avere 28 punti ( esempi.:asso, tre, re e cavallo
  78 oppure asso, tre, cavallo, 7, 6, 5 e 4 ).
  79         */
  80
  81         $index_cur = $this->table->gstart % BIN5_PLAYERS_N;
  82
  83         // Abbandono dell'asta
  84         if ($a_card <= -1) {
  85             log_wr("Abbandona l'asta.");
  86             $this->table->asta_pla[$index_cur] = FALSE;
  87             $user->asta_card  = -1;
  88             $this->table->asta_pla_n--;
  89
  90             if ($this->table->asta_card == -1 && $this->table->asta_pla_n == 1) {
  91                 error_log('table_asta_card: ' . $this->table->asta_card);
  92                 // all abandon auction except one => move next bid to two and 71 points
  93                 $this->table->asta_card = 9;
  94                 $this->table->asta_pnt = 70;
  95             }
  96
  97             return TRUE;
  98         }
  99         else if ($a_card <= 9) {
 100             $ret_s = "";
 101
 102             do {
 103                 if ($a_card >= 0 && $a_card < 9 && $a_card > $this->table->asta_card) {
 104                     ;
 105                 }
 106                 else if ($a_card == 9 &&
 107                          $a_pnt > ($this->table->asta_pnt >= 61 ? $this->table->asta_pnt : 60)
 108                          && $a_pnt <= 120) {
 109                     if ($a_pnt < 71)
 110                         $min_pts = 13;
 111                     else if ($a_pnt < 80)
 112                         $min_pts = 19;
 113                     else if ($a_pnt < 90)
 114                         $min_pts = 23;
 115                     else if ($a_pnt < 100)
 116                         $min_pts = 25;
 117                     else
 118                         $min_pts = 28;
 119
 120                     $max_hand_pts = $this->tourn_points_max($user);
 121                     if ($max_hand_pts < $min_pts) {
 122                         // FIXME_LANG
 123                         $ret_s = sprintf("Hai chiamato un due a %d ma in mano hai al massimo %d punti-torneo, non puoi.",
 124                                          $a_pnt, $max_hand_pts);
 125                         break;
 126                     }
 127                 }
 128                 else {
 129                     break;
 130                 }
 131
 132                 $user->asta_card  = $a_card;
 133                 $this->table->asta_card = $a_card;
 134                 if ($a_card == 9) {
 135                     $user->asta_pnt   = $a_pnt;
 136                     $this->table->asta_pnt  = $a_pnt;
 137                 }
 138
 139                 return TRUE;
 140             } while (0);
 141         }
 142
 143         return FALSE;
 144     }
 145
 146     function rules_nextauct(&$bri, $curtime, $action, $user, $maxcard)
 147     {
 148         if (($this->table->asta_pla_n > ($maxcard > -1 ? 1 : 0)) &&
 149             !($this->table->asta_card == 9 && $this->table->asta_pnt == 120)) {
 150             return TRUE;
 151         }
 152         else {
 153             return FALSE;
 154         }
 155
 156     }
 157
 158 } // class Rules_no_draw
 159
 160 ?>