Novità

di rubino script a colpo

keeper

Advanced Member >PLATINUM PLUS<
X rubino Appena puoi potresti realizzarmi questo piccolo script? su 2 estrazioni consecutive mi evidenzi i numeri in comune e mi fai il controllo se sortiti sulla terza estrazione. iniziamo cosi e poi lo si fa crescere.attendo suggerimenti anche da cebino
 
quote:Originally posted by keeper

X rubino Appena puoi potresti realizzarmi questo piccolo script? su 2 estrazioni consecutive mi evidenzi i numeri in comune e mi fai il controllo se sortiti sulla terza estrazione. iniziamo cosi e poi lo si fa crescere.attendo suggerimenti anche da cebino
Ma la 3° estrazione a ritroso ho in avanti ?
 
provare please:

Codice:
Sub Main()
	ImpostaArchivio10ELotto(2)
	'-------------------------------------------------------------------------------------------------------------------------------
	Dim num(1)
	Dim nm(20)
	fin = EstrazioniArchivioDL
	storia = InputBox("Estrazioni Iniziale..",,fin)
	k = InputBox("verifica n.colpi",,2)
	ColoreTesto 2
	Scrivi " Ricerca Numeri che si sono ripetuti in 2 concorsi consecutivi nel range dal....al...." & Storia & "/" & DataEstrazioneDL(storia) & "    -    " & fin & "/" & DataEstrazioneDL(fin)
	Scrivi " Metodo verifica quanti si ripetono per la terza volta nei 2 concorsi successivi            (script  Keep)"
	Scrivi "_________________________________________________________________________________________________________________________________"
	Scrivi
	ColoreTesto 0
	
	
	Ini = storia - 1
	For Ini = Ini + 1 To fin
		idestr = Ini
		numeri = ""
				'''carica schiera con 20 numeri estratti
		For h = 1 To 20
			numeri = numeri & Format2(EstrattoDL(idestr,h)) & " "
		Next
		
		
			ColoreTesto 1
			Scrivi GetInfoEstrazioneDL(idestr) & "...Estratti..." & numeri
			Scrivi "____________________________________________________________________________________________________"
			ColoreTesto 0
		'''carica schiera con 20 numeri estratti
		For h = 1 To 20
			num(1) = EstrattoDL(idestr,h)
			pres = SerieFreqDL(idestr - 1,idestr,num,1)
			If pres = 2 Then
				nd = 1
				ImpostaGiocataDL nd,num,1,k
				GiocaDL nd
			End If
		Next
	Next
	ScriviResocontoDL
End Sub

-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

camapanagaus.jpg
 
Grazie ora se puoi aggiungere questa funzione : sempre sulle due ruote ricercare le distanze 4 tra due numeri eliminando i doppioni.
 
aggiornato con 2 condizione (distanze (x) tra 2 estratti )

Codice:
Sub Main()
	ImpostaArchivio10ELotto(2)
	'-------------------------------------------------------------------------------------------------------------------------------
	Dim num(2)
	Dim nm(20)
	fin = EstrazioniArchivioDL
	storia = InputBox("Estrazioni Iniziale..",,fin)
	k = InputBox("verifica n.colpi",,2)
	s1 = InputBox("esamina solo presenze = 2 ",,0)
	s2 = InputBox("esamina distanza 4 tra 2 estratti",,0)
	ColoreTesto 2
	Scrivi " Ricerca Numeri che si sono ripetuti in 2 concorsi consecutivi nel range dal....al...." & Storia & "/" & DataEstrazioneDL(storia) & "    -    " & fin & "/" & DataEstrazioneDL(fin)
	Scrivi " Metodo verifica quanti si ripetono per la terza volta nei 2 concorsi successivi            (script  Keep)"
	Scrivi "_________________________________________________________________________________________________________________________________"
	Scrivi
	ColoreTesto 0
	Ini = storia - 1
	For Ini = Ini + 1 To fin
		idestr = Ini
		numeri = ""
		'''carica schiera con 20 numeri estratti
		For h = 1 To 20
			numeri = numeri & Format2(EstrattoDL(idestr,h)) & " "
		Next
		ColoreTesto 1
		Scrivi GetInfoEstrazioneDL(idestr) & "...Estratti..." & numeri
		Scrivi "____________________________________________________________________________________________________"
		ColoreTesto 0
		
		'''''una condizione alla volta 0 s1 o s2
		If s1 <>  0  Then   s2 = 0
		If s2 <>  0  Then   s1 = 0     
		
		''''----------------------------------------------------------------------------------------------------
		If s1 = 2 And s2 = 0 Then
			''''''vede se presenze = 2 in 2 concorsi
			For h = 1 To 20
				num(1) = EstrattoDL(idestr,h)
				pres = SerieFreqDL(idestr - 1,idestr,num,1)
				If pres = 2 Then
					nd = 1
					ImpostaGiocataDL nd,num,1,k
					GiocaDL nd
				End If
			Next
		End If
		
		''''----------------------------------------------------------------------------------------------------
		''''esamina distanza (x) tra 2 estratti
		If s2 <> 0 And s1 = 0 Then
			For h = 1 To 19
				h1 = h
				For h1 = h1 + 1 To 20
					dis = EstrattoDL(idestr,h1) - EstrattoDL(idestr,h)
					If Int(s2) = dis Then
						num(1) = EstrattoDL(idestr,h)
						num(2) = EstrattoDL(idestr,h1)
						ColoreTesto 1
						Scrivi idestr & " " & DataEstrazioneDL(idestr) & "....Estratti aventi Distanza richiesta..." & dis & "  ...... " & Format2(num(1)) & " - " & Format2(num(2))
						ColoreTesto 0
						nd = 1
						ImpostaGiocataDL nd,num,1,k
						GiocaDL nd
					End If
				Next
			Next
		End If
		''''----------------------------------------------------------------------------------------------------
		
	Next
	ScriviResocontoDL
End Sub

-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

camapanagaus.jpg
 
allora rubino ti specifico meglio cosa devew fare lo script
due estraziono consecutive bisogna ricercare gli estratti presenti nelle due estrazioni che si sono ripetuti. es.

estr. 165 2.3.5.7.15.34.36.45.46.48.50.52.53.55.65.73.78.88.89.90
estr. 166 1.3.6.8.11.12.13.16.18.20.25.37.38.50.51.53.73.79.88.90

risutato numeri ripetuti 3.50.53.73.90 possibilmete di questo colore
nello stesso tempo nelle due estrazioni di ricerca deve trovare ambi in distanza 4 es. 46.50 16.20
pertanto avremo una lunghetta eliminando i ripetuti (es.50) composta da 3.16.20.46.50.53.73.90
controllo esito
est.167 quaterna 1 colpo 3.16.50.90 credo che sia riuscito a farmi capire.attendo tue notizie
 
ciao keeper


mi puoi dire che estrazione è quella degli esempi che hai fatto?

n.estrazione 12xxx ???

non la trovo, per verifica.




-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

camapanagaus.jpg
 
ciao rubino sono di esempio le ho inventato io
l'importante è usare due estrazioni consecutive per la verifica
 
aggiornamento script BOZZA

da provare :


Codice:
Sub Main()
	ImpostaArchivio10ELotto(2)
	'-------------------------------------------------------------------------------------------------------------------------------
	Dim num(2)
	Dim nm(20)
	Dim lun(90)
	Dim anm(90)
	fin = EstrazioniArchivioDL
	storia = InputBox("Estrazioni Iniziale..",,fin)
	lis = InputBox("verifica garanzia 2=Ambo 3=Terno 4=Quaterna 5=Cinquina",,4)
	s1 = InputBox("esamina solo presenze = 2 ",,2)
	s2 = InputBox("esamina distanza (x) tra 2 estratti",,5)
	ColoreTesto 2
	Scrivi " Ricerca Numeri che si sono ripetuti in 2 concorsi consecutivi nel range dal....al...." & Storia & "/" & DataEstrazioneDL(storia) & "    -    " & fin & "/" & DataEstrazioneDL(fin)
	Scrivi " Metodo verifica quanti si ripetono per la terza volta nei 2 concorsi successivi            (script  Keep)"
	Scrivi "_________________________________________________________________________________________________________________________________"
	Scrivi
	ColoreTesto 0
	Ini = storia - 1
	For Ini = Ini + 1 To fin
                z = z + 1
		idestr = Ini
		numeria = ""
		numerib = ""
		ok = 0
		lunghetta = ""
		'''azzera schiere
		For j = 1 To 90
		anm(j) = 0
		lun(j) = 0
		Next
		
		'''carica schiera con 20 numeri estratti
		For h = 1 To 20
			numeria = numeria & Format2(EstrattoDL(idestr - 1,h)) & " "
			numerib = numerib & Format2(EstrattoDL(idestr,h)) & " "
		Next
		ColoreTesto 0
		Scrivi "____________________________________________________________________________________________________"
		Scrivi GetInfoEstrazioneDL(idestr - 1) & "...Estratti..." & numeria
		Scrivi GetInfoEstrazioneDL(idestr) & "...Estratti..." & numeriB
		ColoreTesto 2

		''''----------------------------------------------------------------------------------------------------
		num(1) = 0
		num(2) = 0
		''''''vede se presenze = 2 in 2 concorsi
		For h = 1 To 20
			num(1) = EstrattoDL(idestr,h)
			pres = SerieFreqDL(idestr - 1,idestr,num,1)
			If pres = 2 Then
				ok = ok + 1
				lun(ok) = Format2(num(1))
			End If
		Next

		''''----------------------------------------------------------------------------------------------------
		''''esamina distanza (x) tra 2 estratti
		For h = 1 To 19
			h1 = h
			For h1 = h1 + 1 To 20
				dis = EstrattoDL(idestr,h1) - EstrattoDL(idestr,h)
				If Int(s2) = dis Then
					num(1) = EstrattoDL(idestr,h)
					num(2) = EstrattoDL(idestr,h1)
			anm(num(1)) = Format2(num(1))
			anm(num(2)) = Format2(num(2))
					ColoreTesto 1
					Scrivi "Rilevato...." & idestr & " " & DataEstrazioneDL(idestr) & "....Estratti aventi Distanza richiesta..." & dis & "  ...... " & Format2(num(1)) & " - " & Format2(num(2))
				End If
			Next
		Next
		
				For j = 1 To 90
					If anm(j) > 0 Then
					ok = ok + 1
					lun(ok) = anm(j)
					End If
				Next
				
		''''----------------------------------------------------------------------------------------------------
					EliminaRipetuti lun
					For j = 1 To 90
						If lun(j) > 0 Then lunghetta = lunghetta & Format2(lun(j)) & " "
					Next
				ColoreTesto 2
				Scrivi "...numeri.in gioco.dal.." & idestr + 1 & "..." & lunghetta
				ColoreTesto 0
				
		If idestr <= fin - 1 Then
			If ok >= 1 Then
	If VerificaEsitoDL(lun,idestr + 1,lis,,RetEsito,RetColpi,RetEstratti,RetIdEstr) Then
						ColoreTesto 2
						Call Scrivi(GetInfoEstrazioneDL(RetIdEstr) & " " & RetEsito & " colpi : " & RetColpi & "             " & RetEstratti)
						combin1 = combin1 + 1
						ColoreTesto 0
						If RetEsito = "Dieci" Then
							Diecitotali = Diecitotali + 1
						End If
						If RetEsito = "Nove" Then
							Novetotali = Novetotali + 1
						End If
						If RetEsito = "Otto" Then
							Ottototali = Ottototali + 1
						End If
						If RetEsito = "Sette" Then
							Settetotali = Settetotali + 1
						End If
						If RetEsito = "Sestina" Then
							seitotali = seitotali + 1
						End If
						If RetEsito = "Cinquina" Then
							Cinquitota
 
senti per lo script postato su lotto live dove hai inserito il ridotto se vorrei utilizzare le sestine da me postate cosa occorre fare il sciprt mi da errore se modifico le colonne nel txt
forse perchè sono sei invece di dieci numeri?
 
ok rubino per lo script a colpo ci siamo ora effettuo delle prove devo trovare il modo di ridurre i numeri ho già in mente qualcosa
 
potresti aggiungere i fissi 70.71.72.73.74.75.76.77.78.79
eliminando sempre i ripetuti oppure composti in terzine

Aumentando la verifica di sortita da 1 a max 3 colpi
 
keeper

scusa per aggiungere una decina a scelta non c'è problema, già fatto,
in lunga e non in terzine, perchè altrimenti ottengo più sistemini da controllare e poi diventa un problema per lo sviluppo con i ridotti, che con lo script non è proprio il massimo da impostare,

poichè i sistemi sono variabili di lunghezza numeri, e diventa complesso gestire più sviluppi ridotti in modo automatico.

inoltre
non essendo possibile gestire i comandi
ImpostaGiocataDL
GiocaDL

per il limite posto all'insieme di 10 numeri, mi vede costretto ad usare il VerificaEsitoDL

che verifica gli esiti, ma non è possibile ottenere un riepilogo delle giocate, dei costi, delle perdite o utile etc.....


ma si ottiene solo i punteggi ottenuti nelle varie fasce
ed un elenco al massimo entro quanti colpi.

inoltre vi è un'altro problemino, che le lunghe in sistemini,
arrivano al massimo a 10 numeri (punteggio massimo per il 10eLotto)

ma come controllo è possibile arrivare a circa 15 punti su 20 estratti, ma lo script non mi restituisce le descrizioni esatte dei

punti realmente centrati.
ho fatto segnalazione a Luigi, per avere info al riguardo.


devi pazientare!




-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

camapanagaus.jpg
 
quote:Originally posted by rubino

keeper

scusa per aggiungere una decina a scelta non c'è problema, già fatto,
in lunga e non in terzine, perchè altrimenti ottengo più sistemini da controllare e poi diventa un problema per lo sviluppo con i ridotti, che con lo script non è proprio il massimo da impostare,

poichè i sistemi sono variabili di lunghezza numeri, e diventa complesso gestire più sviluppi ridotti in modo automatico.

inoltre
non essendo possibile gestire i comandi
ImpostaGiocataDL
GiocaDL

per il limite posto all'insieme di 10 numeri, mi vede costretto ad usare il VerificaEsitoDL

che verifica gli esiti, ma non è possibile ottenere un riepilogo delle giocate, dei costi, delle perdite o utile etc.....


ma si ottiene solo i punteggi ottenuti nelle varie fasce
ed un elenco al massimo entro quanti colpi.

inoltre vi è un'altro problemino, che le lunghe in sistemini,
arrivano al massimo a 10 numeri (punteggio massimo per il 10eLotto)

ma come controllo è possibile arrivare a circa 15 punti su 20 estratti, ma lo script non mi restituisce le descrizioni esatte dei

punti realmente centrati.
ho fatto segnalazione a Luigi, per avere info al riguardo.


devi pazientare!




-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

camapanagaus.jpg
allora per favore applica i fissi e verifica entro tre colpi grazie.
 
questo è una bozza attuale:
in attesa di ulteriori modifiche o ristrutturazioni, in quanto
luigi ha risposto che non è possibile andare oltre ai 10 punti.

quindi sull'integrale</u> dovrei mettere mano ad una routine che calcola i punti effettivamente fatti.</u>





Codice:
Sub Main()
	ImpostaArchivio10ELotto(2)
	'-------------------------------------------------------------------------------------------------------------------------------
	Dim num(2)
	Dim nm(40)
	Dim lun(90)
	Dim anm(90)
	fin = EstrazioniArchivioDL
	storia = InputBox("Estrazioni Iniziale..",,fin)
	lis = InputBox("verifica garanzia  4=Quaterna 5=Cinquina  6=Sestina  7=Settina   8=Ottina  9=Novina  10=10 punti   11=11 punti   12=12 punti   13=13punti",,6)
	s1 = InputBox("esamina solo presenze = 2 ",,2)
	s2 = InputBox("esamina distanza (x) tra 2 estratti",,1)
	s3 = InputBox("vuoi aggiungere fissi una 1 decina ? ",,27)
	s4 = InputBox("Verifica in n.colpi..",,3)
	
	ColoreTesto 2
	Scrivi " Ricerca Numeri che si sono ripetuti in 2 concorsi consecutivi nel range dal....al...." & Storia & "/" & DataEstrazioneDL(storia) & "    -    " & fin & "/" & DataEstrazioneDL(fin)
	Scrivi " Metodo verifica quanti si ripetono per la terza volta nei 2 concorsi successivi            (script  Keep)"
	Scrivi "_________________________________________________________________________________________________________________________________"
	Scrivi
	ColoreTesto 0
	Ini = storia - 1
	For Ini = Ini + 1 To fin
		idestr = Ini
		numeria = ""
		numerib = ""
		ok = 0
		lunghetta = ""
		z = z + 1
		'''azzera schiere
		For j = 1 To 90
		anm(j) = 0
		lun(j) = 0
		Next
		
		'''carica schiera con 20 numeri estratti
		For h = 1 To 20
			numeria = numeria & Format2(EstrattoDL(idestr - 1,h)) & " "
			numerib = numerib & Format2(EstrattoDL(idestr,h)) & " "
		Next
		ColoreTesto 0
		Scrivi "____________________________________________________________________________________________________"
		Scrivi GetInfoEstrazioneDL(idestr - 1) & "...Estratti..." & numeria
		Scrivi GetInfoEstrazioneDL(idestr) & "...Estratti..." & numeriB
		ColoreTesto 2

		''''----------------------------------------------------------------------------------------------------
		num(1) = 0
		num(2) = 0
		''''''vede se presenze = 2 in 2 concorsi
		For h = 1 To 20
			num(1) = EstrattoDL(idestr,h)
			pres = SerieFreqDL(idestr - 1,idestr,num,1)
			If pres = 2 Then
				ok = ok + 1
				lun(ok) = Format2(num(1))
			End If
		Next

		''''----------------------------------------------------------------------------------------------------
		''''esamina distanza (x) tra 2 estratti
		For h = 1 To 19
			h1 = h
			For h1 = h1 + 1 To 20
				dis = EstrattoDL(idestr,h1) - EstrattoDL(idestr,h)
				If Int(s2) = dis Then
					num(1) = EstrattoDL(idestr,h)
					num(2) = EstrattoDL(idestr,h1)
			anm(num(1)) = Format2(num(1))
			anm(num(2)) = Format2(num(2))
					ColoreTesto 1
					Scrivi "Rilevato...." & idestr & " " & DataEstrazioneDL(idestr) & "....Estratti aventi Distanza richiesta..." & dis & "  ...... " & Format2(num(1)) & " - " & Format2(num(2))
				End If
			Next
		Next
		
				For j = 1 To 90
					If anm(j) > 0 Then
					ok = ok + 1
					lun(ok) = anm(j)
					End If
				Next
		''''------facoltativo a scelta--------------------------------------------------------------------------
		
		'''aggiungere una decina come fissi
			If s3 > 0 Then
			de = s3
			For x = 1 To 10
			ok = ok + 1
			lun(ok) = de
			de = de + 1
			Next
			End If
				
				
		''''----------------------------------------------------------------------------------------------------
					EliminaRipetuti lun
					ctr = 0
					For j = 1 To 90
						If lun(j) > 0 Then
						lunghetta = lunghetta & Format2(lun(j)) & " "
						ctr = ctr + 1
						End If
						
					Next
				ColoreTesto 2
				Scrivi "...numeri.in gioco..." & ctr & "......dal........" & idestr + 1 & "..." & lunghetta
				ColoreTesto 0
				
		If idestr <= fin - 1 Then
			If
 
grazie rubino sei un grande
ti posto un esito
Ricerca Numeri che si sono ripetuti in 2 concorsi consecutivi nel range dal....al....12360/18.04.2011 - 12377/18.04.2011
Metodo verifica quanti si ripetono per la terza volta nei 2 concorsi successivi (script Keep)
_________________________________________________________________________________________________________________________________

____________________________________________________________________________________________________
[12359] [ 79] 18.04.2011...Estratti...01 09 14 17 19 20 27 30 36 41 55 64 67 68 71 74 75 77 78 89
[12360] [ 80] 18.04.2011...Estratti...02 03 13 24 27 30 32 36 40 42 44 46 48 53 59 66 70 71 79 81
Rilevato....12360 18.04.2011....Estratti aventi Distanza richiesta...4 ...... 32 - 36
Rilevato....12360 18.04.2011....Estratti aventi Distanza richiesta...4 ...... 36 - 40
Rilevato....12360 18.04.2011....Estratti aventi Distanza richiesta...4 ...... 40 - 44
Rilevato....12360 18.04.2011....Estratti aventi Distanza richiesta...4 ...... 42 - 46
Rilevato....12360 18.04.2011....Estratti aventi Distanza richiesta...4 ...... 44 - 48
Rilevato....12360 18.04.2011....Estratti aventi Distanza richiesta...4 ...... 66 - 70
...numeri.in gioco...20......dal........12361...27 30 32 36 40 42 44 46 48 66 70 71 72 73 74 75 76 77 78 79
[12361] [ 81] 18.04.2011 Cinquina colpi : 1 .. .. .. .. .. .. .. 36 .. 44 48 .. .. .. .. 73 76 .. .. ..
____________________________________________________________________________________________________
[12360] [ 80] 18.04.2011...Estratti...02 03 13 24 27 30 32 36 40 42 44 46 48 53 59 66 70 71 79 81
[12361] [ 81] 18.04.2011...Estratti...02 04 05 11 14 16 28 36 43 44 48 51 53 58 69 73 76 81 84 87
Rilevato....12361 18.04.2011....Estratti aventi Distanza richiesta...4 ...... 44 - 48
Rilevato....12361 18.04.2011....Estratti aventi Distanza richiesta...4 ...... 69 - 73
...numeri.in gioco...17......dal........12362...02 36 44 48 53 69 70 71 72 73 74 75 76 77 78 79 81
[12363] [ 83] 18.04.2011 Sestina colpi : 2 02 .. .. .. .. .. .. .. .. .. .. 70 71 73 74 77 .. .. .. ..
____________________________________________________________________________________________________
[12361] [ 81] 18.04.2011...Estratti...02 04 05 11 14 16 28 36 43 44 48 51 53 58 69 73 76 81 84 87
[12362] [ 82] 18.04.2011...Estratti...03 05 06 17 23 24 26 49 52 54 56 57 66 72 74 82 83 85 87 90
Rilevato....12362 18.04.2011....Estratti aventi Distanza richiesta...4 ...... 52 - 56
Rilevato....12362 18.04.2011....Estratti aventi Distanza richiesta...4 ...... 83 - 87
...numeri.in gioco...15......dal........12363...05 52 56 70 71 72 73 74 75 76 77 78 79 83 87
[12363] [ 83] 18.04.2011 Sestina colpi : 1 .. .. .. .. .. .. .. .. .. .. .. 70 71 73 74 77 .. .. .. 87
____________________________________________________________________________________________________
[12362] [ 82] 18.04.2011...Estratti...03 05 06 17 23 24 26 49 52 54 56 57 66 72 74 82 83 85 87 90
[12363] [ 83] 18.04.2011...Estratti...02 07 11 24 25 26 33 45 46 51 67 70 71 73 74 77 80 82 85 87
Rilevato....12363 18.04.2011....Estratti aventi Distanza richiesta...4 ...... 07 - 11
Rilevato....12363 18.04.2011....Estratti aventi Distanza richiesta...4 ...... 67 - 71
Rilevato....12363 18.04.2011....Estratti aventi Distanza richiesta...4 ...... 70 - 74
Rilevato....12363 18.04.2011....Estratti aventi Distanza richiesta...4 ...... 73 - 77
...numeri.in gioco...18......dal........12364...07 11 24 26 67 70 71 72 73 74 75 76 77 78 79 82 85 87
[12365] [ 85] 18.04.2011 Sette colpi : 2 .. .. .. 24 .. .. .. .. .. .. .. .. .. 67 72 75 76 82 85 ..
____________________________________________________________________________________________________
[12363] [ 83] 18.04.2011...Estratti...02 07 11 24 25 26 33 45 46 51 67 70 71 73 74 77 80 82 85 87
[12364] [ 84] 18.04.2011...Estratti...01 02 04 09 23 27 43 46 48 53 56 57 66 69 71 75 77 78 81 89
Rilevato....12364 18.04.2011....Estratti aventi Distanza richies
 
ora l'ultima chicca il riduttore che hai applicato sul post lotto live
quindi ricapitolando non si puo ridurre la lunghetta in sestine
in questo modo: 20 numeri
1 colonna n.3.13.14.17.18.19
2 colonna n. 1.2.7.10.12.17
3 colonna n. 2.4.5.9.15.19
4 colonna n. 4.6.7.11.13.20
5 colonna n. 1.3.5.16.18.20
6 colonna n. 3.8.10.11.15.18
7 colonna n. 6.8.9.12.14.16

ma solo in decine vero? ho capito bene?
 
la difficoltà è che ogni lunghetta ha una quantità numeri diversa da un'altra

ti ho messo nella riga dei numeri da giocare quanti sono e come vedi
possono andare da 15 numeri a 24 numeri.

con lo script è quasi impossibile o di difficile applicazione cambiare ad ogni riga, in automatico la base del riduttore.

comunque:
1) bisognerebbe mettere in una cartella tutti i riduttori da 15n a 24 numeri, come file txt.

2) ma vanno scelti con qualche criterio di garanzia.
g5-g6-g7-g8-g9

3) vanno ragionati prima se sviluppati in ottine,novine,decine.
e poipassarmeli, in modo che modificando lo script, abbia una scelta precisa di conversione ed esporla nello script.

4) oppure come ho proposto precedentemente, solo in decine
in modo che quando si ha per esempio meno di 20 numeri, lo sviluppo del sistemino sarebbe di tipo misto.
alcune decine, alcune novine, alcune ottine, etc..
ma la garanzia rimarrebbe sempre quelle decisa a monte dal tipo di riduttore in fase di preparazione.



-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

camapanagaus.jpg
 
Buongiorno rubino grazie ora mi hai chiarito le idee. ne ho parlato con cebino e lui si sta cercando dei riduttori appena li abbiamo te li passiamo nel frattempo applica per favore il riduttore a 20 numeri. grazie per la disponibilità.
 

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