Как потерять деньги на игре в рулетку

Периодически в интернете проскакивает реклама о том, как быстро и на халяву заработать деньги в виртуальном казино на рулете. Вот примеры spomoni.habrahabr.ru/blog/9732/, ruletka.4t.com, biznesland.narod.ru. С точки зрения теории случайных чисел у нас нет ни единого шанса выиграть у казино, но тяга к халяве неистребима. Поэтому я написал небольшой эмулятор игры в рулету, чтобы можно было почувствовать все самому.

Результаты: нет ни единого шанса выиграть у рулетки. Любой выигрыш сменится проигрышем. Люди со ссылок выше зарабатывают или партнерками с казино (им казино платит часть проигранных вами денег) или продавая за 10 уе супер секрет как обмануть рулетку (зачем его продавать, если можно им пользоваться?). В общем, халявы нет, а тяга к халяве - быстрый путь потерять свои деньги. Делайте что-то полезное, за что люди готовы платить.

<?php

/**
Эмулятор игры в рулетку

попробуем выиграть у рулетки в игре на удваивание в чет/нечет
описание "выигрышнего" процесса http://ruletka.4t.com/

http://spomoni.habrahabr.ru/blog/9732/

ruletka.4t.com  biznesland.narod.ru

Суть
1) ждем пока выпадет не чет Х раз (например 3 раза)
2) ставим на чет и в случае выигрыша возвращаемся на 1)
3) если проиграли - удваиваем ставку на чет, пока не выиграем и тогда 1) или не кончатся деньги


у нас не будет потолка ставки, только максимум денег

*/


mt_srand(make_seed());

$r = new Ruletka;
while (true) {
    $r->game();
}


//------------------

class Ruletka {

var $budget = 10000;// денег в начале
var $min_bid = 1;// минимальная ставка
var $last_bid = 1; // последняя ставка
var $wait_rolls = 6;// сколько ждем выпадений
var $max_budget = 10000000;// максимальный бюджет, при котором игра останавливается
var $min_budget = 0;// минимальный бюджет, при котором игра останавливается

var $roll ; // результат текущего броска

var $is_make_bet = false;// находимся ли мы в режиме ставок (true) или просто ждем удобного случая (false)

var $last_odd_count = 0;// число выпавших подряд четных чисел за последнюю серию


function game() {

    if (!$this->is_make_bet) {
        $this->roll();
        if ($this->is_odd()) {
            $this->last_odd_count++;
            if ($this->last_odd_count >= $this->wait_rolls) {
                $this->is_make_bet = true;
                $this->last_bid = $this->min_bid;
            }
        } else {
            $this->last_odd_count = 0;
        }
    } else {
        $this->bid();
        $this->roll();
        if ($this->is_odd()) {
            $this->win();
        } else {
            $this->fail();
        }
        $this->check_game();
    }

}

/**
* результат броска
*/ 
function roll() {
    $this->roll = mt_rand(0,36);
}

// четный ли результат
function is_odd() {
    if ($this->roll == 0) return false;
    return $this->roll % 2 == 0;
}

// нечетный ли результат
function is_even() {
    if ($this->roll == 0) return false;
    return $this->roll % 2 == 1;
}

function bid() {
    $this->budget -= $this->last_bid;
}

function win() {
    $this->budget += 2*$this->last_bid;
    $this->is_make_bet = false;
    $this->last_bid = $this->min_bid;
}

function fail() {
    $this->last_bid *= 2;
}


function check_game() {

    echo "budget = $this->budget\n";

    if ($this->budget <= $this->min_budget) {
        echo "You fail!!!!";
        exit;
    }
    if ($this->budget >= $this->max_budget) {
        echo "You win!!!!";
        exit;
    }
}

}

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