Novità

Metodo su Bari e Cagliari

Così hai il risultato di ogni ruota, ma ovviamente spesa e guadagno cambiano..
Option Explicit
Sub Main
'Metodo da un'idea di PORTAFORTUNA by Pandit
Dim a,a1,b,b1,c,c1,d,e,g,h
Dim Ini,Fin,Es,Ruo(5),K,R2,R1
Dim Nu(10),Num(6),posta(3)
Dim clp,Poste(1),f,i,R(12),Ru(12)
Poste(1) = 1
posta(2) = 1
R1 = CInt(InputBox(" Inserisci il numero della prima ruota",,1))
R2 = CInt(InputBox(" Inserisci il numero della seconda ruota",,2))
'P***
Ini = EstrazioneFin - 300
Fin = EstrazioneFin
Scrivi "Metodo Data di nascita",1,,,1,3,,1
For Es = Ini To Fin
'If IsUltimaDelMese(Es) Then
If IndiceMensile(Es) = 1 Then
'-----------------------------------
K = K + 1
a = Decina(Estratto(Es,R1,1))
a1 = Cadenza(Estratto(Es,R1,1))
If a > a1 Then
c = a - a1
End If
If a < a1 Then
c = a1 - a
End If
'P***
b = Decina(Estratto(Es,R2,1))
b1 = Cadenza(Estratto(Es,R2,1))
If b > b1 Then
c1 = b - b1
End If
If b < b1 Then
c1 = b1 - b
End If
'P***
d = Fuori90(c & c1)
e = Fuori90(Vert(d))
g = 90 - d
h = 90 - e
'P***
For f = 1 To UBound(Num)
If Cadenza(Num(f)) = 9 Then Num(f) = Vert(Num(f) - 1)
Next
'P***
For i = 1 To UBound(Num)
If Gemello(Num(i)) Then Num(i) = Vert(Num(i) - 1)
Next
'P***
Ruo(1) = R1
Ruo(2) = R2
'P***
'Ru(1) = R1
'Ru(2) = R2
Ru(1) = 1: Ru(2) = 2:Ru(3) = 3:Ru(4) = 4:Ru(5) = 5:Ru(6) = 6:Ru(7) = 7:Ru(8) = 8:Ru(9) = 9:Ru(10) =10:Ru(12) =12
'*** Numeri ***
Num(1) = d
Num(2) = e
Num(3) = g
Num(4) = h
EliminaRipetuti Num
'P***
Nu(1) = d
'Nu(2) = e
'P***
Scrivi DataEstrazione(Es) & "Primo Numero in Gioco " & d & " Vertibile " & e,1
'P***
ImpostaGiocata 1,Nu,Ruo,Poste,7',1
ImpostaGiocata 2,Num,Ru,posta,17',1
Gioca Es,1
Scrivi String(105,"-") : ColoreTesto 1
K = 0
End If
Next
ColoreTesto(0)
ScriviResoconto
ColoreTesto(1)
End Sub
 
Buongiorno dall' estrazione del 23 uscito 61 a Cagliari, restano 11,54,22,42,55..da alcune mie previsioni ho 11-88 e 22-65 a Bari per chi ha convergenze gradirei un riscontro
 
Se Ti può essere utile su Bari ho il 20 che mi manca all'appello..
Veramente anche su Milano e Napoli , dovrebbe uscire entro 6/7 colpi..
 

Ultima estrazione Lotto

  • Estrazione del lotto
    sabato 08 novembre 2025
    Bari
    47
    72
    08
    22
    76
    Cagliari
    56
    51
    36
    17
    53
    Firenze
    21
    11
    71
    89
    19
    Genova
    90
    32
    12
    80
    01
    Milano
    10
    57
    72
    21
    17
    Napoli
    59
    01
    76
    09
    61
    Palermo
    75
    10
    80
    24
    25
    Roma
    87
    86
    09
    32
    17
    Torino
    55
    21
    23
    46
    30
    Venezia
    18
    20
    13
    32
    84
    Nazionale
    19
    18
    05
    86
    08
    Estrazione Simbolotto
    Torino
    42
    29
    30
    11
    09

Ultimi Messaggi

Indietro
Alto