<$BlogRSDUrl$>

28 julio 2005

Casinos de Marras! 

Ya estoy jarto de ver anuncios que dicen como ganar SEGURO en los casino. Si esto fuese verdad ya habrían cerrado todos. Bueno, vamos a hacer una demostración de la falácia.
Con estos dos scripts para shell (solo usuarios de *nix lo siento por los usuarios de Windows).
El primero toma como parametros lo que tenemos, lo que queremos ganar y cuanto apostamos en el inicio:
#!/bin/bash
tenemos=$1
espero=$2

por_apuesta_ini=$3

apuesta="rojo"
por_apuesta=$por_apuesta_ini

max=$tenemos
salir=0
while
[ "$salir" -eq 0 ]
do

ruleta=$RANDOM
if
[ "$ruleta" -gt "16383" ]
then
color=
"rojo"
else
color=
"negro"
fi

if [ "$color" = "$apuesta" ]
then

let "tenemos = tenemos + por_apuesta"
por_apuesta=$por_apuesta_ini
resultado=
"GANADO"
if
[ "$tenemos" -ge "$espero" ]
then

salir=
1
fi

else
let
"tenemos = tenemos - por_apuesta"
let
"por_apuesta = 2 *por_apuesta"
resultado=
"PERDIDO"
if
[ "$tenemos" -le 0 ]
then

salir=
1
fi

fi
if
[ "$max" -lt "$tenemos" ]
then

max=$tenemos

fi

done
echo $tenemos
Ahora vamos a aprovechar este script para crear 500 ejecuciones de la infalible apuesta que publicitan tantas páginas:
#!/bin/bash i=0
ganadas=0
perdidas=0
read -p "Dinero en el bolsillo: " tenemos_ini
read
-p "Esperas ganar: " espero
read
-p "apuesta inicial: " apuesta
while
[ "$i" -lt 500 ]
do

tenemos=
`./casino_param.sh $tenemos_ini $espero $apuesta`
if
[ "$tenemos" -gt 0 ]
then

let "ganadas = ganadas + 1"
else
let "perdidas = perdidas + 1"
fi

let
"i=i+1"
done

echo
"Ganadas:$ganadas Perdidas:$perdidas"
Debes llamar al primer script casino_param.sh para que este segundo lo ejecute.

Con estas herramientas ya podemos empezar a hacer pruebas. En general vemos que NO ganamos siempre, no es infalible. Vemos también que funciona mejor con apuestas iniciales bajas. Podríamos hacer mas scripts, que nos indiquen cual es la mejor apuesta inicial, y cuales son las ganancias esperadas mas probables.
Tras unas cuentas ejecuciones ha visto que si tenemos 100 y queremos duplicar, tenemos más o menos un 60% de probabilidades de hacerlo (que no está mal) pero ni MUCHO MENOS es infalible.
Si veo comentarios e interés me curro los otros scrips ;)

0 Comentarios
Nedstat Basic - Estadisticas gratis