|
|
Per quanto riguarda i Listati L8+ dei metodi presenti in questa Sezione,preciso che sono stati trovati in rete senza saperne l'Autore( trovati in un unico pacchetto, zippato): se qualcuno riesce ad indentificarsi nell'autore,e' pienamente autorizzato a rivendicarne il proprio operato.Sono pubblicati su questo Forum solo ed esclusivamente per essere messi a disposizione di tutti,ogni consiglio e modifica e' ben accetto,grazie..
Somma Diabolica ( Osvaldo Manara )
Questo metodo ricava una previsione composta da una Ambata e 3 Ambi secchi e una quartina da giocare su due ruote.
si consiglia di sostenere il gioco di Quartina anche a tutte le ruote per recupero spese
PROCEDIMENTO
Occorre rintracciare nel quadro estrazionale su due ruote consecutive o gemellari, due ambi, uno su una ruota e l'altro sull'altra ruota, che abbiano la stessa somma, siano isotopi, cioè che gli elementi che li formano occupino la stessa posizione, e meglio ancora se uniti.
Una volta individuati due ambi che soddisfino le condizioni sopra descritte, si passerà a ricavare la previsione da mettere in gioco.
Esempio Estrazione del 11-9-99 TO: 86-62 VE: 25-33
IL 2° NUMERO DEL 2° AMBO (33) è SARA L'AMBATA
Ora passiamo a ricavare i tre Ambi Secchi. Si uniscono gli ambi che hanno determinato la condizione:
8662 E 2533
8662 + 2533 = 11195
11195 con il fuori 90 diventerà 35
Il 35 è l'elemento che forma il primo Ambo Secco: 33-35
A sua volta, il risultato della suddetta operazione che, ricordo è l'abbinamento da dare all'Ambata per formare il primo Ambo, deve essere sottratto al fisso 90:
90-35 = 55
Il 55 è l'abbinamento da effettuare all'Ambata per formare il secondo Ambo Secco: 33-55.
Il diametrale del 55, che in questo caso è 10, forma il terzo Ambo Secco: 33-10.
Si consiglia anche il gioco dell'intera quartina, per Ambo e Terno, anche a Tutte le ruote.
PREVISIONI
TO-VE: AMBATA 33 AMBI SECCHI 33-35 / 33-55 / 33-10 AMBO TERNO QUATERNA 33-35-55-10
ESITO AL TERZO COLPO SULLA RUOTA DI TORINO
AMBATA 33 Ambo secco e Ambo in Quartina 33-35 Ambo secco e Ambo in quartina 33-10 Ambo in Quartina 35-10 Terno in Quartina 33-35-10
Ecco il Listato L8+:
CODICE Sub main() Scrivi "Somma Diabolica di Osvaldo Manara",1 Dim num(2),numeri(2),numeri1(2),numeri2(2),numeri3(5) Dim post(1),poste(2),posta(4),ruote(10),ruot(2) post(1)=1 poste(2)=1 posta(2)=1 : posta(3)=1 : posta(4)=1 tmp=InputBox("Quante estrazioni controllo?",,17) x=InputBox("Per quante estrazioni deve durare il gioco?",,14) fin=EstrazioneFin ini=fin-tmp For es=ini To fin Messaggio CStr (EstrazioneFin - es) AvanzamentoElab ini,fin,es For r=1 To 9 ruote(1)=r For r1=r+1 To 10 ruote(2)=r1 For p= 1 To 4 For p1=p+1 To 5 a=Estratto (es,r,p) : b=Estratto (es,r,p1) c=Estratto (es,r1,p) : d=Estratto (es,r1,p1) a1=Fuori90(a+b) : a2=Fuori90(c+d) If a2=a1 Then ColoreTesto 1 Scrivi DataEstrazione(es)&" "&Left(NomeRuota(r),2)&" "&_ StringaEstratti(es,r) &" -> "&Format2(a)&"."&Format2(b) Scrivi DataEstrazione(es)&" "&Left(NomeRuota(r1),2)&" "&_ StringaEstratti(es,r1) &" -> "&Format2(c)&"."&Format2(d) ColoreTesto 0 b1=Eval(a&b) : b2=Eval(c&d) : b3=Fuori90(b1+b2) : b4=90-b3 b5=Diametrale(b4) num(1)=d ImpostaGiocata 1,num,ruote,post,x numeri(1)=d : numeri(2)=b3 ImpostaGiocata 2,numeri,ruote,poste,x numeri1(1)=d : numeri1(2)=b4 ImpostaGiocata 3,numeri1,ruote,poste,x numeri2(1)=d : numeri2(2)=b5 ImpostaGiocata 4,numeri2,ruote,poste,x numeri3(1)=d : numeri3(2)=b3 numeri3(3)=b4 : numeri3(4)=b5 ImpostaGiocata 5,numeri3,ruote,posta,x ruot(1)=11:ruot(2)=12 ImpostaGiocata 6,numeri3,ruot,posta,x Gioca es Scrivi String (65,"*") End If Next Next Next Next Next ScriviResoconto End Sub
Sono graditi i vostri voti per aiutare questo Forum a crescere.Grazie!clicca qui
Saluti,sean69!!
|
|