\n";
/* output vorbehalte */
$show_pre_game_comments=1;
if($gametype_raw != 'normal') /* only show when needed */
if(!($gametype_raw == 'solo' && $gametype_solo == 'silent') )
{
echo "
\n";
/* get information so show the cards that have been handed over in a poverty game */
output_exchanged_cards($gametype);
$show_pre_game_comments=0;
echo "
\n"; /* end div trick, end li trick */
}
if($show_pre_game_comments==1)
{
/* display all comments on the top right (card1)*/
$comments = DB_get_pre_comment($gameid);
if(sizeof($comments))
{
echo "
\n"; /* end div trick, end li trick */
}
}
/* output tricks */
while($r = DB_fetch_array($result))
{
$pos = $r[1];
$seq = $r[2];
$trick = $r[3];
$comment = $r[4];
$user = $r[6];
/* count number of tricks */
if($seq==1)
$trickNR++;
/* check if first schweinchen has been played */
if( $GAME['schweinchen-who'] && ($r[0] == 19 || $r[0] == 20) )
if(!$GAME['schweinchen-first'])
$GAME['schweinchen-first'] = 1; /* playing the first fox */
else
$GAME['schweinchen-second'] = 1; /* this must be the second fox */
/* save card to be able to find the winner of the trick later */
$play[$seq] = array('card'=>$r[0],'pos'=>$pos);
if($seq==1)
{
/* first card in a trick, output some html */
if($trick!=$lasttrick)
{
/* start of an old trick? */
echo "
\n".
"
![\"table\"](\"pics/arrow".($pos-1).".png\")
\n";
}
else if($trick==$lasttrick)
{
/* start of a last trick? */
echo "
\n".
"
\n";
};
/* remember first card, so that we are able to check, what cards can be played */
$firstcard = $r[0];
};
/* display card */
echo "
\n";
/* for the first card, we also need to display calls from other players */
if($seq==1 && $trickNR==1)
{
$commentPreCalls=DB_get_pre_comment_call($gameid);
foreach ($commentPreCalls as $pre )
$comment .= $pre[1].": ".$pre[0]."
";
}
/* display comments */
if($comment!='')
echo " \n";
echo ' ';
display_card($r[0],$PREF['cardset']);
echo "
\n"; /* end div card */
/* end of trick? */
if($seq==4)
{
$winner = get_winner($play,$gametype); /* returns the position */
echo "
\n"; /* end div trick, end li trick */
}
}
/* whos turn is it? */
if($seq==4)
{
$winner = get_winner($play,$gametype); /* returns the position */
$next = $winner;
$firstcard = ''; /* new trick, no first card */
}
else
{
$next = $pos+1;
if($next==5) $next = 1;
}
/* my turn?, display cards as links, ask for comments*/
if(DB_get_pos_by_hash($me) == $next)
$myturn = 1;
else
$myturn = 0;
/* do we want to play a card? */
if(myisset('card') && $myturn)
{
$card = $_REQUEST['card'];
$handid = DB_get_handid('hash',$me);
$commentSchweinchen =''; /* used to add a comment when Schweinchen is being played */
/* check if we have card and that we haven't played it yet*/
/* set played in hand_card to true where hand_id and card_id*/
$r = DB_query_array("SELECT id FROM Hand_Card WHERE played='false' and ".
"hand_id='$handid' AND card_id=".DB_quote_smart($card));
$handcardid = $r[0];
if($handcardid) /* everything ok, play card */
{
/* update Game timestamp */
DB_update_game_timestamp($gameid);
/* mark card as played */
DB_query("UPDATE Hand_Card SET played='true' WHERE hand_id=".DB_quote_smart($handid)." AND card_id=".
DB_quote_smart($card));
/* get trick id or start new trick */
$a = DB_get_current_trickid($gameid);
$trickid = $a[0];
$sequence = $a[1];
$tricknr = $a[2];
$playid = DB_play_card($trickid,$handcardid,$sequence);
/* check special output for schweinchen in case in case a fox is being played
* check for correct rules, etc. has already been done
*/
if( $GAME['schweinchen-who'] && ($card == 19 || $card == 20) )
{
if(!$GAME['schweinchen-first'])
$GAME['schweinchen-first'] = 1; /* playing the first fox */
else
$GAME['schweinchen-second'] = 1; /* this must be the second fox */
if( $RULES['schweinchen']=='both' ||
($RULES['schweinchen']=='second' && $GAME['schweinchen-second']==1 )||
($RULES['schweinchen']=='secondaftercall' && $GAME['schweinchen-second']==1 &&
(DB_get_call_by_hash($GAME['schweinchen-who']) || DB_get_partner_call_by_hash($GAME['schweinchen-who']) ))
)
{
DB_insert_comment('Schweinchen! ',$playid,$gameid,$myid);
$commentSchweinchen = 'Schweinchen! ';
}
if ($debug)
echo 'schweinchen = '.$GAME['schweinchen-who'].' ---
';
}
/* if sequence == 4 check who one in case of wedding */
if($sequence == 4 && $GT == 'wedding')
{
/* is wedding resolve */
$resolved = DB_get_sickness_by_gameid($gameid);
if($resolved<0)
{
/* who has wedding */
$userids = DB_get_all_userid_by_gameid($gameid);
foreach($userids as $user)
{
$usersick = DB_get_sickness_by_userid_and_gameid($user,$gameid);
if($usersick == 'wedding')
$whosick = $user;
}
/* who won the trick */
$play = DB_get_cards_by_trick($trickid);
$winner = get_winner($play,$gametype); /* returns the position */
$winnerid = DB_get_userid('gameid-position',$gameid,$winner);
/* is tricknr <=3 */
if($tricknr <=3 && $winnerid!=$whosick)
{
/* set resolved at tricknr*/
$resolved = DB_set_sickness_by_gameid($gameid,$tricknr);
/* set partner */
$whash = DB_get_hash_from_gameid_and_userid($gameid,$winnerid);
DB_set_party_by_hash($whash,'re');
}
if($tricknr == 3 && $winnerid==$whosick)
{
/* set resolved at tricknr*/
$resolved = DB_set_sickness_by_gameid($gameid,'3');
}
}
}
/* if sequence == 4, set winner of the trick, count points and set the next player */
if($sequence==4)
{
$play = DB_get_cards_by_trick($trickid);
$winner = get_winner($play,$gametype); /* returns the position */
/*
* check if someone caught a fox
*******************************/
/* first check if we should account for solos at all,
* since it doesn't make sense in some games
*/
$ok = 0; /* fox shouldn't be counted */
if($gametype_raw=='solo')
{
$solo = DB_get_solo_by_gameid($gameid);
if($solo == 'trump' || $solo == 'silent')
$ok = 1; /* for trump solos and silent solos, foxes are ok */
}
else
$ok = 1; /* for all other games (not solos) foxes are ok too */
if($ok==1)
foreach($play as $played)
{
if ( $played['card']==19 || $played['card']==20 )
if ($played['pos']!= $winner )
{
/* possible caught a fox, check party */
$uid1 = DB_get_userid('gameid-position',$gameid,$winner);
$uid2 = DB_get_userid('gameid-position',$gameid,$played['pos']);
$party1 = DB_get_party_by_gameid_and_userid($gameid,$uid1);
$party2 = DB_get_party_by_gameid_and_userid($gameid,$uid2);
if($party1 != $party2)
DB_query("INSERT INTO Score".
" VALUES(NULL,CURRENT_TIMESTAMP,$gameid,'$party1',$uid1,$uid2,'fox')");
}
}
/*
* check for karlchen (jack of clubs in the last trick)
******************************************************/
/* same as for foxes, karlchen doesn't always make sense
* check what kind of game it is and set karlchen accordingly */
if($tricknr == 12 ) /* Karlchen works only in the last trick */
{
/* no Karlchen in these solos */
if($gametype_solo != 'trumpless' && $gametype_solo != 'jack' && $gametype_solo != 'queen' )
{
foreach($play as $played)
if ( $played['card']==11 || $played['card']==12 )
if ($played['pos'] == $winner )
{
/* save Karlchen */
$uid1 = DB_get_userid('gameid-position',$gameid,$winner);
$party1 = DB_get_party_by_gameid_and_userid($gameid,$uid1);
DB_query("INSERT INTO Score".
" VALUES( NULL,CURRENT_TIMESTAMP,$gameid,'$party1',$uid1,NULL,'karlchen')");
};
};
}; /* end scoring Karlchen */
/*
* check for doppelopf (>40 points)
***********************************/
$points = 0;
foreach($play as $played)
{
$points += DB_get_card_value_by_cardid($played['card']);
}
if($points > 39)
{
$uid1 = DB_get_userid('gameid-position',$gameid,$winner);
$party1 = DB_get_party_by_gameid_and_userid($gameid,$uid1);
DB_query("INSERT INTO Score".
" VALUES( NULL,CURRENT_TIMESTAMP,$gameid,'$party1',$uid1,NULL,'doko')");
}
/*
* set winner (for this trick)
*/
if($winner>0)
DB_query("UPDATE Trick SET winner='$winner' WHERE id=".DB_quote_smart($trickid));
else
$messages[] = "ERROR during scoring";
if($debug)
echo "DEBUG: position $winner won the trick
";
/* who is the next player? */
$next = $winner;
$firstcard = ''; /* unset firstcard, so followsuit doesn't trigger with the last trick */
}
else
{
$next = DB_get_pos_by_hash($me)+1;
}
if($next==5) $next=1;
/* check for coment */
if(myisset('comment'))
{
$comment = $_REQUEST['comment'];
if($comment != '')
DB_insert_comment($comment,$playid,$gameid,$myid);
if($commentSchweinchen)
$comment = $commentSchweinchen . $comment;
if($commentCall != '')
$comment = $commentCall . $comment;
};
/* display played card */
$pos = DB_get_pos_by_hash($me);
if($sequence==1)
{
echo '
\n".
'
.)
\n";
}
echo '
\n ";
/* display comments */
display_card($card,$PREF['cardset']);
if($comment!='')
echo "\n \n";
echo "
\n";
echo "
\n"; /* end div trick, end li trick */
/*check if we still have cards left, else set status to gameover */
if(sizeof(DB_get_hand($me))==0)
{
DB_set_hand_status_by_hash($me,'gameover');
$mystatus = 'gameover';
}
/* if all players are done, set game status to game over,
* get the points of the last trick and send out an email
* to all players
*/
$userids = DB_get_all_userid_by_gameid($gameid);
$done=1;
foreach($userids as $user)
if(DB_get_hand_status_by_userid_and_gameid($user,$gameid)!='gameover')
$done=0;
if($done)
DB_set_game_status_by_gameid($gameid,'gameover');
/* email next player, if game is still running */
if(DB_get_game_status_by_gameid($gameid)=='play')
{
$next_hash = DB_get_hash_from_game_and_pos($gameid,$next);
$userid = DB_get_userid('hash',$next_hash);
DB_set_player_by_gameid($gameid,$userid);
if( DB_get_email_pref_by_uid($userid)!='emailaddict' )
{
set_language($userid,'uid');
$email_message = sprintf(_("A card has been played in game %s.\n\n".
"It's your turn now.\n".
'Use this link to play a card: '),DB_format_gameid($gameid)).$HOST.$INDEX.'?action=game&me='.$next_hash."\n\n" ;
mymail($userid,$gameid, GAME_YOUR_TURN, $email_message);
set_language($myid,'uid');
}
}
else /* send out final email */
{
/* individual score */
$result = DB_query('SELECT User.fullname, IFNULL(SUM(Card.points),0), Hand.party FROM Hand'.
' LEFT JOIN Trick ON Trick.winner=Hand.position AND Trick.game_id=Hand.game_id'.
' LEFT JOIN User ON User.id=Hand.user_id'.
' LEFT JOIN Play ON Trick.id=Play.trick_id'.
' LEFT JOIN Hand_Card ON Hand_Card.id=Play.hand_card_id'.
' LEFT JOIN Card ON Card.id=Hand_Card.card_id'.
" WHERE Hand.game_id=".DB_quote_smart($gameid).
' GROUP BY User.fullname' );
$email_final_score="";
while( $r = DB_fetch_array($result) )
$email_final_score .= ' '.$r[0].'('.$r[2].') '.$r[1]."\n";
$result = DB_query('SELECT Hand.party, IFNULL(SUM(Card.points),0) FROM Hand'.
' LEFT JOIN Trick ON Trick.winner=Hand.position AND Trick.game_id=Hand.game_id'.
' LEFT JOIN User ON User.id=Hand.user_id'.
' LEFT JOIN Play ON Trick.id=Play.trick_id'.
' LEFT JOIN Hand_Card ON Hand_Card.id=Play.hand_card_id'.
' LEFT JOIN Card ON Card.id=Hand_Card.card_id'.
" WHERE Hand.game_id=".DB_quote_smart($gameid).
' GROUP BY Hand.party' );
$email_totals="";
$re = 0;
$contra = 0;
while( $r = DB_fetch_array($result) )
{
$email_totals .= ' '.$r[0].' '.$r[1]."\n";
if($r[0] == 're')
$re = $r[1];
else if($r[0] == 'contra')
$contra = $r[1];
}
/*
* save score in database
*
*/
/* get calls from re/contra */
$call_re = -1;
$call_contra = -1;
foreach($userids as $user)
{
$hash = DB_get_hash_from_gameid_and_userid($gameid,$user);
$call = DB_get_call_by_hash($hash);
$party = DB_get_party_by_hash($hash);
if($call!=NULL)
{
$call = (int) $call;
if($party=='re')
{
if($call_re== -1)
$call_re = $call;
else if( $call < $call_re)
$call_re = $call;
}
else if($party=='contra')
{
if($call_contra== -1)
$call_contra = $call;
else if( $call < $call_contra)
$call_contra = $call;
}
}
}
/* figure out who one */
$winning_party = NULL;
if($call_re == -1 && $call_contra == -1)
{
/* nobody made a call, so it's easy to figure out who won */
if($re>120)
$winning_party='re';
else
$winning_party='contra';
}
else
{
/* if one party makes a call, they only win, iff they make enough points
* if only one party made a call, the other one wins,
* if the first one didn't make it
*/
if($call_re != -1)
{
$offset = 120 - $call_re;
if($call_re == 0)
$offset--; /* since we use a > in the next equation */
if($re > 120+$offset)
$winning_party='re';
else if ($call_contra == -1 )
$winning_party='contra';
}
if($call_contra != -1)
{
$offset = 120 - $call_contra;
if($call_contra == 0)
$offset--; /* since we use a > in the next equation */
if($contra > 120+$offset)
$winning_party='contra';
else if ($call_re == -1 )
$winning_party='re';
}
}
/* one point for each call of the other party in case the other party didn't win
* and one point each in case the party made more than points than one of the calls
*/
if($winning_party!='contra' && $call_contra!= -1)
{
for( $p=$call_contra;$p<=120; $p+=30 )
{
DB_query('INSERT INTO Score'.
" VALUES( NULL,CURRENT_TIMESTAMP,$gameid,'re',NULL,NULL,'against$p')");
}
for( $p=$call_contra; $p<120; $p+=30)
{
if( $re >= $p )
DB_query('INSERT INTO Score'.
" VALUES( NULL,CURRENT_TIMESTAMP,$gameid,'re',NULL,NULL,'made$p')");
}
}
if($winning_party!='re' and $call_re!= -1)
{
for( $p=$call_re;$p<=120; $p+=30 )
{
DB_query('INSERT INTO Score'.
" VALUES( NULL,CURRENT_TIMESTAMP,$gameid,'contra',NULL,NULL,'against$p')");
}
for( $p=$call_re; $p<120; $p+=30)
{
if( $contra>=$p )
DB_query('INSERT INTO Score'.
" VALUES( NULL,CURRENT_TIMESTAMP,$gameid,'contra',NULL,NULL,'made$p')");
}
}
/* point in case contra won */
if($winning_party=='contra')
{
DB_query('INSERT INTO Score'.
" VALUES( NULL,CURRENT_TIMESTAMP,$gameid,'contra',NULL,NULL,'againstqueens')");
}
/* one point each for winning and each 30 points + calls */
if($winning_party=='re')
{
foreach(array(120,150,180,210,240) as $p)
{
$offset = 0;
if($p==240 || $call_contra != -1)
$offset = 1;
if($re>$p-$offset)
DB_query('INSERT INTO Score'.
" VALUES( NULL,CURRENT_TIMESTAMP,$gameid,'re',NULL,NULL,'".(240-$p)."')");
}
/* re called something and won */
foreach(array(0,30,60,90,120) as $p)
{
if($call_re!= -1 && $call_re<$p+1)
DB_query('INSERT INTO Score'.
" VALUES( NULL,CURRENT_TIMESTAMP,$gameid,'re',NULL,NULL,'call$p')");
}
}
else if( $winning_party=='contra')
{
foreach(array(120,150,180,210,240) as $p)
{
$offset = 0;
if($p==240 || $call_re != -1)
$offset = 1;
if($contra>$p-$offset)
DB_query('INSERT INTO Score'.
" VALUES( NULL,CURRENT_TIMESTAMP,$gameid,'contra',NULL,NULL,'".(240-$p)."')");
}
/* re called something and won */
foreach(array(0,30,60,90,120) as $p)
{
if($call_contra != -1 && $call_contra<$p+1)
DB_query('INSERT INTO Score'.
" VALUES( NULL,CURRENT_TIMESTAMP,$gameid,'contra',NULL,NULL,'call$p')");
}
};
/* add score points to email */
$Tpoint = 0;
$email_points_re="";
$queryresult = DB_query('SELECT score FROM Score '.
" WHERE game_id=".DB_quote_smart($gameid)." AND party='re'");
while($r = DB_fetch_array($queryresult) )
{
$email_points_re .= ' '.$r[0]."\n";
$Tpoint ++;
}
$email_points_contra="";
$queryresult = DB_query('SELECT score FROM Score '.
" WHERE game_id=".DB_quote_smart($gameid)." AND party='contra'");
while($r = DB_fetch_array($queryresult) )
{
$email_points_contra .= ' '.$r[0]."\n";
$Tpoint --;
}
$session = DB_get_session_by_gameid($gameid);
$score = generate_score_table($session);
$email_score_table = format_score_table_ascii($score);
/* add user links */
$email_user_links="";
foreach($userids as $user)
{
/* add links for all players */
$hash = DB_get_hash_from_gameid_and_userid($gameid,$user);
$name = DB_get_name('userid',$user);
$link = "$name: ".$HOST.$INDEX."?action=game&me=".$hash."\n" ;
$email_user_links .= $link;
}
foreach($userids as $user)
{
/* set correct language for this user */
set_language($user,'uid');
/* generate message */
$email_message = _("The game is over. Thanks for playing :)")."\n";
$email_message .= _("Final score:")."\n";
$email_message .= $email_final_score;
$email_message .= "\n"._("Totals:")."\n";
$email_message .= $email_totals;
$email_message .= "\n "._("Points Re:")." \n";
$email_message .= $email_points_re;
$email_message .= " "._("Points Contra:")." \n";
$email_message .= $email_points_contra;
$email_message .= " "._("Total Points (from the Re point of view):")." $Tpoint\n\n";
$email_message .= _("Score Table:")."\n";
$email_message .= $email_score_table;
$email_message .= "\n"._("Use these links to have a look at game")." ".DB_format_gameid($gameid).": \n";
$email_message .= $email_user_links;
$email_message .= "\n\n "._("(use in-game comments to reach all players)")."\n\n";
/* send email */
mymail($user,$gameid, GAME_OVER, $email_message);
}
/* reset language */
set_language($myid,'uid');
}
}
else
{
$messages[] = _("can't find that card?!");
}
}
else if(myisset('card') && !$myturn )
{
$messages[] = _("please wait until it's your turn!");
}
if($seq!=4 && $trickNR>=1 && !(myisset('card') && $myturn) )
echo "
\n"; /* end div trick, end li trick */
/* display points in case game is over */
if($mystatus=='gameover' && DB_get_game_status_by_gameid($gameid)=='gameover' )
{
echo "
!['._('no ten of hearts').](\"pics/button/no-ten-of-hearts.png\"/)
\n"; break;
case 'firstwins':
echo ' !['._('ten of hearts').](\"pics/button/ten-of-hearts.png\"/)
\n"; break;
case 'secondwins':
echo ' !['._('second ten of hearts').](\"pics/button/second-ten-of-hearts.png\"/)
\n"; break;
}
switch($RULES['schweinchen'])
{
case 'none':
echo ' !['._('1st-own-card').](\"pics/button/1st-own-card.png\"/)
\n"; break;
case '5th-card':
echo ' !['._('5th-card').](\"pics/button/5th-card.png\"/)
\n"; break;
case '9-cards':
echo ' !['._('9-cards').](\"pics/button/9-cards.png\"/)
\n"; break;
}
echo "