Somma Diabolica Osvaldo Manara

« Older   Newer »
 
  Share  
.
  1.  
    .
    Avatar

    sean69

    Group
    Administrator
    Posts
    5,897
    Location
    Provincia di Roma..

    Status
    Offline
    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!imageclicca qui


    Saluti,sean69!!


    image
     
    Top
    .
0 replies since 13/3/2011, 09:04   2491 views
  Share  
.