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
    martedì 21 luglio 2026
    Bari
    52
    78
    36
    43
    39
    Cagliari
    69
    89
    64
    46
    09
    Firenze
    75
    01
    80
    42
    35
    Genova
    85
    60
    15
    06
    32
    Milano
    47
    77
    22
    36
    59
    Napoli
    64
    68
    25
    45
    09
    Palermo
    42
    24
    66
    48
    76
    Roma
    48
    32
    08
    02
    42
    Torino
    82
    15
    07
    06
    51
    Venezia
    70
    15
    17
    66
    89
    Nazionale
    42
    17
    74
    50
    06
    Estrazione Simbolotto
    Nazionale
    44
    31
    28
    30
    29

Ultimi Messaggi

Indietro
Alto