<?php
-function mymail($To,$Subject,$message)
+function mymail($To,$Subject,$message,$header="")
{
global $debug;
$message = str_replace("\n","<br />\n",$message);
$message = ereg_replace("[[:alpha:]]+://[^<>[:space:]]+[[:alnum:]/]",
"<a href=\"\\0\">\\0</a>", $message);
- //$message = ereg_replace("(http.*)[ <>]","<a href=\"\\1\">\\1 </a>",$message);
- echo "<br />To: $To<br />Subject: $Subject <br />$message<br />\n";
+ echo "<br />To: $To<br />";
+ if($header != "")
+ echo $header."<br />";
+ echo "Subject: $Subject <br />$message<br />\n";
}
else
- mail($To,$Subject,$message);
+ if($header != "")
+ mail($To,$Subject,$message,$header);
+ else
+ mail($To,$Subject,$message);
return;
}
global $debug;
$r = array();
- $a = array();
if($debug)
{
- $a[ 0]=1; $a[12]=47; $a[24]=13; $a[36]=37;
- $a[ 1]=2; $a[13]=48; $a[25]=14; $a[37]=38;
- $a[ 2]=3; $a[14]=27; $a[26]=15; $a[38]=39;
- $a[ 3]=4; $a[15]=16; $a[27]=28; $a[39]=40;
- $a[ 4]=5; $a[16]=17; $a[28]=29; $a[40]=41;
- $a[ 5]=18; $a[17]=6; $a[29]=30; $a[41]=42;
- $a[ 6]=19; $a[18]=7; $a[30]=31; $a[42]=43;
- $a[ 7]=20; $a[19]=8; $a[31]=32; $a[43]=44;
- $a[ 8]=45; $a[20]=9; $a[32]=21; $a[44]=33;
- $a[ 9]=46; $a[21]=10; $a[33]=22; $a[45]=34;
- $a[10]=35; $a[22]=11; $a[34]=23; $a[46]=25;
- $a[11]=36; $a[23]=12; $a[35]=24; $a[47]=26;
-
- $r = $a;
+ $r[ 0]=1; $r[12]=47; $r[24]=13; $r[36]=37;
+ $r[ 1]=2; $r[13]=48; $r[25]=14; $r[37]=38;
+ $r[ 2]=3; $r[14]=27; $r[26]=15; $r[38]=39;
+ $r[ 3]=4; $r[15]=16; $r[27]=28; $r[39]=40;
+ $r[ 4]=5; $r[16]=17; $r[28]=29; $r[40]=41;
+ $r[ 5]=18; $r[17]=6; $r[29]=30; $r[41]=42;
+ $r[ 6]=19; $r[18]=7; $r[30]=31; $r[42]=43;
+ $r[ 7]=20; $r[19]=8; $r[31]=32; $r[43]=44;
+ $r[ 8]=45; $r[20]=9; $r[32]=21; $r[44]=33;
+ $r[ 9]=46; $r[21]=10; $r[33]=22; $r[45]=34;
+ $r[10]=35; $r[22]=11; $r[34]=23; $r[46]=25;
+ $r[11]=36; $r[23]=12; $r[35]=24; $r[47]=26;
}
else
{
for($i=0;$i<48;$i++)
- $a[$i]=$i+1;
+ $r[$i]=$i+1;
- $r = shuffle($a);
+ shuffle($r);
};
return $r;
function can_call($what,$hash)
{
- return 1;
+ global $RULES;
+
+ /*TODO: check if this already has been call by teammate */
+
+ $gameid = DB_get_gameid_by_hash($hash);
+ $gametype = DB_get_gametype_by_gameid($gameid);
+
+ $NRcards = count(DB_get_hand($hash));
+
+ $NRallcards = 0;
+ for ($i=1;$i<5;$i++)
+ {
+ $user = DB_get_hash_from_game_and_pos($gameid,$i);
+ $NRallcards += count(DB_get_hand($user));
+ };
+
+ /* in case of a wedding, everything will be delayed by an offset */
+ $offset = 0;
+ if($gametype=="wedding")
+ {
+ $offset = DB_get_sickness_by_gameid($gameid);
+ if ($offset <0) /* not resolved */
+ return 0;
+ };
+
+ switch ($RULES["call"])
+ {
+ case "1st-own-card":
+ if( 4-($what/30) >= 12 - ($NRcards + $offset))
+ return 1;
+ break;
+ case "5th-card":
+ if( 27+4*($what/30) <= $NRallcards + $offset*4)
+ return 1;
+ break;
+ case "9-cards":
+ if( ($what/10) <= $NRcards + $offset)
+ return 1;
+ break;
+ }
+
+ return 0;
}
-?>
\ No newline at end of file
+?>