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
    giovedì 30 aprile 2026
    Bari
    02
    58
    76
    30
    50
    Cagliari
    28
    06
    35
    51
    39
    Firenze
    46
    27
    71
    88
    50
    Genova
    01
    08
    15
    17
    38
    Milano
    82
    50
    87
    51
    02
    Napoli
    65
    38
    37
    53
    46
    Palermo
    56
    62
    58
    10
    67
    Roma
    57
    82
    49
    80
    02
    Torino
    39
    74
    29
    35
    47
    Venezia
    54
    76
    22
    73
    85
    Nazionale
    69
    62
    88
    43
    21
    Estrazione Simbolotto
    Genova
    01
    37
    04
    17
    23

Ultimi Messaggi

Indietro
Alto