together17: add points constraint on the suit when auction is finished

[brisk.git] / web / briskin5 / Obj / rules_together17.phh

diff --git a/web/briskin5/Obj/rules_together17.phh b/web/briskin5/Obj/rules_together17.phh
index 0570868..8ab688d 100644 (file)
--- a/web/briskin5/Obj/rules_together17.phh
+++ b/web/briskin5/Obj/rules_together17.phh
@@ -37,26 +37,23 @@ class Rules_together17 extends Rules_no_draw {
         $card = $this->table->card;
         unset($user->asta_tourn_pts);
         $user->asta_tourn_pts = array(0, 0, 0, 0);
-        $tourn_values = array(11, 10, 4,3,2, 1,1,1,1,1);
-                                
-        error_log("QUI CI SIAMO: PRE");
+        if (BIN5_CARD_HAND == 8)
+            $tourn_values = array(11, 10, 4,3,2, 1,1,1,1,1);
+        else
+            $tourn_values = array(33, 30, 12,9,6, 3,3,3,3,3);
+
         for ($i = 0 ; $i < BIN5_PLAYERS_N * BIN5_CARD_HAND ; $i++) {
-            error_log("QUI CI SIAMO: LOOP");
-        
+
             if ($card[$i]->owner == $user_pos) {
-                error_log("QUI CI SIAMO: ASSIGN");
-                $user->asta_tourn_pts[(int)($i / 10)] += $tourn_values[$i % 10]; 
+                $user->asta_tourn_pts[(int)($i / 10)] += $tourn_values[$i % 10];
             }
         }
     }
 
     function tourn_points_max($user)
     {
-        
         $mx = 0;
         for ($i = 0 ; $i < 4 ; $i++) {
-            error_log("tourn_pts_max ");
-            error_log(print_r($user->asta_tourn_pts, TRUE));
             if ($user->asta_tourn_pts[$i] > $mx) {
                 $mx = $user->asta_tourn_pts[$i];
             }
@@ -65,6 +62,35 @@ class Rules_together17 extends Rules_no_draw {
         return $mx;
     }
 
+    function min_tourn_points($a_pnt)
+    {
+        if ($a_pnt < 71)
+            $min_pts = 13;
+        else if ($a_pnt < 80)
+            $min_pts = 19;
+        else if ($a_pnt < 90)
+            $min_pts = 23;
+        else if ($a_pnt < 100)
+            $min_pts = 25;
+        else
+            $min_pts = 28;
+
+        return $min_pts;
+    }
+
+    function check_tourn_points($hand_pts, $a_pnt, $a_seed, &$ret_s) {
+        $min_pts = $this->min_tourn_points($a_pnt);
+
+        if ($hand_pts < $min_pts) {
+            // FIXME_LANG
+            $seeds = array('coppe', 'ori', 'spade', 'bastoni');
+            $ret_s = sprintf("Hai chiamato un due di %s a %d ma in mano per quel seme hai %d punti-torneo, non puoi.",
+                             $seeds[$a_seed], $a_pnt, $hand_pts);
+            return FALSE;
+        }
+        return TRUE;
+    }
+
     function rules_asta(&$bri, $curtime, $action, $user, &$ret_s, $a_card, $a_pnt) {
         /*
 Per le chiamate da 62 a 70 bisognerà avere 13 punti ( esempi.: asso e fante oppure tre
@@ -79,33 +105,87 @@ Per chiamate da 101 a 120 bisognerà avere 28 punti ( esempi.:asso, tre, re e ca
 oppure asso, tre, cavallo, 7, 6, 5 e 4 ).
         */
 
-        if ($a_card >= 0 && $a_card < 9 && $a_card > $this->table->asta_card)
-            return TRUE;
-        else if ($a_card == 9 && 
-                 $a_pnt > ($this->table->asta_pnt >= 61 ? $this->table->asta_pnt : 60) && $a_pnt <= 120) {
-            if ($a_pnt < 71)
-                $min_pts = 13;
-            else if ($a_pnt < 80)
-                $min_pts = 19;
-            else if ($a_pnt < 90)
-                $min_pts = 23;
-            else if ($a_pnt < 100)
-                $min_pts = 25;
-            else
-                $min_pts = 28;
-
-            $max_hand_pts = $this->tourn_points_max($user);
-            if ($max_hand_pts < $min_pts) {
-                $ret_s = sprintf("Hai chiamato un due a %d ma in mano hai al massimo %d punti-torneo, non puoi.",
-                                 $a_pnt, $max_hand_pts);
-                return FALSE;
+        $index_cur = $this->table->gstart % BIN5_PLAYERS_N;
+
+        // Abbandono dell'asta
+        if ($a_card <= -1) {
+            log_wr("Abbandona l'asta.");
+            $this->table->asta_pla[$index_cur] = FALSE;
+            $user->asta_card  = -1;
+            $this->table->asta_pla_n--;
+
+            if ($this->table->asta_card == -1 && $this->table->asta_pla_n == 1) {
+                // all abandon auction except one => move next bid to two and 71 points
+                $this->table->asta_card = 9;
+                $this->table->asta_pnt = 70;
             }
 
             return TRUE;
         }
+        else if ($a_card <= 9) {
+            $ret_s = "";
+
+            do {
+                if ($a_card >= 0 && $a_card < 9 && $a_card > $this->table->asta_card) {
+                    ;
+                }
+                else if ($a_card == 9 &&
+                         $a_pnt > ($this->table->asta_pnt >= 61 ? $this->table->asta_pnt : 60)
+                         && $a_pnt <= 120) {
+                    $min_pts = $this->min_tourn_points($a_pnt);
+
+                    $max_hand_pts = $this->tourn_points_max($user);
+                    if ($max_hand_pts < $min_pts) {
+                        // FIXME_LANG
+                        $ret_s = sprintf("Hai chiamato un due a %d ma in mano hai al massimo %d punti-torneo, non puoi.",
+                                         $a_pnt, $max_hand_pts);
+                        break;
+                    }
+                }
+                else {
+                    break;
+                }
+
+                $user->asta_card  = $a_card;
+                $this->table->asta_card = $a_card;
+                if ($a_card == 9) {
+                    $user->asta_pnt   = $a_pnt;
+                    $this->table->asta_pnt  = $a_pnt;
+                }
+
+                return TRUE;
+            } while (0);
+        }
+
         return FALSE;
     }
 
+    function rules_nextauct(&$bri, $curtime, $action, $user, $maxcard)
+    {
+        if (($this->table->asta_pla_n > ($maxcard > -1 ? 1 : 0)) &&
+            !($this->table->asta_card == 9 && $this->table->asta_pnt == 120)) {
+            return TRUE;
+        }
+        else {
+            return FALSE;
+        }
+
+    }
+
+    function rules_checkchoose(&$bri, $curtime, $action, $user, &$ret_s, $a_brisco)
+    {
+        if (! parent::rules_checkchoose(&$bri, $curtime, $action, $user, &$ret_s, $a_brisco)) {
+            return FALSE;
+        }
+
+        if ($this->table->asta_card == 9) {
+            $bri_seed = (int)($a_brisco / 10);
+            return $this->check_tourn_points($user->asta_tourn_pts[$bri_seed],
+                                             $this->table->asta_pnt, $bri_seed, $ret_s);
+        }
+
+        return TRUE;
+    }
 } // class Rules_no_draw
 
 ?>
\ No newline at end of file