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
 160   /* first card is better than all the rest */
 161   if( compare_cards($c1,$c2,$mode) && compare_cards($c1,$c3,$mode) && compare_cards($c1,$c4,$mode) )
 162     return 1;
 163
 164   /* second card is better than first and better than the rest */
 165   if( !compare_cards($c1,$c2,$mode) &&  compare_cards($c2,$c3,$mode) && compare_cards($c2,$c4,$mode) )
 166     return 2;
 167
 168   /* third card is better than first card and better than last */
 169   if( !compare_cards($c1,$c3,$mode) &&  compare_cards($c3,$c4,$mode) )
 170     /* if second card is better than first, third card needs to be even better */
 171     if( !compare_cards($c1,$c2,$mode) && !compare_cards($c2,$c3,$mode) )
 172       return 3;
 173     /* second is worse than first, e.g. not following suite */
 174     else if (compare_cards($c1,$c2,$mode) )
 175       return 3;
 176
 177   /* non of the above */
 178   return 4;
 179 }
 180
 181 function count_nines($cards)
 182 {
 183   $nines = 0;
 184
 185   foreach($cards as $c)
 186     {
 187       if($c == "25" || $c == "26") $nines++;
 188       else if($c == "33" || $c == "34") $nines++;
 189       else if($c == "41" || $c == "42") $nines++;
 190       else if($c == "47" || $c == "48") $nines++;
 191     }
 192
 193   return $nines;
 194 }
 195
 196 function check_wedding($cards)
 197 {
 198
 199   if( in_array("3",$cards) && in_array("4",$cards) )
 200     return 1;
 201
 202   return 0;
 203 }
 204
 205 function count_trump($cards)
 206 {
 207   $trump = 0;
 208
 209   /* count each trump */
 210   foreach($cards as $c)
 211     if( (int)($c) <27)
 212       $trump++;
 213
 214   /* subtract foxes */
 215   if( in_array("19",$cards))
 216     $trump--;
 217   if( in_array("20",$cards) )
 218     $trump--;
 219   /* add one, in case the player has both foxes (schweinchen) */
 220   if( in_array("19",$cards) && in_array("20",$cards) )
 221     $trump++;
 222
 223   return $trump;
 224 }
 225
 226 function card_to_name($card)
 227 {
 228   switch($card)
 229     {
 230       case 1:
 231       case 2:
 232         return "ten of hearts";
 233       case 3:
 234       case 4:
 235       return "queen of clubs";
 236       case 5:
 237       case 6:
 238       return "queen of spades";
 239       case 7:
 240       case 8:
 241       return "queen of hearts";
 242       case 9:
 243       case 10:
 244       return "queen of diamonds";
 245       case 11:
 246       case 12:
 247       return "jack of clubs";
 248       case 13:
 249       case 14:
 250       return "jack of spades";
 251       case 15:
 252       case 16:
 253       return "jack of hearts";
 254       case 17:
 255       case 18:
 256       return "jack of diamonds";
 257       case 19:
 258       case 20:
 259       return "ace of diamonds";
 260       case 21:
 261       case 22:
 262       return "ten of diamonds";
 263       case 23:
 264       case 24:
 265       return "king of diamonds";
 266       case 25:
 267       case 26:
 268       return "nine of diamonds";;
 269       case 27:
 270       case 28:
 271       return "ace of clubs";
 272       case 29:
 273       case 30:
 274       return "ten of clubs";
 275       case 31:
 276       case 32:
 277       return "king of clubs";
 278       case 33:
 279       case 34:
 280       return "nine of clubs";
 281       case 35:
 282       case 36:
 283       return "ace of spades";
 284       case 37:
 285       case 38:
 286       return "ten of spades";
 287       case 39:
 288       case 40:
 289       return "king of spades";
 290       case 41:
 291       case 42:
 292       return "nine of spades";
 293       case 43:
 294       case 44:
 295       return "ace of hearts";
 296       case 45:
 297       case 46:
 298       return "king of hearts";
 299       case 47:
 300       case 48:
 301       return "nine of hearts";
 302       default:
 303       return "something went wrong, please contact the admin. Error: code1.";
 304     }
 305 }
 306
 307 function card_value($card)
 308 {
 309   switch($card)
 310     {
 311     case 1:      /* heart */
 312     case 2:
 313       return 10;
 314     case 3:     /* clubes */
 315     case 4:
 316     case 5:     /* spades */
 317     case 6:
 318     case 7:     /* hearts */
 319     case 8:
 320     case 9:     /* diamonds */
 321     case 10:
 322       return 3;
 323     case 11:    /* clubes */
 324     case 12:
 325     case 13:    /* spades */
 326     case 14:
 327     case 15:    /* hearts */
 328     case 16:
 329     case 17:    /* diamonds */
 330     case 18:
 331       return 2;
 332     case 19:    /* diamonds */
 333     case 20:
 334     case 27:    /* clubs */
 335     case 28:
 336     case 35:    /* spades */
 337     case 36:
 338     case 43:    /* hearts */
 339     case 44:
 340       return 11;
 341     case 21:    /* diamonds */
 342     case 22:
 343     case 29:    /* clubs */
 344     case 30:
 345     case 37:    /* spades */
 346     case 38:
 347       return 10;
 348     case 23:    /* diamonds */
 349     case 24:
 350     case 31:    /* clubs */
 351     case 32:
 352     case 39:    /* spades */
 353     case 40:
 354     case 45:    /* hearts */
 355     case 46:
 356       return 4;
 357     case 25:    /* diamonds */
 358     case 26:
 359     case 33:    /* clubs */
 360     case 34:
 361     case 41:    /* spades */
 362     case 42:
 363     case 47:    /* hearts */
 364     case 48:
 365       return 0;
 366     default:
 367       echo "something went wrong, please contact the admin. ErrorCode: 2<br>";
 368       return 0;
 369     }
 370 }
 371
 372
 373 function  create_array_of_random_numbers()
 374 {
 375   $r = array();
 376   $a = array();
 377
 378   for($i=1;$i<49;$i++)
 379     $a[$i]=$i;
 380
 381   $r = array_rand($a,48);
 382
 383   return $r;
 384 }
 385
 386
 387
 388
 389 function display_cards($me,$myturn)
 390 {
 391   return;
 392 }
 393
 394 function return_timezone($offset)
 395 {
 396   switch($offset)
 397     {
 398     case '1':
 399       $zone = "Europe/Berlin";
 400       break;
 401     case '-8':
 402       $zone = "America/Vancouver";
 403       break;
 404     case '13':
 405       $zone = "Pacific/Auckland";
 406       break;
 407     default:
 408       $zone = "Europe/London";
 409     }
 410
 411   return $zone;
 412 }
 413
 414 function have_suit($cards,$c)
 415 {
 416   global $TRUMP,$DIAMONDS,$HEARTS,$CLUBS,$SPADES;
 417   $suit = array();
 418
 419   if(in_array($c,$TRUMP))
 420     $suit = $TRUMP;
 421   else if(in_array($c,$CLUBS))
 422     $suit = $CLUBS;
 423   else if(in_array($c,$SPADES))
 424     $suit = $SPADES;
 425   else if(in_array($c,$HEARTS))
 426     $suit = $HEARTS;
 427   else if(in_array($c,$DIAMONDS))
 428     $suit = $DIAMONDS;
 429
 430   foreach($cards as $card)
 431     {
 432       if(in_array($card,$suit))
 433         return 1;
 434     }
 435
 436   return 0;
 437 }
 438
 439 function same_type($card,$c)
 440 {
 441   global $TRUMP,$DIAMONDS,$HEARTS,$CLUBS,$SPADES;
 442   $suit = "";
 443
 444   /* figure out what kind of card c is */
 445   if(in_array($c,$TRUMP))
 446     $suit = $TRUMP;
 447   else if(in_array($c,$CLUBS))
 448     $suit = $CLUBS;
 449   else if(in_array($c,$SPADES))
 450     $suit = $SPADES;
 451   else if(in_array($c,$HEARTS))
 452     $suit = $HEARTS;
 453   else if(in_array($c,$DIAMONDS))
 454     $suit = $DIAMONDS;
 455
 456   /* card is the same suid return 1 */
 457   if(in_array($card,$suit))
 458     return 1;
 459
 460   return 0;
 461 }
 462
 463 function set_gametype($gametype)
 464 {
 465   global $TRUMP,$DIAMONDS,$HEARTS,$CLUBS,$SPADES;
 466
 467   switch($gametype)
 468     {
 469     case "normal":
 470     case "trump":
 471     case "silent":
 472       $TRUMP    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
 473                         '17','18','19','20','21','22','23','24','25','26');
 474       $DIAMONDS = array();
 475       $CLUBS    = array('27','28','29','30','31','32','33','34');
 476       $SPADES   = array('35','36','37','38','39','40','41','42');
 477       $HEARTS   = array('43','44','45','46','47','48');
 478       break;
 479     case "queen":
 480       $TRUMP    = array('3','4','5','6','7','8','9','10');
 481       $CLUBS    = array('27','28','29','30','31','32','11','12','33','34');
 482       $SPADES   = array('35','36','37','38','39','40','13','14','41','42');
 483       $HEARTS   = array('43','44', '1', '2','45','46','15','16','47','48');
 484       $DIAMONDS = array('19','20','21','22','23','24','17','18','25','26');
 485       break;
 486     case "jack":
 487       $TRUMP    = array('11','12','13','14','15','16','17','18');
 488       $CLUBS    = array('27','28','29','30','31','32','3', '4','33','34');
 489       $SPADES   = array('35','36','37','38','39','40','5', '6','41','42');
 490       $HEARTS   = array('43','44', '1', '2','45','46','7', '8','47','48');
 491       $DIAMONDS = array('19','20','21','22','23','24','9','10','25','26');
 492       break;
 493     case "trumpless":
 494       $TRUMP    = array();
 495       $CLUBS    = array('27','28','29','30','31','32','3', '4','11','12','33','34');
 496       $SPADES   = array('35','36','37','38','39','40','5', '6','13','14','41','42');
 497       $HEARTS   = array('43','44', '1', '2','45','46','7', '8','15','16','47','48');
 498       $DIAMONDS = array('19','20','21','22','23','24','9','10','17','18','25','26');
 499       break;
 500     case "club":
 501       $TRUMP    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
 502                         '17','18','27','28','29','30','31','32','33','34');
 503       $CLUBS    = array();
 504       $SPADES   = array('35','36','37','38','39','40','41','42');
 505       $HEARTS   = array('43','44','45','46','47','48');
 506       $DIAMONDS = array('19','20','21','22','23','24','25','26');
 507       break;
 508     case "spade":
 509       $TRUMP    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
 510                         '17','18','35','36','37','38','39','40','41','42');
 511       $CLUBS    = array('27','28','29','30','31','32','33','34');
 512       $SPADES   = array();
 513       $HEARTS   = array('43','44','45','46','47','48');
 514       $DIAMONDS = array('19','20','21','22','23','24','25','26');
 515       break;
 516     case "heart":
 517       $TRUMP    = array('1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16',
 518                         '17','18','43','44','45','46','47','48');
 519       $CLUBS    = array('27','28','29','30','31','32','33','34');
 520       $SPADES   = array('35','36','37','38','39','40','41','42');
 521       $HEARTS   = array();
 522       $DIAMONDS = array('19','20','21','22','23','24','25','26');
 523       break;
 524     }
 525 }
 526
 527 ?>