Php > Miscellaneous

Generate cards for Klondike PHP Contest

Generate cards for Klondike PHP Contest

<?php 

$deck = normal_order_deck(); 

mt_srand(make_seed()); 

// PHP internal command shuffle() do not work with mt_srand (for now) 

local_mt_shuffle ($deck); 

while (list (, $elem) = each ($deck)) { 

  echo "$elem" . "\r\n"; 

}

// Alternative method is to use srand + shuffle, 

// but in the way I get very-pseudo random results. 


// srand ((float)microtime()*1000000); 

// shuffle ($deck); 


// Generate deck of cards in normal order 

function normal_order_deck() 

{ 

  $deck = array(); 
  $cards = array(0 => 1,2,3,4,5,6,7,8,9,10,'J','Q','K'); 
  while (list (, $c) = each ($cards)) { 
    array_push($deck,$c . 'S'); 
    array_push($deck,$c . 'H'); 
    array_push($deck,$c . 'D'); 
    array_push($deck,$c . 'C'); 
  } 
  return $deck; 
}

// seed with microseconds 

function make_seed() { 
  list($usec, $sec) = explode(' ', microtime()); 
  return (float) $sec + ((float) $usec * 100000); 
} 


// shuffle array - not optimized 

function local_mt_shuffle(&$arr) { 

  $local_num = array(); 
  $local_arr = array(); 
  $cnt = 0; 
  $maxcnt = count($arr); 
  while ($cnt < $maxcnt) { 
    $num = mt_rand(0,$maxcnt-1); 
    if (!isset($local_num[$num])) { 
      $local_num[$num] = 1; 
      $local_arr[$cnt] = $arr[$num]; 
      ++$cnt; 
    } 
  } 
  $arr = $local_arr;
}

?>