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
    sabato 26 settembre 2026
    Bari
    22
    29
    63
    55
    38
    Cagliari
    02
    71
    47
    42
    75
    Firenze
    09
    21
    74
    71
    19
    Genova
    87
    52
    82
    72
    26
    Milano
    57
    19
    11
    37
    76
    Napoli
    72
    78
    31
    37
    07
    Palermo
    82
    15
    68
    28
    60
    Roma
    28
    67
    61
    82
    90
    Torino
    67
    78
    56
    18
    59
    Venezia
    84
    66
    75
    76
    43
    Nazionale
    06
    14
    62
    09
    88
    Estrazione Simbolotto
    Palermo
    34
    02
    23
    36
    33
Indietro
Alto