/*
* brisk - briskin5.phh
*
- * Copyright (C) 2006-2012 Matteo Nastasi
+ * Copyright (C) 2006-2013 Matteo Nastasi
* mailto: nastasi@alternativeoutput.it
* matteo.nastasi@milug.org
* web: http://www.alternativeoutput.it
define('BIN5_SHM_DLT', 32768);
define('BIN5_PROXY_PATH', PROXY_PATH."/bin5");
-define('BIN5_RULES_FINISH', 0);
-define('BIN5_RULES_ABANDON', 1);
-define('BIN5_RULES_ALLPASS', 2);
+define('BIN5_RULES_OLDSCHEMA', -1);
+define('BIN5_RULES_FINISH', 0);
+define('BIN5_RULES_ABANDON', 1);
+define('BIN5_RULES_ALLPASS', 2);
$mlang_bin5_bin5 = array(
- 'info_part' => array( 'it' => '<hr>Nell\'ultima mano ha chiamato <b>%s</b>, il socio era <b>%s</b>,<br>',
- 'en' => '<hr>In the last hand the declarer was <b>%s</b>, the partner was <b>%s</b>,<br>'),
- 'info_capp' => array( 'it' => 'hanno fatto <b>cappotto</b> EBBRAVI!.<br>',
- 'en' => 'and they made <b>capot</b> WELL DONE!.<br>'),
- 'info_pnt' => array( 'it' => 'dovevano fare <b>%s</b> punti e ne hanno fatti <b>%d</b>: hanno %s.<br>',
- 'en' => 'they had to do <b>%s</b> points and they had made <b>%d</b>: they have %s.<br>'),
- 'info_alea' => array( 'it' => 'almeno ',
- 'en' => 'at least '),
- 'info_more' => array( 'it' => 'più di 60',
- 'en' => 'over 60'),
- 'info_win' => array( 'it' => '<b>vinto</b>',
- 'en' => '<b>win</b>'),
- 'info_peer' => array( 'it' => '<b>pareggiato</b>',
- 'en' => '<b>drew</b>'),
- 'info_lost' => array( 'it' => '<b>perso</b>',
- 'en' => '<b>lost</b>'),
-
- 'info_alon' => array( 'it' => '<hr>Nell\'ultima partita <b>%s</b> si è chiamato in mano,<br>',
- 'en' => '<hr>In the last hand <b>%s</b> play alone against each other,<br>'),
- 'info_apnt' => array( 'it' => 'doveva fare <b>%s</b> punti e ne ha fatti <b>%d</b>: ha %s.<br>',
- 'en' => 'he/she had to do <b>%s</b> points and they had made <b>%d</b>: he/she had %s.<br>'),
- 'info_acap' => array( 'it' => 'ha fatto <b>cappotto</b> EBBRAVO!.<hr>',
- 'en' => 'and he/she made <b>capot</b> WELL DONE!.<hr>'),
-
- 'info_omul' => array( 'it' => ' La partita valeva <b>%s</b>.',
- 'en' => ' EN: The game was worth <b>%s</b>.' ),
+ // br, hr, b, /b, win, fri
+ 'info_part' => array( 'it' => 'Nell\'ultima mano ha chiamato %3$s%5$s%4$s, il socio era %3$s%6$s%4$s,%1$s',
+ 'en' => 'In the last hand the declarer was %3$s%5$s%4$s, the partner was %3$s%6$s%4$s,%1$s'),
+ // br, hr, b, /b
+ 'info_capp' => array( 'it' => 'hanno fatto %3$scappotto%4$s EBBRAVI!.%1$s',
+ 'en' => 'and they made %3Dscapot%4$s WELL DONE!.%1$s'),
+
+ // br, hr, b, /b, old_asta_pnt, old_pnt, winornot
+ 'info_alea' => array( 'it' => 'dovevano fare %3$salmeno %5$d%4$s punti e ne hanno fatti %3$s%6$d%4$s: hanno %7$s.%1$s',
+ 'en' => 'they had to do %3$sat least %5$d%4$s points and they had made %3$s%6$d%4$s: they have %7$s.%1$s'),
+ // br, hr, b, /b, old_pnt, winornot
+ 'info_more' => array( 'it' => 'dovevano fare %3$spiù di 60%4$s punti e ne hanno fatti %3$s%5$d%4$s: hanno %6$s.%1$s',
+ 'en' => 'they had to do %3$sover 60%4$s points and they had made %3$s%5$d%4$s: they have %3$s%6$s%4$s.%1$s'),
+ 'info_win' => array( 'it' => 'vinto',
+ 'en' => 'win'),
+ 'info_peer' => array( 'it' => 'pareggiato',
+ 'en' => 'drew'),
+ 'info_lost' => array( 'it' => 'perso',
+ 'en' => 'lost'),
+
+ // br, hr, b, /b, win_name
+ 'info_alon' => array( 'it' => 'Nell\'ultima partita %3$s%5$s%4$s si è chiamato in mano,%1$s',
+ 'en' => 'In the last hand %3$s%5$s%4$s play alone against each other,%1$s'),
+ // br, hr, b, /b, old_asta_pnt, old_pnt, winornot
+ 'info_aleaa' => array( 'it' => 'doveva fare %3$salmeno %5$d%4$s punti e ne ha fatti %3$s%6$d%4$s: ha %3$s%7$s%4$s.%1$s',
+ 'en' => 'he/she had to do %3$sat least %5$d%4$s points and they had made %3$s%6$d%4$s: he/she had %3$s%7$s%4$s.%1$s'),
+ // br, hr, b, /b, old_pnt, winornot
+ 'info_morea' => array( 'it' => 'doveva fare %3$spiù di 60%4$s punti e ne ha fatti %3$s%5$d%4$s: ha %3$s%6$s%4$s.%1$s',
+ 'en' => 'he/she had to do %3$smore than 60%4$s points and they had made %3$s%5$d%4$s: he/she had %3$s%6$s%4$s.%1$s'),
+ // br, hr, b, /b
+ 'info_acap' => array( 'it' => 'ha fatto %3$scappotto%4$s EBBRAVO!.%1$s',
+ 'en' => 'and he/she made %3$scapot%4$s WELL DONE!.%1$s'),
+
+ // br, hr, b, /b
+ 'info_omul' => array( 'it' => '%1$sLa partita valeva %3$s%5$s%4$s.%1$s',
+ 'en' => '%1$sEN: The game was worth %3$s%5$s%4$s.%1$s' ),
+
+ // br, hr, b, /b
+ 'info_alpa' => array( 'it' => '%1$sHanno passato %3$stutti%4$s.%1$s',
+ 'en' => '%1$sEN: Hanno passato %3$stutti%4$s.%1$s' ),
+
+ // br, hr, b, /b, aband-name
+ 'info_aban' => array( 'it' => ' Ha lasciato %3$s%5$s%4$s perché aveva al massimo %3$s2 punti%4$s.',
+ 'en' => ' EN: Ha lasciato %3$s%5$s%4$s perché aveva al massimo %3$s2 punti%4$s.'),
+ 'info_shuf' => array( 'it' => 'Il mazzo a <b>%s</b>, ',
+ 'en' => '<b>%s</b> shuffled the cards, '),
'info_yturn'=> array( 'it' => ' tocca a <b>te</b> giocare.',
'en' => ' it\'s <b>your</b> turn.'),
'info_turn' => array( 'it' => 'tocca a <b>%s</b> giocare.',
'en' => ' The game worth <b>%s</b>.' ),
'info_yshuf'=> array( 'it' => 'Fai <b>tu</b> il mazzo, ',
'en' => 'It\'s <b>your</b> shuffled the cards, '),
- 'info_shuf' => array( 'it' => 'Il mazzo a <b>%s</b>, ',
- 'en' => '<b>%s</b> shuffled the cards, '),
+ 'info_match'=> array( 'it' => 'Il codice della partita è <b>%d</b>.',
+ 'en' => 'Match code is <b>%d</b>.'),
'btn_bkgame'=> array( 'it' => 'torna alla partita',
'en' => 'back to the game'),
'call_wptn' => array( 'it' => '<br>con %d punti',
var $briscola;
var $friend; // the callee idx position at table
+ var $match_id; // the id of the match on the database (-1 == just not saved)
+
+ var $old_act; // last action that trigs the end of the game
var $old_mazzo;
var $old_reason;
var $old_asta_pnt;
$thiz->friend = -1;
$thiz->turn = 0;
+ $thiz->match_id = -1;
+
+ $thiz->old_act = -1;
+ $thiz->old_mazzo = -1;
$thiz->old_reason = "";
$thiz->old_asta_pnt = -1;
$thiz->old_mult = -1;
parent::copy($from);
- $thiz->card = $from->card;
- $thiz->mazzo = $from->mazzo; // REVIEW
- $thiz->gstart = $from->gstart;
- $thiz->turn = $from->turn;
+ $thiz->card = $from->card;
+ $thiz->mazzo = $from->mazzo; // REVIEW
+ $thiz->gstart = $from->gstart;
+ $thiz->turn = $from->turn;
- $thiz->asta_pla = $from->asta_pla;
- $thiz->asta_pla_n = $from->asta_pla_n;
- $thiz->asta_card = $from->asta_card;
- $thiz->asta_pnt = $from->asta_pnt;
+ $thiz->asta_pla = $from->asta_pla;
+ $thiz->asta_pla_n = $from->asta_pla_n;
+ $thiz->asta_card = $from->asta_card;
+ $thiz->asta_pnt = $from->asta_pnt;
- $thiz->mult = $from->mult;
- $thiz->points = $from->points;
- $thiz->points_n = $from->points_n;
- $thiz->total = $from->total;
+ $thiz->mult = $from->mult;
+ $thiz->points = $from->points;
+ $thiz->points_n = $from->points_n;
+ $thiz->total = $from->total;
- $thiz->asta_win = $from->asta_win;
- $thiz->briscola = $from->briscola;
- $thiz->friend = $from->friend;
+ $thiz->asta_win = $from->asta_win;
+ $thiz->briscola = $from->briscola;
+ $thiz->friend = $from->friend;
- $thiz->old_reason = $from->old_reason;
+ $thiz->match_id = $from->match_id;
+
+ $thiz->old_act = $from->old_act;
+ $thiz->old_mazzo = $from->old_mazzo;
+ $thiz->old_reason = $from->old_reason;
$thiz->old_asta_pnt = $from->old_asta_pnt;
- $thiz->old_mult = $from->mult;
- $thiz->old_pnt = $from->old_pnt;
+ $thiz->old_mult = $from->mult;
+ $thiz->old_pnt = $from->old_pnt;
$thiz->old_asta_win = $from->old_asta_win;
- $thiz->old_friend = $from->old_friend;
+ $thiz->old_friend = $from->old_friend;
return ($thiz);
}
$thiz->mazzo = rand(0,PLAYERS_N-1);
$thiz->points_n = 0;
$thiz->mult = 0;
+
+ $thiz->match_id = -1;
+
$thiz->old_asta_win = -1;
$thiz->old_reason = "";
return ($thiz);
}
- function asta2mult($asta_pnt)
+ static function asta2mult($asta_pnt)
{
if ($asta_pnt > 110)
return (6);
function multer($is_new)
{
if ($is_new) {
- return (pow(2, $this->mult) * $this->asta2mult($this->asta_pnt));
+ // return (pow(2, $this->mult) * $this->asta2mult($this->asta_pnt));
+ return (static::s_multer($this->mult, $this->asta_pnt));
}
else {
- return (pow(2, $this->old_mult) * $this->asta2mult($this->old_asta_pnt));
+ // return (pow(2, $this->old_mult) * $this->asta2mult($this->old_asta_pnt));
+ return (static::s_multer($this->old_mult, $this->old_asta_pnt));
}
}
+ static function s_multer($mult, $pnt)
+ {
+ return (pow(2, $mult) * static::asta2mult($pnt));
+ }
// function bunch_create_old() function AND
// {
for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
$this->total[$i] = 0;
$user_cur = $userarr[$this->player[$i]];
+ $user_cur->stat_set('table');
$user_cur->exitislock = TRUE;
}
$user_cur->asta_card = -2;
$user_cur->asta_pnt = -1;
$user_cur->handpt = $this->hand_points($i);
- // SEE function calculate_points(&$table)
}
log_rd2("GEND 4");
}
$this->mazzo = ($this->mazzo + $delta) % BIN5_PLAYERS_N;
}
+ function mult_inc($val)
+ {
+ $this->old_mult = $this->mult;
+ $this->mult += $val;
+ }
+
+ function mult_set($val)
+ {
+ $this->old_mult = $this->mult;
+ $this->mult = $val;
+ }
function hand_points($idx)
{
return ($ct);
}
- function rules_engine($bri, $action, $user)
+ function rules_engine(&$bri, $curtime, $action, $user)
{
- GLOBAL $G_all_points;
+ GLOBAL $G_all_points, $G_dbasetype;
$pts = array();
+ $this->old_act = $action;
if ($action == BIN5_RULES_ALLPASS) { // return TRUE if all correct
- $this->old_reason = "Hanno passato tutti.";
+ $this->old_asta_win = -1;
$this->old_pnt = 0;
- $this->mult += 1;
+ $this->mult_inc(1);
for ($i = 0 ; $i < PLAYERS_N ; $i++) {
$pts[$i] = 0;
}
}
else if ($action == BIN5_RULES_ABANDON) { // return TRUE if all correct
log_wr(sprintf("GIOCO FINITO !!!"));
-
- $this->old_reason = sprintf("Ha lasciato %s perché aveva al massimo 2 punti.", xcape($user->name));
+ $this->old_asta_win = $user->table_pos;
$this->old_pnt = 0;
- $this->mult += 1;
+ $this->mult_inc(1);
for ($i = 0 ; $i < PLAYERS_N ; $i++) {
$pts[$i] = 0;
}
$this->points_n++;
$this->old_pnt = $pro;
- $this->mult += 1;
+ $this->mult_inc(1);
// return($pts);
break;
}
$this->points_n++;
$this->old_pnt = $pro;
- $this->mult = 0;
+ $this->old_asta_win = $this->asta_win;
+ $this->mult_set(0);
// return($pts);
} while (0);
$plist .= $codes;
log_legal($curtime, $user->ip, $user, "STAT:BRISKIN5:FINISH_GAME", $plist);
- $this->old_mazzo = $this->mazzo;
$this->old_asta_pnt = $this->asta_pnt;
- $this->old_mult = $this->mult;
- // $this->old_pnt and $this->old_reason are specific
- $this->old_asta_win = $this->asta_win;
+ // $this->old_mazzo is managed by ->game_next();
+ // $this->old_mult, $this->old_pnt, $this->old_reason and $this->old_asta_win are specific
+
$this->old_friend = $this->friend;
+ $this->old_reason = game_description($action, 'html', $this->old_mult,
+ $this->old_asta_win, $bri->user[$this->player[$this->old_asta_win]]->name,
+ $this->old_friend, $bri->user[$this->player[$this->old_friend]]->name,
+ $this->old_pnt, $this->old_asta_pnt);
+
if ($user->table_orig < TABLES_AUTH_N) {
require_once("../Obj/dbase_".$G_dbasetype.".phh");
if (($bdb = BriskDB::create()) != FALSE) {
- $bdb->bin5_points_save($curtime, $this, $user->table_orig, $ucodes, $pts);
+ $bdb->bin5_points_save($curtime, $this, $user->table_orig, $action, $ucodes, $pts);
unset($bdb);
}
else {
define('BIN5_USER_FLAG_RING_ENDAUCT', 0x01);
-
+define('BIN5_USER_CONTINUE_INIT', -1);
+define('BIN5_USER_CONTINUE_ALREADY', -2);
class Bin5_user extends User {
var $asta_card; //
var $asta_pnt; //
var $exitislock; // Player can exit from the table ?
var $privflags; // Flags for briskin5 only
+ var $continue; // Id of the match that the user would continue
+
const BASE = "../";
function User() {
$thiz->handpt = -1;
$thiz->exitislock = TRUE;
$thiz->privflags = 0;
+ $thiz->continue = BIN5_USER_CONTINUE_INIT;
return ($thiz);
}
$this->handpt = $from->handpt;
$this->exitislock = $from->exitislock;
$this->privflags = $from->privflags;
+ $this->continue = $from->continue;
}
/* CLONE NOT USED
/* NOTE: at this moment idx and table_pos fields have the same value
but diffentent functions, we keep them separated for a while */
$thiz->room = $bri;
- $thiz->idx = $table_pos;
+ $thiz->idx = $table_pos; // it is the position in the mini-room,
+ // not related to table pos (see below)
$thiz->asta_card = -2;
$thiz->asta_pnt = -1;
$thiz->handpt = -1;
$thiz->exitislock = TRUE;
+ $thiz->continue = BIN5_USER_CONTINUE_INIT;
log_wr("Bin5 constructor");
}
for ($i = $cur_step ; $i < $this->step ; $i++) {
$ii = $i % COMM_N;
+ if ($this->comm[$ii] == "") {
+ if ($i == $cur_step)
+ continue;
+ else
+ break;
+ }
log_rd2("ADDED TO THE STREAM: ".$this->comm[$ii]);
$ret .= $this->comm[$ii];
}
return ($ret);
- } // function maincheck (...
-
-
-
+ } // function maincheck (...
+ function continue_set($match_code)
+ {
+ $this->continue = $match_code;
+ }
+ function continue_get() {
+ return ($this->continue);
+ }
} // end class Bin5_user
-
class Bin5 {
static $delta_t = array();
}
-// if success an array with points of each player is returned
-function calculate_points_old(&$table)
-{
- GLOBAL $G_all_points;
-
- $ret = array();
- $pro = 0;
-
- if ($table->asta_pnt == 60)
- $table->asta_pnt = 61;
-
- $table->old_reason = "";
- $table->old_asta_win = $table->asta_win;
- $table->old_friend = $table->friend;
- $table->old_asta_pnt = $table->asta_pnt;
- $table->old_mult = $table->mult;
-
- // count points for the temporary 2 teams
- for ($i = 0 ; $i < (BIN5_CARD_HAND * BIN5_PLAYERS_N) ; $i++) {
- // for ($i = 0 ; $i < 40 ; $i++) {
- $ctt = $table->card[$i]->value % 10;
- $own = $table->card[$i]->owner;
- if ($own == $table->asta_win || $own == $table->friend)
- $pro += $G_all_points[$ctt];
- }
-
- log_wr(sprintf("PRO: [%d]", $pro));
-
- // PATTA case !
- if ($table->asta_pnt == 61 && $pro == 60) {
- $table->points[$table->points_n % MAX_POINTS] = array();
- for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
- $table->points[$table->points_n % MAX_POINTS][$i] = 0;
- $ret[$i] = 0;
- }
- $table->points_n++;
- $table->old_pnt = $pro;
- $table->mult += 1;
-
- return($ret);
- }
-
- if ($pro >= $table->asta_pnt)
- $sig = 1;
- else
- $sig = -1;
-
- $table->points[$table->points_n % MAX_POINTS] = array();
- for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
- if ($i == $table->asta_win)
- $pt = ($i == $table->friend ? 4 : 2);
- else if ($i == $table->friend)
- $pt = 1;
- else
- $pt = -1;
-
-
-
- log_wr(sprintf("PRO: pt[%d][%d] = %d", $table->points_n % MAX_POINTS, $i, $pt));
-
- $pt = $pt * $sig * $table->multer(TRUE) * ($pro == 120 ? 2 : 1);
-
- log_wr(sprintf("PRO:[%d][%d][%d]", $sig, $table->multer(TRUE), ($pro == 120 ? 2 : 1)));
-
- $table->points[$table->points_n % MAX_POINTS][$i] = $pt;
- $table->total[$i] += $pt;
- $ret[$i] = $pt;
- }
- $table->points_n++;
- $table->old_pnt = $pro;
- $table->mult = 0;
-
- return($ret);
-}
-
-
/* show table
is_transition (is from room to table ?)
is_again (is another game)
for ($e = 0 ; $e < BIN5_PLAYERS_N ; $e++)
$noty .= sprintf('<td class=\"td_points\">%d</td>', $table->total[$e]);
$noty .= "</tr></table>";
-
+ $noty .= "<hr>";
if ($table->old_reason != "") {
- $noty .= sprintf("<hr><b>%s</b><br>", xcape($table->old_reason));
+ $noty .= $table->old_reason;
}
- if ($table->old_asta_win != -1) {
- log_main("TABLE_OLD_WIN:".$table->old_asta_win);
- $win = $table->player[$table->old_asta_win];
- log_main("TABLE_OLD_FRIEND:".$table->old_friend);
- $fri = $table->player[$table->old_friend];
-
- $wol = game_result($table->old_asta_pnt, $table->old_pnt);
-
- if ($win != $fri) {
- /* MLANG: "<hr>Nell'ultima mano ha chiamato <b>%s</b>, il socio era <b>%s</b>,<br>", "hanno fatto <b>cappotto</b> EBBRAVI!.<hr>", "dovevano fare <b>%s</b> punti e ne hanno fatti <b>%d</b>: hanno <b>%s</b>.<hr>", "<hr>Nell'ultima mano <b>%s</b> si è chiamato in mano,<br>", "ha fatto <b>cappotto</b> EBBRAVO!.<hr>", "doveva fare <b>%s</b> punti e ne ha fatti <b>%d</b>: ha <b>%s</b>.<hr>", ($table->old_asta_pnt > 61 ? "almeno ".$table->old_asta_pnt : 'più di 60'), $table->old_pnt, ($wol == 1 ? "vinto" : ($wol == 0 ? "pareggiato" : "perso" */
-
- $noty .= sprintf($mlang_bin5_bin5['info_part'][$G_lang],
- xcape($bri->user[$win]->name),
- xcape($bri->user[$fri]->name));
- if ($table->old_pnt == 120) {
- $noty .= sprintf($mlang_bin5_bin5['info_capp'][$G_lang]);
- }
- else {
- $noty .= sprintf($mlang_bin5_bin5['info_pnt'][$G_lang],
- ($table->old_asta_pnt > 61 ? $mlang_bin5_bin5['info_alea'][$G_lang].$table->old_asta_pnt :
- $mlang_bin5_bin5['info_more'][$G_lang]), $table->old_pnt,
- ($wol == 1 ? $mlang_bin5_bin5['info_win'][$G_lang] : ($wol == 0 ? $mlang_bin5_bin5['info_peer'][$G_lang] : $mlang_bin5_bin5['info_lost'][$G_lang])));
- }
- }
- else {
- $noty .= sprintf($mlang_bin5_bin5['info_alon'][$G_lang],
- xcape($bri->user[$win]->name));
- if ($table->old_pnt == 120) {
- $noty .= sprintf($mlang_bin5_bin5['info_acap'][$G_lang]);
- }
- else {
- $noty .= sprintf($mlang_bin5_bin5['info_apnt'][$G_lang],
-
- ($table->old_asta_pnt > 61 ? $mlang_bin5_bin5['info_alea'][$G_lang].$table->old_asta_pnt :
- $mlang_bin5_bin5['info_more'][$G_lang]), $table->old_pnt,
-
- ($wol == 1 ? $mlang_bin5_bin5['info_win'][$G_lang] : ($wol == 0 ? $mlang_bin5_bin5['info_peer'][$G_lang] : $mlang_bin5_bin5['info_lost'][$G_lang])));
- }
- }
- $old_multer = $table->multer(FALSE);
- if ($old_multer > 1) {
- $noty .= sprintf($mlang_bin5_bin5['info_omul'][$G_lang], multoval($old_multer));
- }
- $noty .= "<hr><br>";
- }
/* MLANG: "Fai <b>tu</b> il mazzo,", "Il mazzo a <b>$unam</b>," */
if ($table->mazzo == $table_pos)
$noty .= $mlang_bin5_bin5['info_yshuf'][$G_lang];
$noty .= sprintf($mlang_bin5_bin5['info_mult'][$G_lang], multoval($multer) );
}
$noty .= "<hr><br>";
+ if ($table->match_id != -1) {
+ $noty .= sprintf($mlang_bin5_bin5['info_match'][$G_lang], $table->match_id);
+ $noty .= "<hr><br>";
+ }
$ret .= show_notify($noty, 3000, $mlang_bin5_bin5['btn_bkgame'][$G_lang], 500, 400);
/* NOTE: show_notify($noty, 3000, "torna alla partita", 500,
* 130 + ($table->points_n > 0 ? 50 : 0) +
}
}
+function game_description($act, $form, $old_mult, $win = -1, $win_name = "?1?", $fri = -1, $fri_name = "?2?",
+ $old_pnt = -1, $old_asta_pnt = -1)
+{
+ GLOBAL $G_lang, $mlang_bin5_bin5;
+
+ if ($form == 'html') {
+ $tg_br = "<br>";
+ $tg_hr = "<hr>";
+ $tg_bo = "<b>";
+ $tg_bc = "</b>";
+ $win_name = xcape($win_name);
+ $fri_name = xcape($fri_name);
+ }
+ else {
+ $tg_br = " ";
+ $tg_hr = " ";
+ $tg_bo = "";
+ $tg_bc = "";
+ }
+
+ if ($act == BIN5_RULES_OLDSCHEMA) {
+ return ("");
+ }
+ else if ($act == BIN5_RULES_ALLPASS) {
+ return (sprintf($mlang_bin5_bin5['info_alpa'][$G_lang],
+ $tg_br, $tg_hr, $tg_bo, $tg_bc));
+ }
+ else if ($act == BIN5_RULES_ABANDON) {
+ return (sprintf($mlang_bin5_bin5['info_aban'][$G_lang],
+ $tg_br, $tg_hr, $tg_bo, $tg_bc,
+ $win_name));
+ }
+ else {
+ $wol = game_result($old_asta_pnt, $old_pnt);
+
+ $noty = "";
+
+ if ($win != $fri) { // not alone case
+ /* MLANG: "<hr>Nell'ultima mano ha chiamato <b>%s</b>, il socio era <b>%s</b>,<br>", "hanno fatto <b>cappotto</b> EBBRAVI!.<hr>", "dovevano fare <b>%s</b> punti e ne hanno fatti <b>%d</b>: hanno <b>%s</b>.<hr>", "<hr>Nell'ultima mano <b>%s</b> si è chiamato in mano,<br>", "ha fatto <b>cappotto</b> EBBRAVO!.<hr>", "doveva fare <b>%s</b> punti e ne ha fatti <b>%d</b>: ha <b>%s</b>.<hr>", ($table->old_asta_pnt > 61 ? "almeno ".$table->old_asta_pnt : 'più di 60'), $table->old_pnt, ($wol == 1 ? "vinto" : ($wol == 0 ? "pareggiato" : "perso" */
+
+ $noty .= sprintf($mlang_bin5_bin5['info_part'][$G_lang],
+ $tg_br, $tg_hr, $tg_bo, $tg_bc,
+ $win_name,
+ $fri_name);
+ if ($old_pnt == 120) {
+ $noty .= sprintf($mlang_bin5_bin5['info_capp'][$G_lang],
+ $tg_br, $tg_hr, $tg_bo, $tg_bc );
+ }
+ else {
+ if ($old_asta_pnt > 61) {
+ $noty .= sprintf($mlang_bin5_bin5['info_alea'][$G_lang],
+ $tg_br, $tg_hr, $tg_bo, $tg_bc,
+ $old_asta_pnt, $old_pnt,
+ ($wol == 1 ? $mlang_bin5_bin5['info_win'][$G_lang] :
+ ($wol == 0 ? $mlang_bin5_bin5['info_peer'][$G_lang] :
+ $mlang_bin5_bin5['info_lost'][$G_lang])));
+ }
+ else {
+ $noty .= sprintf($mlang_bin5_bin5['info_more'][$G_lang],
+ $tg_br, $tg_hr, $tg_bo, $tg_bc,
+ $old_pnt,
+ ($wol == 1 ? $mlang_bin5_bin5['info_win'][$G_lang] :
+ ($wol == 0 ? $mlang_bin5_bin5['info_peer'][$G_lang] :
+ $mlang_bin5_bin5['info_lost'][$G_lang])));
+ } // else of if ($old_asta_pnt > 61) {
+ } // else of if ($old_pnt == 120) {
+ } // if ($win != $fri) { // not alone case
+ else {
+ $noty .= sprintf($mlang_bin5_bin5['info_alon'][$G_lang],
+ $tg_br, $tg_hr, $tg_bo, $tg_bc,
+ $win_name);
+ if ($old_pnt == 120) {
+ $noty .= sprintf($mlang_bin5_bin5['info_acap'][$G_lang],
+ $tg_br, $tg_hr, $tg_bo, $tg_bc);
+ }
+ else {
+ if ($old_asta_pnt > 61) {
+ $noty .= sprintf($mlang_bin5_bin5['info_aleaa'][$G_lang],
+ $tg_br, $tg_hr, $tg_bo, $tg_bc,
+ $old_asta_pnt, $old_pnt,
+ ($wol == 1 ? $mlang_bin5_bin5['info_win'][$G_lang] :
+ ($wol == 0 ? $mlang_bin5_bin5['info_peer'][$G_lang] :
+ $mlang_bin5_bin5['info_lost'][$G_lang])));
+ }
+ else {
+ $noty .= sprintf($mlang_bin5_bin5['info_morea'][$G_lang],
+ $tg_br, $tg_hr, $tg_bo, $tg_bc,
+ $old_pnt,
+ ($wol == 1 ? $mlang_bin5_bin5['info_win'][$G_lang] :
+ ($wol == 0 ? $mlang_bin5_bin5['info_peer'][$G_lang] :
+ $mlang_bin5_bin5['info_lost'][$G_lang])));
+ }
+ }
+ }
+ }
+
+ $old_multer = Bin5_table::s_multer($old_mult, $old_asta_pnt);
+ if ($old_multer > 1) {
+ $noty .= sprintf($mlang_bin5_bin5['info_omul'][$G_lang],
+ $tg_br, $tg_hr, $tg_bo, $tg_bc,
+ multoval($old_multer));
+ }
+ $noty .= sprintf('%2$s%1$s', $tg_br, $tg_hr);
+
+ return ($noty);
+}
+
?>