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
    sabato 31 ottobre 2026
    Bari
    15
    60
    11
    81
    74
    Cagliari
    24
    40
    55
    20
    09
    Firenze
    63
    14
    53
    68
    73
    Genova
    55
    16
    90
    39
    58
    Milano
    19
    72
    51
    41
    39
    Napoli
    09
    17
    13
    70
    47
    Palermo
    41
    17
    54
    38
    20
    Roma
    47
    81
    19
    75
    52
    Torino
    74
    20
    44
    67
    55
    Venezia
    04
    44
    50
    03
    58
    Nazionale
    90
    09
    57
    02
    28
    Estrazione Simbolotto
    32
    15
    35
    11
    01

Ultimi Messaggi

Indietro
Alto