Novità

Ennio Caperna ed il suo Kcritico.

Mi resta sempre la solita domanda :

perché vendere previsioni sistemi programmi ?

Con le varie vincite garantite al 100% .... non vince abbastanza già di suo ?
Le tue (perspicaci) domande sono come gli interrogativi (e le risposte) , espressione di varie culture mondiali, molto diverse fra loro, contenute nel celebre libro (La risposta e' la domanda) di Alejandro Jodorowsky. In quelle storie, narrate e raccontate, l'uomo nasconde la sua sapienza. Morale della favola, rispetto al libro (ma non solo...) e' che anche gli adulti (non solo i bambini), a volte, hanno bisogno di favole.

Cosa possiamo desumere da cio' che ho gia' scritto?

Non e' la risposta da dare a cui dobbiamo pensare, ma... dopo una domanda, bisogna pensare alle conseguenti domande da porsi!
La saggezza e l'intelligenza devono guidare ognuno in questo compito, perche' il "segreto" nascosto e' proprio farsi le giuste domande.

Ritornando nel contesto, se Caperna avesse creduto nelle cose che ha scritto e venduto (e i prezzi non erano...bruscolini) probabilmente non avrebbe creato un account su fb per scrivere le cose che ho letto nei documenti e nei suoi post ... sarebbe invece da qualche parte a godersi la vecchiaia e i proventi dalle sue vendite. Il nostro, nei documenti che ho letto, afferma che non poteva giocare per mancanza di tempo materiale per farlo, e che egli e' sempre stato 15 gradini sopra i migliori studiosi. Ognuno tragga le proprie conclusioni.

Ora, a prescindere dal Caperna, il modo certo (metodo, sistema,etc.) per guadagnare al gioco (quindi anche al lotto) al 100% e' vendere questi prodotti pubblicizzandoli il piu' possibile, per ampliare al massimo la base dei potenziali acquirenti! Questi potenziali clienti, venivano abbacinati dal prezzo elevatissimo, che li portava a credere che l'altissimo costo implica (spesso e' vero ma non sempre, e non per questo tipo di prodotti) un grandissimo valore intrinseco del prodotto (di sicuro non hanno mai letto John Ruskin) e ovviamente, si sbagliavano. Come si sbagliano, generalmente parlando, coloro che credono ancora nelle favole oppure a cio' che viene facile credere...
 
Grazie Atlantis hai ragione non mi ero accorto del 54 ma deve essee 53, Allego il listato corretto e funzionante:

Sub Main
Dim sMsg,c,d,e,f,kc,r,cl,g,pr,pr1,pr2,ts,co,co2,Tot,a,clp,m,dme,es,mm,fleg,Ini,fin

'ColoreTesto 1:Scrivi " PROSSIMA USCITA "
'ColoreTesto 3:Scrivi " In USCITA "
'ColoreTesto 7:Scrivi " USCITA SUPERATA "
Scrivi
ColoreTesto 0
Scrivi "....................... 1 AMBATA KC 4 ................."
c = 0
clp = 0
es = 53 + clp
Ini = EstrazioneFin - es + clp
fin = EstrazioneFin - clp
For r = 1 To 10

Scrivi NomeRuota(r) & " " & EstrazioneFin - clp
Scrivi:Scrivi "NUMERO Fre-Rit Med KCrit > < Rit-Att Colpi"
For a = 1 To 90

c = EstrattoFrequenza(r,a,Ini,fin) ' frequenza
d = EstrattoRitardo(r,a,Ini,fin) ' ritardo

If c = 0 Then fleg = 1
If c = 0 Then c = 1

e = Int(es / c) 'MEDIA
kc = d / e 'probabilita
cl = Int(d / e) 'probabilita
pr = Int(e * 25 /100) '%
pr1 = Int(e * 51 /100) '%
g = Int(d -(cl * e)) 'RIT-ATT
co = 1
If fleg = 1 Then cl = 0
If fleg = 1 Then c = 0
fleg = 0
If g > pr And g < pr1 Then co = 3 'ColoreTesto 3
If g < pr Then co = 1 'ColoreTesto 1
If g > pr1 Then co = 7 'ColoreTesto 7
If d > 54 Then co = 2
ts = Format2(a) & " " & Format2(c) & " - " & Format2(d) & " " & Format2(Int(e)) & " " & Format2(cl) & " " & Format2(pr) & " % " & Format2(pr1)_
& " " & Format2(g) & " " & Format2(pr1 - g) & " ."

If co = 3 Then co2 = co + 4
If co = 1 Then co2 = co + 3
If co = 7 Then co2 = co - co
If co = 2 Then co2 = co + 2
If cl > 1 Then Call Scrivi(ts & co,True,,co,co2)

ColoreTesto 0
Next
Scrivi
Next


End Sub
Buonasera Antonio Pagano
Volevo chiederti se si può fare una modifica, io modificando For r = 1 To 10 in For r = 1 To 12,
mi ritrovo la ruota nazionale + tutte, quello che mi serve è modificare i parametri su tutte,
in modo da trovare l'estratto da giocare su tutte le ruote, naturalmente abbinato con altri numeri che io trovero.
Sicuramente cambiano i valori in percentuale un conto trovare su ruota singola un numero quì
lo deve trovare su tutte, sempre se fattibile evidenziare con i colori.
Grazie un saluto
edesimone
 
Grazie Atlantis hai ragione non mi ero accorto del 54 ma deve essee 53, Allego il listato corretto e funzionante:

Sub Main
Dim sMsg,c,d,e,f,kc,r,cl,g,pr,pr1,pr2,ts,co,co2,Tot,a,clp,m,dme,es,mm,fleg,Ini,fin

'ColoreTesto 1:Scrivi " PROSSIMA USCITA "
'ColoreTesto 3:Scrivi " In USCITA "
'ColoreTesto 7:Scrivi " USCITA SUPERATA "
Scrivi
ColoreTesto 0
Scrivi "....................... 1 AMBATA KC 4 ................."
c = 0
clp = 0
es = 53 + clp
Ini = EstrazioneFin - es + clp
fin = EstrazioneFin - clp
For r = 1 To 10

Scrivi NomeRuota(r) & " " & EstrazioneFin - clp
Scrivi:Scrivi "NUMERO Fre-Rit Med KCrit > < Rit-Att Colpi"
For a = 1 To 90

c = EstrattoFrequenza(r,a,Ini,fin) ' frequenza
d = EstrattoRitardo(r,a,Ini,fin) ' ritardo

If c = 0 Then fleg = 1
If c = 0 Then c = 1

e = Int(es / c) 'MEDIA
kc = d / e 'probabilita
cl = Int(d / e) 'probabilita
pr = Int(e * 25 /100) '%
pr1 = Int(e * 51 /100) '%
g = Int(d -(cl * e)) 'RIT-ATT
co = 1
If fleg = 1 Then cl = 0
If fleg = 1 Then c = 0
fleg = 0
If g > pr And g < pr1 Then co = 3 'ColoreTesto 3
If g < pr Then co = 1 'ColoreTesto 1
If g > pr1 Then co = 7 'ColoreTesto 7
If d > 54 Then co = 2
ts = Format2(a) & " " & Format2(c) & " - " & Format2(d) & " " & Format2(Int(e)) & " " & Format2(cl) & " " & Format2(pr) & " % " & Format2(pr1)_
& " " & Format2(g) & " " & Format2(pr1 - g) & " ."

If co = 3 Then co2 = co + 4
If co = 1 Then co2 = co + 3
If co = 7 Then co2 = co - co
If co = 2 Then co2 = co + 2
If cl > 1 Then Call Scrivi(ts & co,True,,co,co2)

ColoreTesto 0
Next
Scrivi
Next


End Sub
Mi scuso ma come si cambia l'estrazione da gennaio 2022 ad oggi estrazione per estrazione, grazie.
 
Buongiorno Alien, ho corretto lo script rendendolo più leggibile. Lo script conteggia a ritroso dall'ultima estrazione a... Se vuoi partire da Gennaio basta conteggiare quante estrazioni a ritroso ci sono. Ultima estrazione 10161 alla data 1 gennaio 2022 10024 sono 137 estrazioni togli alla variabile es = 53 e metti es = 137. Se non mi sono spiegato bene sono qua. Ciao

Sub Main
Dim sMsg,c,d,e,f,kc,r,cl,g,pr,pr1,pr2,ts,co,co2,Tot,a,clp,m,dme,es,mm,fleg,Ini,fin

'ColoreTesto 1:Scrivi " PROSSIMA USCITA "
'ColoreTesto 3:Scrivi " In USCITA "
'ColoreTesto 7:Scrivi " USCITA SUPERATA "
Scrivi
ColoreTesto 0
Scrivi "....................... 1 AMBATA KC 4 ................."
c = 0
clp = 0
es = 137 + clp
Ini = EstrazioneFin - es + clp
fin = EstrazioneFin - clp
For r = 1 To 10

Scrivi NomeRuota(r) & " Data Inizio: " &Ini& " Data Estarzione fine : " &EstrazioneFin - clp
Scrivi:Scrivi "NUMERO Fre-Rit Med KCrit > < Rit-Att Colpi"
For a = 1 To 90

c = EstrattoFrequenza(r,a,Ini,fin) ' frequenza
d = EstrattoRitardo(r,a,Ini,fin) ' ritardo

If c = 0 Then fleg = 1
If c = 0 Then c = 1

e = Int(es / c) 'MEDIA
kc = d / e 'probabilita
cl = Int(d / e) 'probabilita
pr = Int(e * 25 /100) '%
pr1 = Int(e * 51 /100) '%
g = Int(d -(cl * e)) 'RIT-ATT
co = 1
If fleg = 1 Then cl = 0
If fleg = 1 Then c = 0
fleg = 0
If g > pr And g < pr1 Then co = 3 'ColoreTesto 3
If g < pr Then co = 1 'ColoreTesto 1
If g > pr1 Then co = 7 'ColoreTesto 7
If d > 54 Then co = 2
ts = Format2(a) & " " & Format2(c) & " - " & Format2(d) & " " & Format2(Int(e)) & " " & Format2(cl) & " " & Format2(pr) & " % " & Format2(pr1)_
& " " & Format2(g) & " " & pr1 - g '& " ."

If co = 3 Then co2 = co + 4
If co = 1 Then co2 = co + 3
If co = 7 Then co2 = co - co
If co = 2 Then co2 = co + 2
If cl > 1 Then Call Scrivi(ts & co,True,,co,co2)

ColoreTesto 0
Next
Scrivi
Next


End Sub
 
Buonasera Antonio Pagano
Volevo chiederti se si può fare una modifica, io modificando For r = 1 To 10 in For r = 1 To 12,
mi ritrovo la ruota nazionale + tutte, quello che mi serve è modificare i parametri su tutte,
in modo da trovare l'estratto da giocare su tutte le ruote, naturalmente abbinato con altri numeri che io trovero.
Sicuramente cambiano i valori in percentuale un conto trovare su ruota singola un numero quì
lo deve trovare su tutte, sempre se fattibile evidenziare con i colori.
Grazie un saluto
edesimone
Scusa edesimone non avevo letto il tuo post. Certo che puoi tentae il gioco per tutte ti allego il listato corretto poi le estrazioni da controllare basta cambiare la variabile es.Ciao

Sub Main
Dim sMsg,c,d,e,f,kc,r,cl,g,pr,pr1,pr2,ts,co,co2,Tot,a,clp,m,dme,es,mm,fleg,Ini,fin

'ColoreTesto 1:Scrivi " PROSSIMA USCITA "
'ColoreTesto 3:Scrivi " In USCITA "
'ColoreTesto 7:Scrivi " USCITA SUPERATA "
Scrivi
ColoreTesto 0
Scrivi "....................... 1 AMBATA KC 4 ................."
c = 0
clp = 0
es = 137 + clp
Ini = EstrazioneFin - es + clp
fin = EstrazioneFin - clp
For r = 12 To 12

Scrivi NomeRuota(r) & " Data Inizio: " &Ini& " Data Estarzione fine : " &EstrazioneFin - clp
Scrivi:Scrivi "NUMERO Fre-Rit Med KCrit > < Rit-Att Colpi"
For a = 1 To 90

c = EstrattoFrequenza(r,a,Ini,fin) ' frequenza
d = EstrattoRitardo(r,a,Ini,fin) ' ritardo

If c = 0 Then fleg = 1
If c = 0 Then c = 1

e = Int(es / c) 'MEDIA
kc = d / e 'probabilita
cl = Int(d / e) 'probabilita
pr = Int(e * 25 /100) '%
pr1 = Int(e * 51 /100) '%
g = Int(d -(cl * e)) 'RIT-ATT
co = 1
If fleg = 1 Then cl = 0
If fleg = 1 Then c = 0
fleg = 0
If g > pr And g < pr1 Then co = 3 'ColoreTesto 3
If g < pr Then co = 1 'ColoreTesto 1
If g > pr1 Then co = 7 'ColoreTesto 7
'If d > 54 Then co = 2
ts = Format2(a) & " " & Format2(c) & " - " & Format2(d) & " " & Format2(Int(e)) & " " & Format2(cl) & " " & Format2(pr) & " % " & Format2(pr1)_
& " " & Format2(g) & " " & pr1 - g '& " ."

If co = 3 Then co2 = co + 4
If co = 1 Then co2 = co + 3
If co = 7 Then co2 = co - co
If co = 2 Then co2 = co + 2
If cl > 1 Then Call Scrivi(ts & co,True,,co,co2)

ColoreTesto 0
Next
Scrivi
Next


End Sub
 
Scusa edesimone non avevo letto il tuo post. Certo che puoi tentae il gioco per tutte ti allego il listato corretto poi le estrazioni da controllare basta cambiare la variabile es.Ciao

Sub Main
Dim sMsg,c,d,e,f,kc,r,cl,g,pr,pr1,pr2,ts,co,co2,Tot,a,clp,m,dme,es,mm,fleg,Ini,fin

'ColoreTesto 1:Scrivi " PROSSIMA USCITA "
'ColoreTesto 3:Scrivi " In USCITA "
'ColoreTesto 7:Scrivi " USCITA SUPERATA "
Scrivi
ColoreTesto 0
Scrivi "....................... 1 AMBATA KC 4 ................."
c = 0
clp = 0
es = 137 + clp
Ini = EstrazioneFin - es + clp
fin = EstrazioneFin - clp
For r = 12 To 12

Scrivi NomeRuota(r) & " Data Inizio: " &Ini& " Data Estarzione fine : " &EstrazioneFin - clp
Scrivi:Scrivi "NUMERO Fre-Rit Med KCrit > < Rit-Att Colpi"
For a = 1 To 90

c = EstrattoFrequenza(r,a,Ini,fin) ' frequenza
d = EstrattoRitardo(r,a,Ini,fin) ' ritardo

If c = 0 Then fleg = 1
If c = 0 Then c = 1

e = Int(es / c) 'MEDIA
kc = d / e 'probabilita
cl = Int(d / e) 'probabilita
pr = Int(e * 25 /100) '%
pr1 = Int(e * 51 /100) '%
g = Int(d -(cl * e)) 'RIT-ATT
co = 1
If fleg = 1 Then cl = 0
If fleg = 1 Then c = 0
fleg = 0
If g > pr And g < pr1 Then co = 3 'ColoreTesto 3
If g < pr Then co = 1 'ColoreTesto 1
If g > pr1 Then co = 7 'ColoreTesto 7
'If d > 54 Then co = 2
ts = Format2(a) & " " & Format2(c) & " - " & Format2(d) & " " & Format2(Int(e)) & " " & Format2(cl) & " " & Format2(pr) & " % " & Format2(pr1)_
& " " & Format2(g) & " " & pr1 - g '& " ."

If co = 3 Then co2 = co + 4
If co = 1 Then co2 = co + 3
If co = 7 Then co2 = co - co
If co = 2 Then co2 = co + 2
If cl > 1 Then Call Scrivi(ts & co,True,,co,co2)

ColoreTesto 0
Next
Scrivi
Next


End Sub
Grazie Antonio
Lo script corretto in questa riga For r = 12 To 12 mi rileva la nazionale, mi serve per tutte, se cambio con For r = 11 To 11 risulta su tutte,
però non viene evidenziato con i colori, dove devo cambiare la variabile, questi parametri pr = Int(e * 25 /100) '% e pr1 = Int(e * 51 /100) %
ti ricordo che stiamo cercando l' estratto su tutte le ruote, se un numero deve uscire su ruota ogni 18 estrazione, su tutte un numero
ogni quanto deve uscire?. Una volta evidenziato di colore verde quante volte deve essere giocato?.
Grazie
edesimone
 
Buongiorno Alien, ho corretto lo script rendendolo più leggibile. Lo script conteggia a ritroso dall'ultima estrazione a... Se vuoi partire da Gennaio basta conteggiare quante estrazioni a ritroso ci sono. Ultima estrazione 10161 alla data 1 gennaio 2022 10024 sono 137 estrazioni togli alla variabile es = 53 e metti es = 137. Se non mi sono spiegato bene sono qua. Ciao

Sub Main
Dim sMsg,c,d,e,f,kc,r,cl,g,pr,pr1,pr2,ts,co,co2,Tot,a,clp,m,dme,es,mm,fleg,Ini,fin

'ColoreTesto 1:Scrivi " PROSSIMA USCITA "
'ColoreTesto 3:Scrivi " In USCITA "
'ColoreTesto 7:Scrivi " USCITA SUPERATA "
Scrivi
ColoreTesto 0
Scrivi "....................... 1 AMBATA KC 4 ................."
c = 0
clp = 0
es = 137 + clp
Ini = EstrazioneFin - es + clp
fin = EstrazioneFin - clp
For r = 1 To 10

Scrivi NomeRuota(r) & " Data Inizio: " &Ini& " Data Estarzione fine : " &EstrazioneFin - clp
Scrivi:Scrivi "NUMERO Fre-Rit Med KCrit > < Rit-Att Colpi"
For a = 1 To 90

c = EstrattoFrequenza(r,a,Ini,fin) ' frequenza
d = EstrattoRitardo(r,a,Ini,fin) ' ritardo

If c = 0 Then fleg = 1
If c = 0 Then c = 1

e = Int(es / c) 'MEDIA
kc = d / e 'probabilita
cl = Int(d / e) 'probabilita
pr = Int(e * 25 /100) '%
pr1 = Int(e * 51 /100) '%
g = Int(d -(cl * e)) 'RIT-ATT
co = 1
If fleg = 1 Then cl = 0
If fleg = 1 Then c = 0
fleg = 0
If g > pr And g < pr1 Then co = 3 'ColoreTesto 3
If g < pr Then co = 1 'ColoreTesto 1
If g > pr1 Then co = 7 'ColoreTesto 7
If d > 54 Then co = 2
ts = Format2(a) & " " & Format2(c) & " - " & Format2(d) & " " & Format2(Int(e)) & " " & Format2(cl) & " " & Format2(pr) & " % " & Format2(pr1)_
& " " & Format2(g) & " " & pr1 - g '& " ."

If co = 3 Then co2 = co + 4
If co = 1 Then co2 = co + 3
If co = 7 Then co2 = co - co
If co = 2 Then co2 = co + 2
If cl > 1 Then Call Scrivi(ts & co,True,,co,co2)

ColoreTesto 0
Next
Scrivi
Next


End Sub
Buonasera Antonio ,grazie per la cortesia ma è complicato inserire la data anzichè il numero del concorso in quanto sul web se inserisco il numero non trovo la data,

Inoltre se voglio andare in dietro di tot estrazioni 20/30 ecc come si fa,
 
Ultima modifica:
Buongiorno Antonio
Mi serve un tuo aiuto vedi #267, praticamente prova e lancio lo script modificato mettendo questi parametri For r = 11 To 11 risulta su tutte,
se vedi il risultato troverai una schermata con tutti i numeri in blu, mi serve che il programma mi segnali come quello in originale se blu (prossima uscita), verde (in uscita) e viola (uscita superata).
Grazie
edesimone
 
Buonasera Antonio ,grazie per la cortesia ma è complicato inserire la data anzichè il numero del concorso in quanto sul web se inserisco il numero non trovo la data,

Inoltre se voglio andare in dietro di tot estrazioni 20/30 ecc come si fa,
Alien basta cambiare la variabile es = 137 và 137 estrazioni a ritroso se metti es = 18 leggerà 18 estrazioni a ritroso. Per la ricerca con la data non sò come si fà speriamo in un programmatore più bravo. Ciao
 
Buongiorno Antonio
Mi serve un tuo aiuto vedi #267, praticamente prova e lancio lo script modificato mettendo questi parametri For r = 11 To 11 risulta su tutte,
se vedi il risultato troverai una schermata con tutti i numeri in blu, mi serve che il programma mi segnali come quello in originale se blu (prossima uscita), verde (in uscita) e viola (uscita superata).
Grazie
edesimone
edesimone buongiorno, a Tutte non saprei perchè ho provato ma mi da dati errati. Non ho mai approfondito in quanto un umero a tutte non so in che cosa possa aiutarmi. Comunque speriamo in qualcuno che possa risolvere. Forse a tutte sarebbe interessante per ambo.
 
Alien basta cambiare la variabile es = 137 và 137 estrazioni a ritroso se metti es = 18 leggerà 18 estrazioni a ritroso. Per la ricerca con la data non sò come si fà speriamo in un programmatore più bravo. Ciao
Ciao Antonio ho provato ma mi interessava la data credo vada bene cambiare 137 con 18.
 
Ultima modifica:
Buongiorno, purtroppo a volte viene difficile comprendere.C'è questa tabella come scegliere il numero? si prende l'ambo da solo?1678702481576.png
 
Ciao Antonio ho provato ma mi interessava la data credo vada bene cambiare 137 con 18.

passavo di qua e mi è venuto così...

Codice:
Option Explicit
Sub Main
   Dim sMsg,c,d,e,f,kc,r,cl,g,pr,pr1,pr2,ts,co,co2,Tot,a,clp,m,dme,es,mm,fleg,Ini,fin,x,ex,ez
   ColoreTesto 0:Scrivi " Legenda Colori "
   ColoreTesto 1:Scrivi " PROSSIMA USCITA "
   ColoreTesto 3:Scrivi " In USCITA "
   ColoreTesto 7:Scrivi " USCITA SUPERATA "
   Scrivi
   ColoreTesto 0
   Scrivi "....................... 1 AMBATA KC 4 ................."
   c = 0
   clp = 0
   x = CInt(InputBox("Quante Estrazioni a Ritroso ? ",,"111"))
   es = x + clp
   Ini = EstrazioneFin - es + clp
   fin = EstrazioneFin - clp
   ex = EstrazioneFin - es + clp
   ez = EstrazioneFin - clp
   For r = 1 To 11
      If r = 11 Then r = 12
      Scrivi NomeRuota(r) & " Data Inizio: " & DataEstrazione(ex,,,"/") & " - " & "[" & Ini & "]" & " Data Estrazione fine : " & DataEstrazione(ez,,,"/") & " - " & "[" & EstrazioneFin - clp & "]"
      Scrivi:Scrivi "NUMERO Fre-Rit Med KCrit > < Rit-Att Colpi"
      For a = 1 To 90
         c = EstrattoFrequenza(r,a,Ini,fin) ' frequenza
         d = EstrattoRitardo(r,a,Ini,fin) ' ritardo
         If c = 0 Then fleg = 1
         If c = 0 Then c = 1
         e = Int(es / c) 'MEDIA
         kc = d / e 'probabilita
         cl = Int(d / e) 'probabilita
         pr = Int(e * 25 /100) '%
         pr1 = Int(e * 51 /100) '%
         g = Int(d -(cl * e)) 'RIT-ATT
         co = 1
         If fleg = 1 Then cl = 0
         If fleg = 1 Then c = 0
         fleg = 0
         If g > pr And g < pr1 Then co = 3 'ColoreTesto 3
         If g < pr Then co = 1 'ColoreTesto 1
         If g > pr1 Then co = 7 'ColoreTesto 7
         'If d > 54 Then co = 2'-------------
         ts = Format2(a) & " " & Format2(c) & " - " & Format2(d) & " " & Format2(Int(e)) & " " & Format2(cl) & " " & Format2(pr) & " % " & Format2(pr1)_
         & " " & Format2(g) & " " & pr1 - g '& " ."
         If co = 3 Then co2 = co + 4
         If co = 1 Then co2 = co + 3
         If co = 7 Then co2 = co - co
         If co = 2 Then co2 = co + 2
         If cl > 1 Then Call Scrivi(ts & co,True,,co,co2)
         ColoreTesto 0
      Next
      Scrivi
   Next
End Sub
 

Ultima estrazione Lotto

  • Estrazione del lotto
    venerdì 22 novembre 2024
    Bari
    27
    45
    81
    17
    55
    Cagliari
    78
    66
    45
    03
    14
    Firenze
    14
    90
    72
    88
    55
    Genova
    33
    23
    82
    81
    24
    Milano
    25
    79
    13
    42
    15
    Napoli
    39
    35
    65
    01
    14
    Palermo
    25
    83
    69
    50
    36
    Roma
    25
    71
    22
    10
    55
    Torino
    59
    30
    43
    74
    49
    Venezia
    39
    90
    77
    05
    35
    Nazionale
    82
    60
    62
    65
    59
    Estrazione Simbolotto
    Torino
    44
    12
    32
    06
    13
Indietro
Alto