Novità

aiuto per script da poter utilizzare anche per 10elotto e superenalotto

Un grazie di cuore a tutti, sono veramente commosso per il pensiero e partecipazione.

E' anche giusto poi andare avanti.... e per quel che si può, occuparci della nostra passione comune, il LOTTO.

Ciao a tutti e a presto.

un piccolo omaggio scriptico. gli ambi a tutte con capogioco a scelta non sfaldati nell'anno 2015.

Codice:
Sub Main
	Dim ru(1),nu(2)
	n = CInt(InputBox("QUALE CAPOGIOCO",,90))
	ritroso = CInt(InputBox("QUANTE ESTRAZIONI A RITROSO",,1))
	Ini = 8946
	Inix = 1'8000
	finx = EstrazioneFin
	fin = EstrazioneFin - ritroso
	
	r = 11
	Scrivi "script By Mike58",1
	Scrivi
	Scrivi "Ambi non sfaldati da : " & DataEstrazione(Ini) & " a " & DataEstrazione(fin),1
	Scrivi "Ruota di : " & NomeRuota(r),1,,,1
	Scrivi
	'Scrivi "Ambo    Freq    Rit",1
	ReDim Tt(8)
	Tt(1) = " Ambo "
	Tt(2) = " Freq "
	Tt(3) = " Rit "
	Tt(4) = " Sto "
	Tt(5) = " Estratti "
	Tt(6) = " Data Esito "
	Tt(7) = " Esito Fin "
	Tt(8) = " Colpo "
	Call InitTabella(Tt,2,,3,5,"arial black")
	For x = 1 To 90
		nu(1) = x
		nu(2) = n
		ru(1) = r
		sf = SerieFreq(Ini,fin,nu,ru,2)
		'sr = SerieRitardo(Inix,fin,nu,ru,2)
		sr = AmboRitardoTurbo(r,x,n,Inix,fin)
		st = AmboStoricoTurbo(r,x,n,Inix,fin)
		If sf = 0 Then
			
			If nu(1) <> nu(2) Then
			k = k + 1
				ReDim rt(10)
				For rr = 1 To 10
					rt(rr) = rr
				Next
				Call VerificaEsitoTurbo(nu,rt,fin - sr,2,,,,,estratti,id)
				Call VerificaEsitoTurbo(nu,rt,fin + 1,2,(finx - fin),,esitoF,clpF,estrattiF,idF)
				ReDim Vv(8)
				Vv(1) = StringaNumeri(nu,,1)
				Vv(2) = sf
				Vv(3) = sr
				Vv(4) = st
				Vv(5) = estratti
				Vv(6) = DataEstrazione(id)
				Vv(7) = estrattiF
				Vv(8) = clpF
				If esitoF = "Ambo" Then kk = kk + 1
				Call AddRigaTabella(Vv,,,3,,"arial")
				'Scrivi StringaNumeri(nu,,1),1,0,,1
				'Scrivi "  " & vbTab & sf & "  " & vbTab & sr & vbTab & estratti & vbTab & DataEstrazione(id)
			End If
		End If
	Next
	CreaTabellaOrdinabile(3)
	Scrivi
	Scrivi "Trovati..." & k,1
	Scrivi "Esiti Ultimi... " & kk,1
End Sub
 
ciao grande Mike
sei forte come una roccia e ti ammiro
molto per la tua personalità e per la tua generosità,
ed i tuoi script sono uno meglio dell'altro,
ti chiedo quando avrai un po più di tempo
se riusciresti a fare questo tuo script
con la possibilità di poter selezionare le varie ruote?

ti ringrazio anticipatamente

salutoni


Un grazie di cuore a tutti, sono veramente commosso per il pensiero e partecipazione.

E' anche giusto poi andare avanti.... e per quel che si può, occuparci della nostra passione comune, il LOTTO.

Ciao a tutti e a presto.

un piccolo omaggio scriptico. gli ambi a tutte con capogioco a scelta non sfaldati nell'anno 2015.

Codice:
Sub Main
	Dim ru(1),nu(2)
	n = CInt(InputBox("QUALE CAPOGIOCO",,90))
	ritroso = CInt(InputBox("QUANTE ESTRAZIONI A RITROSO",,1))
	Ini = 8946
	Inix = 1'8000
	finx = EstrazioneFin
	fin = EstrazioneFin - ritroso
	
	r = 11
	Scrivi "script By Mike58",1
	Scrivi
	Scrivi "Ambi non sfaldati da : " & DataEstrazione(Ini) & " a " & DataEstrazione(fin),1
	Scrivi "Ruota di : " & NomeRuota(r),1,,,1
	Scrivi
	'Scrivi "Ambo    Freq    Rit",1
	ReDim Tt(8)
	Tt(1) = " Ambo "
	Tt(2) = " Freq "
	Tt(3) = " Rit "
	Tt(4) = " Sto "
	Tt(5) = " Estratti "
	Tt(6) = " Data Esito "
	Tt(7) = " Esito Fin "
	Tt(8) = " Colpo "
	Call InitTabella(Tt,2,,3,5,"arial black")
	For x = 1 To 90
		nu(1) = x
		nu(2) = n
		ru(1) = r
		sf = SerieFreq(Ini,fin,nu,ru,2)
		'sr = SerieRitardo(Inix,fin,nu,ru,2)
		sr = AmboRitardoTurbo(r,x,n,Inix,fin)
		st = AmboStoricoTurbo(r,x,n,Inix,fin)
		If sf = 0 Then
			
			If nu(1) <> nu(2) Then
			k = k + 1
				ReDim rt(10)
				For rr = 1 To 10
					rt(rr) = rr
				Next
				Call VerificaEsitoTurbo(nu,rt,fin - sr,2,,,,,estratti,id)
				Call VerificaEsitoTurbo(nu,rt,fin + 1,2,(finx - fin),,esitoF,clpF,estrattiF,idF)
				ReDim Vv(8)
				Vv(1) = StringaNumeri(nu,,1)
				Vv(2) = sf
				Vv(3) = sr
				Vv(4) = st
				Vv(5) = estratti
				Vv(6) = DataEstrazione(id)
				Vv(7) = estrattiF
				Vv(8) = clpF
				If esitoF = "Ambo" Then kk = kk + 1
				Call AddRigaTabella(Vv,,,3,,"arial")
				'Scrivi StringaNumeri(nu,,1),1,0,,1
				'Scrivi "  " & vbTab & sf & "  " & vbTab & sr & vbTab & estratti & vbTab & DataEstrazione(id)
			End If
		End If
	Next
	CreaTabellaOrdinabile(3)
	Scrivi
	Scrivi "Trovati..." & k,1
	Scrivi "Esiti Ultimi... " & kk,1
End Sub
 
Ultima modifica:
Paolo, penso potrebbe essere cosi vedi se vuoi esito fin a tutte o ruote selezionate.
Nel caso di 2° ipotesi basta cambiare il vettore ruote da Rt a Ruota in questa riga.

Call VerificaEsitoTurbo(nu,ruota,fin - sr,2,,,,,estratti,id) ' questa verifica l'esito ultimo sulle ruote selezionate
Call VerificaEsitoTurbo(nu,rt,fin + 1,2,(finx - fin),Nothing,esitoF,clpF,estrattiF,idF) ' questa verifica l'esito ultimo a tutte, come vedi il vettore ruote è rt(tutte).

Codice:
Sub Main
	Dim ru(12),nu(2)
	n = CInt(InputBox("QUALE CAPOGIOCO",,90))
	ritroso = CInt(InputBox("QUANTE ESTRAZIONI A RITROSO",,1))
	Ini = 8946
	Inix = 1'8000
	finx = EstrazioneFin
	fin = EstrazioneFin - ritroso
	ReDim ruota(12)
	RuoteSelezionate = ScegliRuote(ruota)
	For kk = 1 To RuoteSelezionate
		Scrivi "Ruote selezionate : ",1,0
		Scrivi NomeRuota(ruota(kk)) & " ",1,0,,2,3
		Scrivi
	Next
	Scrivi "script By Mike58",1
	Scrivi
	Scrivi "Ambi non sfaldati da : " & DataEstrazione(Ini) & " a " & DataEstrazione(fin),1
	'Scrivi "Ruota di : " & NomeRuota(kk),1,,,1
	Scrivi
	'Scrivi "Ambo    Freq    Rit",1
	ReDim Tt(8)
	Tt(1) = " Ambo "
	Tt(2) = " Freq "
	Tt(3) = " Rit "
	Tt(4) = " Sto "
	Tt(5) = " Estratti "
	Tt(6) = " Data Esito "
	Tt(7) = " Esito Fin > Tutte "
	Tt(8) = " Colpo "
	Call InitTabella(Tt,2,,3,5,"arial black")
	For x = 1 To 90
		nu(1) = x
		nu(2) = n
		sf = SerieFreq(Ini,fin,nu,ruota,2)
		sr = SerieRitardo(Inix,fin,nu,ruota,2)
		st = SerieStoricoTurbo(Inix,fin,nu,ruota,2)
		If sf = 0 Then
			If nu(1) <> nu(2) Then
				k = k + 1
				ReDim rt(10)
				For rr = 1 To 10
					rt(rr) = rr
				Next
				Call VerificaEsitoTurbo(nu,ruota,fin - sr,2,,,,,estratti,id)
				Call VerificaEsitoTurbo(nu,rt,fin + 1,2,(finx - fin),Nothing,esitoF,clpF,estrattiF,idF)
				ReDim Vv(8)
				Vv(1) = StringaNumeri(nu,,1)
				Vv(2) = sf
				Vv(3) = sr
				Vv(4) = st
				Vv(5) = estratti
				Vv(6) = DataEstrazione(id)
				Vv(7) = estrattiF
				Vv(8) = clpF
				Call AddRigaTabella(Vv,,,3,,"arial")
				If esitoF <> "" Then kkk = kkk + 1
			End If
		End If
	Next
	CreaTabellaOrdinabile(3)
	Scrivi
	Scrivi "Trovati..." & k,1
	Scrivi "Esiti Ultimi... " & kkk,1
End Sub

un saluto a Claudio8
 
Ultima modifica:
Anche se gli ambi con incremento ritardo sullo storico mi sembrano più efficaci ed attendibili per le prossime uscite.

provate.

Codice:
Sub Main
	Dim ru(1),nu(2)
	'n = CInt(InputBox("QUALE CAPOGIOCO",,90))
	ritroso = CInt(InputBox("QUANTE ESTRAZIONI A RITROSO",,1))
	Ini = 8946
	Inix = 1'8000
	finx = EstrazioneFin
	fin = EstrazioneFin - ritroso
	r = 11
	Scrivi "script By Mike58",1
	Scrivi
	Scrivi "Ambi con ultimi Incrementi Massimo storico : " & DataEstrazione(Ini) & " a " & DataEstrazione(fin),1
	Scrivi "Ruota di : " & NomeRuota(r),1,,,1
	Scrivi
	'Scrivi "Ambo    Freq    Rit",1
	ReDim Tt(9)
	Tt(1) = " Ambo "
	Tt(2) = " Freq "
	Tt(3) = " Rit "
	Tt(4) = " Sto "
	Tt(5) = " InCr "
	Tt(6) = " Estratti "
	Tt(7) = " Data Esito "
	Tt(8) = " Esito Fin "
	Tt(9) = " Colpo "
	Call InitTabella(Tt,2,,3,5,"arial black")
	For x = 1 To 89
		For n = x + 1 To 90
			nu(1) = x
			nu(2) = n
			ru(1) = r
			'sf = SerieFreqTurbo(Ini,fin,nu,ru,2)
			Call StatisticaFormazioneTurbo(nu,ru,2,srr,stt,Incr,sff,Inix,fin)
			'sr = SerieRitardo(Inix,fin,nu,ru,2)
			'sr = AmboRitardoTurbo(r,x,n,Inix,fin)
			'st = AmboStoricoTurbo(r,x,n,Inix,fin)
			If Incr > 0 Then
				If nu(1) <> nu(2) Then
					k = k + 1
					Call Messaggio("A T T E N D E R E . . . . . . " & " Trovati.... " & k & "        Script By Mike58 ")
					For es = Inix To finx
						Call AvanzamentoElab(Inix,finx,es)
					Next
					ReDim rt(10)
					For rr = 1 To 10
						rt(rr) = rr
					Next
					Call VerificaEsitoTurbo(nu,rt,fin - srr,2,,,,,estratti,id)
					Call VerificaEsitoTurbo(nu,rt,fin + 1,2,(finx - fin),,esitoF,clpF,estrattiF,idF)
					ReDim Vv(9)
					Vv(1) = StringaNumeri(nu,,1)
					Vv(2) = sff
					Vv(3) = srr
					Vv(4) = stt '& "  > " & Incr
					Vv(5) = Incr
					Vv(6) = estratti
					Vv(7) = DataEstrazione(id)
					Vv(8) = estrattiF
					Vv(9) = clpF
					If esitoF = "Ambo" Then kk = kk + 1
					Call AddRigaTabella(Vv,,,3,,"arial")
					'Scrivi StringaNumeri(nu,,1),1,0,,1
					'Scrivi "  " & vbTab & sf & "  " & vbTab & sr & vbTab & estratti & vbTab & DataEstrazione(id)
				End If
			End If
		Next
	Next
	CreaTabellaOrdinabile(5)
	Scrivi
	Scrivi "Trovati..." & k,1
	Scrivi "Esiti Ultimi... " & kk,1
End Sub
 
Paolo, penso potrebbe essere cosi vedi se vuoi esito fin a tutte o ruote selezionate.
Nel caso di 2° ipotesi basta cambiare il vettore ruote da Rt a Ruota in questa riga.

Call VerificaEsitoTurbo(nu,ruota,fin - sr,2,,,,,estratti,id) ' questa verifica l'esito ultimo sulle ruote selezionate
Call VerificaEsitoTurbo(nu,rt,fin + 1,2,(finx - fin),Nothing,esitoF,clpF,estrattiF,idF) ' questa verifica l'esito ultimo a tutte, come vedi il vettore ruote è rt(tutte).

Codice:
Sub Main
	Dim ru(12),nu(2)
	n = CInt(InputBox("QUALE CAPOGIOCO",,90))
	ritroso = CInt(InputBox("QUANTE ESTRAZIONI A RITROSO",,1))
	Ini = 8946
	Inix = 1'8000
	finx = EstrazioneFin
	fin = EstrazioneFin - ritroso
	ReDim ruota(12)
	RuoteSelezionate = ScegliRuote(ruota)
	For kk = 1 To RuoteSelezionate
		Scrivi "Ruote selezionate : ",1,0
		Scrivi NomeRuota(ruota(kk)) & " ",1,0,,2,3
		Scrivi
	Next
	Scrivi "script By Mike58",1
	Scrivi
	Scrivi "Ambi non sfaldati da : " & DataEstrazione(Ini) & " a " & DataEstrazione(fin),1
	'Scrivi "Ruota di : " & NomeRuota(kk),1,,,1
	Scrivi
	'Scrivi "Ambo    Freq    Rit",1
	ReDim Tt(8)
	Tt(1) = " Ambo "
	Tt(2) = " Freq "
	Tt(3) = " Rit "
	Tt(4) = " Sto "
	Tt(5) = " Estratti "
	Tt(6) = " Data Esito "
	Tt(7) = " Esito Fin > Tutte "
	Tt(8) = " Colpo "
	Call InitTabella(Tt,2,,3,5,"arial black")
	For x = 1 To 90
		nu(1) = x
		nu(2) = n
		sf = SerieFreq(Ini,fin,nu,ruota,2)
		sr = SerieRitardo(Inix,fin,nu,ruota,2)
		st = SerieStoricoTurbo(Inix,fin,nu,ruota,2)
		If sf = 0 Then
			If nu(1) <> nu(2) Then
				k = k + 1
				ReDim rt(10)
				For rr = 1 To 10
					rt(rr) = rr
				Next
				Call VerificaEsitoTurbo(nu,ruota,fin - sr,2,,,,,estratti,id)
				Call VerificaEsitoTurbo(nu,rt,fin + 1,2,(finx - fin),Nothing,esitoF,clpF,estrattiF,idF)
				ReDim Vv(8)
				Vv(1) = StringaNumeri(nu,,1)
				Vv(2) = sf
				Vv(3) = sr
				Vv(4) = st
				Vv(5) = estratti
				Vv(6) = DataEstrazione(id)
				Vv(7) = estrattiF
				Vv(8) = clpF
				Call AddRigaTabella(Vv,,,3,,"arial")
				If esitoF <> "" Then kkk = kkk + 1
			End If
		End If
	Next
	CreaTabellaOrdinabile(3)
	Scrivi
	Scrivi "Trovati..." & k,1
	Scrivi "Esiti Ultimi... " & kkk,1
End Sub

un saluto a Claudio8



Ciao Mike58 visto che le frequenze sono tutte a zero si potrebbe variare e mettere solo quelle con max frequenze ? Grazie.
Chiedo scusa se mi sono intromesso ma lo trovo molto utile lo script.
 
Ciao Alien, lo scopo dello script era quello di vedere le frequenze = 0 non ancora uscite questo anno 2015, e chiaro che posso mettere le frequenze avuto nel passato ma cosi vengono elencati tutti gli ambi.

Ad ogni modo eccolo.

Codice:
Sub Main
	Dim ru(12),nu(2)
	n = CInt(InputBox("QUALE CAPOGIOCO",,90))
	ritroso = CInt(InputBox("QUANTE ESTRAZIONI A RITROSO",,1))
	Ini = 8946
	Inix = 1'8000
	finx = EstrazioneFin
	fin = EstrazioneFin - ritroso
	ReDim ruota(12)
	RuoteSelezionate = ScegliRuote(ruota)
	For kk = 1 To RuoteSelezionate
		Scrivi "Ruote selezionate : ",1,0
		Scrivi NomeRuota(ruota(kk)) & " ",1,0,,2,3
		Scrivi
	Next
	Scrivi "script By Mike58",1
	Scrivi
	Scrivi "Ambi non sfaldati da : " & DataEstrazione(Ini) & " a " & DataEstrazione(fin),1
	'Scrivi "Ruota di : " & NomeRuota(kk),1,,,1
	Scrivi
	'Scrivi "Ambo    Freq    Rit",1
	ReDim Tt(8)
	Tt(1) = " Ambo "
	Tt(2) = " Freq "
	Tt(3) = " Rit "
	Tt(4) = " Sto "
	Tt(5) = " Estratti "
	Tt(6) = " Data Esito "
	Tt(7) = " Esito Fin > Tutte "
	Tt(8) = " Colpo "
	Call InitTabella(Tt,2,,3,5,"arial black")
	For x = 1 To 90
		nu(1) = x
		nu(2) = n
		sf = SerieFreq(Inix,fin,nu,ruota,2)
		sr = SerieRitardo(Inix,fin,nu,ruota,2)
		st = SerieStoricoTurbo(Inix,fin,nu,ruota,2)
		If sf > 0 Then
			If nu(1) <> nu(2) Then
				k = k + 1
				ReDim rt(10)
				For rr = 1 To 10
					rt(rr) = rr
				Next
				Call VerificaEsitoTurbo(nu,ruota,fin - sr,2,,,,,estratti,id)
				Call VerificaEsitoTurbo(nu,rt,fin + 1,2,(finx - fin),Nothing,esitoF,clpF,estrattiF,idF)
				ReDim Vv(8)
				Vv(1) = StringaNumeri(nu,,1)
				Vv(2) = sf
				Vv(3) = sr
				Vv(4) = st
				Vv(5) = estratti
				Vv(6) = DataEstrazione(id)
				Vv(7) = estrattiF
				Vv(8) = clpF
				Call AddRigaTabella(Vv,,,3,,"arial")
				If esitoF <> "" Then kkk = kkk + 1
			End If
		End If
	Next
	CreaTabellaOrdinabile(3)
	Scrivi
	Scrivi "Trovati..." & k,1
	Scrivi "Esiti Ultimi... " & kkk,1
End Sub
 
acc....hai proprio ragione.....quindi si dovrebbe chiedere solo le frequenze di un tot di mesi o anni in quanto sono convinto che i numeri si ripetono specie negli ultimi tempi dove si ripetono dai 18/24 numeri ad estrazione....dato che sei stato molto gentile puoi variare lo script ? grazie.
buona serata.
 
Alien, di script e di indagini se ne possono a iosa e ne abbiamo fatto ,ne ho fatti tanti.
una indagine per mesi è anch'essa possibile ma poi non saprei quale attendibilità possa avere in termini di risultati immediati.

Tempo addietro avevo fatto questo script da terminare con gli anni futuri vedi se ti va bene.
Dal 31/12/2008 al 18.04.2015
I 20 Numeri più frequenti a Tutte nel mese di Aprile



[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #0000ff, align: center"] Numero [/TD]
[TD="bgcolor: #0000ff, align: center"] Frequenza [/TD]
[TD="bgcolor: #0000ff, align: center"] Ritardo Attuale [/TD]
[TD="bgcolor: #0000ff, align: center"] Anno_2012 [/TD]
[TD="bgcolor: #0000ff, align: center"] Anno_2011 [/TD]
[TD="bgcolor: #0000ff, align: center"] Anno 2010 [/TD]
[TD="bgcolor: #0000ff, align: center"] Anno 2009 [/TD]
[TD="bgcolor: #0000ff, align: center"] Anno 2013 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ff0000, align: center"] 24.86 [/TD]
[TD="bgcolor: #ffffff, align: center"] 9 [/TD]
[TD="bgcolor: #ffffff, align: center"] 4 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 5 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ff0000, align: center"] 51.84 [/TD]
[TD="bgcolor: #ffffff, align: center"] 9 [/TD]
[TD="bgcolor: #00ff00, align: center"] 0 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 6 [/TD]
[TD="bgcolor: #ffff00, align: center"] 0 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ff0000, align: center"] 2.67 [/TD]
[TD="bgcolor: #ffffff, align: center"] 9 [/TD]
[TD="bgcolor: #ffffff, align: center"] 66 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 4 [/TD]
[TD="bgcolor: #ffff00, align: center"] 0 [/TD]
[TD="bgcolor: #ffff00, align: center"] 4 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ff0000, align: center"] 28.60 [/TD]
[TD="bgcolor: #ffffff, align: center"] 9 [/TD]
[TD="bgcolor: #00ff00, align: center"] 0 [/TD]
[TD="bgcolor: #ffff00, align: center"] 3 [/TD]
[TD="bgcolor: #ffff00, align: center"] 5 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 0 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #00ff00, align: center"] 10.72 [/TD]
[TD="bgcolor: #ffffff, align: center"] 8 [/TD]
[TD="bgcolor: #ffffff, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 0 [/TD]
[TD="bgcolor: #ffff00, align: center"] 5 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 3 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ff0000, align: center"] 44.55 [/TD]
[TD="bgcolor: #ffffff, align: center"] 8 [/TD]
[TD="bgcolor: #00ff00, align: center"] 0 [/TD]
[TD="bgcolor: #ffff00, align: center"] 3 [/TD]
[TD="bgcolor: #ffff00, align: center"] 5 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 0 [/TD]
[TD="bgcolor: #ffff00, align: center"] 0 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ff0000, align: center"] 83.90 [/TD]
[TD="bgcolor: #ffffff, align: center"] 8 [/TD]
[TD="bgcolor: #ffffff, align: center"] 231 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 4 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 3 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ff0000, align: center"] 53.90 [/TD]
[TD="bgcolor: #ffffff, align: center"] 8 [/TD]
[TD="bgcolor: #ffffff, align: center"] 59 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 5 [/TD]
[TD="bgcolor: #ffff00, align: center"] 0 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ff0000, align: center"] 45.67 [/TD]
[TD="bgcolor: #ffffff, align: center"] 8 [/TD]
[TD="bgcolor: #ffffff, align: center"] 20 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 3 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ff0000, align: center"] 20.61 [/TD]
[TD="bgcolor: #ffffff, align: center"] 8 [/TD]
[TD="bgcolor: #00ff00, align: center"] 0 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 5 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ff0000, align: center"] 8.83 [/TD]
[TD="bgcolor: #ffffff, align: center"] 8 [/TD]
[TD="bgcolor: #ffffff, align: center"] 16 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 3 [/TD]
[TD="bgcolor: #ffff00, align: center"] 0 [/TD]
[TD="bgcolor: #ffff00, align: center"] 3 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ff0000, align: center"] 8.67 [/TD]
[TD="bgcolor: #ffffff, align: center"] 7 [/TD]
[TD="bgcolor: #ffffff, align: center"] 17 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 3 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 0 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ff0000, align: center"] 11.33 [/TD]
[TD="bgcolor: #ffffff, align: center"] 7 [/TD]
[TD="bgcolor: #ffffff, align: center"] 10 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 4 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 0 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ffffff, align: center"] 25.74 [/TD]
[TD="bgcolor: #ffffff, align: center"] 7 [/TD]
[TD="bgcolor: #ffffff, align: center"] 3 [/TD]
[TD="bgcolor: #ffff00, align: center"] 0 [/TD]
[TD="bgcolor: #ffff00, align: center"] 5 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 0 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ff0000, align: center"] 9.82 [/TD]
[TD="bgcolor: #ffffff, align: center"] 7 [/TD]
[TD="bgcolor: #ffffff, align: center"] 5 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 6 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 0 [/TD]
[TD="bgcolor: #ffff00, align: center"] 0 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ff0000, align: center"] 81.90 [/TD]
[TD="bgcolor: #ffffff, align: center"] 7 [/TD]
[TD="bgcolor: #ffffff, align: center"] 9 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 3 [/TD]
[TD="bgcolor: #ffff00, align: center"] 0 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ff0000, align: center"] 47.83 [/TD]
[TD="bgcolor: #ffffff, align: center"] 7 [/TD]
[TD="bgcolor: #ffffff, align: center"] 5 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 4 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ffffff, align: center"] 26.55 [/TD]
[TD="bgcolor: #ffffff, align: center"] 7 [/TD]
[TD="bgcolor: #ffffff, align: center"] 18 [/TD]
[TD="bgcolor: #ffff00, align: center"] 0 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 5 [/TD]
[TD="bgcolor: #ffff00, align: center"] 0 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ff0000, align: center"] 56.81 [/TD]
[TD="bgcolor: #ffffff, align: center"] 7 [/TD]
[TD="bgcolor: #ffffff, align: center"] 54 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 5 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #ff0000, align: center"] 80.90 [/TD]
[TD="bgcolor: #ffffff, align: center"] 7 [/TD]
[TD="bgcolor: #ffffff, align: center"] 14 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #ffff00, align: center"] 5 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 1 [/TD]
[TD="bgcolor: #ffff00, align: center"] 2 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]

[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]
[TD="bgcolor: #0000ff, align: center"] 27 [/TD]
[TD="bgcolor: #0000ff, align: center"] 83 [/TD]
[TD="bgcolor: #0000ff, align: center"] 27 [/TD]
[TD="bgcolor: #0000ff, align: center"] 28 [/TD]
[TD="bgcolor: #0000ff, align: center"] 24 [/TD]
[TD="bgcolor: #0000ff, align: center"] [/TD]


se ti interessa posso vedere terminarlo con gli anni mancanti.
 
Poi Raga, mi farebbe piacere uscire da questa pagina, se non altro perché il ricordo di mia mamma è ancora vivo e riprenderlo ancora fa male.

Magari per richieste aprite nuovi post.

Ciao e grazie ancora a tutti.
 

Ultima estrazione Lotto

  • Estrazione del lotto
    sabato 13 dicembre 2025
    Bari
    61
    81
    73
    68
    78
    Cagliari
    76
    59
    33
    78
    23
    Firenze
    10
    37
    58
    30
    71
    Genova
    17
    45
    37
    36
    72
    Milano
    10
    71
    70
    46
    87
    Napoli
    21
    11
    51
    68
    01
    Palermo
    84
    72
    26
    17
    79
    Roma
    39
    63
    46
    67
    50
    Torino
    35
    86
    79
    68
    85
    Venezia
    67
    68
    22
    77
    76
    Nazionale
    46
    12
    72
    65
    70
    Estrazione Simbolotto
    Venezia
    05
    13
    40
    35
    10
Indietro
Alto