Novità

L'IMPORTANZA DEL 6° NUMERO sul lotto..HA DATO AL 2° COLPO TERNO E DUE AMBI

Scusa schiro' a firenze invece che numeri avresti da abbinare al 15... Magari ci scappa l'ambo...
 
scusa ,forse non mi sono spiegato ,quali numeri giocheresti con il sistema sopra descritto,che dia l ambata certa a colpo con 9 numeri su una ruota, o viceversa 1 numero che esca a colpo su 9 ruote, grazie ancora

questi sono i numeri con l'ambata certa ...." occhio che nulla e dato x certo"

64.40.29.06.05.60.39......x ambata se vuoi il sistema

eccolo

64.05.
40.29.
29.06.
06.05.
06.60.
05.39.
64.06.05.
40.05.60.
40.06.39.
64.29.60.39.
 

[TD="class: xl63, width: 64"][/TD]
[TD="class: xl63, width: 64"] € 9,00 [/TD]
[TD="class: xl63, width: 155"] € 9,00 [/TD]
[TD="class: xl63, width: 157"] € 11,23 [/TD]
[TD="class: xl63, width: 130"] € 2,23 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 11,23 [/TD]
[TD="class: xl63"] € 14,02 [/TD]
[TD="class: xl63"] € 2,79 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 14,02 [/TD]
[TD="class: xl63"] € 17,49 [/TD]
[TD="class: xl63"] € 3,48 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 17,49 [/TD]
[TD="class: xl63"] € 21,83 [/TD]
[TD="class: xl63"] € 4,34 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 21,83 [/TD]
[TD="class: xl63"] € 27,25 [/TD]
[TD="class: xl63"] € 5,41 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 27,25 [/TD]
[TD="class: xl63"] € 34,00 [/TD]
[TD="class: xl63"] € 6,76 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 34,00 [/TD]
[TD="class: xl63"] € 42,44 [/TD]
[TD="class: xl63"] € 8,43 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 42,44 [/TD]
[TD="class: xl63"] € 52,96 [/TD]
[TD="class: xl63"] € 10,52 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 52,96 [/TD]
[TD="class: xl63"] € 66,10 [/TD]
[TD="class: xl63"] € 13,13 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 66,10 [/TD]
[TD="class: xl63"] € 82,49 [/TD]
[TD="class: xl63"] € 16,39 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 82,49 [/TD]
[TD="class: xl63"] € 102,94 [/TD]
[TD="class: xl63"] € 20,46 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 102,94 [/TD]
[TD="class: xl63"] € 128,47 [/TD]
[TD="class: xl63"] € 25,53 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 128,47 [/TD]
[TD="class: xl63"] € 160,34 [/TD]
[TD="class: xl63"] € 31,86 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 160,34 [/TD]
[TD="class: xl63"] € 200,10 [/TD]
[TD="class: xl63"] € 39,76 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 200,10 [/TD]
[TD="class: xl63"] € 249,72 [/TD]
[TD="class: xl63"] € 49,62 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 249,72 [/TD]
[TD="class: xl63"] € 311,66 [/TD]
[TD="class: xl63"] € 61,93 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 311,66 [/TD]
[TD="class: xl63"] € 388,95 [/TD]
[TD="class: xl63"] € 77,29 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 388,95 [/TD]
[TD="class: xl63"] € 485,41 [/TD]
[TD="class: xl63"] € 96,46 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 485,41 [/TD]
[TD="class: xl63"] € 605,79 [/TD]
[TD="class: xl63"] € 120,38 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 605,79 [/TD]
[TD="class: xl63"] € 756,02 [/TD]
[TD="class: xl63"] € 150,24 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 756,02 [/TD]
[TD="class: xl63"] € 943,51 [/TD]
[TD="class: xl63"] € 187,49 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 943,51 [/TD]
[TD="class: xl63"] € 1.177,51 [/TD]
[TD="class: xl63"] € 233,99 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 1.177,51 [/TD]
[TD="class: xl63"] € 1.469,53 [/TD]
[TD="class: xl63"] € 292,02 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 1.469,53 [/TD]
[TD="class: xl63"] € 1.833,97 [/TD]
[TD="class: xl63"] € 364,44 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 1.833,97 [/TD]
[TD="class: xl63"] € 2.288,80 [/TD]
[TD="class: xl63"] € 454,82 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 2.288,80 [/TD]
[TD="class: xl63"] € 2.856,42 [/TD]
[TD="class: xl63"] € 567,62 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 2.856,42 [/TD]
[TD="class: xl63"] € 3.564,81 [/TD]
[TD="class: xl63"] € 708,39 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 3.564,81 [/TD]
[TD="class: xl63"] € 4.448,88 [/TD]
[TD="class: xl63"] € 884,07 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 4.448,88 [/TD]
[TD="class: xl63"] € 5.552,20 [/TD]
[TD="class: xl63"] € 1.103,32 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 5.552,20 [/TD]
[TD="class: xl63"] € 6.929,15 [/TD]
[TD="class: xl63"] € 1.376,95 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 6.929,15 [/TD]
[TD="class: xl63"] € 8.647,58 [/TD]
[TD="class: xl63"] € 1.718,43 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 8.647,58 [/TD]
[TD="class: xl63"] € 10.792,18 [/TD]
[TD="class: xl63"] € 2.144,60 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 10.792,18 [/TD]
[TD="class: xl63"] € 13.468,64 [/TD]
[TD="class: xl63"] € 2.676,46 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 13.468,64 [/TD]
[TD="class: xl63"] € 16.808,87 [/TD]
[TD="class: xl63"] € 3.340,22 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 16.808,87 [/TD]
[TD="class: xl63"] € 20.977,46 [/TD]
[TD="class: xl63"] € 4.168,60 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 20.977,46 [/TD]
[TD="class: xl63"] € 26.179,88 [/TD]
[TD="class: xl63"] € 5.202,41 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 26.179,88 [/TD]
[TD="class: xl63"] € 32.672,49 [/TD]
[TD="class: xl63"] € 6.492,61 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 32.672,49 [/TD]
[TD="class: xl63"] € 40.775,26 [/TD]
[TD="class: xl63"] € 8.102,78 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 40.775,26 [/TD]
[TD="class: xl63"] € 50.887,53 [/TD]
[TD="class: xl63"] € 10.112,26 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 50.887,53 [/TD]
[TD="class: xl63"] € 63.507,63 [/TD]
[TD="class: xl63"] € 12.620,11 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 63.507,63 [/TD]
[TD="class: xl63"] € 79.257,53 [/TD]
[TD="class: xl63"] € 15.749,89 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 79.257,53 [/TD]
[TD="class: xl63"] € 98.913,39 [/TD]
[TD="class: xl63"] € 19.655,87 [/TD]

[TD="class: xl63"][/TD]
[TD="class: xl63"] € 9,00 [/TD]
[TD="class: xl63"] € 98.913,39 [/TD]
[TD="class: xl63"] € 123.443,91 [/TD]
[TD="class: xl63"] € 24.530,52 [/TD]
questo un mio prospetto per 9 numeri su una ruota presa 44 estrazioni consegutive
 
scusami Schiro' ma con parole ed esempi semplici non si puo' spiegare questo tuo lavoro per noi che siamo imbranati e non sappiamo usare il computer come te? Io ti ringrazio ugualmente ma non saro' mai capace di usare quello che dici tu. Buona serata
 
Chi mi puo aiutare con spaziometria?Dove devo inserire lo script del metodo?:confused: Grazie in anticipo!
ciao eugenio apri gestione script ..metti vicino il cursore ti dice qualè.........apri evidenzia quello che vedi scritto all'interno e con il tasto destro del mouse clicca su delete si cancellerà la scritta ......copia lo script che ti serve è incolla dove hai aperto prima spaziometria ....aprilo cliccando dove vedi una saetta ...se vuoi salvalo ciao

ma qualcuno può riportarlo lo script di questo metodo?? grazie .... ciao schirò stò cercando di capire anch'io!!!!!!
 
Ultima modifica:
ciao eugenio apri gestione script ..metti vicino il cursore ti dice qualè.........apri evidenzia quello che vedi scritto all'interno e con il tasto destro del mouse clicca su delete si cancellerà la scritta ......copia lo script che ti serve è incolla dove hai aperto prima spaziometria ....aprilo cliccando dove vedi una saetta ...se vuoi salvalo ciao

ma qualcuno può riportarlo lo script di questo metodo?? grazie .... ciao schirò stò cercando di capire anch'io!!!!!!
Ciao,Onei! Mi hai salvato!!!!Grazie, funziona!!!!!:) Lo script :
Option Explicit
Dim ColoreFixedCol
Dim ForeColorFixedCol
Dim ColoreColSomma
Sub Main
Dim idEstr,Inizio,Fine
ReDim aT(13)
ReDim aFont(13)
ReDim aColori(13)
ReDim aForeColor(13)
ReDim aClrEvid(3)
Call Init(aT,aFont,aColori,aForeColor,aClrEvid)
Inizio = EstrazioneIni
Fine = EstrazioneFin
For idEstr = Inizio To Fine
Call EseguiStat(idEstr,aT,aFont,aColori,aForeColor,aClrEvid)
Call AvanzamentoElab(Inizio,Fine,idEstr)
If ScriptInterrotto Then Exit For
Next
End Sub
Sub Init(aT,aFont,aColori,aForeColor,aClrEvid)
Dim k,i,r
ColoreFixedCol = RGB(143,143,143)
ForeColorFixedCol = vbWhite
ColoreColSomma = RGB(192,192,192)
For k = 1 To 13
aFont(k) = "Lucida console"
aColori(k) = vbCyan
aForeColor(k) = vbBlack
Next
aFont(1) = "Courier new"
aColori(1) = ColoreFixedCol
aColori(2) = ColoreColSomma
aForeColor(1) = ForeColorFixedCol
aT(1) = "Ruota"
aT(2) = "Somma"
i = 2
For r = 3 To 14
If r - 2 <> 11 Then
i = i + 1
aT(i) = " " & SiglaRuota(r - 2) & " "
End If
Next
aClrEvid(1) = vbRed
aClrEvid(2) = RGB(255,128,0)
aClrEvid(3) = vbYellow
End Sub
Sub EseguiStat(idEstr,aT,aFont,aColori,aForeColor,aClrEvid)
Dim r,s,i,k,idRit
ReDim aV(13)
ReDim aRitPerRuota(121,3)
idRit = 0
Call InitTabella(aT,ColoreFixedCol,,,ForeColorFixedCol,"Courier new")
For r = 1 To 12
If r <> 11 Then
s = Fuori90(SommaEstratti(idEstr,r))
i = 2
aV(1) = NomeRuota(r)
aV(2) = s
For k = 1 To 12
If k <> 11 Then
i = i + 1
aV(i) = RitardoEstratto(s,idEstr,k)
idRit = idRit + 1
aRitPerRuota(idRit,1) = s ' il numero cioe la somma estratti
aRitPerRuota(idRit,2) = aV(i) ' il suo ritardo
aRitPerRuota(idRit,3) = k ' la ruota dove e stato calc il rit
End If
Next
Call ModificaColori(aV,aColori,aClrEvid)
Call AddRigaTabella(aV,aColori,,,aForeColor,aFont)
End If
Next
Call Scrivi(String(100,"_"))
Call Scrivi(GetInfoEstrazione(idEstr) & " -- Ritardo somme sulle ruote")
Call Scrivi(String(100,"_"))
Call Scrivi
Call CreaTabella
ReDim aTT(3)
aTT(1) = "Somma"
aTT(2) = "Ruota"
aTT(3) = "Ritardo"
Call InitTabella(aTT,ColoreFixedCol,,,ForeColorFixedCol,"Lucida console")
Call OrdinaMatrice(aRitPerRuota,- 1,2)
For k = 1 To 5
'Call Scrivi("Somma : " & FormatSpace(aRitPerRuota(k,1),4,True) & " Rit " & FormatSpace(aRitPerRuota(k,2),5,True) & " Ruota " & SiglaRuota(aRitPerRuota(k,3)))
aTT(1) = aRitPerRuota(k,1)
aTT(2) = SiglaRuota(aRitPerRuota(k,3))
aTT(3) = aRitPerRuota(k,2)
Call AddRigaTabella(aTT,vbCyan,,,,"Lucida console")
Next
Call Scrivi("Primi 5 piu in ritardo")
Call CreaTabella
End Sub
Sub ModificaColori(aT,aColori,aClrEvid)
Dim k,j
ReDim aRit(11)
For k = 3 To 13
aRit(k - 2) = aT(k)
Next
Call OrdinaMatrice(aRit,- 1)
For k = 3 To 13
aColori(k) = vbCyan
Next
For k = 1 To UBound(aClrEvid)
For j = 3 To 13
If aT(j) = aRit(k) Then
aColori(j) = aClrEvid(k)
End If
Next
Next
End Sub
 
Option Explicit
Dim ColoreFixedCol
Dim ForeColorFixedCol
Dim ColoreColSomma
Sub Main
Dim idEstr,Inizio,Fine
ReDim aT(13)
ReDim aFont(13)
ReDim aColori(13)
ReDim aForeColor(13)
ReDim aClrEvid(3)
Call Init(aT,aFont,aColori,aForeColor,aClrEvid)
Inizio = EstrazioneIni
Fine = EstrazioneFin
For idEstr = Inizio To Fine
Call EseguiStat(idEstr,aT,aFont,aColori,aForeColor,aClrEvid)
Call AvanzamentoElab(Inizio,Fine,idEstr)
If ScriptInterrotto Then Exit For
Next
End Sub
Sub Init(aT,aFont,aColori,aForeColor,aClrEvid)
Dim k,i,r
ColoreFixedCol = RGB(143,143,143)
ForeColorFixedCol = vbWhite
ColoreColSomma = RGB(192,192,192)
For k = 1 To 13
aFont(k) = "Lucida console"
aColori(k) = vbCyan
aForeColor(k) = vbBlack
Next
aFont(1) = "Courier new"
aColori(1) = ColoreFixedCol
aColori(2) = ColoreColSomma
aForeColor(1) = ForeColorFixedCol
aT(1) = "Ruota"
aT(2) = "Somma"
i = 2
For r = 3 To 14
If r - 2 <> 11 Then
i = i + 1
aT(i) = " " & SiglaRuota(r - 2) & " "
End If
Next
aClrEvid(1) = vbRed
aClrEvid(2) = RGB(255,128,0)
aClrEvid(3) = vbYellow
End Sub
Sub EseguiStat(idEstr,aT,aFont,aColori,aForeColor,aClrEvid)
Dim r,s,i,k,idRit
ReDim aV(13)
ReDim aRitPerRuota(121,3)
idRit = 0
Call InitTabella(aT,ColoreFixedCol,,,ForeColorFixedCol,"Courier new")
For r = 1 To 12
If r <> 11 Then
s = Fuori90(SommaEstratti(idEstr,r))
i = 2
aV(1) = NomeRuota(r)
aV(2) = s
For k = 1 To 12
If k <> 11 Then
i = i + 1
aV(i) = RitardoEstratto(s,idEstr,k)
idRit = idRit + 1
aRitPerRuota(idRit,1) = s ' il numero cioe la somma estratti
aRitPerRuota(idRit,2) = aV(i) ' il suo ritardo
aRitPerRuota(idRit,3) = k ' la ruota dove è stato calc il rit
End If
Next
Call ModificaColori(aV,aColori,aClrEvid)
Call AddRigaTabella(aV,aColori,,,aForeColor,aFont)
End If
Next
Call Scrivi(String(100,"_"))
Call Scrivi(GetInfoEstrazione(idEstr) & " -- Ritardo somme sulle ruote")
Call Scrivi(String(100,"_"))
Call Scrivi
Call CreaTabella
ReDim aTT(3)
aTT(1) = "Somma"
aTT(2) = "Ruota"
aTT(3) = "Ritardo"
Call InitTabella(aTT,ColoreFixedCol,,,ForeColorFixedCol,"Lucida console")
Call OrdinaMatrice(aRitPerRuota,- 1,2)
For k = 1 To 5
'Call Scrivi("Somma : " & FormatSpace(aRitPerRuota(k,1),4,True) & " Rit " & FormatSpace(aRitPerRuota(k,2),5,True) & " Ruota " & SiglaRuota(aRitPerRuota(k,3)))
aTT(1) = aRitPerRuota(k,1)
aTT(2) = SiglaRuota(aRitPerRuota(k,3))
aTT(3) = aRitPerRuota(k,2)
Call AddRigaTabella(aTT,vbCyan,,,,"Lucida console")
Next
Call Scrivi("Primi 5 più in ritardo")
Call CreaTabella
End Sub
Sub ModificaColori(aT,aColori,aClrEvid)
Dim k,j
ReDim aRit(11)
For k = 3 To 13
aRit(k - 2) = aT(k)
Next
Call OrdinaMatrice(aRit,- 1)
For k = 3 To 13
aColori(k) = vbCyan
Next
For k = 1 To UBound(aClrEvid)
For j = 3 To 13
If aT(j) = aRit(k) Then
aColori(j) = aClrEvid(k)
End If
Next
Next
End Sub



questo e quello giusto
 
Ciao ragazzi
lo script si blocca con un errore " ERRORE SCRIPT 1006 - PREVISTO J LINEA 16 Col 56"
ci potete mettere mano ?
Grazie
Giorgio
 
Ciao.
Nella riga n.16 togli lo spazio fra le ultime due parole aClr e Evid e fai lo stesso anche alla riga 48.

Sub EseguiStat(idEstr,aT,aFont,aColori,aForeColor,aClrEvid)

Ciao, Miguelma
 
Allora, facendo riepilogo tra ultime 10 estrazioni e usando Spaziometria (RINGRAZIO ONEI !!!) vi posto i numeri da giocare(tranne quelli che sono gia usciti).
Ca - 21-12/45-54 ; Fi-52-25 ; Ge - 43-34; Mi-56-65; Pa-32-23; Ro-51-15/43-34/86-68; To-52-25/29-22; Ve-38-83/6-60 .Spero che avete delle convergenze... Chiedo a Gioacchino dare un'occhiata se e giusto.Vorrei ricordare che LuigiB ha fatto un grande lavoro. GRAZIE LUIGI e Gioacchino per il metodo!
 

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 20 ottobre 2026
    Bari
    54
    19
    90
    65
    23
    Cagliari
    07
    78
    44
    23
    64
    Firenze
    85
    52
    78
    37
    21
    Genova
    14
    88
    68
    18
    29
    Milano
    69
    16
    29
    53
    22
    Napoli
    01
    76
    64
    21
    31
    Palermo
    14
    18
    47
    37
    51
    Roma
    86
    88
    64
    26
    34
    Torino
    21
    64
    52
    62
    40
    Venezia
    29
    87
    64
    40
    50
    Nazionale
    03
    52
    85
    23
    42
    Estrazione Simbolotto
    25
    16
    13
    20
    43
Indietro
Alto