- for ($i = 0 ; $i < count($root_wellarr) ; $i++)
- $ret .= sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, str_replace('"', '\"', $root_wellarr[$i]));
-
- return ($ret);
-}
-
-function table_wellcome($user)
-{
- GLOBAL $table_wellarr;
- $ret = "";
-
- for ($i = 0 ; $i < count($table_wellarr) ; $i++)
- $ret .= sprintf('chatt_sub("%s", [2, "ChanServ: "],"%s");', "", str_replace('"', '\"', $table_wellarr[$i]));
-
- return ($ret);
-}
-
-
-
-/* show table
-is_transition (is from room to table ?)
-is_again (is another game)
-
-Examples of $is_transition, $is_again:
- from reload of the page: FALSE, FALSE
- from sitdown in room: TRUE, FALSE
- from table: asta cmd e tutti passano: TRUE, TRUE
- from table: fine partita: TRUE, TRUE
- */
-function show_table(&$room, &$user, $sendstep, $is_transition, $is_again)
-{
- $table_idx = $user->table;
- $table = &$room->table[$table_idx];
- $table_pos = $user->table_pos;
-
- $ret = "table_init();";
- $ret .= $table->exitlock_show(&$room->user, $table_pos);
- if (!$is_again) {
- /* GENERAL STATUS */
- $ret .= sprintf( 'gst.st = %d; stat = "%s"; subst = "%s"; table_pos = %d;',
- $sendstep, $user->stat, $user->subst, $table_pos);
-
- log_rd(sprintf( 'SHOW_TABLE: gst.st = %d; stat = "%s"; subst = "%s"; table_pos = %d;', $sendstep, $user->stat, $user->subst, $table_pos));
-
- /* BACKGROUND */
- $ret .= "background_set();";
-
- /* USERS INFO */
- $itin = ($user->flags & USER_FLAG_AUTH ? "<i>" : "");
- $itou = ($user->flags & USER_FLAG_AUTH ? "</i>" : "");
-
- $ret .= sprintf('$("myname").innerHTML = "<b>%s%s%s</b>";', $itin, xcape($user->name), $itou);
- $ret .= sprintf('set_names([%d, "%s"], [%d, "%s"], [%d, "%s"], [%d, "%s"], [%d, "%s"]); ',
- $room->user[$table->player[($table_pos)%PLAYERS_N]]->flags,
- xcape($room->user[$table->player[($table_pos)%PLAYERS_N]]->name),
-
- $room->user[$table->player[($table_pos+1)%PLAYERS_N]]->flags,
- xcape($room->user[$table->player[($table_pos+1)%PLAYERS_N]]->name),
-
- $room->user[$table->player[($table_pos+2)%PLAYERS_N]]->flags,
- xcape($room->user[$table->player[($table_pos+2)%PLAYERS_N]]->name),
-
- (PLAYERS_N == 3 ? 0 : $room->user[$table->player[($table_pos+3)%PLAYERS_N]]->flags),
- (PLAYERS_N == 3 ? "" : xcape($room->user[$table->player[($table_pos+3)%PLAYERS_N]]->name)),
-
- (PLAYERS_N == 3 ? 0 : $room->user[$table->player[($table_pos+4)%PLAYERS_N]]->flags),
- (PLAYERS_N == 3 ? "" : xcape($room->user[$table->player[($table_pos+4)%PLAYERS_N]]->name)));
- }
- /* NOTIFY FOR THE CARD MAKER */
- if ($is_transition) { // && $user->subst == "asta" superfluo
- $ret .= show_table_info(&$room, &$table, $table_pos);
- }
- if (!$is_again)
- $ret .= table_wellcome($user);
-
- if ($is_transition && !$is_again) { // appena seduti al tavolo, play della mucca
- $ret .= playsound("cow.mp3");
- }
-
-
- /* CARDS */
- if ($is_transition) { // && $user->subst == "asta" superfluo
- $ret .= "|";
-
- for ($i = 0 ; $i < 8 ; $i++) {
- for ($e = 0 ; $e < PLAYERS_N ; $e++) {
- $ct = 0;
- for ($o = 0 ; $o < 40 && $ct < $i+1 ; $o++) {
- if ($table->card[$o]->owner == (($e + $table->gstart) % PLAYERS_N)) {
- $ct++;
- if ($ct == $i+1)
- break;
- }
- }
- log_rd("O ".$o." VAL ".$table->card[$o]->value." Owner: ".$table->card[$o]->owner);
-
- $ret .= sprintf( ' card_send(%d,%d,%d,%8.2f,%d);|', ($table->gstart + $e) % PLAYERS_N,
- $i, ((($e + PLAYERS_N - $table_pos + $table->gstart) % PLAYERS_N) == 0 ?
- $table->card[$o]->value : -1),
- ($i == 7 && $e == (PLAYERS_N - 1) ? 1 : 0.5),$i+1);
- }
- }
- }
- else {
- $taked = array(0,0,0,0,0);
- $inhand = array(0,0,0,0,0);
- $ontabl = array(-1,-1,-1,-1,-1);
- $cards = array();
-
- for ($i = 0 ; $i < 40 ; $i++) {
- if ($table->card[$i]->stat == 'hand') {
- if ($table->card[$i]->owner == $table_pos) {
- $cards[$inhand[$table->card[$i]->owner]] = $table->card[$i]->value;
- }
- $inhand[$table->card[$i]->owner]++;
- }
- else if ($table->card[$i]->stat == 'take') {
- log_main("Card taked: ".$table->card[$i]->value."OWN: ".$table->card[$i]->owner);
- $taked[$table->card[$i]->owner]++;
- }
- else if ($table->card[$i]->stat == 'table') {
- $ontabl[$table->card[$i]->owner] = $i;
- }
- }
- $logg = "\n";
- for ($i = 0 ; $i < PLAYERS_N ; $i++) {
- $logg .= sprintf("INHAND: %d IN TABLE %d TAKED %d\n", $inhand[$i], $ontabl[$i], $taked[$i]);
- }
- log_main("Stat table: ".$logg);
-
- /* Set ours cards. */
- $oursarg = "";
- for ($i = 0 ; $i < $inhand[$table_pos] ; $i++)
- $oursarg .= ($i == 0 ? "" : ", ").$cards[$i];
- for ($i = $inhand[$table_pos] ; $i < 8 ; $i++)
- $oursarg .= ($i == 0 ? "" : ", ")."-1";
- $ret .= sprintf('card_setours(%s);', $oursarg);
-
- /* Dispose all cards */
- for ($i = 0 ; $i < 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], $taked[$i]);
-
- if ($ontabl[$i] != -1) {
- $ret .= sprintf('card_place(%d,%d,%d,%d,%d);',$i, $inhand[$i],
- $table->card[$ontabl[$i]]->value,
- $table->card[$ontabl[$i]]->x, $table->card[$ontabl[$i]]->y);
- }
- }
- }
-
- /* Show auction */
- if ($user->subst == 'asta') {
-
- /* show users auction status */
- $showst = "";
- for ($i = 0 ; $i < PLAYERS_N ; $i++) {
- $user_cur = &$room->user[$table->player[$i]];
- $showst .= sprintf("%s%d", ($i == 0 ? "" : ", "),
- ($user_cur->asta_card < 9 ? $user_cur->asta_card : $user_cur->asta_pnt));
- }
- if (PLAYERS_N == 3)
- $showst .= ",-2,-2";
- $ret .= sprintf('show_astat(%s);', $showst);
-
- if ($table->asta_win != -1 && $table->asta_win == $table_pos) {
- /* show card chooser */
- $ret .= sprintf('choose_seed(%s); $("astalascio").style.visibility = ""; $("asta").style.visibility = "hidden";',
- $table->asta_card);
- }
- else {
- /* show auction */
- if ($table_pos == ($table->gstart % PLAYERS_N) &&
- $table->asta_win == -1)
- $ret .= sprintf('dispose_asta(%d,%d, %s);',
- $table->asta_card + 1, $table->asta_pnt+1, ($user->handpt <= 2 ? "true" : "false"));
- else
- $ret .= sprintf('dispose_asta(%d,%d, %s);',
- $table->asta_card + 1, -($table->asta_pnt+1), ($user->handpt <= 2 ? "true" : "false"));
- }