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
    venerdì 14 agosto 2026
    Bari
    74
    22
    73
    87
    14
    Cagliari
    86
    69
    70
    08
    71
    Firenze
    53
    31
    14
    06
    81
    Genova
    23
    84
    10
    63
    35
    Milano
    40
    64
    54
    33
    80
    Napoli
    10
    08
    35
    29
    83
    Palermo
    33
    72
    89
    14
    80
    Roma
    81
    23
    29
    31
    74
    Torino
    56
    84
    85
    75
    48
    Venezia
    29
    79
    54
    17
    62
    Nazionale
    22
    27
    11
    64
    15
    Estrazione Simbolotto
    Nazionale
    27
    34
    14
    40
    31

Ultimi Messaggi

Indietro
Alto