Novità

spia

ROBLOT

Junior Member
scusate di listati non so niente se qualcuno coretesemente fosse in grado di fare un listato sui numeri spia mi spiego
esempio esce il numero 1 vado a verificare quale decina naturale ha fatto l'ambo dopo la sortita del numero 1
il listato dovra avere una maschera per decidere quante sortite voglio controllare il numero spia esempio 8 sortite oppure 30
e mi deve fare il resoconto delle decine quanti ambi hanno dato
grazie per eventuali risposte
 
E' stato appena postato da Metus, vedi se può servirti con la modifica fatta in termini di posizione spia e d elenco output.
Codice:
Sub Main()
	Dim ru(2)
	Dim ru1(10)
	Dim n(90,2)
	Dim ambi(4005,5)
	Dim nn(2)
	Dim ambi1(4005,5)
	Dim nn1(2)
	r = CInt(InputBox("Quale ruota esamino?","Numeri spia",1))
	n1 = CInt(InputBox("Quale numero?","Numeri spia",1))
	'p = CInt(InputBox("In che posizione?","Numeri spia",1))
	ee = CInt(InputBox("Estrazioni da controllare?","Numeri spia",1000))
	c = CInt(InputBox("Per quanti colpi?","Numeri spia",7))
	casi = 0
	co = 0
	fin = EstrazioneFin
	ini = EstrazioneFin - ee
	For es = ini To fin
	For p = 1 To 5
		a = Estratto(es,r,p)
		If a = n1 Then
			casi = casi + 1
			ess = es + c
			If ess > fin Then ess = fin End If
			For x = es + 1 To ess
				cc = 0
				For pp = 1 To 5
					d = Estratto(x,r,pp)
					n(d,1) = d
					n(d,2) = n(d,2) + 1
					cc = 1
				Next
			Next
			co = 0
			For x = 1 To 90
				For y = x + 1 To 90
					co = co + 1
					nn(1) = x
					nn(2) = y
					ru(1) = r
					ambi(co,1) = co
					ambi(co,2) = x
					ambi(co,3) = y
					yy = SerieFreq(es + 1,ess,nn,ru,2)
					ambi(co,4) = ambi(co,4) + yy
					If yy > 0 Then
						ambi(co,5) = ambi(co,5) + 1
					Else
						ambi(co,5) = ambi(co,5)
					End If
					nn1(1) = x
					nn1(2) = y
					ru1(1) = 11
					ambi1(co,1) = co
					ambi1(co,2) = x
					ambi1(co,3) = y
					xx = SerieFreq(es + 1,ess,nn1,ru1,2)
					ambi1(co,4) = ambi1(co,4) + xx
					If xx > 0 Then
						ambi1(co,5) = ambi1(co,5) + 1
					Else
						ambi1(co,5) = ambi1(co,5)
					End If
				Next
			Next
		End If
	Next
	Next
		Scrivi
		Scrivi "Analisi dal " & DataEstrazione(ini) & " al " & DataEstrazione(EstrazioneFin),1
		Scrivi "NUMERO SPIA " & CInt(n1) & " su " & NomeRuota(r) & " in " & p & "° posizione",1
		Scrivi "N° casi: " & CInt(casi),1
		Scrivi
		Scrivi " Frequenti nei " & c & " colpi successivi",1
		OrdinaMatrice n,- 1,2
		OrdinaMatrice ambi,- 1,5
		OrdinaMatrice ambi1,- 1,5
		ColoreTesto 1
		Scrivi
		Scrivi "Num.Ruota| Ambi a Ruot| Ambi a Tutte"
		ColoreTesto 2
		Scrivi "  N° Fr  |  Ambo Fr   | Ambo Fr"
		ColoreTesto 0
		For x = 1 To 90
			riga = " " & Format2(n(x,1)) & "..." & Format2(n(x,2)) & " | " & Format2(ambi(x,2)) & "-" & _
			Format2(ambi(x,3)) & "..." & Format2(ambi(x,5)) & " | " & _
			Format2(ambi1(x,2)) & "-" & Format2(ambi1(x,3)) & "..." & ambi1(x,5)
			Scrivi riga
			riga = ""
		Next
		Scrivi "******************************************************************"
		For cc = 1 To 90
			n(cc,1) = 0
			n(cc,2) = 0
Next
End Sub
 
grazie ma non riesco a modificarlo di listati non so niente
la ricerca va fatta in tutte e 5 le posizionin e per decine naturali
e devo poter sceglire le sortite del numero spia
 
Questo ti tira fuori la decina che richiedi, provalo, potrebbe darsi che non abbia azzeccato come definire la decina, comunque 1= da 1 a 10; 2 da 11 a 20 e cosi via.

Codice:
Sub Main()
	Dim ru(2)
	Dim ru1(10)
	Dim n(90,2)
	Dim ambi(4005,5)
	Dim nn(2)
	Dim ambi1(4005,5)
	Dim nn1(2)
	r = CInt(InputBox("Quale ruota esamino?","Numeri spia",1))
	n1 = CInt(InputBox("Quale numero?","Numeri spia",1))
	dec = CInt(InputBox("Quale decina?","Numeri spia",1))
	id = dec - 1
      
	'p = CInt(InputBox("In che posizione?","Numeri spia",1))
	ee = CInt(InputBox("Estrazioni da controllare?","Numeri spia",1000))
	c = CInt(InputBox("Per quanti colpi?","Numeri spia",7))
	casi = 0
	co = 0
	fin = EstrazioneFin
	ini = EstrazioneFin - ee
	For es = ini To fin
	For p = 1 To 5
		a = Estratto(es,r,p)
		If a = n1 Then
			casi = casi + 1
			ess = es + c
			If ess > fin Then ess = fin End If
			For x = es + 1 To ess
				cc = 0
				For pp = 1 To 5
					d = Estratto(x,r,pp)
					n(d,1) = d
					n(d,2) = n(d,2) + 1
					cc = 1
				Next
			Next
			co = 0			
			For x = (id*10+1) To (id*10+9)
				For y = x + 1 To (id*10+10)
					co = co + 1
					nn(1) = x
					nn(2) = y
					ru(1) = r
					ambi(co,1) = co
					ambi(co,2) = x
					ambi(co,3) = y
					yy = SerieFreq(es + 1,ess,nn,ru,2)
					ambi(co,4) = ambi(co,4) + yy
					If yy > 0 Then
						ambi(co,5) = ambi(co,5) + 1
					Else
						ambi(co,5) = ambi(co,5)
					End If
					nn1(1) = x
					nn1(2) = y
					ru1(1) = 11
					ambi1(co,1) = co
					ambi1(co,2) = x
					ambi1(co,3) = y
					xx = SerieFreq(es + 1,ess,nn1,ru1,2)
					ambi1(co,4) = ambi1(co,4) + xx
					If xx > 0 Then
						ambi1(co,5) = ambi1(co,5) + 1
					Else
						ambi1(co,5) = ambi1(co,5)
					End If
				Next
			Next
		End If
	Next
	Next
		Scrivi
		Scrivi "Analisi dal " & DataEstrazione(ini) & " al " & DataEstrazione(EstrazioneFin),1
		Scrivi "NUMERO SPIA " & CInt(n1) & " su " & NomeRuota(r) & " in " & p & "° posizione",1
		Scrivi "N° casi: " & CInt(casi),1
		Scrivi
		Scrivi " Frequenti nei " & c & " colpi successivi",1
		OrdinaMatrice n,- 1,2
		OrdinaMatrice ambi,- 1,5
		OrdinaMatrice ambi1,- 1,5
		ColoreTesto 1
		Scrivi
		Scrivi "Num.Ruota|Ambi/dec/Ru | Ambi a Tutte"
		ColoreTesto 2
		Scrivi "  N° Fr  |  Ambo Fr   | Ambo Fr"
		ColoreTesto 0
		For x = 1 To 90
			riga = " " & Format2(n(x,1)) & "..." & Format2(n(x,2)) & " | " & Format2(ambi(x,2)) & "-" & _
			Format2(ambi(x,3)) & "..." & Format2(ambi(x,5)) & " | " & _
			Format2(ambi1(x,2)) & "-" & Format2(ambi1(x,3)) & "..." & ambi1(x,5)
			Scrivi riga
			riga = ""
		Next
		Scrivi "******************************************************************"
		For cc = 1 To 90
			n(cc,1) = 0
			n(cc,2) = 0
Next
End Sub

Lo spot che conosciamo dice "Ti Piace vincere facile ? " che tradotto in pratica significa "Ti Piace..rebbe vincere facile !!!"
 
quote:Originally posted by ROBLOT

grazie ma non riesco a modificarlo di listati non so niente
la ricerca va fatta in tutte e 5 le posizioni fatto e per decine naturali fatto
e devo poter sceglire le sortite del numero spia la ricerca per casi è una cosa un po più lunga, in alternativa riduci il valore di "Estrazioni da controllare?" e vedrai che ti riduce i casi.

Lo spot che conosciamo dice "Ti Piace vincere facile ? " che tradotto in pratica significa "Ti Piace..rebbe vincere facile !!!"

Per i casi, se trovo il tempo provo a farlo domani, ciao
 
e quasi giusto le decine sono quelle naturali le deve riportae tutte con la loro frequenza e devo sceglire le sortite del numero spia la posizione
non e interessante per ora
un esempio quante sortite del numero spia 1=15
 
quote:Originally posted by ROBLOT

e quasi giusto meno male le decine sono quelle naturali ok le deve riportare tutte provvederò capo con la loro frequenza lo fa già... credo e devo sceglire le sortite del numero spia, sarà fatto negli straordinari di domani la posizione
non e interessante per ora. almeno questo.. grazie per l'allegerimento
un esempio quante sortite del numero spia 1=15 = numero casi

Ps: come avrai notato questa sera sono in vena e ti scherzo dietro, però la prossima volta sii più chiaro e fondamentalmente meno severo
con il tuo dipendente.. :D:D:D
 
C'è posta per lei capo, controlli sempre i risultati, gli script :D potrebbero dare i numeri :D, non sono vangelo.

Codice:
Sub Main()
	Dim ru(2)
	Dim ru1(10)
	Dim n(90,2)
	Dim ambi(4005,5)
	Dim nn(2)
	Dim ambi1(4005,5)
	Dim nn1(2)
	r = CInt(InputBox("Quale ruota esamino?","Numeri spia",1))
	n1 = CInt(InputBox("Quale numero?","Numeri spia",1))
	'dec = CInt(InputBox("Quale decina?","Numeri spia",2))
	'id = dec - 1
      
	'p = CInt(InputBox("In che posizione?","Numeri spia",1))
	ee = CInt(InputBox("Estrazioni da controllare?","Numeri spia",1000))
	c = CInt(InputBox("Per quanti colpi?","Numeri spia",7))
	For id = 0 To 8
	casi = 0
	co = 0
	fin = EstrazioneFin
	ini = EstrazioneFin - ee

	For es = ini To fin
	For p = 1 To 5
		a = Estratto(es,r,p)
		If a = n1 Then
			casi = casi + 1
			ess = es + c
			If ess > fin Then ess = fin End If
			For x = es + 1 To ess
				cc = 0
				For pp = 1 To 5
					d = Estratto(x,r,pp)
					n(d,1) = d
					n(d,2) = n(d,2) + 1
					cc = 1
				Next
			Next
			co = 0			
			For x = (id*10+1) To (id*10+9)
				For y = x + 1 To (id*10+10)
					co = co + 1
					nn(1) = x
					nn(2) = y
					ru(1) = r
					ambi(co,1) = co
					ambi(co,2) = x
					ambi(co,3) = y
					yy = SerieFreq(es + 1,ess,nn,ru,2)
					ambi(co,4) = ambi(co,4) + yy
					If yy > 0 Then
						ambi(co,5) = ambi(co,5) + 1
					Else
						ambi(co,5) = ambi(co,5)
					End If
					nn1(1) = x
					nn1(2) = y
					ru1(1) = 11
					ambi1(co,1) = co
					ambi1(co,2) = x
					ambi1(co,3) = y
					xx = SerieFreq(es + 1,ess,nn1,ru1,2)
					ambi1(co,4) = ambi1(co,4) + xx
					If xx > 0 Then
						ambi1(co,5) = ambi1(co,5) + 1
					Else
						ambi1(co,5) = ambi1(co,5)
					End If
				Next
			Next
		End If
	Next
	Next
		Scrivi
		Scrivi "Analisi dal " & DataEstrazione(ini) & " al " & DataEstrazione(EstrazioneFin),1
		Scrivi "NUMERO SPIA " & CInt(n1) & " su " & NomeRuota(r) & " in tutte le posizioni ",1
		Scrivi "N° casi: " & CInt(casi),1
		'Scrivi
		Scrivi "I Frequenti nei " & c & " colpi successivi",1
		OrdinaMatrice n,- 1,2
		OrdinaMatrice ambi,- 1,5
		OrdinaMatrice ambi1,- 1,5
		ColoreTesto 1
		'Scrivi
		Scrivi "Num.Ruota|Ambi/dec/Ru | Ambi a Tutte"
		ColoreTesto 2
		Scrivi "  N° Fr  |  Ambo Fr   | Ambo Fr"
		ColoreTesto 0
		For x = 1 To 20
			riga = " " & Format2(n(x,1)) & "..." & Format2(n(x,2)) & " | " & Format2(ambi(x,2)) & "-" & _
			Format2(ambi(x,3)) & "..." & Format2(ambi(x,5)) & " | " & _
			Format2(ambi1(x,2)) & "-" & Format2(ambi1(x,3)) & "..." & ambi1(x,5)
			Scrivi riga
			riga = ""
		Next
		Scrivi "****************************************"
		For cc = 1 To 90
			n(cc,1) = 0
			n(cc,2) = 0
			
Next

Next
End Sub

Buonanotte capo .... manca solo la ricerca per casi... spero
 
Ancora una versione con i numeri a ruota riferiti alla specifica decina degli ambi

Codice:
Sub Main()
	Dim ru(2)
	Dim ru1(10)
	Dim n(90,2)
	Dim ambi(4005,5)
	Dim nn(2)
	Dim ambi1(4005,5)
	Dim nn1(2)
	r = CInt(InputBox("Quale ruota esamino?","Numeri spia",1))
	n1 = CInt(InputBox("Quale numero?","Numeri spia",1))
	'dec = CInt(InputBox("Quale decina?","Numeri spia",2))
	'id = dec - 1
      
	'p = CInt(InputBox("In che posizione?","Numeri spia",1))
	ee = CInt(InputBox("Estrazioni da controllare?","Numeri spia",1000))
	c = CInt(InputBox("Per quanti colpi?","Numeri spia",7))
	For id = 0 To 8
	casi = 0
	co = 0
	fin = EstrazioneFin
	ini = EstrazioneFin - ee

	For es = ini To fin
	For p = 1 To 5
		a = Estratto(es,r,p)
		If a = n1 Then
			casi = casi + 1
			ess = es + c
			If ess > fin Then ess = fin End If
			For x = es + 1 To ess
				cc = 0
				For pp = 1 To 5
					d = Estratto(x,r,pp)
					If d >= (id*10+1) And d <= (id*10+10) Then
					n(d,1) = d
					n(d,2) = n(d,2) + 1
					cc = 1
					End If 
				Next
			Next
			co = 0			
			For x = (id*10+1) To (id*10+9)
				For y = x + 1 To (id*10+10)
					co = co + 1
					nn(1) = x
					nn(2) = y
					ru(1) = r
					ambi(co,1) = co
					ambi(co,2) = x
					ambi(co,3) = y
					yy = SerieFreq(es + 1,ess,nn,ru,2)
					ambi(co,4) = ambi(co,4) + yy
					If yy > 0 Then
						ambi(co,5) = ambi(co,5) + 1
					Else
						ambi(co,5) = ambi(co,5)
					End If
					nn1(1) = x
					nn1(2) = y
					ru1(1) = 11
					ambi1(co,1) = co
					ambi1(co,2) = x
					ambi1(co,3) = y
					xx = SerieFreq(es + 1,ess,nn1,ru1,2)
					ambi1(co,4) = ambi1(co,4) + xx
					If xx > 0 Then
						ambi1(co,5) = ambi1(co,5) + 1
					Else
						ambi1(co,5) = ambi1(co,5)
					End If
				Next
			Next
		End If
	Next
	Next
		Scrivi
		Scrivi "Analisi dal " & DataEstrazione(ini) & " al " & DataEstrazione(EstrazioneFin),1
		Scrivi "NUMERO SPIA " & CInt(n1) & " su " & NomeRuota(r) & " in tutte le posizioni ",1
		Scrivi "N° casi: " & CInt(casi),1
		'Scrivi
		Scrivi "I Frequenti nei " & c & " colpi successivi",1
		OrdinaMatrice n,- 1,2
		OrdinaMatrice ambi,- 1,5
		OrdinaMatrice ambi1,- 1,5
		ColoreTesto 1
		'Scrivi
		Scrivi "Num.Ruota|Ambi/dec/Ru | Ambi a Tutte"
		ColoreTesto 2
		Scrivi "  N° Fr  |  Ambo Fr   | Ambo Fr"
		ColoreTesto 0
		For x = 1 To 20
			riga = " " & Format2(n(x,1)) & "..." & Format2(n(x,2)) & " | " & Format2(ambi(x,2)) & "-" & _
			Format2(ambi(x,3)) & "..." & Format2(ambi(x,5)) & " | " & _
			Format2(ambi1(x,2)) & "-" & Format2(ambi1(x,3)) & "..." & ambi1(x,5)
			Scrivi riga
			riga = ""
		Next
		Scrivi "*************************************************"
		For cc = 1 To 90
			n(cc,1) = 0
			n(cc,2) = 0
			
Next

Next
End Sub

Capo... che ne dice di una promozione ... per un dipendente ligio al dovere ? ... preferirei un aumento di stipendio, non la nomina a capoclasse.
 
ciao claudio8 complimeti ma mancca una parte
devo scegliere quante sortite del numero spia
e deve contare quanti ambi ha dato la decina in totale dopo le sortite del numero
esempio sortite del numero spia 1=8 decina piu frequente 71-80(8ambi)1-10(4ambi) e comunque grazie
ho capito che scherzi
 
quote:Originally posted by ROBLOT

ciao claudio8 complimeti ma mancca una parte
devo scegliere quante sortite del numero spia
e deve contare quanti ambi ha dato la decina in totale dopo le sortite del numero
esempio sortite del numero spia 1=8 decina piu frequente 71-80(8ambi)1-10(4ambi) e comunque grazie
ho capito che scherzi

SCUSA CAPO ROBLOT, HAI PROVATO A VERFICARE GLI ESTI ?
E' TUTTO OK ? O ANCHE QUESTA COSA DEL TEST DI FUNZIONAMENTO EFFETTIVO TOCCA ALLO SCRIPTER ?

ASPETTO TUE PER ANDARE AVANTI.

CIAO ALLA PROSSIMA

Lo spot che conosciamo dice "Ti Piace vincere facile ? " che tradotto in pratica significa "Ti Piace..rebbe vincere facile !!!"
 
CARO CAPO IL LISTATO NON FUNZIONA A MERAVIGLIA:

SE IMPOSTI 11 ESTRAZIONI e x 2 colpi ti da questo outp .... completamente sballato.

[?][?]Qundi fai le cose seriamente, altrimenti non farmi/ci perdere tempo. [:o)][:o)]


Codice:
Analisi dal 03.05.2011 al 26.05.2011
NUMERO SPIA 1 su Bari in tutte le posizioni 
N° casi: 2
I Frequenti nei 2 colpi successivi
Num.Ruota|Ambi/dec/Ru | Ambi a Tutte
  N° Fr  |  Ambo Fr   | Ambo Fr
 04...01 | -... | 01-02...2
 06...01 | -... | 01-05...1
 08...01 | -... | 02-05...1
 ... | -... | -...
 ... | -... | -...
 ... | -... | -...
 ... | -... | -...
 ... | -... | -...
 ... | -... | -...
 ... | -... | -...
 ... | -... | -...
 ... | -... | -...
 ... | -... | -...
 ... | -... | -...
 ... | -... | -...
 ... | -... | -...
 ... | -... | -...
 ... | -... | -...
 ... | -... | -...
 ... | -... | -...
*************************************************

Analisi dal 03.05.2011 al 26.05.2011
NUMERO SPIA 1 su Bari in tutte le posizioni 
N° casi: 2
I Frequenti nei 2 colpi successivi
Num.Ruota|Ambi/dec/Ru | Ambi a Tutte
  N° Fr  |  Ambo Fr   | Ambo Fr
 15...01 | 01-02... | 11-12...2
 14...01 | 01-03... | 16-18...1
 20...01 | 01-04... | 12-19...1
 17...01 | 01-05... | 12-13...1
 00...00 | 01-06... | 11-14...1
 00...00 | 01-07... | 11-15...1
 00...00 | 01-08... | 11-13...1
 00...00 | 01-09... | 01-10...
 00...00 | 01-10... | 01-03...
 00...00 | 02-03... | 01-07...
 00...00 | 02-04... | 03-05...
 00...00 | 02-05... | 04-10...
 00...00 | 02-06... | 01-09...
 00...00 | 02-07... | 01-08...
 00...00 | 02-08... | 03-04...
 00...00 | 02-09... | 02-10...
 00...00 | 02-10... | 02-04...
 00...00 | 03-04... | 02-08...
 00...00 | 03-05... | 01-06...
 00...00 | 03-06... | 01-04...
*************************************************

Analisi dal 03.05.2011 al 26.05.2011
NUMERO SPIA 1 su Bari in tutte le posizioni 
N° casi: 2
I Frequenti nei 2 colpi successivi
Num.Ruota|Ambi/dec/Ru | Ambi a Tutte
  N° Fr  |  Ambo Fr   | Ambo Fr
 21...01 | 11-12... | 21-23...2
 28...01 | 11-13... | 21-22...2
 26...01 | 11-14... | 21-27...1
 00...00 | 11-15... | 21-28...1
 00...00 | 11-16... | 21-26...1
 00...00 | 11-17... | 21-24...1
 00...00 | 11-18... | 21-25...1
 00...00 | 11-19... | 11-16...
 00...00 | 11-20... | 11-17...
 00...00 | 12-13... | 11-18...
 00...00 | 12-14... | 11-19...
 00...00 | 12-15... | 11-20...
 00...00 | 12-16... | 12-14...
 00...00 | 12-17... | 12-15...
 00...00 | 12-18... | 12-16...
 00...00 | 12-19... | 12-17...
 00...00 | 12-20... | 12-18...
 00...00 | 13-14... | 12-20...
 00...00 | 13-15... | 13-14...
 00...00 | 13-16... | 13-15...
*************************************************

Analisi dal 03.05.2011 al 26.05.2011
NUMERO SPIA 1 su Bari in tutte le posizioni 
N° casi: 2
I Frequenti nei 2 colpi successivi
Num.Ruota|Ambi/dec/Ru | Ambi a Tutte
  N° Fr  |  Ambo Fr   | Ambo Fr
 40...01 | 21-22... | 31-33...2
 38...01 | 21-23... | 31-32...2
 00...00 | 21-24... | 32-33...1
 00...00 | 21-25... | 37-40...1
 00...00 | 21-26... | 34-40...1
 00...00 | 21-27... | 32-36...1
 00...00 | 21-28... | 31-38...1
 00...00 | 21-29... | 31-35...1
 00...00 | 21-30... | 31-34...1
 00...00 | 22-23... | 31-36...1
 00...00 | 22-24... | 31-37...1
 00...00 | 22-25... | 22-24...
 00...00 | 22-26... | 21-30...
 00...00 | 22-27... | 21-29...
 00...00 | 22-28... | 22-26...
 00...00 | 22-29... | 22-27...
 00...00 | 22-30... | 22-25...
 00...00 | 23-24... | 22-23...
 00...00 | 23-25... | 23-25...
 00...00 | 23-26... | 22-29...
*************************************************

Analisi dal 03.05.2011 al 26.05.2011
NUMERO SPIA 1 su Bari in tutte le posizioni 
N° casi: 2
I Frequenti nei 2 colpi successivi
Num.Ruota|Ambi/dec/Ru | Ambi a Tutte
  N° Fr  |  Ambo Fr   | Ambo Fr
 43...01 | 31-32... | 41-43...2
 00...00 | 31-33... | 41-42...2
 00...00 | 31-34... | 42-43...1
 00...00 | 31-35... | 41-50...1
 00...00 | 31-36... | 42-44...1
 00...00 | 31-37... | 46-47
 
ho sempre inserito piu di 300 estrazioni e 9 estrazioni vedo che funziona non lo mai provato con 11 estrazioni perche non mi servono cosi poche estrazioni non mi va di fare perdere tempo a nessuno anzi ti ringrazio per il tuo interessamento
 
Num.Ruota|Ambi/dec/Ru | Ambi a Tutte
N° Fr | Ambo Fr | Ambo Fr
61...22 | 82-83...04 | 83-90...10
90...22 | 81-88...03 | 84-90...10
11...21 | 84-90...03 | 81-90...9
88...21 | 84-88...02 | 81-84...9
43...20 | 82-90...02 | 82-83...8
51...19 | 83-86...02 | 83-87...8
87...19 | 83-87...02 | 84-85...7
73...18 | 84-85...02 | 81-86...7
50...17 | 85-88...02 | 81-88...7
67...17 | 87-88...01 | 83-84...6
05...17 | 83-85...01 | 84-86...6
03...17 | 87-89...01 | 82-90...6
77...17 | 86-89...01 | 83-88...6
33...16 | 85-90...01 | 84-87...6
70...16 | 86-87...01 | 83-85...6
46...16 | 83-90...01 | 87-89...6
60...16 | 81-84...01 | 82-84...6
83...16 | 81-90...01 | 81-82...6
16...16 | -... | 81-87...6
82...15 | -... | 82-86...6
44...15 | -... | 82-87...6
27...14 | -... | 87-90...5
40...14 | -... | 86-89...5
09...14 | -... | 87-88...5
41...14 | -... | 84-88...5
19...14 | -... | 85-88...5
68...13 | -... | 82-85...5
32...13 | -... | 81-89...5
48...13 | -... | 81-83...5
38...13 | -... | 83-86...5
08...13 | -... | 83-89...5
57...13 | -... | 82-88...4
59...13 | -... | 86-87...4
29...13 | -... | 88-90...4
42...12 | -... | 85-87...4
21...12 | -... | 88-89...4
72...12 | -... | 85-89...4
65...12 | -... | 89-90...3
56...12 | -... | 86-90...3
71...12 | -... | 82-89...3
13...12 | -... | 84-89...3
36...12 | -... | 85-90...3
questa e una parte della schermata del listato per me funziona
 
CIAO ROBLOTTO questo listato del numero spia si può usare per il
10 e lotto?
dimmi solo l'archivio da quale colonna e rigo lo devo inserire
(sto parlando del foglio elettronico di excel)
ho fatto un copia e incolla dei listati e se puoi dimmi dove mettere mano.
Grazio giorgioantonio [:p] se andasse bene allora [^]:D
 
Ciao Claudio8
Mi puoi dare un aiuto
di questo listato se mi puoi indicare
nel foglio elettronico di excel l'archivio
dove è impostato, com'è chiamato il foglio
Se puoi ... attendo una risposta[:0]
 
scusate ma siccome trovo la cosa molto interessante mi potete spiegare come caricare lo scripi in spaziometria????
grazie mille e perdonate l'ignoranza

fatina9evlh2.png
 

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 14 gennaio 2025
    Bari
    41
    25
    12
    73
    55
    Cagliari
    54
    20
    48
    32
    67
    Firenze
    75
    23
    68
    10
    38
    Genova
    33
    27
    81
    70
    64
    Milano
    68
    01
    64
    86
    87
    Napoli
    47
    75
    45
    10
    21
    Palermo
    55
    86
    33
    53
    70
    Roma
    88
    78
    61
    06
    07
    Torino
    76
    08
    23
    61
    82
    Venezia
    25
    15
    49
    21
    81
    Nazionale
    70
    10
    32
    78
    07
    Estrazione Simbolotto
    Bari
    07
    14
    28
    45
    31
Indietro
Alto