*
*/
define('BIN5_PLAYERS_N', 3);
+define('BIN5_CARD_HAND', 3); // normal value 8
define('BIN5_MAX_PLAYERS', BIN5_PLAYERS_N);
// define(BIN5_SHM_MIN', (50000 * BIN5_MAX_PLAYERS));
define('BIN5_SHM_MIN', 32768);
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' => '%2$sNell\'ultima mano ha chiamato %3$s%5$s%4$s, il socio era %3$s%6$s%4$s,%1$s',
+ 'en' => '%2$sIn 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' => '%2$sNell\'ultima partita %3$s%5$s%4$s si è chiamato in mano,%1$s',
+ 'en' => '%2$sIn 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 %6$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!.%2$s',
+ 'en' => 'and he/she made %3$scapot%4$s WELL DONE!.%2$s'),
+
+ // br, hr, b, /b
+ 'info_omul' => array( 'it' => ' La partita valeva %3$s%5$s%4$s.',
+ 'en' => ' EN: The game was worth %3$s%5$s%4$s.' ),
+
+ // br, hr, b, /b
+ 'info_alpa' => array( 'it' => ' Hanno passato %3$stutti%4$s.',
+ 'en' => ' EN: Hanno passato %3$stutti%4$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_yturn'=> array( 'it' => ' tocca a <b>te</b> giocare.',
'en' => ' it\'s <b>your</b> turn.'),
// {
// $ret = array();
//
- // for ($i = 0 ; $i < (BIN5_PLAYERS_N == 5 ? 40 : 24) ; $i++) {
- // // for ($i = 0 ; $i < 40 ; $i++) {
+ // for ($i = 0 ; $i < (BIN5_CARD_HAND * BIN5_PLAYERS_N) ; $i++) {
+ // // for ($i = 0 ; $i < (BIN5_CARD_HAND * BIN5_PLAYERS_N) ; $i++) {
// $ret[$i] =& new Card($i, 'bunch', 'no_owner');
// }
//
{
$ret = array();
- for ($i = 0 ; $i < (BIN5_PLAYERS_N == 5 ? 40 : 24) ; $i++) {
+ for ($i = 0 ; $i < (BIN5_CARD_HAND * BIN5_PLAYERS_N) ; $i++) {
$this->card[$i] = new Card($i, 'bunch', 'no_owner');
}
}
mt_srand(make_seed());
- for ($i = (BIN5_PLAYERS_N == 5 ? 40 : 24) - 1 ; $i >= 0 ; $i--)
+ for ($i = (BIN5_CARD_HAND * BIN5_PLAYERS_N) - 1 ; $i >= 0 ; $i--)
$rest[$i] = $i;
- for ($i = (BIN5_PLAYERS_N == 5 ? 40 : 24) - 1 ; $i >= 0 ; $i--) {
+ for ($i = (BIN5_CARD_HAND * BIN5_PLAYERS_N) - 1 ; $i >= 0 ; $i--) {
$rn = rand(0, $i);
if ($rn == 0)
$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)
{
$tot = 0;
- for ($i = 0 ; $i < (BIN5_PLAYERS_N == 5 ? 40 : 24) ; $i++) {
+ for ($i = 0 ; $i < (BIN5_CARD_HAND * BIN5_PLAYERS_N) ; $i++) {
// for ($i = 0 ; $i < 40 ; $i++) {
if ($this->card[$i]->owner != $idx)
continue;
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();
if ($action == BIN5_RULES_ALLPASS) { // return TRUE if all correct
- $this->old_reason = "Hanno passato tutti.";
+ $this->old_reason = game_description(BIN5_RULES_ALLPASS, 'html');
+ $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_reason = game_description(BIN5_RULES_ABANDON, 'html', $user->table_pos, $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->old_reason = "";
// count points for the temporary 2 teams
- for ($i = 0 ; $i < (BIN5_PLAYERS_N == 5 ? 40 : 24) ; $i++) {
+ for ($i = 0 ; $i < (BIN5_CARD_HAND * BIN5_PLAYERS_N) ; $i++) {
$ctt = $this->card[$i]->value % 10;
$own = $this->card[$i]->owner;
if ($own == $this->asta_win || $own == $this->friend)
}
$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;
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 {
log_points($remote_addr, $curtime, $user, "STAT:BRISKIN5:FINISH_GAME", "DATABASE CONNECTION FAILED");
}
- log_points($curtime, $user, "STAT:BRISKIN5:FINISH_GAME", $plist);
+ log_points($remote_addr, $curtime, $user, "STAT:BRISKIN5:FINISH_GAME", $plist);
}
$this->game_init(&$bri->user);
$table->old_mult = $table->mult;
// count points for the temporary 2 teams
- for ($i = 0 ; $i < (BIN5_PLAYERS_N == 5 ? 40 : 24) ; $i++) {
+ 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 ($is_transition) { // && $user->subst == "asta" superfluo
$ret .= "|";
- for ($i = 0 ; $i < 8 ; $i++) {
+ for ($i = 0 ; $i < BIN5_CARD_HAND ; $i++) {
for ($e = 0 ; $e < BIN5_PLAYERS_N ; $e++) {
$ct = 0;
- for ($o = 0 ; $o < (BIN5_PLAYERS_N == 5 ? 40 : 24) && $ct < $i+1 ; $o++) {
+ for ($o = 0 ; $o < (BIN5_CARD_HAND * BIN5_PLAYERS_N) && $ct < $i+1 ; $o++) {
// for ($o = 0 ; $o < 40 && $ct < $i+1 ; $o++) {
if ($table->card[$o]->owner == (($e + $table->gstart) % BIN5_PLAYERS_N)) {
$ct++;
$ontabl = array(-1,-1,-1,-1,-1);
$cards = array();
- for ($i = 0 ; $i < (BIN5_PLAYERS_N == 5 ? 40 : 24) ; $i++) {
+ for ($i = 0 ; $i < (BIN5_CARD_HAND * BIN5_PLAYERS_N) ; $i++) {
// for ($i = 0 ; $i < 40 ; $i++) {
if ($table->card[$i]->stat == 'hand') {
if ($table->card[$i]->owner == $table_pos) {
$oursarg = "";
for ($i = 0 ; $i < $inhand[$table_pos] ; $i++)
$oursarg .= ($i == 0 ? "" : ", ").$cards[$i];
- for ($i = $inhand[$table_pos] ; $i < 8 ; $i++)
+ for ($i = $inhand[$table_pos] ; $i < BIN5_CARD_HAND ; $i++)
$oursarg .= ($i == 0 ? "" : ", ")."-1";
$ret .= sprintf('card_setours(%s);', $oursarg);
for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
/* Qui sotto al posto di + 1 c'era + ->gstart ... credo in modo errato */
$ret .= sprintf('cards_dispose(%d,%d,%d);', $i,
- ($inhand[$i] <= 8 ? $inhand[$i] : 8) , $taked[$i]);
+ ($inhand[$i] <= BIN5_CARD_HAND ? $inhand[$i] : BIN5_CARD_HAND), $taked[$i]);
if ($ontabl[$i] != -1) {
$ret .= sprintf('card_place(%d,%d,%d,%d,%d);',$i, $inhand[$i],
$cur_val = 100;
$cur_seed = $table->briscola - ($table->briscola % 10);
- for ($i = 0 ; $i < (BIN5_PLAYERS_N == 5 ? 40 : 24) ; $i++) {
+ for ($i = 0 ; $i < (BIN5_CARD_HAND * BIN5_PLAYERS_N) ; $i++) {
// for ($i = 0 ; $i < 40 ; $i++) {
if ($table->card[$i]->stat != "table")
continue;
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 = game_description(BIN5_RULES_FINISH, 'html', $win, $bri->user[$win]->name, $fri, $bri->user[$fri]->name,
+ $table->old_pnt, $table->old_asta_pnt);
- $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));
}
}
+function game_description($act, $form, $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_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_alpa'][$G_lang],
+ $tg_br, $tg_hr, $tg_bo, $tg_bc,
+ $win_name));
+ }
+ // implicit else bin5_rules_finish
+ $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])));
+ }
+ }
+ }
+ return ($noty);
+}
+
?>
projects / brisk.git / blobdiff