Novità

L' Ambata Determinata - Su Bari - Vincente Da 7 Mesi (Ultima del mese)

Ecco, guarda se Ti va bene.. io ho messo per 17 colpi, ma si può cambiare.. (y)
Sub Main
'Metodo Ambata Determinata - Su Bari - (Ultima del mese) by Xeroxs 2° 3° e 4° posizione
ColoreTesto 2 :Scrivi String(37,32) & "Ambata Determinata - Su Bari - by Xeroxs ",1
Scrivi
Dim nu(1),R(12),n(6)
Dim ini,fin,posta(1)
posta(1) = 1
ini = EstrazioneFin - 300
fin = EstrazioneFin
co = 0
For es = ini To fin
Messaggio es
Call AvanzamentoElab(ini,fin,es)
If IsUltimaDelMese(es) Then
'If IndiceMensile(es) = 1 Then
a = Estratto(es,4,2)
b = Estratto(es,9,5)
c = Estratto(es,1,1)
d = Fuori90(((a + b) - c) + 88)
'***
nu(1) = d
'***
R(1) = 1:R(2) = 6
'***
ImpostaGiocata 1,nu,R,posta,17
Gioca es,1
Scrivi String(105,"-") : ColoreTesto 1
'End If
End If
Next
ScriviResoconto
End Sub
 
Ecco, guarda se Ti va bene.. io ho messo per 17 colpi, ma si può cambiare.. (y)
Sub Main
'Metodo Ambata Determinata - Su Bari - (Ultima del mese) by Xeroxs 2° 3° e 4° posizione
ColoreTesto 2 :Scrivi String(37,32) & "Ambata Determinata - Su Bari - by Xeroxs ",1
Scrivi
Dim nu(1),R(12),n(6)
Dim ini,fin,posta(1)
posta(1) = 1
ini = EstrazioneFin - 300
fin = EstrazioneFin
co = 0
For es = ini To fin
Messaggio es
Call AvanzamentoElab(ini,fin,es)
If IsUltimaDelMese(es) Then
'If IndiceMensile(es) = 1 Then
a = Estratto(es,4,2)
b = Estratto(es,9,5)
c = Estratto(es,1,1)
d = Fuori90(((a + b) - c) + 88)
'***
nu(1) = d
'***
R(1) = 1:R(2) = 6
'***
ImpostaGiocata 1,nu,R,posta,17
Gioca es,1
Scrivi String(105,"-") : ColoreTesto 1
'End If
End If
Next
ScriviResoconto
End Sub

Grazie anche a nome di tutti quelli che ne possono fare un buon uso.
Direi che è fatto bene, cosi chiunque può spaziare a sua discrezione
 

Ultima estrazione Lotto

  • Estrazione del lotto
    sabato 15 marzo 2025
    Bari
    54
    73
    63
    32
    79
    Cagliari
    70
    22
    84
    52
    06
    Firenze
    07
    63
    05
    22
    64
    Genova
    38
    42
    50
    30
    73
    Milano
    34
    23
    73
    61
    68
    Napoli
    49
    13
    89
    84
    28
    Palermo
    26
    86
    70
    06
    22
    Roma
    54
    71
    60
    29
    79
    Torino
    10
    42
    33
    18
    22
    Venezia
    14
    12
    51
    15
    71
    Nazionale
    05
    14
    21
    15
    80
    Estrazione Simbolotto
    Firenze
    13
    15
    06
    25
    33
Indietro
Alto