// How many times we are going to do the crowning ceremony
$ceremonies = 10000;

// Loop through these instructions to carry out the crowning ceremony.
for ($i = 1; $i < $ceremonies+1; $i++)
{
$win = FALSE; # Nobody has become king yet.
$oddeven = 1; # Because the first throw is odd. Assume 1 = odd, 0 = even.
$firsttoss = TRUE; # We are tossing for the first time.

// This variable is used later to determine which variable $x or $y is
// reassigned a value and which keeps the previous toss value.
$a = 0;

// Keep on tossing the coins until somebody wins the kingdom.
while ($win == FALSE)
{
// Here we only flip one coin, this will alternate between $x and $y.
// The one ($x or $y) that isn't assigned a new value will retain the
// previous toss value so we can find out whether or not we have got
// two HH or TT in a row.
// Assume H = 1, T = 2
if ($a == 0) {
$x = rand(1,2);
$a = $a + 1;
} elseif ($a > 0) {
$y = rand(1,2);
$a = 0;
}

if ($firsttoss == TRUE) {
// Nobody can win on the first toss.
$firsttoss = FALSE;
} else {
// If it is HH and ODD...
if ($x == 1 && $y == 1 && $oddeven == 1) {
// Lotto will become King.
$lotto = $lotto + 1;

// Somebody has won the Kingdom.
$win = TRUE;
}

// If it is TT and ODD...
if ($x == 2 && $y == 2 && $oddeven == 1) {
// Lotto will become King.
$lotto = $lotto + 1;

// Somebody has won the Kingdom.
$win = TRUE;
}

// If it is HH and EVEN...
if ($x == 1 && $y == 1 && $oddeven == 0) {
// Bingo will become King.
$bingo = $bingo + 1;

// Somebody has won the Kingdom.
$win = TRUE;
}

// If it is TT and EVEN...
if ($x == 2 && $y == 2 && $oddeven == 0) {
// Toto will become King.
$toto = $toto + 1;

// Somebody has won the Kingdom.
$win = TRUE;
}
}

// ... If nobody has won anything ...
if ($win != TRUE) {
// We flip again, so Odd->Even or Even->Odd.
if ($oddeven == 0) {
$oddeven = 1;
} else {
$oddeven = 0;
}
}
}
}