+function mymail($To,$Subject,$message)
+{
+ global $debug;
+
+ if($debug)
+ {
+ $message = str_replace("\n","<br />",$message);
+ echo "<br />To: $To<br />Subject: $Subject <br />$message<br />\n";
+ }
+ else
+ mail($To,$Subject,$message);
+ return;
+}
+
+function parse_status()
+{
+ global $game,$history,$player,$hash,$lines;
+
+ $game["init"] = 0;
+ $game["solo-who"] = -1;
+ $game["solo-what"] = "todo";
+ $game["wedding"] = -1;
+ $game["poverty"] = "";
+ $game["nines"] = -1;
+ $game["startplayer"] = 0;
+
+ for($i=0;$i<4;$i++)
+ {
+ $tmp = explode( ":",$lines[$i]);
+ $hash[$i] = $tmp[0];
+ $player[$tmp[0]]["number"] = $i;
+ $player[$tmp[0]]["hash"] = $tmp[0];
+ $player[$tmp[0]]["name"] = $tmp[1];
+ $player[$tmp[0]]["email"] = $tmp[2];
+ $player[$tmp[0]]["option"] = $tmp[3];
+ $player[$tmp[0]]["points"] = $tmp[4];
+ $player[$tmp[0]]["cards"] = $tmp[5];
+ if(ereg("s",$tmp[3])) $game["init"]++; /* how many players are ready? */
+ if(ereg("P",$tmp[3])) $game["poverty"].= $i; /* players with poverty, could be two, so use a string */
+ if(ereg("N",$tmp[3])) $game["nines"] = $i; /* the player with too many nines, only one possible */
+ if(ereg("W",$tmp[3])) $game["wedding"] = $i; /* the player with the wedding, also only one possible */
+ if(ereg("([OSQJCAH])",$tmp[3],$match) && ($game["solo-who"]<0) )
+ {
+ $game["solo-who"] = $i;
+ $game["startplayer"] = $i;
+ switch($match[1])
+ {
+ case "O":
+ $game["solo-what"] = "No Trump";
+ case "S":
+ $game["solo-what"] = "Trump";
+ case "Q":
+ $game["solo-what"] = "Queen";
+ case "J":
+ $game["solo-what"] = "Jack";
+ case "C":
+ $game["solo-what"] = "Club";
+ case "A":
+ $game["solo-what"] = "Spade";
+ case "H":
+ $game["solo-what"] = "Heart";
+ }
+ }
+
+ }
+ /* save the game history */
+ for($i=4;$i<sizeof($lines);$i++)
+ {
+ if(!ereg("^[[:space:]]*$",trim($lines[$i])))
+ {
+ $history[] = $lines[$i];
+ }
+ }
+
+ if(sizeof($history)==0 || (sizeof($history)==1 && strlen($history[0])==3 ))
+ $history[0] = $game["startplayer"].":";
+
+ return;
+}
+
+function count_nines($cards)
+{
+ $card = explode(";",$cards);
+
+ $nines =0;
+
+ foreach($card as $c)
+ {
+ if($c == "25" || $c == "26") $nines++;
+ else if($c == "33" || $c == "34") $nines++;
+ else if($c == "41" || $c == "42") $nines++;
+ else if($c == "47" || $c == "48") $nines++;
+ }
+
+ return $nines;
+}
+
+function check_wedding($cards)
+{
+ $card = explode(";",$cards);
+
+ $count =0;
+
+ if( in_array("3",$card) && in_array("2",$card) )
+ $count=1;
+
+ return $count;
+}
+
+function count_trump($cards)
+{
+ $card = explode(";",$cards);
+
+ $trump =0;
+
+ /* count each trump */
+ foreach($card as $c)
+ if( (int)($c) <27)
+ $trump++;
+
+ /* subtract foxes */
+ if( in_array("19",$card))
+ $trump--;
+ if( in_array("20",$card) )
+ $trump--;
+ /* add one, in case the player has both foxes (schweinchen) */
+ if( in_array("19",$card) && in_array("20",$card) )
+ $trump++;
+
+ return $trump;
+}