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

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



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

Чуть получше код выглядит тут bolnikh.ru/node/50.

<?php

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

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

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);
}

* This source code was highlighted with Source Code Highlighter.