Show code - CODE/PHP/ascribe.php
<table bgcolor="#CCCC99" cellpadding=0 cellspacing=0 width="100%" align=left><tr><td colspan=4>
<b> Ascribed Tarot Solitaire </b><br><br>
</td></tr>
<tr align=center>
<?php
$shuffled_deck =
$original_deck = array('Ace of Spheres','Two of Spheres',
'Three of Spheres','Four of Spheres',
'Five of Spheres','Six of Spheres',
'Seven of Spheres','Eight of Spheres',
'Nine of Spheres','Ten of Spheres',
'Jack of Spheres','Queen of Spheres',
'King of Spheres',
'Ace of Cups','Two of Cups',
'Three of Cups','Four of Cups',
'Five of Cups','Six of Cups',
'Seven of Cups','Eight of Cups',
'Nine of Cups','Ten of Cups',
'Jack of Cups','Queen of Cups',
'King of Cups',
'Ace of Swords','Two of Swords',
'Three of Swords','Four of Swords',
'Five of Swords','Six of Swords',
'Seven of Swords','Eight of Swords',
'Nine of Swords','Ten of Swords',
'Jack of Swords','Queen of Swords',
'King of Swords',
'Ace of Wands','Two of Wands',
'Three of Wands','Four of Wands',
'Five of Wands','Six of Wands',
'Seven of Wands','Eight of Wands',
'Nine of Wands','Ten of Wands',
'Jack of Wands','Queen of Wands',
'King of Wands');
$card_files = array( 'mmVesicasAce.jpg',
'mmVesicas02Change.jpg','mmVesicas03Creativity.jpg',
'mmVesicas04Integrity.jpg','mmVesicas05Endurance.jpg',
'mmVesicas06Manifestation.jpg','mmVesicas07Harvest.jpg',
'mmVesicas08Patience.jpg','mmVesicas09Growth.jpg',
'mmVesicas10Wealth.jpg','mmVesicasKnight.jpg',
'mmVesicasQueen.jpg','mmVesicasKing.jpg',
'mmChalicesAceBlueBowl.jpg',
'mmChalices02Love.jpg','mmChalices03Celebration.jpg',
'mmChalices04Emotion.jpg','mmChalices05Progression.jpg',
'mmChalices06Union.jpg','mmChalices07Fantasy.jpg',
'mmChalices08Renewal.jpg','mmChalices09Generosity.jpg',
'mmChalices10Happiness.jpg','mmChalicesKnight.jpg',
'mmChalicesQueen.jpg','mmChalicesKing.jpg',
'mmSwordsAce.jpg',
'mmSwords02Equilibrium.jpg','mmSwords03Grief.jpg',
'mmSwords04Recuperation.jpg','mmSwords05Acceptance.jpg',
'mmSwords06Perception.jpg','mmSwords07Boundaries.jpg',
'mmSwords08Release.jpg','mmSwords09Mourning.jpg',
'mmSwords10Rebirth.jpg','mmSwordsKnight.jpg',
'mmSwordsQueen.jpg','mmSwordsKing.jpg',
'mmStaffsAce.jpg',
'mmStaffs02Gateway.jpg','mmStaffs03Honesty.jpg',
'mmStaffs04Homecoming.jpg','mmStaffs05Empowerment.jpg',
'mmStaffs06Success.jpg','mmStaffs07Courage.jpg',
'mmStaffs08Directness.jpg','mmStaffs09Strength.jpg',
'mmStaffs10Responsibility.jpg','mmStaffsKnight.jpg',
'mmStaffsQueen.jpg','mmStaffsKing.jpg' );
$entities = array('Ace'=>1, 'Two'=>2, 'Three'=>3, 'Four'=>4, 'Five'=>5,
'Six'=>6, 'Seven'=>7, 'Eight'=>8, 'Nine'=>9, 'Ten'=>10,
'Jack'=>11, 'Queen'=>12, 'King'=>13);
$classes = array('Spheres'=>1, 'Cups'=>2, 'Swords'=>3, 'Wands'=>4);
for ($build_file_index = 0;$build_file_index < 52;$build_file_index++)
{
$file_index[$original_deck[$build_file_index]] = $card_files[$build_file_index];
}
for ($re_shuff = 0;$re_shuff < 5;$re_shuff++)
{
srand ((double)microtime()*1000000);
shuffle($shuffled_deck);
}
$my_hand = $dealer_hand = range(0, 25);
for ($this_card=0, $deal_cards=0;$deal_cards < (13*4);
$deal_cards++, $this_card++)
{
$dealer_hand[$this_card] = $shuffled_deck[$deal_cards];
$my_hand[$this_card] = $shuffled_deck[++$deal_cards];
}
echo '<td align="center">';
for ($show_cards = 0;$show_cards < 4;$show_cards++)
{
echo '<img height=80 width=74 src="images/tarot/'.$file_index[$dealer_hand[$show_cards]].'" alt="Card">';
echo '<br><font size=2> '.$dealer_hand[$show_cards].'</font>';
if ($show_cards != 3) echo ' </td><td align="center"> ';
}
echo '</tr><tr><td><br></td></tr><tr><td align="center">';
for ($show_cards = 0;$show_cards < 4;$show_cards++)
{
echo '<img height=80 width=74 src="images/tarot/'.$file_index[$my_hand[$show_cards]].'" alt="Card">';
echo '<br><font size=2> '.$my_hand[$show_cards].'</font>';
if ($show_cards != 3) echo ' </td><td align="center"> ';
}
echo '</tr><tr><td><br></td></tr><tr>';
$dealer_score = $my_score = 0;
for ($eval_cards = 0;$eval_cards < 4;$eval_cards++)
{
$my_card = $my_hand[$eval_cards];
$dealer_card = $dealer_hand[$eval_cards];
$my_pos = strpos($my_card, 'of');
$dealer_pos = strpos($dealer_card, 'of');
$my_val = $entities[substr($my_card, 0, $my_pos-1)];
$dealer_val = $entities[substr($dealer_card, 0, $dealer_pos-1)];
$my_class = substr($my_card, $my_pos+3, strlen($my_card));
$dealer_class = substr($dealer_card, $dealer_pos+3, strlen($dealer_card));
echo '<td align="center">';
if ($my_class == $dealer_class)
{ if ($my_val > $dealer_val)
{ echo "Win";
$my_score++;
}
else
{ echo "Lose";
$dealer_score++;
}
} else {
switch ($my_class) {
case "Spheres":
if ($dealer_class == "Cups")
{
echo "Win";
$my_score++;
}
else
{
echo "Lose";
$dealer_score++;
}
break;
case "Cups":
if ($dealer_class == "Swords")
{
echo "Win";
$my_score++;
}
else
{
echo "Lose";
$dealer_score++;
}
break;
case "Swords":
if ($dealer_class == "Wands" || $dealer_class == "Spheres")
{
echo "Win";
$my_score++;
}
else
{
echo "Lose";
$dealer_score++;
}
break;
case "Wands":
if ($dealer_class == "Spheres" || $dealer_class == "Cups")
{
echo "Win";
$my_score++;
}
else
{
echo "Lose";
$dealer_score++;
}
break;
}
}
echo "</td>";
}
echo "<tr><td colspan=4>";
echo "<br><br>Wins: $my_score , Losses: $dealer_score";
echo "</td></tr></table>";
?>
