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