10ELOTTO

[keeper]

Ciao keeper, se vuoi provare la previsione dalla estrazione del 30/11/2013, questi sono i numeri:
6 - 8 - 10 - 11 - 17 - 18 - 28 - 37 - 48 - 62 - 72 - 75 -77 - 88

da tenere sott'occhio
9.31.33.41.45.52.60.68.73.89
sono già sortiti
31.33.45.60.73.89
restano
9.41.52.68

 

[jure]

Ciao Francesco "pfca" potresti inserire lo script Completo
del 10ELOTTO io ho quello che è stato tolto incompleto.

 

[pfca]

Ciao jure, non ho lo script, sono semplici calcoli fatti con excel.

 

[jure]

Ciao Francesco se puoi me lo invii anche in excel lo Script
risulta incompleto .

 

[pfca]

Ciao jure ti invio foglio excel, basta inserire l'estrazione di analisi e poi utilizzare i numeri blu.

 

[jure]

GRAZIE Francesco "pfca"

 

[cedol8roby]

Grazie pfca

 

[Alien.]

Ciao Max-lotto ho giocato le 2 ultime previsioni
che mi da il programma 2 sestine tolti i doppioni
11 27 83 88 89 90
01 07 08 36 44 50
il 1° 27 89
il 2° 36 44 50
al 1° colpo
le estrazioni retroattive hanno dato spesse volte
5 punti. Anche se il programma prevede più numeri
si potranno estrapolare le sequenze migliori.

Ciao,complimenti ma come hai fatto a fare le due sestine cioè a mettere i numeri li hai divisi 1°sei 2°sei? grazie.

Si mettono i numeri usciti realmente poi si giocano i numeri blu escluso i numeri doppi? giusto?

 

[jure]

Ciao Alien
I 6 numeri e gli altri 6 li ho estrapolati dal 1° script di Max
che è poi ha eliminato dal Forum detto per
scarsi risultati di punteggio.

In corso per altre 6 estrazioni
Estrazione generatrice del pronostico 08774 [142 - 26/11/2013]
G 0001 Numeri in gioco : 79.36.44.44.08.01.50.07.09
N. [79.36.44.44.08.01.50.07.09 ] [01 .. 09 .. .. .. .. .. .. .. 50 .. .. .. .. .. .. .. .. .. ] C. 1 08775 [143 - 28/11/2013]
N. [79.36.44.44.08.01.50.07.09 ] [.. .. .. .. .. .. .. .. 36 .. 44 .. .. 50 .. .. .. .. .. .. ] C. 2 08776 [144 - 30/11/2013]
N. [79.36.44.44.08.01.50.07.09 ] [.. .. 07 .. .. .. .. .. .. .. .. .. .. .. .. .. .. .. .. .. ] C. 3 08777 [145 - 03/12/2013]

 

[Alien.]

Ciao
jure

...cavolacci...ma si potrebbe avere il listato?

Per disaronno......il link mi chiede la password....RAR FAQ: Protected RAR Files......o devo fare apprendistato..?

 

[jure]

Ciao Alien
Quando il link ti chiede la password scrivici "disaronno"
che serve da password.
Io ho fatto cosi'

 

[Alien.]

grazie Jure.

 

[Roby]

un cordiale saluto per tt voi
mamma mia non sapevo esser divenuto cosi famoso tanto d'avermi addirittura scriptato
grazie per aver preso in seria considerazione un mio lavoro e che vi assista sempre la buona sorte
un saluto
IB63

 

[Roby]

buonanotte,
se può essere utile allego listato metodo di IB63.

Sub Main
	Scrivi " Gemelli per vincita costante a 10 e lotto di IB63 ",1 ' - http://forum.lottoced.com/f8/gemelli-per-vincita-costante-10-e-lotto-91214/ -
	Dim nu1(2),nu2(3),nu3(3)
	arc = InputBox(" [ 1 ]=Archivio 10L8 classico  - [ 2 ]=Archivio 10L8 5minuti",,1)
	ImpostaArchivio10ELotto(arc)
	esc = InputBox(" Quante Estrazioni Controllo ? "," NUMERO ESTRAZIONI ",10)
	k = 7
	Fin = EstrazioniArchivioDL
	Ini = EstrazioniArchivioDL - esc
	For es = Ini To fin
		Messaggio es
		AvanzamentoElab Ini,fin,es
		For p = 1 To 20
			a = EstrattoDL(es,p)
			ok = 0
			If a = 11 Then nu1(1) = 22:nu1(2) = 29:nu2(1) = 33:nu2(2) = 39:nu3(1) = 44:nu3(2) = 49:ok = 1
			If a = 22 Then nu1(1) = 33:nu1(2) = 39:nu2(1) = 44:nu2(2) = 49:nu3(1) = 55:nu3(2) = 59:ok = 1
			If a = 33 Then nu1(1) = 44:nu1(2) = 49:nu2(1) = 55:nu2(2) = 59:nu3(1) = 66:nu3(2) = 69:ok = 1
			If a = 44 Then nu1(1) = 55:nu1(2) = 59:nu2(1) = 66:nu2(2) = 69:nu3(1) = 77:nu3(2) = 79:ok = 1
			If a = 55 Then nu1(1) = 66:nu1(2) = 69:nu2(1) = 77:nu2(2) = 79:nu3(1) = 88:nu3(2) = 89:ok = 1
			If a = 66 Then nu1(1) = 77:nu1(2) = 79:nu2(1) = 88:nu2(2) = 89:nu3(1) = 11:nu3(2) = 19:ok = 1
			If a = 77 Then nu1(1) = 88:nu1(2) = 89:nu2(1) = 11:nu2(2) = 19:nu3(1) = 22:nu3(2) = 29:ok = 1
			If a = 88 Then nu1(1) = 11:nu1(2) = 19:nu2(1) = 22:nu2(2) = 29:nu3(1) = 33:nu3(2) = 39:ok = 1
			If ok = 1 Then
				co = co + 1
				Scrivi
				Scrivi String(106,"=")
				Scrivi " Statistica dal " & DataEstrazioneDL(Ini) & " al " & DataEstrazioneDL(Fin) & " ",1,0,6
				If arc = 1 Then Scrivi" ****** Per 10 e lotto Classico ******** ",1,0,3 Else If arc = 2 Then Scrivi" ****** Per 10 e lotto 5minuti ******** ",1,0,3
				Scrivi " totali estrazioni " & fin - Ini & " ",1,- 1,4
				Scrivi String(106,"=") & " Caso n°" & CInt(co),1
				Scrivi
				ScriviEstrazioneDL(es) & " ",1
				Scrivi " sortito Numero Gemello [" & a & "] in " & p & " posizione",1
				Scrivi
				Scrivi String(106,"=")
				ImpostaGiocataDL 1,nu1,1,k
				ImpostaGiocataDL 2,nu2,1,k
				ImpostaGiocataDL 3,nu3,1,k
				GiocaDL es
			End If
		Next
	Next
	Scrivi
	Scrivi"----------------------------------- Dettaglio ultime " & Format2(esc) & " giocate ---------------------------------"
	ScriviResoconto(True)
End Sub

[/QUOTE

ciao disaronno potrei chiederti un favore?
sei puoi saresti cosi cortese da renderlo valido anche per il famoso l...esk? grazie

buon Natale a te e famiglia
Ciao

 

[keeper]

resta sempre il problema di una progressione che direi esosa

 

[Roby]

resta sempre il problema di una progressione che direi esosa[/QUOTE

CIAO KEEPER
ascolta in merito alla progressione ho imposto un raddoppio parlando da 1 a 20 coppie con imposta a scalare e ti dirò non male
poi logicamente dipende dalle tue aspirazioni ovvero se il gioco ti sta bene oppure no eccoti spiegato perché cercavo conversare con te in merito in quanto nnn è detto che debbano esser per forza gemelli possono essere anche imposte di tipo vertibili diametrali in decina o di passo ripeto dipende quando puoi batti un colpo e ti dimostro non sbagliarmi

è tutto un saluto
IB63

 

[keeper]

il capitale per venti coppie è alto e se si gioca in ricevutoria non c'è la possibilità di giicarle tutte

 

[Roby]

il capitale per venti coppie è alto e se si gioca in ricevutoria non c'è la possibilità di giicarle tutte[/QUOTE

ma che 20 coppie ne?

keeperrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr me sa che staje a perder colpi ,,,, mmmm

allora si imposta gioco su 20 coppie si annota la coppia ad ambata ripetuta e si segue il tutto 7/9 colpi al massimo altra alternativa potrebbe essere porre il gioco l'ultima coppia restante sempre di tutte e 20 le coppie anche se io opto questa alternativa solo in parallelo poi libero vederla come vuoi ...

Ciao
IB63

 

[keeper]

vincè non ciò capito un tubo

 

[giuseppina]

buongiorno,
in attesa dei " mejo " allego bozza listato incompleto .
Controllare sempre ,salvo errori ed ommissis.

Sub Main
	Scrivi " 10ELOTTO di sax71 ",1 ' - http://forum.lottoced.com/f12/10elotto-107240/ -
		Dim nu(10),nu1(10)
	arc = InputBox(" [ 1 ]=Archivio 10L8 classico  - [ 2 ]=Archivio 10L8 5minuti",,1)
	ImpostaArchivio10ELotto(arc)
	esc = InputBox(" Quante Estrazioni Controllo ? "," NUMERO ESTRAZIONI ",300)
	Fin = EstrazioniArchivioDL
	Ini = EstrazioniArchivioDL - esc
	For es = Ini To fin
		Messaggio es
		AvanzamentoElab Ini,fin,es
		Scrivi " Statistica dal " & DataEstrazioneDL(Ini) & " al " & DataEstrazioneDL(Fin) & " ",1,0,6
		Scrivi" ****** Per 10 e lotto 5min ******** ",1,0,3
		Scrivi " totali estrazioni " &(fin - Ini) & " ",1,- 1,4
		Scrivi
		a1 = EstrattoDL(es,1)'1° Esratto 10eLotto
		a2 = EstrattoDL(es,2)'2° Esratto 10eLotto
		a3 = EstrattoDL(es,3)'3° Esratto 10eLotto
		a4 = EstrattoDL(es,4)'4° Esratto 10eLotto
		a5 = EstrattoDL(es,5)'5° Esratto 10eLotto
		a6 = EstrattoDL(es,6)'6° Esratto 10eLotto
		a7 = EstrattoDL(es,7)'7° Esratto 10eLotto
		a8 = EstrattoDL(es,8)'8° Esratto 10eLotto
		a9 = EstrattoDL(es,9)'9° Esratto 10eLotto
		a10 = EstrattoDL(es,10)'10° Esratto 10eLotto
		a11 = EstrattoDL(es,11)'11° Esratto 10eLotto
		a12 = EstrattoDL(es,12)'12° Esratto 10eLotto
		a13 = EstrattoDL(es,13)'13° Esratto 10eLotto
		a14 = EstrattoDL(es,14)'14° Esratto 10eLotto
		a15 = EstrattoDL(es,15)'15° Esratto 10eLotto
		a16 = EstrattoDL(es,16)'16° Esratto 10eLotto
		a17 = EstrattoDL(es,17)'17° Esratto 10eLotto
		a18 = EstrattoDL(es,18)'18° Esratto 10eLotto
		a19 = EstrattoDL(es,19)'19° Esratto 10eLotto
		a20 = EstrattoDL(es,20)'20° Esratto 10eLotto
		Scrivi ScriviEstrazioneDL(es) & ""
		'nu(1) =                      'la somma di tutti i gruppi di numeri(che dovranno essere Minimo composti da 3 elementi e Massimo da sei) che appartengano alla medesima Decina;
		nu(2) = Fuori90(a1 + a2 + a3) 'la somma dei primi 3 estratti
		nu(3) = Fuori90(a18 + a19 + a20) 'e degli ultimi 3 estratti;
		nu(4) = Fuori90(a9 + a10 + a11 + a12) 'la somma degli estratti centrali, ovvero 9°, 10°, 11° e 12° estratto,
		nu(5) = ComplAdX(Fuori90(a9 + a10 + a11 + a12))'e di tale somma ricaveremo anche il complemento (differenza) a 90;
		nu(6) = Fuori90((a1 + a20) + 1) 'la somma degli estremi, vale a dire 1° e 20° estratto,e di tale numero prenderemo i due elementi distanti una unità (ovvero a +1
		nu(7) = Fuori90((a1 + a20) - 1) 'e di tale numero prenderemo i due elementi distanti una unità (ovvero a +1 e -1);
		nu(8) = Fuori90((a1 + a10) + 30) 'la somma dei simmetrici, vale a dire 1° e 10° estratto ;
		'EliminaRipetuti nu
		ImpostaGiocataDL 1,nu,1,10
		
		nu1(1) = Fuori90((a1 + a10) - 30) 'di questi due valori ricavati prenderemo in esame i due numeri distanti 30 unità (simmetrici);
		nu1(2) = Fuori90((a11 + a20) + 30) 'la somma dei simmetrici, vale a dire 11° e 20° estratto;
		nu1(3) = Fuori90((a11 + a20) - 30) 'di questi due valori ricavati prenderemo in esame i due numeri distanti 30 unità (simmetrici);
		nu1(4) = Figura(a1) & Figura(a11) 'abbinamento delle figure speculari, ovvero figura del 1° e dell’11° estratto e
		nu1(5) = Figura(a10) & Figura(a20)'  del 10° e del 20° estratto;
		nu1(6) = Fuori90(a5 + a15) 'la somma dei medi, cioè il 5° ed il 15° estratto;
		nu1(7) = Fuori90(a6 + a15)'la somma degli incroci, ovvero 6° e 15° estratto
		nu1(8) = Fuori90(a11 + a16) ' ed 11° e 16° estratto.
		'EliminaRipetuti nu1
		ImpostaGiocataDL 2,nu1,1,10
		GiocaDL es
	Next
	Scrivi
	Scrivi"----------------------------------- Dettaglio ultime 10 giocate ---------------------------------"
	ScriviResoconto(True)
End Sub

salve.........di questo listato è possibile aggiugere anche la scelta dell'indice mensile?............grazie a tutti per il vostro lavoro.