La rete è invasa da siti web che dicono di sapere come farvi vincere alla roulette. Tutti sembrano conoscere il rito magico cui i profani vanno dietro alla ricerca di qualche forma di successo, spesso applicando cose che non capiscono.
Ti sei sentito preso in giro? Hai giocato utilizzando una delle tante strategie proposte da questi siti?
Hai già dato una musata contro la tecnica del martingala, con la quale hai perso tutti i soldi?
Eccoti allora l’ennesima strategia suggerita dai “geni” dei casinò, dal nome di “Strategia James Bond”.
Si tratta di puntare 200 euro ad ogni mano (o 20, o 2, ma sempre mantenendo le proporzioni che di seguito riporto).
- 140 si puntano sul quadrante 19 o superiori (quindi tutti i numero dal 19 al 36).
- 50 si puntano sulla striscia che va dal 13 al 18
- 10 si puntano sullo zero
Qualora si azzeccasse il primo gruppo si verrebbe pagati 280 euro (la puntata raddoppiata)
Qualora si azzeccasse il secondo gruppo si verrebbe pagati 300 euro (la puntata per 5)
Qualora si azzeccasse lo zero (terza opzione) si verrebbe pagati 360 euro.
Con questo “mix straordinario” i vari giornalisti da strapazzo assicurano tante soddisfazioni.
Ecco di seguito il risultato del mio calcolo, applicato a 30.000 mani di James… hem… Bond…
Una catastrofe clamorosa.
Qui sopra sono riprodotte 30.000 mani di roulette cui è applicata la strategia James Bond.
In 30.000 mani, circa 140.000 euro vanno bruciati 🙂
Di seguito il codice VBA di Excel che gioca alla roulette francese scrivendo il bilancio pre-giocata sulla colonna A, il numero random uscito della pallina (0-36) sulla colonna B, e l’importo pagato dalla giocata (positivo o negativo) sulla colonna C.
Riga dopo riga, notiamo il bilancio economico che sprofonda nel baratro. Alla faccia di quei “cornuti” che vi invitano a provare questa strategia… della serie “tanto i soldi sono i vostri”.
Sub jamesbond()
Application.ScreenUpdating = False
bilancio = 1000
numero_giocate = 30000
For x = 1 To numero_giocate
Range(“a” & x).FormulaR1C1 = bilancio
cosa_esce = Int((37 – 1 + 1) * Rnd + 1) – 1
Range(“b” & x).FormulaR1C1 = cosa_esce
If cosa_esce <= 12 Then vinto = -200
If cosa_esce > 18 Then vinto = 80
If cosa_esce = 0 Then vinto = 160
If cosa_esce > 12 And cosa_esce <= 18 Then vinto = 100
Range(“c” & x).FormulaR1C1 = vinto
bilancio = bilancio + vinto
Next
Application.ScreenUpdating = True
End Sub