lottodavide
Advanced Member >PLATINUM<
Geronimo, ieri nessun ambo doppio.. mi confermi?
Follow along with the video below to see how to install our site as a web app on your home screen.
Nota: This feature may not be available in some browsers.
GERONIMO'S METODO INOSSIDABILE .........
- Creatore Discussione geronimo
- Data di inizio
lottodavide
Advanced Member >PLATINUM<
si confermo!ma le tue iniziali sono D. B. ? mi arrivano parecchie richieste di amicizia ma sono molto selettivo
geronimo
Premium Member
si confermo
geronimo
Premium Member
TT 18 81 / 08 18 / 08 81 TRIPLI AMBI SECCHIsegnalo alcuni esiti delle previsioni che si sono venute a formare con gli ambi ripetuti dal 19 09
19 09 TO NAZ 09 31 > TO NZ 40 04 / 85 62 / 22 AMBATA SECCA .....
25 09 NZ 22 e 22 62 AMBATA E AMBO SECCO
20 09 BA TO 50 59 > BA TO NZ 18 81 / 63 26 / 08 ..... 26 09 NZ 08 e 63 08 AMBATA E AMBO SECCO
23 09 GE RM 07 60 > GE RM NZ 67 76 / 22 30 / 53 ...... 26 09 TT 67 76 09 10 RM 67 76 AMBO SECCO
27 09 MI PA 26 42 > MI PA NZ 68 86 / 23 84 / 16 ...... 04 10 NZ 84 86 AMBO
30 09 BA PA 14 68 > BA PA NZ 82 28 / 37 46 / 54 .......
03 10 NZ 54 e 37 54 AMBO SECCO , 04 10 PA 54 AMBATA , TT 46 54 AMBO SECCO
02 10 VE NZ 19 78 > VE NZ 07 70 / 52 66 / 59 ..... 09 10 TT 07 70 AMBO SECCO e 07 70 66 TERNO
OLTRE AL TERNO SECCO A COLPO SU NAZ 03 13 31
LO SCRIVO PERCHè VISTO, L'ANDAZZO SU GEROmetrando DOVE HO DECISO DI NON POSTARE VISTO CHE SI SONO IMPROVVISAMENTE ECLISSATE LE VINCITE, ANCHE QUI AVEVO FATTO LA STESSA COSA E NON PUBBLICIZZANDO PIù LE PREVISIONI I RISULTATI DEL METODO ORMAI DIVENTATO ADULTO CONTINUANO A FIOCCARE .....
CHIEDETEVI PERCHè
TT 08 18 81 TERNO SECCO
mezzomarinaio
Super Member >PLATINUM<
sempre grande geronimo............. 
mezzomarinaio
Super Member >PLATINUM<
geronimo, mi sto un po' esercitando su questo fantastico metodo,
visti i 2 ambi ripetuti bari palermo ho provato ( da neofita) a fare i miei calcoli...
BA/PA 3-23
ambata : 20
primo ambo : 66-69
secondo ambo : 21-78
NA/TO :
ambata: 12
primo ambo: 66-69
secondo ambo 21-78
corretto?
grazie per il supporto !!
visti i 2 ambi ripetuti bari palermo ho provato ( da neofita) a fare i miei calcoli...
BA/PA 3-23
ambata : 20
primo ambo : 66-69
secondo ambo : 21-78
NA/TO :
ambata: 12
primo ambo: 66-69
secondo ambo 21-78
corretto?
grazie per il supporto !!
mezzomarinaio
Super Member >PLATINUM<
errata corrige:
bari palermo
ambata 20
primo ambo: 26-62
secondo ambo 71-46
bari palermo
ambata 20
primo ambo: 26-62
secondo ambo 71-46
geronimo
Premium Member
si corretto questo
mezzomarinaio
Super Member >PLATINUM<
ciao
geronimo, e grazie mille !!
geronimo
Premium Member
PA NZ AMBATA 20 A COLPO
PA AMBETTO 20 26
geronimo
Premium Member
ogni tanto faccio una capatina .... ho elaborato uno script per verificare i risultati ...non è proprio completo ma da l'idea ...
Dim r1,r2,p1,p2,p3,p4,es,colpi,co
Dim n1,n2,n3,n4
Dim nAmbata(1),nAmbi1(2),nAmbi2(2),nCinquina(5)
Dim ruote(3),ruoteTutte(1)
Dim poste(1),posteAmbo(2),posteCmq(5)
' Impostazione poste di gioco
poste(1) = 1 ' Posta per Ambata
posteAmbo(2) = 1 ' Posta per Ambo
posteCmq(2) = 1 ' Ambo in cinquina
posteCmq(3) = 1 ' Terno in cinquina
posteCmq(4) = 0.5 ' Quaterna in cinquina
posteCmq(5) = 0.1 ' Cinquina
colpi = 18 ' Portato a 18 colpi (Ciclo teorico dell'ambata)
ruoteTutte(1) = TT_ ' Ruota di Tutte per recupero
Dim esInizio, esFine
esInizio = EstrazioneFin - 1000 ' Analizza le ultime 1000 estrazioni
esFine = EstrazioneFin
co = 0
For es = esInizio To esFine
Call Messaggio("Analisi estrazione: " & es)
For r1 = 1 To 10
For r2 = r1 + 1 To 12
Dim r2_effettiva
If r2 = 11 Then
r2_effettiva = NZ_ ' Ruota Nazionale
ElseIf r2 = 12 Then
Exit For
Else
r2_effettiva = r2
End If
' Cerca ambi ripetuti sulle due ruote
For p1 = 1 To 4
For p2 = p1 + 1 To 5
n1 = Estratto(es,r1,p1)
n2 = Estratto(es,r1,p2)
If n1 > 0 And n2 > 0 Then
' Verifica se lo stesso ambo è presente sulla seconda ruota
For p3 = 1 To 4
For p4 = p3 + 1 To 5
n3 = Estratto(es,r2_effettiva,p3)
n4 = Estratto(es,r2_effettiva,p4)
' Controllo ambo ripetuto (anche non isotopo)
If (n1 = n3 And n2 = n4) Or (n1 = n4 And n2 = n3) Then
co = co + 1
Call Scrivi(String(100,"-") & " Caso n° " & co,1)
Call Scrivi(DataEstrazione(es) & " - " & NomeRuota(r1) & " / " & NomeRuota(r2_effettiva) & " Ambo Ripetuto: " & n1 & "-" & n2,1)
' Ordina i due elementi dell'ambo: A maggiore, B minore
Dim nA, nB
If n1 > n2 Then
nA = n1 : nB = n2
Else
nA = n2 : nB = n1
End If
' --- ALGORITMO GERONIMO'S METODO ---
Dim ambata, num1, num2, num3, num4
' 5° Numero (Ambata Secca): Maggiore meno Minore
ambata = nA - nB
' 1° Numero: Somma fuori 90
num1 = Fuori90(nA + nB)
' 2° Numero: Calcolo CORRETTO del Vertibile (Tabella Tradizionale dei Gemelli/Impuri)
Dim dec, cad
If num1 = 90 Then
num2 = 9
ElseIf num1 = 9 Then
num2 = 90
ElseIf num1 = 11 Then
num2 = 19
ElseIf num1 = 19 Then
num2 = 11
ElseIf num1 = 22 Then
num2 = 29
ElseIf num1 = 29 Then
num2 = 22
ElseIf num1 = 33 Then
num2 = 39
ElseIf num1 = 39 Then
num2 = 33
ElseIf num1 = 44 Then
num2 = 49
ElseIf num1 = 49 Then
num2 = 44
ElseIf num1 = 55 Then
num2 = 59
ElseIf num1 = 59 Then
num2 = 55
ElseIf num1 = 66 Then
num2 = 69
ElseIf num1 = 69 Then
num2 = 66
ElseIf num1 = 77 Then
num2 = 79
ElseIf num1 = 79 Then
num2 = 77
ElseIf num1 = 88 Then
num2 = 89
ElseIf num1 = 89 Then
num2 = 88
ElseIf num1 Mod 10 = 0 Then
num2 = num1 / 10
ElseIf num1 < 10 Then
num2 = num1 * 10
Else
dec = Int(num1 / 10)
cad = num1 Mod 10
num2 = (cad * 10) + dec
End If
' 3° Numero: Diametrale Classico del 1° Numero (+45)
num3 = Diametrale(num1)
' 4° Numero: Somma + Differenza fuori 90
num4 = Fuori90(num1 + ambata)
' Configurazione Pronostici
nAmbata(1) = ambata
nAmbi1(1) = ambata
nAmbi1(2) = num1
nAmbi2(1) = ambata
nAmbi2(2) = num2
nCinquina(1) = ambata
nCinquina(2) = num1
nCinquina(3) = num2
nCinquina(4) = num3
nCinquina(5) = num4
' Configurazione Ruote di gioco (R1, R2 + Nazionale)
ruote(1) = r1
ruote(2) = r2_effettiva
ruote(3) = NZ_
' Impostazione Giocate nei Report
ImpostaGiocata 1,nAmbata,ruote,poste,colpi,1
ImpostaGiocata 2,nAmbi1,ruote,posteAmbo,colpi,2
ImpostaGiocata 3,nAmbi2,ruote,posteAmbo,colpi,2
ImpostaGiocata 4,nCinquina,ruote,posteCmq,colpi,3
ImpostaGiocata 5,nCinquina,ruoteTutte,posteAmbo,colpi,3
' Avvia la verifica del caso
Gioca es,1
End If
Next
Next
End If
Next
Next
Next
Next
Next
' Mostra il resoconto complessivo delle vincite
ScriviResoconto
Dim r1,r2,p1,p2,p3,p4,es,colpi,co
Dim n1,n2,n3,n4
Dim nAmbata(1),nAmbi1(2),nAmbi2(2),nCinquina(5)
Dim ruote(3),ruoteTutte(1)
Dim poste(1),posteAmbo(2),posteCmq(5)
' Impostazione poste di gioco
poste(1) = 1 ' Posta per Ambata
posteAmbo(2) = 1 ' Posta per Ambo
posteCmq(2) = 1 ' Ambo in cinquina
posteCmq(3) = 1 ' Terno in cinquina
posteCmq(4) = 0.5 ' Quaterna in cinquina
posteCmq(5) = 0.1 ' Cinquina
colpi = 18 ' Portato a 18 colpi (Ciclo teorico dell'ambata)
ruoteTutte(1) = TT_ ' Ruota di Tutte per recupero
Dim esInizio, esFine
esInizio = EstrazioneFin - 1000 ' Analizza le ultime 1000 estrazioni
esFine = EstrazioneFin
co = 0
For es = esInizio To esFine
Call Messaggio("Analisi estrazione: " & es)
For r1 = 1 To 10
For r2 = r1 + 1 To 12
Dim r2_effettiva
If r2 = 11 Then
r2_effettiva = NZ_ ' Ruota Nazionale
ElseIf r2 = 12 Then
Exit For
Else
r2_effettiva = r2
End If
' Cerca ambi ripetuti sulle due ruote
For p1 = 1 To 4
For p2 = p1 + 1 To 5
n1 = Estratto(es,r1,p1)
n2 = Estratto(es,r1,p2)
If n1 > 0 And n2 > 0 Then
' Verifica se lo stesso ambo è presente sulla seconda ruota
For p3 = 1 To 4
For p4 = p3 + 1 To 5
n3 = Estratto(es,r2_effettiva,p3)
n4 = Estratto(es,r2_effettiva,p4)
' Controllo ambo ripetuto (anche non isotopo)
If (n1 = n3 And n2 = n4) Or (n1 = n4 And n2 = n3) Then
co = co + 1
Call Scrivi(String(100,"-") & " Caso n° " & co,1)
Call Scrivi(DataEstrazione(es) & " - " & NomeRuota(r1) & " / " & NomeRuota(r2_effettiva) & " Ambo Ripetuto: " & n1 & "-" & n2,1)
' Ordina i due elementi dell'ambo: A maggiore, B minore
Dim nA, nB
If n1 > n2 Then
nA = n1 : nB = n2
Else
nA = n2 : nB = n1
End If
' --- ALGORITMO GERONIMO'S METODO ---
Dim ambata, num1, num2, num3, num4
' 5° Numero (Ambata Secca): Maggiore meno Minore
ambata = nA - nB
' 1° Numero: Somma fuori 90
num1 = Fuori90(nA + nB)
' 2° Numero: Calcolo CORRETTO del Vertibile (Tabella Tradizionale dei Gemelli/Impuri)
Dim dec, cad
If num1 = 90 Then
num2 = 9
ElseIf num1 = 9 Then
num2 = 90
ElseIf num1 = 11 Then
num2 = 19
ElseIf num1 = 19 Then
num2 = 11
ElseIf num1 = 22 Then
num2 = 29
ElseIf num1 = 29 Then
num2 = 22
ElseIf num1 = 33 Then
num2 = 39
ElseIf num1 = 39 Then
num2 = 33
ElseIf num1 = 44 Then
num2 = 49
ElseIf num1 = 49 Then
num2 = 44
ElseIf num1 = 55 Then
num2 = 59
ElseIf num1 = 59 Then
num2 = 55
ElseIf num1 = 66 Then
num2 = 69
ElseIf num1 = 69 Then
num2 = 66
ElseIf num1 = 77 Then
num2 = 79
ElseIf num1 = 79 Then
num2 = 77
ElseIf num1 = 88 Then
num2 = 89
ElseIf num1 = 89 Then
num2 = 88
ElseIf num1 Mod 10 = 0 Then
num2 = num1 / 10
ElseIf num1 < 10 Then
num2 = num1 * 10
Else
dec = Int(num1 / 10)
cad = num1 Mod 10
num2 = (cad * 10) + dec
End If
' 3° Numero: Diametrale Classico del 1° Numero (+45)
num3 = Diametrale(num1)
' 4° Numero: Somma + Differenza fuori 90
num4 = Fuori90(num1 + ambata)
' Configurazione Pronostici
nAmbata(1) = ambata
nAmbi1(1) = ambata
nAmbi1(2) = num1
nAmbi2(1) = ambata
nAmbi2(2) = num2
nCinquina(1) = ambata
nCinquina(2) = num1
nCinquina(3) = num2
nCinquina(4) = num3
nCinquina(5) = num4
' Configurazione Ruote di gioco (R1, R2 + Nazionale)
ruote(1) = r1
ruote(2) = r2_effettiva
ruote(3) = NZ_
' Impostazione Giocate nei Report
ImpostaGiocata 1,nAmbata,ruote,poste,colpi,1
ImpostaGiocata 2,nAmbi1,ruote,posteAmbo,colpi,2
ImpostaGiocata 3,nAmbi2,ruote,posteAmbo,colpi,2
ImpostaGiocata 4,nCinquina,ruote,posteCmq,colpi,3
ImpostaGiocata 5,nCinquina,ruoteTutte,posteAmbo,colpi,3
' Avvia la verifica del caso
Gioca es,1
End If
Next
Next
End If
Next
Next
Next
Next
Next
' Mostra il resoconto complessivo delle vincite
ScriviResoconto
geronimo
Premium Member
nel frattempo il mese di Agosto ha fino ad oggi 21 previsioni vincenti su 23 ( le due non vincenti però sono del 21 e 22 Agosto .... cmq se lanciate lo script potete verificare di persona
ciaooooooooooooooone
P.S. nel resoconto finale c'è un errore nel dato spese che riporta un valore speso , ma da 0 alla voce vincite .... cosa decisamente errata in quanto su 1.000 estrazioni analizzate sono 724 previsioni e 720 casi vincenti
ciaooooooooooooooone
P.S. nel resoconto finale c'è un errore nel dato spese che riporta un valore speso , ma da 0 alla voce vincite .... cosa decisamente errata in quanto su 1.000 estrazioni analizzate sono 724 previsioni e 720 casi vincenti
Ultima modifica:
geronimo
Premium Member
Grazie alla collaborazione di mia figlia sono riucito a trovare il sistema di controllare spesa e vincite
approssimative per difetto perchè nel calcolo mancano gli ambi secchi che il metodo sviluppa ( sono 6, ma il programma ne calcola solo 2 ) ... in totale calcola ambata , 2 ambi secchi , una cinquina al lottoPiù ...
calcolo sulle ultime 1.000 estrazioni
considerando invece solo le ultime 100 estrazioni
con questo spero di aver tacitato tutti quelli che negli anni passati mi avevano attaccato sulla non reddiditività del metodo
a si biri
p.s. netto senza tasse sta per al netto della trattenuta dell'8% e la valuta è in $ anzichè in € ma a me importava la reddiditività non la valuta
approssimative per difetto perchè nel calcolo mancano gli ambi secchi che il metodo sviluppa ( sono 6, ma il programma ne calcola solo 2 ) ... in totale calcola ambata , 2 ambi secchi , una cinquina al lottoPiù ...
calcolo sulle ultime 1.000 estrazioni
considerando invece solo le ultime 100 estrazioni
con questo spero di aver tacitato tutti quelli che negli anni passati mi avevano attaccato sulla non reddiditività del metodo
a si biri
p.s. netto senza tasse sta per al netto della trattenuta dell'8% e la valuta è in $ anzichè in € ma a me importava la reddiditività non la valuta
Ultima modifica:
mezzomarinaio
Super Member >PLATINUM<
bravissimo geronimo!
non potresti rinfrescarmi la memoria sulla realizzazione del metodo ?
visto che anch'io sono stato latente nel mese di luglio/agosto?
grazie mille.....
e i risultati, parlano a tuo favore......bravissimo geronimo!
non potresti rinfrescarmi la memoria sulla realizzazione del metodo ?
visto che anch'io sono stato latente nel mese di luglio/agosto?
grazie mille.....
e i risultati, parlano a tuo favore......bravissimo geronimo!
geronimo
Premium Member
in prima pagina trovi il metodo ...grazie dei complimenti
Alien.
Advanced Premium Member
Ciao geronimo mi da errore:
Dim r1,r2,p1,p2,p3,p4,es,colpi,co
ma tu lo hai fatto sviluppare su spazio !! vi era un altro errore mancava un '
grazie.
Ultima estrazione Lotto
-
Estrazione del lotto
giovedì 27 agosto 2026Bari2961704710Cagliari4618581781Firenze7211382853Genova8679875508Milano6331374552Napoli0188308160Palermo6936597586Roma5112656637Torino7662887557Venezia0219695914Nazionale4664580636Estrazione Simbolotto
Nazionale
0409151002
