Novità

1° Estrazione del Mese - 3 Ambi su Tutte

Giulio Pedrinelli

Super Member >PLATINUM<
Ciao a tutti;

Tre ambi su Tutte le ruote alla 1° Estrazione del mese, periodo ricerca 36 mesi.

Inzio: 02/03/2023
Fine: 28/02/2026

1° Ambo: 4° VE + 74 / 5° GE + 28
2° Ambo: 4° VE + 74 / 3° BA + 82
3° Ambo: 4° VE + 74 / 3° TO + 19

Periodo di gioco: 6 estrazioni.
Qui di seguito lo script.

Sub main()
Dim rt(1),pt(4),n1(7)

pt(1)=0
pt(2)=1
pt(3)=0
pt(4)=0

clp=6
rt(1)=11

ini=10206
fin=EstrazioneFin
co=0
For es=ini To fin
Messaggio (es)
If Indicemensile (es)=1 Then
casi=casi+1
Scrivi String(60,"=")&" Caso n° "&casi,1
co=co+1
a=Estratto (es,10,4) + 74
b=Estratto (es,4,5) + 28
n1(1)=Fuori90 (a+0)
n1(2)=Fuori90 (b+0)
ImpostaGiocata 1,n1,rt,pt,clp
a=Estratto (es,10,4) + 74
b=Estratto (es,1,3) + 82
n1(1)=Fuori90 (a+0)
n1(2)=Fuori90 (b+0)
ImpostaGiocata 2,n1,rt,pt,clp
a=Estratto (es,10,4) + 74
b=Estratto (es,9,3) + 19
n1(1)=Fuori90 (a+0)
n1(2)=Fuori90 (b+0)
ImpostaGiocata 3,n1,rt,pt,clp

Gioca es
End If
Next
Scrivi : Scrivi "Casi Rilevati "& CInt (co)
ScriviResoconto

End Sub
 
Ciao GIULIO ottimo come sempre _; nello script puoi inserire in distribuzioni esiti ruota per ruota ? grazie.
 

Ultima estrazione Lotto

  • Estrazione del lotto
    sabato 18 luglio 2026
    Bari
    65
    47
    09
    87
    29
    Cagliari
    47
    06
    30
    59
    72
    Firenze
    22
    32
    30
    07
    43
    Genova
    89
    55
    51
    66
    33
    Milano
    13
    44
    08
    37
    40
    Napoli
    74
    62
    83
    30
    22
    Palermo
    14
    59
    78
    12
    34
    Roma
    63
    69
    51
    12
    64
    Torino
    14
    10
    38
    52
    12
    Venezia
    51
    30
    11
    07
    03
    Nazionale
    25
    05
    89
    33
    73
    Estrazione Simbolotto
    Nazionale
    24
    17
    13
    27
    03
Indietro
Alto