\n"; //} } } } } } for($i=0;$i<11;$i++){ $deck[$i]=4*6; } $deck[0]=3*4*6; for($p1=0;$p1<11;$p1++){ $counts[0]=$deck[$p1]; $deck[$p1]--; for($p2=$p1;$p2<11;$p2++){ $counts[1]=$deck[$p2]; $deck[$p2]--; for($p3=$p2;$p3<11;$p3++){ $counts[2]=$deck[$p3]; $deck[$p3]--; $ways= $counts[0]*$counts[1] * $counts[2]; if($p1==$p2 and $p2==$p3) $ways= $ways/3; if($p1==$p2 or $p2==$p3) $ways= $ways/2; $count+=$ways; $plow= $p1 + $p2 + $p3; $phi= $plow; if($p1==1) $phi +=10; if($p2==1) $phi +=10; if($p3==1) $phi +=10; $finalways[$p1][$p2][$p3]=$ways; $finalphi[$p1][$p2][$p3]=$phi; $finalplow[$p1][$p2][$p3]=$plow; //begin dealer for($a=0;$a<11;$a++){ $dc[0]=$deck[$a]; $deck[$a]--; for($b=$a;$b<11;$b++){ $dc[1]=$deck[$b]; $deck[$b]--; for($c=$b;$c<11;$c++){ $dc[2]=$deck[$c]; $deck[$c]--; for($d=$c;$d<11;$d++){ $dc[3]=$deck[$d]; $deck[$d]--; for($e=$d;$e<11;$e++){ $dc[4]=$deck[$e]; $deck[$e]--; // use ifs to deturman / ways if($a<$b and $b<$c and $c<$d and $d<$e) { $dways=1; }elseif($a==$e){ $dways=120; }elseif($a<$b and $b==$e){ $dways=24; }elseif($a==$d){ $dways=24; }elseif($a==$b and $c==$e){ $dways=12; }elseif($a==$c and $d==$e){ $dways=12; }elseif($a==$c){ $dways=6; }elseif($b==$d){ $dways=6; }elseif($c==$e){ $dways=6; }elseif($a==$b and $c==$d){ $dways=4; }elseif($a==$b and $d==$e){ $dways=4; }elseif($b==$c and $d==$e){ $dways=4; }else{ $dways=2; } $dealerways= $dc[0] *$dc[1]*$dc[2]*$dc[3]*$dc[4]/$dways; if($plow <$low[$a][$b][$c][$d][$e] + 1) {$finallow[$p1][$p2][$p3]+=$dealerways; }else{$finallowx[$p1][$p2][$p3]+=$dealerways; } if($phi >$hi[$a][$b][$c][$d][$e] - 1){ $finalhi[$p1][$p2][$p3]+=$dealerways; }else{$finalhix[$p1][$p2][$p3]+=$dealerways; } $deck[$e]++; } $deck[$d]++; } $deck[$c]++; } $deck[$b]++; } $deck[$a]++; } //end dealer $deck[$p3]++; } $deck[$p2]++; } $deck[$p1]++; } for($a=0;$a<11;$a++){ for($b=$a;$b<11;$b++){ for($c=$b;$c<11;$c++){ echo $a . "\t" . $b . "\t" . $c . "\t" . $finalways[$a][$b][$c] . "\t" . $finalplow[$a][$b][$c]. "\t" . $finallow[$a][$b][$c]. "\t" . $finallowx[$a][$b][$c]. "\t" . $finalphi[$a][$b][$c]. "\t" . $finalhi[$a][$b][$c] . "\t" . $finalhix[$a][$b][$c] . "\n"; } } }