functions.php

   1 <?php
   2
   3 function mymail($To,$Subject,$message)
   4 {
   5   global $debug;
   6
   7   if($debug)
   8     {
   9       $message = str_replace("\n","<br />",$message);
  10       echo "<br />To: $To<br />Subject: $Subject <br />$message<br />\n";
  11     }
  12   else
  13     mail($To,$Subject,$message);
  14   return;
  15 }
  16
  17 function myisset()
  18 {
  19   /* returns 1 if all names passed as args are defined by a GET or POST statement,
  20    * else return 0
  21    */
  22
  23   $ok   = 1;
  24   $args = func_get_args();
  25
  26   foreach($args as $arg)
  27     {
  28       $ok = $ok * isset($_REQUEST[$arg]);
  29       /* echo "$arg: ok = $ok <br />";
  30        */
  31     }
  32   return $ok;
  33 }
  34
  35 function pos_array($c,$arr)
  36 {
  37   $ret = 0;
  38
  39   $i   = 0;
  40   foreach($arr as $a)
  41     {
  42       $i++;
  43       if($a == $c)
  44         {
  45           $ret = $i;
  46           break;
  47         }
  48     }
  49   return $ret;
  50 }
  51
  52 function is_trump($c)
  53 {
  54   global $TRUMP;
  55
  56   if(in_array($c,$TRUMP))
  57     return 1;
  58   else
  59     return 0;
  60 }
  61
  62 function is_same_suite($c1,$c2)
  63 {
  64   global $TRUMP,$DIAMONDS,$HEARTS,$CLUBS,$SPADES;
  65
  66   if(in_array($c1,$TRUMP   ) && in_array($c2,$TRUMP   ) ) return 1;
  67   if(in_array($c1,$CLUBS   ) && in_array($c2,$CLUBS   ) ) return 1;
  68   if(in_array($c1,$HEARTS  ) && in_array($c2,$HEARTS  ) ) return 1;
  69   if(in_array($c1,$SPADES  ) && in_array($c2,$SPADES  ) ) return 1;
  70   if(in_array($c1,$DIAMONDS) && in_array($c2,$DIAMONDS) ) return 1;
  71
  72   return 0;
  73 }
  74
  75 function compare_cards($a,$b,$game)
  76 {
  77   /* if "a" is higher than "b" return 1, else 0, "a" being the card first played */
  78
  79   global $TRUMP,$DIAMONDS,$HEARTS,$CLUBS,$SPADES;
  80
  81   /* first map all cards to the odd number,
  82    * this insure that the first card wins the trick
  83    * if they are the same card
  84    */
  85   if( $a/2 - (int)($a/2) != 0.5)
  86     $a--;
  87   if( $b/2 - (int)($b/2) != 0.5)
  88     $b--;
  89
  90   /* some special cases */
  91   switch($game)
  92     {
  93     case "normal":
  94       if($a==1 && $b==1) /* both 10 of hearts */
  95         return 0;        /* second one wins. TODO should be able to set this at the start of a new game */
  96     }
  97
  98   if(is_trump($a) && is_trump($b) && $a<=$b)
  99     return 1;
 100   else if(is_trump($a) && is_trump($b) )
 101     return 0;
 102   else
 103     { /*$a is not a trump */
 104       if(is_trump($b))
 105         return 0;
 106       else
 107         { /* both no trump */
 108
 109           /* both clubs? */
 110           $posA = pos_array($a,$CLUBS);
 111           $posB = pos_array($b,$CLUBS);
 112           if($posA && $posB)
 113             if($posA <= $posB)
 114               return 1;
 115             else
 116               return 0;
 117
 118           /* both spades? */
 119           $posA = pos_array($a,$SPADES);
 120           $posB = pos_array($b,$SPADES);
 121           if($posA && $posB)
 122             if($posA <= $posB)
 123               return 1;
 124             else
 125               return 0;
 126
 127           /* both hearts? */
 128           $posA = pos_array($a,$HEARTS);
 129           $posB = pos_array($b,$HEARTS);
 130           if($posA && $posB)
 131             if($posA <= $posB)
 132               return 1;
 133             else
 134               return 0;
 135
 136           /* both diamonds? */
 137           $posA = pos_array($a,$DIAMONDS);
 138           $posB = pos_array($b,$DIAMONDS);
 139           if($posA && $posB)
 140             if($posA <= $posB)
 141               return 1;
 142             else
 143               return 0;
 144
 145           /* not the same suit and no trump: a wins */
 146           return 1;
 147         }
 148     }
 149 }
 150
 151 function get_winner($p,$mode)
 152 {
 153   /* get all 4 cards played in a trick */
 154   $c1 = $p[1];
 155   $c2 = $p[2];
 156   $c3 = $p[3];
 157   $c4 = $p[4];
 158
 159   /* first card is better than all the rest */
 160   if( compare_cards($c1,$c2,$mode) && compare_cards($c1,$c3,$mode) && compare_cards($c1,$c4,$mode) )
 161     return 1;
 162
 163   /* second card is better than first and better than the rest */
 164   if( !compare_cards($c1,$c2,$mode) &&  compare_cards($c2,$c3,$mode) && compare_cards($c2,$c4,$mode) )
 165     return 2;
 166
 167   /* third card is better than first card and better than last */
 168   if( !compare_cards($c1,$c3,$mode) &&  compare_cards($c3,$c4,$mode) )
 169     /* if second card is better than first, third card needs to be even better */
 170     if( !compare_cards($c1,$c2,$mode) && !compare_cards($c2,$c3,$mode) )
 171       return 3;
 172     /* second is worse than first, e.g. not following suite */
 173     else if (compare_cards($c1,$c2,$mode) )
 174       return 3;
 175
 176   /* non of the above */
 177   return 4;
 178 }
 179
 180 function count_nines($cards)
 181 {
 182   $nines = 0;
 183
 184   foreach($cards as $c)
 185     {
 186       if($c == "25" || $c == "26") $nines++;
 187       else if($c == "33" || $c == "34") $nines++;
 188       else if($c == "41" || $c == "42") $nines++;
 189       else if($c == "47" || $c == "48") $nines++;
 190     }
 191
 192   return $nines;
 193 }
 194
 195 function check_wedding($cards)
 196 {
 197
 198   if( in_array("3",$cards) && in_array("4",$cards) )
 199     return 1;
 200
 201   return 0;
 202 }
 203
 204 function count_trump($cards)
 205 {
 206   $trump = 0;
 207
 208   /* count each trump */
 209   foreach($cards as $c)
 210     if( (int)($c) <27)
 211       $trump++;
 212
 213   /* subtract foxes */
 214   if( in_array("19",$cards))
 215     $trump--;
 216   if( in_array("20",$cards) )
 217     $trump--;
 218   /* add one, in case the player has both foxes (schweinchen) */
 219   if( in_array("19",$cards) && in_array("20",$cards) )
 220     $trump++;
 221
 222   return $trump;
 223 }
 224
 225 function card_to_name($card)
 226 {
 227   switch($card)
 228     {
 229       case 1:
 230       case 2:
 231         return "ten of hearts";
 232       case 3:
 233       case 4:
 234       return "queen of clubs";
 235       case 5:
 236       case 6:
 237       return "queen of spades";
 238       case 7:
 239       case 8:
 240       return "queen of hearts";
 241       case 9:
 242       case 10:
 243       return "queen of diamonds";
 244       case 11:
 245       case 12:
 246       return "jack of clubs";
 247       case 13:
 248       case 14:
 249       return "jack of spades";
 250       case 15:
 251       case 16:
 252       return "jack of hearts";
 253       case 17:
 254       case 18:
 255       return "jack of diamonds";
 256       case 19:
 257       case 20:
 258       return "ace of diamonds";
 259       case 21:
 260       case 22:
 261       return "ten of diamonds";
 262       case 23:
 263       case 24:
 264       return "king of diamonds";
 265       case 25:
 266       case 26:
 267       return "nine of diamonds";;
 268       case 27:
 269       case 28:
 270       return "ace of clubs";
 271       case 29:
 272       case 30:
 273       return "ten of clubs";
 274       case 31:
 275       case 32:
 276       return "king of clubs";
 277       case 33:
 278       case 34:
 279       return "nine of clubs";
 280       case 35:
 281       case 36:
 282       return "ace of spades";
 283       case 37:
 284       case 38:
 285       return "ten of spades";
 286       case 39:
 287       case 40:
 288       return "king of spades";
 289       case 41:
 290       case 42:
 291       return "nine of spades";
 292       case 43:
 293       case 44:
 294       return "ace of hearts";
 295       case 45:
 296       case 46:
 297       return "king of hearts";
 298       case 47:
 299       case 48:
 300       return "nine of hearts";
 301       default:
 302       return "something went wrong, please contact the admin. Error: code1.";
 303     }
 304 }
 305
 306 function card_value($card)
 307 {
 308   switch($card)
 309     {
 310     case 1:      /* heart */
 311     case 2:
 312       return 10;
 313     case 3:     /* clubes */
 314     case 4:
 315     case 5:     /* spades */
 316     case 6:
 317     case 7:     /* hearts */
 318     case 8:
 319     case 9:     /* diamonds */
 320     case 10:
 321       return 3;
 322     case 11:    /* clubes */
 323     case 12:
 324     case 13:    /* spades */
 325     case 14:
 326     case 15:    /* hearts */
 327     case 16:
 328     case 17:    /* diamonds */
 329     case 18:
 330       return 2;
 331     case 19:    /* diamonds */
 332     case 20:
 333     case 27:    /* clubs */
 334     case 28:
 335     case 35:    /* spades */
 336     case 36:
 337     case 43:    /* hearts */
 338     case 44:
 339       return 11;
 340     case 21:    /* diamonds */
 341     case 22:
 342     case 29:    /* clubs */
 343     case 30:
 344     case 37:    /* spades */
 345     case 38:
 346       return 10;
 347     case 23:    /* diamonds */
 348     case 24:
 349     case 31:    /* clubs */
 350     case 32:
 351     case 39:    /* spades */
 352     case 40:
 353     case 45:    /* hearts */
 354     case 46:
 355       return 4;
 356     case 25:    /* diamonds */
 357     case 26:
 358     case 33:    /* clubs */
 359     case 34:
 360     case 41:    /* spades */
 361     case 42:
 362     case 47:    /* hearts */
 363     case 48:
 364       return 0;
 365     default:
 366       echo "something went wrong, please contact the admin. ErrorCode: 2 - $card<br>";
 367       return 0;
 368     }
 369 }
 370
 371
 372 function  create_array_of_random_numbers()
 373 {
 374   $r = array();
 375   $a = array();
 376
 377   for($i=1;$i<49;$i++)
 378     $a[$i]=$i;
 379
 380   $r = array_rand($a,48);
 381
 382   return $r;
 383 }
 384
 385
 386
 387
 388 function display_cards($me,$myturn)
 389 {
 390   return;
 391 }
 392
 393 function return_timezone($offset)
 394 {
 395   switch($offset)
 396     {
 397     case '1':
 398       $zone = "Europe/Berlin";
 399       break;
 400     case '-8':
 401       $zone = "America/Vancouver";
 402       break;
 403     case '13':
 404       $zone = "Pacific/Auckland";
 405       break;
 406     default:
 407       $zone = "Europe/London";
 408     }
 409
 410   return $zone;
 411 }
 412
 413 function have_suit($cards,$c)
 414 {
 415   global $TRUMP,$DIAMONDS,$HEARTS,$CLUBS,$SPADES;
 416   $suit = array();
 417
 418   if(in_array($c,$TRUMP))
 419     $suit = $TRUMP;
 420   else if(in_array($c,$CLUBS))
 421     $suit = $CLUBS;
 422   else if(in_array($c,$SPADES))
 423     $suit = $SPADES;
 424   else if(in_array($c,$HEARTS))
 425     $suit = $HEARTS;
 426   else if(in_array($c,$DIAMONDS))
 427     $suit = $DIAMONDS;
 428
 429   foreach($cards as $card)
 430     {
 431       if(in_array($card,$suit))
 432         return 1;
 433     }
 434
 435   return 0;
 436 }
 437
 438 function same_type($card,$c)
 439 {
 440   global $TRUMP,$DIAMONDS,$HEARTS,$CLUBS,$SPADES;
 441   $suit = "";
 442
 443   /* figure out what kind of card c is */
 444   if(in_array($c,$TRUMP))
 445     $suit = $TRUMP;
 446   else if(in_array($c,$CLUBS))
 447     $suit = $CLUBS;
 448   else if(in_array($c,$SPADES))
 449     $suit = $SPADES;
 450   else if(in_array($c,$HEARTS))
 451     $suit = $HEARTS;
 452   else if(in_array($c,$DIAMONDS))
 453     $suit = $DIAMONDS;
 454
 455   /* card is the same suid return 1 */
 456   if(in_array($card,$suit))
 457     return 1;
 458
 459   return 0;
 460 }
 461
 462 function set_gametype($gametype)
 463 {
 464   global $TRUMP,$DIAMONDS,$HEARTS,$CLUBS,$SPADES;
 465
 466   switch($gametype)
 467     {
 468     case "normal":
 469     case "trump":
 470     case "silent":
 471       $TRUMP    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
 472                         '17','18','19','20','21','22','23','24','25','26');
 473       $DIAMONDS = array();
 474       $CLUBS    = array('27','28','29','30','31','32','33','34');
 475       $SPADES   = array('35','36','37','38','39','40','41','42');
 476       $HEARTS   = array('43','44','45','46','47','48');
 477       break;
 478     case "queen":
 479       $TRUMP    = array('3','4','5','6','7','8','9','10');
 480       $CLUBS    = array('27','28','29','30','31','32','11','12','33','34');
 481       $SPADES   = array('35','36','37','38','39','40','13','14','41','42');
 482       $HEARTS   = array('43','44', '1', '2','45','46','15','16','47','48');
 483       $DIAMONDS = array('19','20','21','22','23','24','17','18','25','26');
 484       break;
 485     case "jack":
 486       $TRUMP    = array('11','12','13','14','15','16','17','18');
 487       $CLUBS    = array('27','28','29','30','31','32','3', '4','33','34');
 488       $SPADES   = array('35','36','37','38','39','40','5', '6','41','42');
 489       $HEARTS   = array('43','44', '1', '2','45','46','7', '8','47','48');
 490       $DIAMONDS = array('19','20','21','22','23','24','9','10','25','26');
 491       break;
 492     case "trumpless":
 493       $TRUMP    = array();
 494       $CLUBS    = array('27','28','29','30','31','32','3', '4','11','12','33','34');
 495       $SPADES   = array('35','36','37','38','39','40','5', '6','13','14','41','42');
 496       $HEARTS   = array('43','44', '1', '2','45','46','7', '8','15','16','47','48');
 497       $DIAMONDS = array('19','20','21','22','23','24','9','10','17','18','25','26');
 498       break;
 499     case "club":
 500       $TRUMP    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
 501                         '17','18','27','28','29','30','31','32','33','34');
 502       $CLUBS    = array();
 503       $SPADES   = array('35','36','37','38','39','40','41','42');
 504       $HEARTS   = array('43','44','45','46','47','48');
 505       $DIAMONDS = array('19','20','21','22','23','24','25','26');
 506       break;
 507     case "spade":
 508       $TRUMP    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
 509                         '17','18','35','36','37','38','39','40','41','42');
 510       $CLUBS    = array('27','28','29','30','31','32','33','34');
 511       $SPADES   = array();
 512       $HEARTS   = array('43','44','45','46','47','48');
 513       $DIAMONDS = array('19','20','21','22','23','24','25','26');
 514       break;
 515     case "heart":
 516       $TRUMP    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
 517                         '17','18','43','44','45','46','47','48');
 518       $CLUBS    = array('27','28','29','30','31','32','33','34');
 519       $SPADES   = array('35','36','37','38','39','40','41','42');
 520       $HEARTS   = array();
 521       $DIAMONDS = array('19','20','21','22','23','24','25','26');
 522       break;
 523     }
 524 }
 525
 526 ?>