36133984908fc4d1c0fd0962b743fb0cca216f9a
[brisk.git] / 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         $tourn_values = array(11, 10, 4,3,2, 1,1,1,1,1);
41
42         for ($i = 0 ; $i < BIN5_PLAYERS_N * BIN5_CARD_HAND ; $i++) {
43
44             if ($card[$i]->owner == $user_pos) {
45                 $user->asta_tourn_pts[(int)($i / 10)] += $tourn_values[$i % 10];
46             }
47         }
48     }
49
50     function tourn_points_max($user)
51     {
52         $mx = 0;
53         for ($i = 0 ; $i < 4 ; $i++) {
54             error_log("tourn_pts_max ");
55             error_log(print_r($user->asta_tourn_pts, TRUE));
56             if ($user->asta_tourn_pts[$i] > $mx) {
57                 $mx = $user->asta_tourn_pts[$i];
58             }
59         }
60
61         return $mx;
62     }
63
64     function rules_asta(&$bri, $curtime, $action, $user, &$ret_s, $a_card, $a_pnt) {
65         /*
66 Per le chiamate da 62 a 70 bisognerà avere 13 punti ( esempi.: asso e fante oppure tre
67 e cavallo oppure re, cavallo, fante, sette, sei, cinque, quattro) ;
68 Per chiamate da 71 ad 80 bisognerà avere 19 punti ( esempi.: asso, re, cavallo e 6
69 oppure tre, re, fante, 7, 6 e 5 );
70 Per chiamate da 81 a 90 bisognerà avere 23 punti ( esempi.: asso, tre e fante oppure
71 asso, re, cavallo, fante, 6, 5 e 4);
72 Per chiamate da 91 a 100 bisognerà avere 25 punti ( esempi.: asso, tre, re e 7 oppure
73 asso, tre, cavallo e fante );
74 Per chiamate da 101 a 120 bisognerà avere 28 punti ( esempi.:asso, tre, re e cavallo
75 oppure asso, tre, cavallo, 7, 6, 5 e 4 ).
76         */
77
78         $index_cur = $this->table->gstart % BIN5_PLAYERS_N;
79
80         // Abbandono dell'asta
81         if ($a_card <= -1) {
82             log_wr("Abbandona l'asta.");
83             $this->table->asta_pla[$index_cur] = FALSE;
84             $user->asta_card  = -1;
85             $this->table->asta_pla_n--;
86
87             return TRUE;
88         }
89         else if ($a_card <= 9) {
90             $ret_s = "";
91
92             do {
93                 if ($a_card >= 0 && $a_card < 9 && $a_card > $this->table->asta_card) {
94                     return TRUE;
95                 }
96                 else if ($a_card == 9 &&
97                          $a_pnt > ($this->table->asta_pnt >= 61 ? $this->table->asta_pnt : 60)
98                          && $a_pnt <= 120) {
99                     if ($a_pnt < 71)
100                         $min_pts = 13;
101                     else if ($a_pnt < 80)
102                         $min_pts = 19;
103                     else if ($a_pnt < 90)
104                         $min_pts = 23;
105                     else if ($a_pnt < 100)
106                         $min_pts = 25;
107                     else
108                         $min_pts = 28;
109
110                     $max_hand_pts = $this->tourn_points_max($user);
111                     if ($max_hand_pts < $min_pts) {
112                         // FIXME_LANG
113                         $ret_s = sprintf("Hai chiamato un due a %d ma in mano hai al massimo %d punti-torneo, non puoi.",
114                                          $a_pnt, $max_hand_pts);
115                         break;
116                     }
117                 }
118                 else {
119                     break;
120                 }
121
122                 $user->asta_card  = $a_card;
123                 $this->table->asta_card = $a_card;
124                 if ($a_card == 9) {
125                     $user->asta_pnt   = $a_pnt;
126                     $this->table->asta_pnt  = $a_pnt;
127                 }
128
129                 return TRUE;
130             } while (0);
131         }
132
133         return FALSE;
134     }
135
136 } // class Rules_no_draw
137
138 ?>