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
    venerdì 01 agosto 2025
    Bari
    38
    02
    68
    33
    79
    Cagliari
    21
    78
    83
    22
    55
    Firenze
    63
    14
    72
    28
    16
    Genova
    21
    46
    17
    40
    39
    Milano
    49
    60
    17
    77
    63
    Napoli
    90
    05
    77
    74
    53
    Palermo
    16
    61
    43
    37
    90
    Roma
    40
    45
    27
    57
    32
    Torino
    62
    57
    26
    82
    61
    Venezia
    06
    46
    68
    32
    29
    Nazionale
    71
    36
    06
    32
    15
    Estrazione Simbolotto
    Nazionale
    30
    37
    17
    41
    08

Ultimi Messaggi

Indietro
Alto