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