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
    lunedì 04 maggio 2026
    Bari
    22
    24
    23
    33
    09
    Cagliari
    40
    15
    22
    90
    51
    Firenze
    70
    02
    71
    41
    40
    Genova
    51
    80
    25
    69
    30
    Milano
    23
    28
    89
    02
    64
    Napoli
    16
    54
    41
    08
    56
    Palermo
    18
    25
    11
    66
    36
    Roma
    28
    07
    03
    47
    76
    Torino
    72
    24
    01
    07
    70
    Venezia
    10
    80
    17
    69
    13
    Nazionale
    06
    39
    41
    42
    38
    Estrazione Simbolotto
    Milano
    18
    31
    25
    04
    14
Indietro
Alto