Novità

metodi per ambate

Ad ogni estrazione no, ma ad ogni quarta del mese .
buona domenica pandit ti faccio i miei complimenti per il metodo che non sbaglia un colpo.volevo chiederti ma non riesci a fare un metodo che possa dare il seccondo numero da affiancare all'altro
mi sono spiegato? ciao grazie
 
Buongiorno tizi, posso sapere il metodo? Grazie per la cortesia
Certo ... ne ho 2 che vengono calcolati all'ultima estrazione del mese
1^ 5^ di bari si gioca il n consecutivo e il n precedente del 5^ esempio settembre 5^ Ba 60 si gioca il 59 e 61 ( ambate )
2^ Si somma il primo di Bari + 5 di Ca= Ambata ottobre 83 ... Usciti già il 61 2volte e 83 ora manca il 59
Escono sempre abbastanza velocemente... a te la verifica del passato !!!;)
 
Certo ... ne ho 2 che vengono calcolati all'ultima estrazione del mese
1^ 5^ di bari si gioca il n consecutivo e il n precedente del 5^ esempio settembre 5^ Ba 60 si gioca il 59 e 61 ( ambate )
2^ Si somma il primo di Bari + 5 di Ca= Ambata ottobre 83 ... Usciti già il 61 2volte e 83 ora manca il 59
Escono sempre abbastanza velocemente... a te la verifica del passato !!!;)
Grazie mille
 
Settimo colpo Terza volta oggi uscito su Nazionale.
Alien.... ecco lo script
Option Explicit
Sub Main
' Pandit and Toon
Dim es,Ruote(12),Nm(2)
Dim poste(2),caso,a,x,k
Ruote(1) = 2: Ruote(2) = 12'
poste(1) = 1
caso = 0
For es = EstrazioneFin - 104 To EstrazioneFin
If IndiceMensile(es) = 4 Then
x = Estratto(es,2,1)
a = Fuori90(Estratto(es,2,1) + 32)
'***
caso = caso + 1
ColoreTesto 1:Scrivi String(83,152) & " Caso N. " & caso,1
Scrivi DataEstrazione(es) & " - " & SiglaRuota(2) & " - " & StringaEstratti(es,2) & " -> " & CInt(x),1
Scrivi CInt(x) & " + 32 = " & CInt(a),1
ColoreTesto 1:Scrivi String(40,152)
'***
k = 12
Nm(1) = a
ImpostaGiocata 1,Nm,Ruote,poste,k
Gioca es,1
End If
Next
ScriviResoconto
End Sub
Per abbinamenti offre statistica, trovato in rete...
Sub Main
Dim abb,k,Nu(2),Ru(1)
n = InputBox("Numero in Esame",,54)
r = InputBox("Ruota in esame",,12)
Ru(1) = r
Ini = EstrazioneFin -(156*5)
fin = EstrazioneFin
ef = EstrattoFrequenza(r,n,Ini,fin)
Scrivi "Frequenza Numero in esame.... " & ef & " in Estrazioni...Tot : " & fin - Ini + 1
Call Abbinamenti(n,abb,Ini,fin,r)
Scrivi
For k = 1 To 10
Nu(1) = n
Nu(2) = abb(k,1)
perc = Round(Dividi(abb(k,2),ef),2)*100
sr = SerieRitardo(Ini,fin,Nu,Ru,2)
sf = SerieFreq(Ini,fin,Nu,Ru,2)
Call VerificaEsitoTurbo(Nu,Ru,fin - sr,2,,,,,esa,id)
Scrivi n & "-" & Format2(abb(k,1)) & " ( " & abb(k,2) & " )" & vbTab & "Ritardo da.... " & sr & vbTab & fin - sr & _
vbTab & perc & " % " & vbTab & esa & vbTab & GetInfoEstrazione(id)
Next
End Sub
Ricordate che di certo non c'è nulla...
 
Ultima modifica:
Certo ... ne ho 2 che vengono calcolati all'ultima estrazione del mese
1^ 5^ di bari si gioca il n consecutivo e il n precedente del 5^ esempio settembre 5^ Ba 60 si gioca il 59 e 61 ( ambate )
2^ Si somma il primo di Bari + 5 di Ca= Ambata ottobre 83 ... Usciti già il 61 2volte e 83 ora manca il 59
Escono sempre abbastanza velocemente... a te la verifica del passato !!!;)
grazie interessanti, ma sarebbe meglio specificare su quali ruote vanno giocate.
 
Settimo colpo Terza volta oggi uscito su Nazionale.
Alien.... ecco lo script
Option Explicit
Sub Main
' Pandit and Toon
Dim es,Ruote(12),Nm(2)
Dim poste(2),caso,a,x,k
Ruote(1) = 2: Ruote(2) = 12'
poste(1) = 1
caso = 0
For es = EstrazioneFin - 104 To EstrazioneFin
If IndiceMensile(es) = 4 Then
x = Estratto(es,2,1)
a = Fuori90(Estratto(es,2,1) + 32)
'***
caso = caso + 1
ColoreTesto 1:Scrivi String(83,152) & " Caso N. " & caso,1
Scrivi DataEstrazione(es) & " - " & SiglaRuota(2) & " - " & StringaEstratti(es,2) & " -> " & CInt(x),1
Scrivi CInt(x) & " + 32 = " & CInt(a),1
ColoreTesto 1:Scrivi String(40,152)
'***
k = 12
Nm(1) = a
ImpostaGiocata 1,Nm,Ruote,poste,k
Gioca es,1
End If
Next
ScriviResoconto
End Sub
Per abbinamenti offre statistica, trovato in rete...
Sub Main
Dim abb,k,Nu(2),Ru(1)
n = InputBox("Numero in Esame",,54)
r = InputBox("Ruota in esame",,12)
Ru(1) = r
Ini = EstrazioneFin -(156*5)
fin = EstrazioneFin
ef = EstrattoFrequenza(r,n,Ini,fin)
Scrivi "Frequenza Numero in esame.... " & ef & " in Estrazioni...Tot : " & fin - Ini + 1
Call Abbinamenti(n,abb,Ini,fin,r)
Scrivi
For k = 1 To 10
Nu(1) = n
Nu(2) = abb(k,1)
perc = Round(Dividi(abb(k,2),ef),2)*100
sr = SerieRitardo(Ini,fin,Nu,Ru,2)
sf = SerieFreq(Ini,fin,Nu,Ru,2)
Call VerificaEsitoTurbo(Nu,Ru,fin - sr,2,,,,,esa,id)
Scrivi n & "-" & Format2(abb(k,1)) & " ( " & abb(k,2) & " )" & vbTab & "Ritardo da.... " & sr & vbTab & fin - sr & _
vbTab & perc & " % " & vbTab & esa & vbTab & GetInfoEstrazione(id)
Next
End Sub
Ricordate che di certo non c'è nulla...
non so leggere i spoiler
 
al 4 di cagliari io gioco abbinandolo 38 44 48


se può servire alla 1 del mese
Ultimamente questi sommativi danno 100% di successo delle ambate su cagliari/nazionale, come per intenderci il +32 al 1 estratto di cagliari e giocabile su cagliari e nazionale suggerito da Pandit alla 4 del mese

Ruote di Gioco : CA NZ
All 'Indice Mensile 1 Prendi il 1 Estratto di Cagliari somma indice Sommativo e gioca su CA / NZ
Casi positivi al 100% Sommativi

sommativo : 2 Casi : 6 / 6
sommativo : 3 Casi : 6 / 6
sommativo : 4 Casi : 6 / 6
sommativo : 6 Casi : 6 / 6
sommativo : 14 Casi : 6 / 6
sommativo : 20 Casi : 6 / 6
sommativo : 21 Casi : 6 / 6
sommativo : 38 Casi : 6 / 6
sommativo : 40 Casi : 6 / 6
sommativo : 45 Casi : 6 / 6
sommativo : 61 Casi : 6 / 6
sommativo : 65 Casi : 6 / 6
sommativo : 66 Casi : 6 / 6
sommativo : 67 Casi : 6 / 6
sommativo : 71 Casi : 6 / 6
sommativo : 72 Casi : 6 / 6
sommativo : 75 Casi : 6 / 6
 
Ultima modifica:

Ultima estrazione Lotto

  • Estrazione del lotto
    venerdì 30 ottobre 2026
    Bari
    58
    79
    20
    27
    07
    Cagliari
    64
    45
    51
    54
    62
    Firenze
    84
    69
    21
    54
    78
    Genova
    70
    24
    76
    56
    73
    Milano
    32
    36
    19
    33
    72
    Napoli
    01
    38
    67
    70
    36
    Palermo
    78
    04
    72
    84
    74
    Roma
    58
    70
    85
    21
    34
    Torino
    49
    82
    36
    69
    84
    Venezia
    21
    86
    70
    33
    63
    Nazionale
    06
    24
    10
    28
    63
    Estrazione Simbolotto
    37
    35
    11
    36
    06
Indietro
Alto