SOLO 4 CASI TABELLA COMPLETA

Vale79 · 25 Ottobre 2013

hilde ha scritto:
PER ME QUELLO DI CUI PARLATE E' "ARABO"-RINGRAZIO TANTISSIMO 80SETE CHE POSTA LE PREVISIONI E MI PERMETTE COSI' DI SEGUIRE LE PREVISIONI.

GRAZIE INFINITE. CIAOOOOOOOOOOOOOOO

Mi sapresti dire qual è la previsione in corso?

80Sete · 26 Ottobre 2013

ciao hilde & C. giusto il tempo per inserire la nuova

17 ottobre 1° estratto 42 mette in gioco TERNO 12 – 78 – 90
19 ottobre 1° estratto 52 mette in gioco TERNO 68 - 58 - 34
22 ottobre 1° estratto 68 mette in gioco TERNO 76 - 66 - 52
24 ottobre 1° estratto 9 mette in gioco TERNO 35 - 55 - 20
l'AMBO e il TERNO vanno in gioco x BARI
buon week end

80Sete · 26 Ottobre 2013

Vale79 ha scritto:
Ciao a tutti, ho scaricato il file excel ma non c'ho capito nulla, lo script in spaziometria da dei bei risultati, il problema è che non capisco cosa e come giocare... chi mi spiega chiaramente?

Grazie

ciao Vale79, anch'io seguo lo script perché ti dice anche una statistica delle uscite e soprattutto le giocate, il foglio excel non è difficile.

1) devi guardare SEMPRE la Spia che esce come 1° estratto a BA, giovedì è uscito il 9 vai nella colonna BLU e ti fermi sul 9,
2) il primo metodo ti dice di scrivere nella colonna GRIGIA il 1° estratto di VE che è 65...scrivi 65 al posto dello 0 (zero)
3) vedrai che nelle 3 caselle ROSSE a destra, ti compaiono i 3 nr. da giocare a BA e TUTTE 35 - 55 - 20

quindi vai nell'altro metodo e dove c'è il 9 (1° estratto di giovedì) scrivi il 2° estratto di BA che è 88 (uscito giovedì)
di conseguenza nelle caselle ROSSE ti compaiono 28 - 22 - 20

Ora ognuno deve decidere se vanno giocate TUTTE le terzine che si sono formate nelle ULTIME 4/5 estrazioni, come dicevo altrove... dipende dalle finanze o se si vuole seguire UNA/DUE previsioni....l'ambo a TUTTE con 3 numeri non so quanto convenga.
ciao, credo che ora sia chiaro, il foglio excel serve a chi non ha tempo di calcolare e nello stesso tempo NON ha Spaziometria x usare lo script.

80Sete · 26 Ottobre 2013

ciao arcor, non conosco excel oltre a queste tabelle, anche a me piacciono programmino del genere, anche se spesso uso gli script, come in questo caso che se inserisci di partire dall'estrazione 6887, la ricerca inizia proprio da gennaio 2000, da qui hai un bel resoconto. Mi spiace non riuscire a fare di più, se poi qualche anima pia ci legge e vorrebbe intervenire con un foglio excel a quello che chiedi......ben venga. ciao e buon week end

arcor · 26 Ottobre 2013

ciao vi posto una piccola progressione per chi volesse giocare una terzina o più terzine sopracitate x volta solo x ambo a tutte ho selezionato un guadagno netto che va dai 15 ai 18 euro circa

2013-10-26 15_41_00-Cartel1 - Microsoft Excel.jpg

Vale79 · 26 Ottobre 2013

80Sete ha scritto:
ciao Vale79, anch'io seguo lo script perché ti dice anche una statistica delle uscite e soprattutto le giocate, il foglio excel non è difficile.

1) devi guardare SEMPRE la Spia che esce come 1° estratto a BA, giovedì è uscito il 9 vai nella colonna BLU e ti fermi sul 9,
2) il primo metodo ti dice di scrivere nella colonna GRIGIA il 1° estratto di VE che è 65...scrivi 65 al posto dello 0 (zero)
3) vedrai che nelle 3 caselle ROSSE a destra, ti compaiono i 3 nr. da giocare a BA e TUTTE 35 - 55 - 20

quindi vai nell'altro metodo e dove c'è il 9 (1° estratto di giovedì) scrivi il 2° estratto di BA che è 88 (uscito giovedì)
di conseguenza nelle caselle ROSSE ti compaiono 28 - 22 - 20

Ora ognuno deve decidere se vanno giocate TUTTE le terzine che si sono formate nelle ULTIME 4/5 estrazioni, come dicevo altrove... dipende dalle finanze o se si vuole seguire UNA/DUE previsioni....l'ambo a TUTTE con 3 numeri non so quanto convenga.
ciao, credo che ora sia chiaro, il foglio excel serve a chi non ha tempo di calcolare e nello stesso tempo NON ha Spaziometria x usare lo script.

Ecco, non mi tornava la seconda terzina a tutte, visto che anche la prima la giochiamo a tutte, ora è chiaro! Grazie

80Sete · 27 Ottobre 2013

ciao hilde & C.

17 ottobre 1° estratto 42 mette in gioco TERNO 12 – 78 – 90 - 09 Colpi
19 ottobre 1° estratto 52 mette in gioco TERNO 68 - 58 - 34 - 10 Colpi
22 ottobre 1° estratto 68 mette in gioco TERNO 76 - 66 - 52 - 11 Colpi
24 ottobre 1° estratto 09 mette in gioco TERNO 35 - 55 - 20 - 12 Colpi
26 ottobre 1° estratto 08 mette in gioco TERNO 27 - 45 - 36 - 13 Colpi
l'AMBO e il TERNO vanno in gioco x BARI - TUTTE
buon week end

arcor · 27 Ottobre 2013

ciao ringrazio disaronno per l'aggiunta della progressione però così comè non è proprio corretta perché il metodo prevede anche il gioco su ruota secca di bari e allora ne ho preparata un'altra ad hoc che prevede entrambe le giocate
è un po più impegnativa ma almeno sappiamo realmente la vincita netta giocando come da metodo

Vale79 · 27 Ottobre 2013

arcor ha scritto:
ciao ringrazio disaronno per l'aggiunta della progressione però così comè non è proprio corretta perché il metodo prevede anche il gioco su ruota secca di bari e allora ne ho preparata un'altra ad hoc che prevede entrambe le giocate
è un po più impegnativa ma almeno sappiamo realmente la vincita netta giocando come da metodo

Infatti la prima non mi tornava

Vale79 · 27 Ottobre 2013

Anch'io ho elaborato una progressione, la prima tende al profitto con la ruota secca, la seconda su tutte gioca a recupero per ambo (tiene in conto anche la spesa su ruota secca), nel caso di sortita del terno naturalmente ci si guadagna

Se disaronno ci elabora uno script fa cosa molto gradita

Vale79 · 28 Ottobre 2013

Vale79 ha scritto:
Se disaronno ci elabora uno script fa cosa molto gradita

Vedi l'allegato 8082

@ disaronno

Ho modificato lo script con le mie progressioni, però da ignorante in materia non vedo le giocate per il terno, sbaglio? Se si, quali sono?

Grazie

Vale79 · 29 Ottobre 2013

Ottimo, grazie mille disaronno

1963franco · 29 Ottobre 2013

ciao

ciao

disaronno ha scritto:

buonanotte
Spero di fare cosa gradita, allego il listato per Vale/)
Controllare sempre,salvo errori.

Codice:

Sub Main()
	Scrivi "SOLO 4 CASI TABELLA COMPLETA  di Antonio Vecchione ",1'-http://forum.lottoced.com/f8/solo-4-casi-tabella-completa-107877/-
	Dim ruote(1),ruotee(10),n(3),poste(3),postee(3),progress(3,13),progresss(3,13)
	poste(2) = 1
	poste(3) = 1
	'---------------------------AMBO progressione spesa a Ruota
	progress(2,01) = 1
	progress(2,02) = 1
	progress(2,03) = 1
	progress(2,04) = 1
	progress(2,05) = 1
	progress(2,06) = 1
	progress(2,07) = 1
	progress(2,08) = 1
	progress(2,09) = 1
	progress(2,10) = 1
	progress(2,11) = 1
	progress(2,12) = 1
	progress(2,13) = 1
	'----------------------------TERNO progressione spesa a Ruota
	progress(3,01) = 1
	progress(3,02) = 1
	progress(3,03) = 1
	progress(3,04) = 1
	progress(3,05) = 1
	progress(3,06) = 1
	progress(3,07) = 1
	progress(3,08) = 1
	progress(3,09) = 1
	progress(3,10) = 1
	progress(3,11) = 1
	progress(3,12) = 1
	progress(3,13) = 1
	'----------------------------
	postee(2) = 1
	postee(3) = 3
	'---------------------------AMBO progressione spesa a Tutte
	progresss(2,01) = 1
	progresss(2,02) = 1.50
	progresss(2,03) = 2
	progresss(2,04) = 2.50
	progresss(2,05) = 3.50
	progresss(2,06) = 4.50
	progresss(2,07) = 5.50
	progresss(2,08) = 7
	progresss(2,09) = 8
	progresss(2,10) = 10
	progresss(2,11) = 11.50
	progresss(2,12) = 14.50
	progresss(2,13) = 16.50
	'----------------------------TERNO progressione spesa a Tutte
	progresss(3,01) = 1
	progresss(3,02) = 1
	progresss(3,03) = 1
	progresss(3,04) = 1
	progresss(3,05) = 1
	progresss(3,06) = 1
	progresss(3,07) = 1
	progresss(3,08) = 1
	progresss(3,09) = 1
	progresss(3,10) = 1
	progresss(3,11) = 1
	progresss(3,12) = 1
	progresss(3,13) = 1
	'----------------------------
	ce = CInt(InputBox("da quale estrazione vuoi iniziare il controllo ? "," ID Estrazione ",8633))
	k = CInt(InputBox(" Per quanti colpi?"," Colpi di gioco ",13))
	ini = EstrazioneIni + ce
	fin = EstrazioneFin
	Scrivi " Ricerca ambi - Black Hole 2 sarà l'apocalisse del lotto by Antonio vecchione Vers. Bari e Tutte",1
	Scrivi " 1° estratto di Bari ",1
	Scrivi String(77,"="),1
	Scrivi " Resoconto da " & DataEstrazione(ini) & " a " & _
	DataEstrazione(fin) & " (" &(fin) & " estr.)",1
	For es = ini To Fin
		Messaggio " elab. estr. [" &(es) & "] del " & DataEstrazione(es)
		Call AvanzamentoElab(Ini,fin,es)
		'------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
		a = Estratto(es,BA_,1)
		Select Case(a)
			Case(01): am1 = Fuori90(Estratto(es,CA_,4) * 08): am2 = Fuori90(Estratto(es,CA_,4) * 34): am3 = Fuori90(Estratto(es,CA_,4) * 42)
			Case(02): am1 = Fuori90(Estratto(es,RO_,3) * 19): am2 = Fuori90(Estratto(es,RO_,3) * 35): am3 = Fuori90(Estratto(es,RO_,3) * 48)
			Case(03): am1 = Fuori90(Estratto(es,NA_,2) * 11): am2 = Fuori90(Estratto(es,NA_,2) * 54): am3 = Fuori90(Estratto(es,NA_,2) * 61)
			Case(04): am1 = Fuori90(Estratto(es,FI_,2) * 16): am2 = Fuori90(Estratto(es,FI_,2) * 34): am3 = Fuori90(Estratto(es,FI_,2) * 50)
			Case(05): am1 = Fuori90(Estratto(es,BA_,1) * 23): am2 = Fuori90(Estratto(es,BA_,1) * 69): am3 = Fuori90(Estratto(es,BA_,1) * 82)
			Case(06): am1 = Fuori90(Estratto(es,MI_,2) * 13): am2 = Fuori90(Estratto(es,MI_,2) * 64): am3 = Fuori90(Estratto(es,MI_,2) * 77)
			Case(07): am1 = Fuori90(Estratto(es,BA_,1) * 13): am2 = Fuori90(Estratto(es,BA_,1) * 37): am3 = Fuori90(Estratto(es,BA_,1) * 40)
			Case(08): am1 = Fuori90(Estratto(es,NA_,3) * 09): am2 = Fuori90(Estratto(es,NA_,3) * 55): am3 = Fuori90(Estratto(es,NA_,3) * 62)
			Case(09): am1 = Fuori90(Estratto(es,VE_,1) * 31): am2 = Fuori90(Estratto(es,VE_,1) * 77): am3 = Fuori90(Estratto(es,VE_,1) * 82)
			Case(10): am1 = Fuori90(Estratto(es,BA_,2) * 10): am2 = Fuori90(Estratto(es,BA_,2) * 35): am3 = Fuori90(Estratto(es,BA_,2) * 41)
			Case(11): am1 = Fuori90(Estratto(es,BA_,1) * 17): am2 = Fuori90(Estratto(es,BA_,1) * 38): am3 = Fuori90(Estratto(es,BA_,1) * 55)
			Case(12): am1 = Fuori90(Estratto(es,CA_,1) * 29): am2 = Fuori90(Estratto(es,CA_,1) * 36): am3 = Fuori90(Estratto(es,CA_,1) * 57)
			Case(13): am1 = Fuori90(Estratto(es,BA_,1) * 27): am2 = Fuori90(Estratto(es,BA_,1) * 36): am3 = Fuori90(Estratto(es,BA_,1) * 63)
			Case(14): am1 = Fuori90(Estratto(es,FI_,3) * 07): am2 = Fuori90(Estratto(es,FI_,3) * 82): am3 = Fuori90(Estratto(es,FI_,3) * 85)
			Case(15): am1 = Fuori90(Estratto(es,CA_,3) * 06): am2 = Fuori90(Estratto(es,CA_,3) * 09): am3 = Fuori90(Estratto(es,CA_,3) * 15)
			Case(16): am1 = Fuori90(Estratto(es,VE_,4) * 09): am2 = Fuori90(Estratto(es,VE_,4) * 21): am3 = Fuori90(Estratto(es,VE_,4) * 28)
			Case(17): am1 = Fuori90(Estratto(es,FI_,1) * 04): am2 = Fuori90(Estratto(es,FI_,1) * 16): am3 = Fuori90(Estratto(es,FI_,1) * 20)
			Case(18): am1 = Fuori90(Estratto(es,CA_,4) * 21): am2 = Fuori90(Estratto(es,CA_,4) * 41): am3 = Fuori90(Estratto(es,CA_,4) * 60)
			Case(19): am1 = Fuori90(Estratto(es,RO_,3) * 28): am2 = Fuori90(Estratto(es,RO_,3) * 44): am3 = Fuori90(Estratto(es,RO_,3) * 48)
			Case(20): am1 = Fuori90(Estratto(es,BA_,2) * 08): am2 = Fuori90(Estratto(es,BA_,2) * 33): am3 = Fuori90(Estratto(es,BA_,2) * 41)
			Case(21): am1 = Fuori90(Estratto(es,MI_,1) * 19): am2 = Fuori90(Estratto(es,MI_,1) * 32): am3 = Fuori90(Estratto(es,MI_,1) * 51)
			Case(22): am1 = Fuori90(Estratto(es,FI_,3) * 13): am2 = Fuori90(Estratto(es,FI_,3) * 39): am3 = Fuori90(Estratto(es,FI_,3) * 42)
			Case(23): am1 = Fuori90(Estratto(es,NZ_,5) * 04): am2 = Fuori90(Estratto(es,NZ_,5) * 43): am3 = Fuori90(Estratto(es,NZ_,5) * 47)
			Case(24): am1 = Fuori90(Estratto(es,CA_,3) * 10): am2 = Fuori90(Estratto(es,CA_,3) * 16): am3 = Fuori90(Estratto(es,CA_,3) * 26)
			Case(25): am1 = Fuori90(Estratto(es,CA_,1) * 26): am2 = Fuori90(Estratto(es,CA_,1) * 38): am3 = Fuori90(Estratto(es,CA_,1) * 60)
			Case(26): am1 = Fuori90(Estratto(es,BA_,4) * 30): am2 = Fuori90(Estratto(es,BA_,4) * 43): am3 = Fuori90(Estratto(es,BA_,4) * 53)
			Case(27): am1 = Fuori90(Estratto(es,CA_,1) * 29): am2 = Fuori90(Estratto(es,CA_,1) * 45): am3 = Fuori90(Estratto(es,CA_,1) * 48)
			Case(28): am1 = Fuori90(Estratto(es,TO_,5) * 01): am2 = Fuori90(Estratto(es,TO_,5) * 34): am3 = Fuori90(Estratto(es,TO_,5) * 35)
			Case(29): am1 = Fuori90(Estratto(es,BA_,2) * 04): am2 = Fuori90(Estratto(es,BA_,2) * 75): am3 = Fuori90(Estratto(es,BA_,2) * 79)
			Case(30): am1 = Fuori90(Estratto(es,FI_,5) * 10): am2 = Fuori90(Estratto(es,FI_,5) * 34): am3 = Fuori90(Estratto(es,FI_,5) * 40)
			Case(31): am1 = Fuori90(Estratto(es,BA_,1) * 03): am2 = Fuori90(Estratto(es,BA_,1) * 84): am3 = Fuori90(Estratto(es,BA_,1) * 87)
			Case(32): am1 = Fuori90(Estratto(es,PA_,1) * 26): am2 = Fuori90(Estratto(es,PA_,1) * 36): am3 = Fuori90(Estratto(es,PA_,1) * 62)
			Case(33): am1 = Fuori90(Estratto(es,BA_,1) * 10): am2 = Fuori90(Estratto(es,BA_,1) * 33): am3 = Fuori90(Estratto(es,BA_,1) * 43)
			Case(34): am1 = Fuori90(Estratto(es,TO_,2) * 01): am2 = Fuori90(Estratto(es,TO_,2) * 16): am3 = Fuori90(Estratto(es,TO_,2) * 17)
			Case(35): am1 = Fuori90(Estratto(es,VE_,4) * 27): am2 = Fuori90(Estratto(es,VE_,4) * 37): am3 = Fuori90(Estratto(es,VE_,4) * 62)
			Case(36): am1 = Fuori90(Estratto(es,BA_,3) * 01): am2 = Fuori90(Estratto(es,BA_,3) * 48): am3 = Fuori90(Estratto(es,BA_,3) * 49)
			Case(37): am1 = Fuori90(Estratto(es,BA_,3) * 13): am2 = Fuori90(Estratto(es,BA_,3) * 21): am3 = Fuori90(Estratto(es,BA_,3) * 24)
			Case(38): am1 = Fuori90(Estratto(es,FI_,1) * 13): am2 = Fuori90(Estratto(es,BA_,5) * 34): am3 = Fuori90(Estratto(es,BA_,1) * 47)
			Case(39): am1 = Fuori90(Estratto(es,CA_,1) * 05): am2 = Fuori90(Estratto(es,CA_,1) * 59): am3 = Fuori90(Estratto(es,CA_,1) * 62)
			Case(40): am1 = Fuori90(Estratto(es,BA_,3) * 09): am2 = Fuori90(Estratto(es,BA_,3) * 66): am3 = Fuori90(Estratto(es,BA_,3) * 75)
			Case(41): am1 = Fuori90(Estratto(es,FI_,1) * 01): am2 = Fuori90(Estratto(es,FI_,1) * 68): am3 = Fuori90(Estratto(es,FI_,1) * 69)
			Case(42): am1 = Fuori90(Estratto(es,BA_,2) * 24): am2 = Fuori90(Estratto(es,BA_,2) * 66): am3 = Fuori90(Estratto(es,BA_,2) * 90)
			Case(43): am1 = Fuori90(Estratto(es,BA_,1) * 16): am2 = Fuori90(Estratto(es,BA_,1) * 42): am3 = Fuori90(Estratto(es,BA_,1) * 58)
			Case(44): am1 = Fuori90(Estratto(es,GE_,5) * 26): am2 = Fuori90(Estratto(es,GE_,5) * 43): am3 = Fuori90(Estratto(es,GE_,5) * 49)
			Case(45): am1 = Fuori90(Estratto(es,CA_,3) * 12): am2 = Fuori90(Estratto(es,CA_,3) * 23): am3 = Fuori90(Estratto(es,CA_,3) * 27)
			Case(46): am1 = Fuori90(Estratto(es,BA_,3) * 15): am2 = Fuori90(Estratto(es,BA_,3) * 65): am3 = Fuori90(Estratto(es,BA_,3) * 78)
			Case(47): am1 = Fuori90(Estratto(es,BA_,5) * 13): am2 = Fuori90(Estratto(es,BA_,5) * 52): am3 = Fuori90(Estratto(es,BA_,5) * 57)
			Case(48): am1 = Fuori90(Estratto(es,GE_,2) * 04): am2 = Fuori90(Estratto(es,GE_,2) * 50): am3 = Fuori90(Estratto(es,GE_,2) * 54)
			Case(49): am1 = Fuori90(Estratto(es,FI_,5) * 22): am2 = Fuori90(Estratto(es,FI_,5) * 47): am3 = Fuori90(Estratto(es,FI_,5) * 57)
			Case(50): am1 = Fuori90(Estratto(es,RO_,3) * 29): am2 = Fuori90(Estratto(es,RO_,3) * 44): am3 = Fuori90(Estratto(es,RO_,3) * 49)
			Case(51): am1 = Fuori90(Estratto(es,NA_,2) * 29): am2 = Fuori90(Estratto(es,NA_,2) * 69): am3 = Fuori90(Estratto(es,NA_,2) * 88)
			Case(52): am1 = Fuori90(Estratto(es,BA_,1) * 29): am2 = Fuori90(Estratto(es,BA_,1) * 79): am3 = Fuori90(Estratto(es,BA_,1) * 82)
			Case(53): am1 = Fuori90(Estratto(es,CA_,4) * 15): am2 = Fuori90(Estratto(es,CA_,4) * 32): am3 = Fuori90(Estratto(es,CA_,4) * 47)
			Case(54): am1 = Fuori90(Estratto(es,RO_,5) * 21): am2 = Fuori90(Estratto(es,RO_,5) * 70): am3 = Fuori90(Estratto(es,RO_,5) * 83)
			Case(55): am1 = Fuori90(Estratto(es,CA_,1) * 02): am2 = Fuori90(Estratto(es,CA_,1) * 16): am3 = Fuori90(Estratto(es,CA_,1) * 18)
			Case(56): am1 = Fuori90(Estratto(es,VE_,5) * 12): am2 = Fuori90(Estratto(es,VE_,5) * 67): am3 = Fuori90(Estratto(es,VE_,5) * 79)
			Case(57): am1 = Fuori90(Estratto(es,VE_,4) * 27): am2 = Fuori90(Estratto(es,VE_,4) * 75): am3 = Fuori90(Estratto(es,VE_,4) * 80)
			Case(58): am1 = Fuori90(Estratto(es,CA_,2) * 13): am2 = Fuori90(Estratto(es,CA_,2) * 65): am3 = Fuori90(Estratto(es,CA_,2) * 76)
			Case(59): am1 = Fuori90(Estratto(es,BA_,1) * 29): am2 = Fuori90(Estratto(es,BA_,1) * 76): am3 = Fuori90(Estratto(es,BA_,1) * 81)
			Case(60): am1 = Fuori90(Estratto(es,BA_,3) * 27): am2 = Fuori90(Estratto(es,BA_,3) * 32): am3 = Fuori90(Estratto(es,BA_,3) * 59)
			Case(61): am1 = Fuori90(Estratto(es,GE_,1) * 24): am2 = Fuori90(Estratto(es,GE_,1) * 37): am3 = Fuori90(Estratto(es,GE_,1) * 61)
			Case(62): am1 = Fuori90(Estratto(es,BA_,3) * 15): am2 = Fuori90(Estratto(es,BA_,3) * 38): am3 = Fuori90(Estratto(es,BA_,3) * 41)
			Case(63): am1 = Fuori90(Estratto(es,BA_,4) * 15): am2 = Fuori90(Estratto(es,BA_,4) * 64): am3 = Fuori90(Estratto(es,BA_,4) * 79)
			Case(64): am1 = Fuori90(Estratto(es,CA_,5) * 13): am2 = Fuori90(Estratto(es,CA_,5) * 65): am3 = Fuori90(Estratto(es,CA_,5) * 76)
			Case(65): am1 = Fuori90(Estratto(es,BA_,5) * 20): am2 = Fuori90(Estratto(es,BA_,5) * 71): am3 = Fuori90(Estratto(es,BA_,5) * 83)
			Case(66): am1 = Fuori90(Estratto(es,FI_,1) * 24): am2 = Fuori90(Estratto(es,FI_,1) * 38): am3 = Fuori90(Estratto(es,FI_,1) * 62)
			Case(67): am1 = Fuori90(Estratto(es,FI_,3) * 01): am2 = Fuori90(Estratto(es,FI_,3) * 12): am3 = Fuori90(Estratto(es,FI_,3) * 13)
			Case(68): am1 = Fuori90(Estratto(es,BA_,1) * 17): am2 = Fuori90(Estratto(es,BA_,1) * 42): am3 = Fuori90(Estratto(es,BA_,1) * 59)
			Case(69): am1 = Fuori90(Estratto(es,BA_,5) * 02): am2 = Fuori90(Estratto(es,BA_,5) * 44): am3 = Fuori90(Estratto(es,BA_,5) * 46)
			Case(70): am1 = Fuori90(Estratto(es,BA_,3) * 13): am2 = Fuori90(Estratto(es,BA_,3) * 87): am3 = Fuori90(Estratto(es,BA_,3) * 90)
			Case(71): am1 = Fuori90(Estratto(es,NA_,3) * 20): am2 = Fuori90(Estratto(es,NA_,3) * 78): am3 = Fuori90(Estratto(es,NA_,3) * 90)
			Case(72): am1 = Fuori90(Estratto(es,FI_,3) * 18): am2 = Fuori90(Estratto(es,FI_,3) * 38): am3 = Fuori90(Estratto(es,FI_,3) * 52)
			Case(73): am1 = Fuori90(Estratto(es,BA_,1) * 05): am2 = Fuori90(Estratto(es,BA_,1) * 58): am3 = Fuori90(Estratto(es,BA_,1) * 63)
			Case(74): am1 = Fuori90(Estratto(es,BA_,1) * 10): am2 = Fuori90(Estratto(es,BA_,1) * 49): am3 = Fuori90(Estratto(es,BA_,1) * 59)
			Case(75): am1 = Fuori90(Estratto(es,RO_,5) * 27): am2 = Fuori90(Estratto(es,RO_,5) * 37): am3 = Fuori90(Estratto(es,RO_,5) * 62)
			Case(76): am1 = Fuori90(Estratto(es,PA_,2) * 01): am2 = Fuori90(Estratto(es,PA_,2) * 84): am3 = Fuori90(Estratto(es,PA_,2) * 85)
			Case(77): am1 = Fuori90(Estratto(es,BA_,1) * 21): am2 = Fuori90(Estratto(es,BA_,1) * 64): am3 = Fuori90(Estratto(es,BA_,1) * 85)
			Case(78): am1 = Fuori90(Estratto(es,MI_,4) * 13): am2 = Fuori90(Estratto(es,MI_,4) * 38): am3 = Fuori90(Estratto(es,MI_,4) * 43)
			Case(79): am1 = Fuori90(Estratto(es,MI_,4) * 20): am2 = Fuori90(Estratto(es,MI_,4) * 42): am3 = Fuori90(Estratto(es,MI_,4) * 62)
			Case(80): am1 = Fuori90(Estratto(es,CA_,2) * 24): am2 = Fuori90(Estratto(es,CA_,2) * 37): am3 = Fuori90(Estratto(es,CA_,2) * 61)
			Case(81): am1 = Fuori90(Estratto(es,NA_,4) * 01): am2 = Fuori90(Estratto(es,NA_,4) * 58): am3 = Fuori90(Estratto(es,NA_,4) * 59)
			Case(82): am1 = Fuori90(Estratto(es,RO_,5) * 01): am2 = Fuori90(Estratto(es,RO_,5) * 70): am3 = Fuori90(Estratto(es,RO_,5) * 71)
			Case(83): am1 = Fuori90(Estratto(es,TO_,2) * 15): am2 = Fuori90(Estratto(es,TO_,2) * 67): am3 = Fuori90(Estratto(es,TO_,2) * 76)
			Case(84): am1 = Fuori90(Estratto(es,NA_,5) * 03): am2 = Fuori90(Estratto(es,NA_,5) * 73): am3 = Fuori90(Estratto(es,NA_,5) * 74)
			Case(85): am1 = Fuori90(Estratto(es,BA_,2) * 21): am2 = Fuori90(Estratto(es,BA_,2) * 40): am3 = Fuori90(Estratto(es,BA_,2) * 61)
			Case(86): am1 = Fuori90(Estratto(es,PA_,2) * 08): am2 = Fuori90(Estratto(es,PA_,2) * 49): am3 = Fuori90(Estratto(es,PA_,2) * 57)
			Case(87): am1 = Fuori90(Estratto(es,CA_,3) * 14): am2 = Fuori90(Estratto(es,CA_,3) * 36): am3 = Fuori90(Estratto(es,CA_,3) * 42)
			Case(88): am1 = Fuori90(Estratto(es,BA_,4) * 25): am2 = Fuori90(Estratto(es,BA_,4) * 65): am3 = Fuori90(Estratto(es,BA_,4) * 88)
			Case(89): am1 = Fuori90(Estratto(es,BA_,3) * 21): am2 = Fuori90(Estratto(es,BA_,3) * 43): am3 = Fuori90(Estratto(es,BA_,3) * 62)
			Case(90): am1 = Fuori90(Estratto(es,FI_,1) * 20): am2 = Fuori90(Estratto(es,FI_,1) * 40): am3 = Fuori90(Estratto(es,FI_,1) * 60)
		End Select
		'--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
		ruote(1) = BA_:ruotee(10) = TU_
		casi = casi + 1
		Scrivi String(67,"=") & " caso n° " &(casi)
		ColoreTesto 1
		Scrivi DataEstrazione(es,1) & " [ " & SiglaRuota(BA_) & " - " & StringaEstratti(es,BA_) & _
		" ] Numero Spia [ " & Format2(a) & " ] in [ 1° ]  Posizione"
		ColoreTesto 0
		Scrivi String(77,"-")
		n(1) = am1
		n(2) = am2
		n(3) = am3
		EliminaRipetuti n
		Call ImpostaProgressione(1,progress)
		ImpostaGiocata 1,n,ruote,poste,k,2
		Call ImpostaProgressione(2,progresss)
		ImpostaGiocata 2,n,ruotee,postee,k,2
		Gioca es,True,,1
	Next
	Scrivi String(77,"=") & "",1
	ScriviResoconto
	Scrivi " Ricerca ambi - Black Hole 2 sarà l'apocalisse del lotto by Antonio vecchione Vers. Bari e Tutte",1
	Scrivi " 1° estratto di Bari  ",1
End Sub

scusa di saronno,puoi spiegarmi come si usano i script non ci capisco poco niente.
grazie mille
franco

80Sete · 30 Ottobre 2013

ciao 1963franco, scusami se mi intrometto, vai qui
http://forum.lottoced.com/f12/richiesta-blackmore-107795/
e leggi la mia risposta a Vale79, è tutto spiegato, comunque dovresti avere già Spaziometria e seguire le immagini.
ciao e buona giornata

1963franco · 30 Ottobre 2013

grazie 80sete ora ci provo
ciao

Vale79 · 13 Novembre 2013

@ disaronno

scusami disaronno, potresti gentilmente modificare il listato eliminando la giocata su tutte, grazie

disaronno ha scritto:

buonanotte
Spero di fare cosa gradita, allego il listato per Vale/)
Controllare sempre,salvo errori.

Codice:

Sub Main()
    Scrivi "SOLO 4 CASI TABELLA COMPLETA  di Antonio Vecchione ",1'-http://forum.lottoced.com/f8/solo-4-casi-tabella-completa-107877/-
    Dim ruote(1),ruotee(10),n(3),poste(3),postee(3),progress(3,13),progresss(3,13)
    poste(2) = 1
    poste(3) = 1
    '---------------------------AMBO progressione spesa a Ruota
    progress(2,01) = 1
    progress(2,02) = 1
    progress(2,03) = 1
    progress(2,04) = 1
    progress(2,05) = 1
    progress(2,06) = 1
    progress(2,07) = 1
    progress(2,08) = 1
    progress(2,09) = 1
    progress(2,10) = 1
    progress(2,11) = 1
    progress(2,12) = 1
    progress(2,13) = 1
    '----------------------------TERNO progressione spesa a Ruota
    progress(3,01) = 1
    progress(3,02) = 1
    progress(3,03) = 1
    progress(3,04) = 1
    progress(3,05) = 1
    progress(3,06) = 1
    progress(3,07) = 1
    progress(3,08) = 1
    progress(3,09) = 1
    progress(3,10) = 1
    progress(3,11) = 1
    progress(3,12) = 1
    progress(3,13) = 1
    '----------------------------
    postee(2) = 1
    postee(3) = 3
    '---------------------------AMBO progressione spesa a Tutte
    progresss(2,01) = 1
    progresss(2,02) = 1.50
    progresss(2,03) = 2
    progresss(2,04) = 2.50
    progresss(2,05) = 3.50
    progresss(2,06) = 4.50
    progresss(2,07) = 5.50
    progresss(2,08) = 7
    progresss(2,09) = 8
    progresss(2,10) = 10
    progresss(2,11) = 11.50
    progresss(2,12) = 14.50
    progresss(2,13) = 16.50
    '----------------------------TERNO progressione spesa a Tutte
    progresss(3,01) = 1
    progresss(3,02) = 1
    progresss(3,03) = 1
    progresss(3,04) = 1
    progresss(3,05) = 1
    progresss(3,06) = 1
    progresss(3,07) = 1
    progresss(3,08) = 1
    progresss(3,09) = 1
    progresss(3,10) = 1
    progresss(3,11) = 1
    progresss(3,12) = 1
    progresss(3,13) = 1
    '----------------------------
    ce = CInt(InputBox("da quale estrazione vuoi iniziare il controllo ? "," ID Estrazione ",8633))
    k = CInt(InputBox(" Per quanti colpi?"," Colpi di gioco ",13))
    ini = EstrazioneIni + ce
    fin = EstrazioneFin
    Scrivi " Ricerca ambi - Black Hole 2 sarà l'apocalisse del lotto by Antonio vecchione Vers. Bari e Tutte",1
    Scrivi " 1° estratto di Bari ",1
    Scrivi String(77,"="),1
    Scrivi " Resoconto da " & DataEstrazione(ini) & " a " & _
    DataEstrazione(fin) & " (" &(fin) & " estr.)",1
    For es = ini To Fin
        Messaggio " elab. estr. [" &(es) & "] del " & DataEstrazione(es)
        Call AvanzamentoElab(Ini,fin,es)
        '------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
        a = Estratto(es,BA_,1)
        Select Case(a)
            Case(01): am1 = Fuori90(Estratto(es,CA_,4) * 08): am2 = Fuori90(Estratto(es,CA_,4) * 34): am3 = Fuori90(Estratto(es,CA_,4) * 42)
            Case(02): am1 = Fuori90(Estratto(es,RO_,3) * 19): am2 = Fuori90(Estratto(es,RO_,3) * 35): am3 = Fuori90(Estratto(es,RO_,3) * 48)
            Case(03): am1 = Fuori90(Estratto(es,NA_,2) * 11): am2 = Fuori90(Estratto(es,NA_,2) * 54): am3 = Fuori90(Estratto(es,NA_,2) * 61)
            Case(04): am1 = Fuori90(Estratto(es,FI_,2) * 16): am2 = Fuori90(Estratto(es,FI_,2) * 34): am3 = Fuori90(Estratto(es,FI_,2) * 50)
            Case(05): am1 = Fuori90(Estratto(es,BA_,1) * 23): am2 = Fuori90(Estratto(es,BA_,1) * 69): am3 = Fuori90(Estratto(es,BA_,1) * 82)
            Case(06): am1 = Fuori90(Estratto(es,MI_,2) * 13): am2 = Fuori90(Estratto(es,MI_,2) * 64): am3 = Fuori90(Estratto(es,MI_,2) * 77)
            Case(07): am1 = Fuori90(Estratto(es,BA_,1) * 13): am2 = Fuori90(Estratto(es,BA_,1) * 37): am3 = Fuori90(Estratto(es,BA_,1) * 40)
            Case(08): am1 = Fuori90(Estratto(es,NA_,3) * 09): am2 = Fuori90(Estratto(es,NA_,3) * 55): am3 = Fuori90(Estratto(es,NA_,3) * 62)
            Case(09): am1 = Fuori90(Estratto(es,VE_,1) * 31): am2 = Fuori90(Estratto(es,VE_,1) * 77): am3 = Fuori90(Estratto(es,VE_,1) * 82)
            Case(10): am1 = Fuori90(Estratto(es,BA_,2) * 10): am2 = Fuori90(Estratto(es,BA_,2) * 35): am3 = Fuori90(Estratto(es,BA_,2) * 41)
            Case(11): am1 = Fuori90(Estratto(es,BA_,1) * 17): am2 = Fuori90(Estratto(es,BA_,1) * 38): am3 = Fuori90(Estratto(es,BA_,1) * 55)
            Case(12): am1 = Fuori90(Estratto(es,CA_,1) * 29): am2 = Fuori90(Estratto(es,CA_,1) * 36): am3 = Fuori90(Estratto(es,CA_,1) * 57)
            Case(13): am1 = Fuori90(Estratto(es,BA_,1) * 27): am2 = Fuori90(Estratto(es,BA_,1) * 36): am3 = Fuori90(Estratto(es,BA_,1) * 63)
            Case(14): am1 = Fuori90(Estratto(es,FI_,3) * 07): am2 = Fuori90(Estratto(es,FI_,3) * 82): am3 = Fuori90(Estratto(es,FI_,3) * 85)
            Case(15): am1 = Fuori90(Estratto(es,CA_,3) * 06): am2 = Fuori90(Estratto(es,CA_,3) * 09): am3 = Fuori90(Estratto(es,CA_,3) * 15)
            Case(16): am1 = Fuori90(Estratto(es,VE_,4) * 09): am2 = Fuori90(Estratto(es,VE_,4) * 21): am3 = Fuori90(Estratto(es,VE_,4) * 28)
            Case(17): am1 = Fuori90(Estratto(es,FI_,1) * 04): am2 = Fuori90(Estratto(es,FI_,1) * 16): am3 = Fuori90(Estratto(es,FI_,1) * 20)
            Case(18): am1 = Fuori90(Estratto(es,CA_,4) * 21): am2 = Fuori90(Estratto(es,CA_,4) * 41): am3 = Fuori90(Estratto(es,CA_,4) * 60)
            Case(19): am1 = Fuori90(Estratto(es,RO_,3) * 28): am2 = Fuori90(Estratto(es,RO_,3) * 44): am3 = Fuori90(Estratto(es,RO_,3) * 48)
            Case(20): am1 = Fuori90(Estratto(es,BA_,2) * 08): am2 = Fuori90(Estratto(es,BA_,2) * 33): am3 = Fuori90(Estratto(es,BA_,2) * 41)
            Case(21): am1 = Fuori90(Estratto(es,MI_,1) * 19): am2 = Fuori90(Estratto(es,MI_,1) * 32): am3 = Fuori90(Estratto(es,MI_,1) * 51)
            Case(22): am1 = Fuori90(Estratto(es,FI_,3) * 13): am2 = Fuori90(Estratto(es,FI_,3) * 39): am3 = Fuori90(Estratto(es,FI_,3) * 42)
            Case(23): am1 = Fuori90(Estratto(es,NZ_,5) * 04): am2 = Fuori90(Estratto(es,NZ_,5) * 43): am3 = Fuori90(Estratto(es,NZ_,5) * 47)
            Case(24): am1 = Fuori90(Estratto(es,CA_,3) * 10): am2 = Fuori90(Estratto(es,CA_,3) * 16): am3 = Fuori90(Estratto(es,CA_,3) * 26)
            Case(25): am1 = Fuori90(Estratto(es,CA_,1) * 26): am2 = Fuori90(Estratto(es,CA_,1) * 38): am3 = Fuori90(Estratto(es,CA_,1) * 60)
            Case(26): am1 = Fuori90(Estratto(es,BA_,4) * 30): am2 = Fuori90(Estratto(es,BA_,4) * 43): am3 = Fuori90(Estratto(es,BA_,4) * 53)
            Case(27): am1 = Fuori90(Estratto(es,CA_,1) * 29): am2 = Fuori90(Estratto(es,CA_,1) * 45): am3 = Fuori90(Estratto(es,CA_,1) * 48)
            Case(28): am1 = Fuori90(Estratto(es,TO_,5) * 01): am2 = Fuori90(Estratto(es,TO_,5) * 34): am3 = Fuori90(Estratto(es,TO_,5) * 35)
            Case(29): am1 = Fuori90(Estratto(es,BA_,2) * 04): am2 = Fuori90(Estratto(es,BA_,2) * 75): am3 = Fuori90(Estratto(es,BA_,2) * 79)
            Case(30): am1 = Fuori90(Estratto(es,FI_,5) * 10): am2 = Fuori90(Estratto(es,FI_,5) * 34): am3 = Fuori90(Estratto(es,FI_,5) * 40)
            Case(31): am1 = Fuori90(Estratto(es,BA_,1) * 03): am2 = Fuori90(Estratto(es,BA_,1) * 84): am3 = Fuori90(Estratto(es,BA_,1) * 87)
            Case(32): am1 = Fuori90(Estratto(es,PA_,1) * 26): am2 = Fuori90(Estratto(es,PA_,1) * 36): am3 = Fuori90(Estratto(es,PA_,1) * 62)
            Case(33): am1 = Fuori90(Estratto(es,BA_,1) * 10): am2 = Fuori90(Estratto(es,BA_,1) * 33): am3 = Fuori90(Estratto(es,BA_,1) * 43)
            Case(34): am1 = Fuori90(Estratto(es,TO_,2) * 01): am2 = Fuori90(Estratto(es,TO_,2) * 16): am3 = Fuori90(Estratto(es,TO_,2) * 17)
            Case(35): am1 = Fuori90(Estratto(es,VE_,4) * 27): am2 = Fuori90(Estratto(es,VE_,4) * 37): am3 = Fuori90(Estratto(es,VE_,4) * 62)
            Case(36): am1 = Fuori90(Estratto(es,BA_,3) * 01): am2 = Fuori90(Estratto(es,BA_,3) * 48): am3 = Fuori90(Estratto(es,BA_,3) * 49)
            Case(37): am1 = Fuori90(Estratto(es,BA_,3) * 13): am2 = Fuori90(Estratto(es,BA_,3) * 21): am3 = Fuori90(Estratto(es,BA_,3) * 24)
            Case(38): am1 = Fuori90(Estratto(es,FI_,1) * 13): am2 = Fuori90(Estratto(es,BA_,5) * 34): am3 = Fuori90(Estratto(es,BA_,1) * 47)
            Case(39): am1 = Fuori90(Estratto(es,CA_,1) * 05): am2 = Fuori90(Estratto(es,CA_,1) * 59): am3 = Fuori90(Estratto(es,CA_,1) * 62)
            Case(40): am1 = Fuori90(Estratto(es,BA_,3) * 09): am2 = Fuori90(Estratto(es,BA_,3) * 66): am3 = Fuori90(Estratto(es,BA_,3) * 75)
            Case(41): am1 = Fuori90(Estratto(es,FI_,1) * 01): am2 = Fuori90(Estratto(es,FI_,1) * 68): am3 = Fuori90(Estratto(es,FI_,1) * 69)
            Case(42): am1 = Fuori90(Estratto(es,BA_,2) * 24): am2 = Fuori90(Estratto(es,BA_,2) * 66): am3 = Fuori90(Estratto(es,BA_,2) * 90)
            Case(43): am1 = Fuori90(Estratto(es,BA_,1) * 16): am2 = Fuori90(Estratto(es,BA_,1) * 42): am3 = Fuori90(Estratto(es,BA_,1) * 58)
            Case(44): am1 = Fuori90(Estratto(es,GE_,5) * 26): am2 = Fuori90(Estratto(es,GE_,5) * 43): am3 = Fuori90(Estratto(es,GE_,5) * 49)
            Case(45): am1 = Fuori90(Estratto(es,CA_,3) * 12): am2 = Fuori90(Estratto(es,CA_,3) * 23): am3 = Fuori90(Estratto(es,CA_,3) * 27)
            Case(46): am1 = Fuori90(Estratto(es,BA_,3) * 15): am2 = Fuori90(Estratto(es,BA_,3) * 65): am3 = Fuori90(Estratto(es,BA_,3) * 78)
            Case(47): am1 = Fuori90(Estratto(es,BA_,5) * 13): am2 = Fuori90(Estratto(es,BA_,5) * 52): am3 = Fuori90(Estratto(es,BA_,5) * 57)
            Case(48): am1 = Fuori90(Estratto(es,GE_,2) * 04): am2 = Fuori90(Estratto(es,GE_,2) * 50): am3 = Fuori90(Estratto(es,GE_,2) * 54)
            Case(49): am1 = Fuori90(Estratto(es,FI_,5) * 22): am2 = Fuori90(Estratto(es,FI_,5) * 47): am3 = Fuori90(Estratto(es,FI_,5) * 57)
            Case(50): am1 = Fuori90(Estratto(es,RO_,3) * 29): am2 = Fuori90(Estratto(es,RO_,3) * 44): am3 = Fuori90(Estratto(es,RO_,3) * 49)
            Case(51): am1 = Fuori90(Estratto(es,NA_,2) * 29): am2 = Fuori90(Estratto(es,NA_,2) * 69): am3 = Fuori90(Estratto(es,NA_,2) * 88)
            Case(52): am1 = Fuori90(Estratto(es,BA_,1) * 29): am2 = Fuori90(Estratto(es,BA_,1) * 79): am3 = Fuori90(Estratto(es,BA_,1) * 82)
            Case(53): am1 = Fuori90(Estratto(es,CA_,4) * 15): am2 = Fuori90(Estratto(es,CA_,4) * 32): am3 = Fuori90(Estratto(es,CA_,4) * 47)
            Case(54): am1 = Fuori90(Estratto(es,RO_,5) * 21): am2 = Fuori90(Estratto(es,RO_,5) * 70): am3 = Fuori90(Estratto(es,RO_,5) * 83)
            Case(55): am1 = Fuori90(Estratto(es,CA_,1) * 02): am2 = Fuori90(Estratto(es,CA_,1) * 16): am3 = Fuori90(Estratto(es,CA_,1) * 18)
            Case(56): am1 = Fuori90(Estratto(es,VE_,5) * 12): am2 = Fuori90(Estratto(es,VE_,5) * 67): am3 = Fuori90(Estratto(es,VE_,5) * 79)
            Case(57): am1 = Fuori90(Estratto(es,VE_,4) * 27): am2 = Fuori90(Estratto(es,VE_,4) * 75): am3 = Fuori90(Estratto(es,VE_,4) * 80)
            Case(58): am1 = Fuori90(Estratto(es,CA_,2) * 13): am2 = Fuori90(Estratto(es,CA_,2) * 65): am3 = Fuori90(Estratto(es,CA_,2) * 76)
            Case(59): am1 = Fuori90(Estratto(es,BA_,1) * 29): am2 = Fuori90(Estratto(es,BA_,1) * 76): am3 = Fuori90(Estratto(es,BA_,1) * 81)
            Case(60): am1 = Fuori90(Estratto(es,BA_,3) * 27): am2 = Fuori90(Estratto(es,BA_,3) * 32): am3 = Fuori90(Estratto(es,BA_,3) * 59)
            Case(61): am1 = Fuori90(Estratto(es,GE_,1) * 24): am2 = Fuori90(Estratto(es,GE_,1) * 37): am3 = Fuori90(Estratto(es,GE_,1) * 61)
            Case(62): am1 = Fuori90(Estratto(es,BA_,3) * 15): am2 = Fuori90(Estratto(es,BA_,3) * 38): am3 = Fuori90(Estratto(es,BA_,3) * 41)
            Case(63): am1 = Fuori90(Estratto(es,BA_,4) * 15): am2 = Fuori90(Estratto(es,BA_,4) * 64): am3 = Fuori90(Estratto(es,BA_,4) * 79)
            Case(64): am1 = Fuori90(Estratto(es,CA_,5) * 13): am2 = Fuori90(Estratto(es,CA_,5) * 65): am3 = Fuori90(Estratto(es,CA_,5) * 76)
            Case(65): am1 = Fuori90(Estratto(es,BA_,5) * 20): am2 = Fuori90(Estratto(es,BA_,5) * 71): am3 = Fuori90(Estratto(es,BA_,5) * 83)
            Case(66): am1 = Fuori90(Estratto(es,FI_,1) * 24): am2 = Fuori90(Estratto(es,FI_,1) * 38): am3 = Fuori90(Estratto(es,FI_,1) * 62)
            Case(67): am1 = Fuori90(Estratto(es,FI_,3) * 01): am2 = Fuori90(Estratto(es,FI_,3) * 12): am3 = Fuori90(Estratto(es,FI_,3) * 13)
            Case(68): am1 = Fuori90(Estratto(es,BA_,1) * 17): am2 = Fuori90(Estratto(es,BA_,1) * 42): am3 = Fuori90(Estratto(es,BA_,1) * 59)
            Case(69): am1 = Fuori90(Estratto(es,BA_,5) * 02): am2 = Fuori90(Estratto(es,BA_,5) * 44): am3 = Fuori90(Estratto(es,BA_,5) * 46)
            Case(70): am1 = Fuori90(Estratto(es,BA_,3) * 13): am2 = Fuori90(Estratto(es,BA_,3) * 87): am3 = Fuori90(Estratto(es,BA_,3) * 90)
            Case(71): am1 = Fuori90(Estratto(es,NA_,3) * 20): am2 = Fuori90(Estratto(es,NA_,3) * 78): am3 = Fuori90(Estratto(es,NA_,3) * 90)
            Case(72): am1 = Fuori90(Estratto(es,FI_,3) * 18): am2 = Fuori90(Estratto(es,FI_,3) * 38): am3 = Fuori90(Estratto(es,FI_,3) * 52)
            Case(73): am1 = Fuori90(Estratto(es,BA_,1) * 05): am2 = Fuori90(Estratto(es,BA_,1) * 58): am3 = Fuori90(Estratto(es,BA_,1) * 63)
            Case(74): am1 = Fuori90(Estratto(es,BA_,1) * 10): am2 = Fuori90(Estratto(es,BA_,1) * 49): am3 = Fuori90(Estratto(es,BA_,1) * 59)
            Case(75): am1 = Fuori90(Estratto(es,RO_,5) * 27): am2 = Fuori90(Estratto(es,RO_,5) * 37): am3 = Fuori90(Estratto(es,RO_,5) * 62)
            Case(76): am1 = Fuori90(Estratto(es,PA_,2) * 01): am2 = Fuori90(Estratto(es,PA_,2) * 84): am3 = Fuori90(Estratto(es,PA_,2) * 85)
            Case(77): am1 = Fuori90(Estratto(es,BA_,1) * 21): am2 = Fuori90(Estratto(es,BA_,1) * 64): am3 = Fuori90(Estratto(es,BA_,1) * 85)
            Case(78): am1 = Fuori90(Estratto(es,MI_,4) * 13): am2 = Fuori90(Estratto(es,MI_,4) * 38): am3 = Fuori90(Estratto(es,MI_,4) * 43)
            Case(79): am1 = Fuori90(Estratto(es,MI_,4) * 20): am2 = Fuori90(Estratto(es,MI_,4) * 42): am3 = Fuori90(Estratto(es,MI_,4) * 62)
            Case(80): am1 = Fuori90(Estratto(es,CA_,2) * 24): am2 = Fuori90(Estratto(es,CA_,2) * 37): am3 = Fuori90(Estratto(es,CA_,2) * 61)
            Case(81): am1 = Fuori90(Estratto(es,NA_,4) * 01): am2 = Fuori90(Estratto(es,NA_,4) * 58): am3 = Fuori90(Estratto(es,NA_,4) * 59)
            Case(82): am1 = Fuori90(Estratto(es,RO_,5) * 01): am2 = Fuori90(Estratto(es,RO_,5) * 70): am3 = Fuori90(Estratto(es,RO_,5) * 71)
            Case(83): am1 = Fuori90(Estratto(es,TO_,2) * 15): am2 = Fuori90(Estratto(es,TO_,2) * 67): am3 = Fuori90(Estratto(es,TO_,2) * 76)
            Case(84): am1 = Fuori90(Estratto(es,NA_,5) * 03): am2 = Fuori90(Estratto(es,NA_,5) * 73): am3 = Fuori90(Estratto(es,NA_,5) * 74)
            Case(85): am1 = Fuori90(Estratto(es,BA_,2) * 21): am2 = Fuori90(Estratto(es,BA_,2) * 40): am3 = Fuori90(Estratto(es,BA_,2) * 61)
            Case(86): am1 = Fuori90(Estratto(es,PA_,2) * 08): am2 = Fuori90(Estratto(es,PA_,2) * 49): am3 = Fuori90(Estratto(es,PA_,2) * 57)
            Case(87): am1 = Fuori90(Estratto(es,CA_,3) * 14): am2 = Fuori90(Estratto(es,CA_,3) * 36): am3 = Fuori90(Estratto(es,CA_,3) * 42)
            Case(88): am1 = Fuori90(Estratto(es,BA_,4) * 25): am2 = Fuori90(Estratto(es,BA_,4) * 65): am3 = Fuori90(Estratto(es,BA_,4) * 88)
            Case(89): am1 = Fuori90(Estratto(es,BA_,3) * 21): am2 = Fuori90(Estratto(es,BA_,3) * 43): am3 = Fuori90(Estratto(es,BA_,3) * 62)
            Case(90): am1 = Fuori90(Estratto(es,FI_,1) * 20): am2 = Fuori90(Estratto(es,FI_,1) * 40): am3 = Fuori90(Estratto(es,FI_,1) * 60)
        End Select
        '--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
        ruote(1) = BA_:ruotee(10) = TU_
        casi = casi + 1
        Scrivi String(67,"=") & " caso n° " &(casi)
        ColoreTesto 1
        Scrivi DataEstrazione(es,1) & " [ " & SiglaRuota(BA_) & " - " & StringaEstratti(es,BA_) & _
        " ] Numero Spia [ " & Format2(a) & " ] in [ 1° ]  Posizione"
        ColoreTesto 0
        Scrivi String(77,"-")
        n(1) = am1
        n(2) = am2
        n(3) = am3
        EliminaRipetuti n
        Call ImpostaProgressione(1,progress)
        ImpostaGiocata 1,n,ruote,poste,k,2
        Call ImpostaProgressione(2,progresss)
        ImpostaGiocata 2,n,ruotee,postee,k,2
        Gioca es,True,,1
    Next
    Scrivi String(77,"=") & "",1
    ScriviResoconto
    Scrivi " Ricerca ambi - Black Hole 2 sarà l'apocalisse del lotto by Antonio vecchione Vers. Bari e Tutte",1
    Scrivi " 1° estratto di Bari  ",1
End Sub

Vale79 · 15 Novembre 2013

UP

Vale79 ha scritto:
@ disaronno

scusami disaronno, potresti gentilmente modificare il listato eliminando la giocata su tutte, grazie

Vale79 · 20 Novembre 2013

UP - @ disaronno e chiunque ne sia capace

Vale79 ha scritto:
scusami disaronno, potresti gentilmente modificare il listato eliminando la giocata su tutte, grazie

SOLO 4 CASI TABELLA COMPLETA

Super Member >GOLD<

Advanced Member >PLATINUM PLUS<

Advanced Member >PLATINUM PLUS<

Advanced Member >PLATINUM PLUS<

Advanced Member

Super Member >GOLD<

Advanced Member >PLATINUM PLUS<

Advanced Member

Allegati

Super Member >GOLD<

Super Member >GOLD<

Super Member >GOLD<

Super Member >GOLD<

Super Member >GOLD<

Advanced Member >PLATINUM PLUS<

Super Member >GOLD<

Super Member >GOLD<

Super Member >GOLD<

Super Member >GOLD<