Novità

METODO SOMMA ruota Cagliari Aggiornato.

Imaging

Advanced Member >PLATINUM<
Personalmente io non lo so comporre, non conosco il linguaggio informatico per le Script (Spaziometria o L8+ LottoDesk ecc..) ti accontenterei volentieri .... buona serata.
Ringrazio moltissimo a: GioRyuKen72 e Lotto_tom75 ecco il listatato gabby
Sub Main
' https://forum.lottoced.com/threads/metodo-somma-ruota-cagliari-aggiornato.2199020/
ColoreTesto 0
Scrivi " Metodo SOMMA15 di IMAGING -- listato GioRyuKen72 ",1,,2,5
Scrivi "https://forum.lottoced.com/threads/metodo-somma-ruota-cagliari-aggiornato.2199020/",1
Scrivi
ColoreTesto 0
Dim R1,ruo(3),RuoABT(1),Nn(2),E1,E2,P1,P2,P5,P6,a,b,Cap,Abb1,Abb2
Dim Terzina1(3),ambo1(2),ambo2(2),PostaA(2),PostaABT(1),PostaT(3),ambata1(2)
Dim Somma15,To1,Pa4,Fi3,Ba5
ex = CInt(InputBox("Quante estrazioni controllo?","Estrazioni",50))
ini = EstrazioneFin - ex
fin = EstrazioneFin
For es = ini To fin
Messaggio es
For R1 = 2 To 2
If R1 = 11 Then r2 = 12
For P1 = 1 To 4 : For P2 = P1 + 1 To 5
a = Estratto(es,R1,P1) : b = Estratto(es,R1,P2)
Nn(1) = a
Nn(2) = b
Somma15 = Fuori90(Nn(1) + Nn(2))
To1 = Estratto(es,TO_,1)
Pa4 = Estratto(es,PA_,4)
Fi3 = Estratto(es,FI_,3)
Ba5 = Estratto(es,BA_,5)
'______________________________________
If Somma15 = 15 Then
Cap = Fuori90((90 + To1) - 83)
Abb1 = Fuori90(Pa4*Ba5)
Abb2 = Fuori90(Fi3*Pa4)
If Abb1 = Cap Then Abb1 = Abb1 + 1
If Abb2 = Cap Then Abb2 = Abb2 + 1
If Abb2 = Abb1 Then Abb2 = Abb2 + 1
RuoABT(1) = R1
ruo(1) = R1
ruo(2) = TT_
'ruo(3) = NZ_
PostaABT(1) = 1
PostaA(2) = 1
PostaT(2) = 0.8
PostaT(3) = 0.2
k = 17
ambata1(1) = Cap
ImpostaGiocata 1,ambata1,RuoABT,PostaABT,k,1
ambo1(1) = Cap
ambo1(2) = Abb1
ImpostaGiocata 2,ambo1,ruo,PostaA,k
ambo2(1) = Cap
ambo2(2) = Abb2
ImpostaGiocata 3,ambo2,ruo,PostaA,k
Terzina1(1) = Cap
Terzina1(2) = Abb1
Terzina1(3) = Abb2
ImpostaGiocata 4,Terzina1,ruo,PostaT,k,3
caso = 0
casi = casi + 1
Scrivi String(89,"*") & " Casi Totali " & FormattaStringa(Casi,"0000"),1,,,2
Scrivi String(80,"*") & " Estrazione " &(Es) & " caso " & FormattaStringa(Caso,"0000"),1,,,1
Scrivi("Estrazione n." & Format2(Es) & " del " & DataEstrazione(Es)),1,0
Scrivi " " & SiglaRuota(R1) & " ",1,0
For P5 = 1 To 5
E1 = Estratto(Es,R1,P5)
If E1 = Nn(1) Or E1 = Nn(2) Then
ColoreTesto 2
Else
ColoreTesto 0
End If
Scrivi Format2(E1) & " ",1,0
ColoreTesto 0
Next
Scrivi
Scrivi String(70,"-"),1
ColoreTesto 1
Scrivi "CONDIZIONE RILEVATA: " & Format2(Nn(1)) & " + " & Format2(Nn(2)) & " = " & Format2(Somma15),1,0
ColoreTesto 0
Scrivi
Scrivi String(70,"-"),1
Scrivi "Capigioco : " & Format2(Cap),1
Scrivi "Abbinamenti: " & Format2(Abb1) & " e " & Format2(Abb2),1
ColoreTesto 0 : Scrivi String(70,"-"),1
Scrivi
Gioca es,True,,1
End If
Next
Next
Next
'Next
'End If
If ScriptInterrotto Then Exit For
Next
Scrivi
Scrivi "Casi totali (" & casi & ")",1
TestoInBandaPassante " ***** Metodo SOMMA15 di IMAGING -- listato GioRyuKen72 ***** ",1,3,0
ScriviDistribuzioneEsiti(True)
ScriviDistribuzioneCasiInCorso(True)
ScriviResoconto
End Sub
 

kira

Premium Member
0
 

kira

Premium Member
condizione di gioco: sortita ambo di somma 83
Ruota/e di ricerca condizione: Ca
Ruota/e di Gioco: Ca
 

Imaging

Advanced Member >PLATINUM<
Puoi seguire La previsione del metodo somma 15 o seguire quella con somma 83 sempre a cagliari😉👋

tua risposta a NEM lunedi post nr48
Per Kira , si può seguire la previsione somma 15 la prima... la seconda si è sfaldata con l'uscita dell'ambo e l'ambata, si può seguire ancora il metodo somma 38 e si può seguire Firenze effetti speciali esclusa la previsione che ho postato la bolletta di vincita... in bocca al lupo....
 

Ultima estrazione Lotto

  • Estrazione del lotto
    venerdì 19 aprile 2024
    Bari
    39
    05
    81
    89
    73
    Cagliari
    56
    21
    01
    90
    03
    Firenze
    05
    56
    68
    27
    09
    Genova
    42
    50
    90
    27
    83
    Milano
    16
    71
    29
    85
    04
    Napoli
    29
    19
    23
    63
    50
    Palermo
    35
    54
    33
    57
    61
    Roma
    17
    29
    43
    55
    74
    Torino
    69
    60
    03
    01
    26
    Venezia
    05
    57
    59
    43
    34
    Nazionale
    30
    43
    64
    65
    21
    Estrazione Simbolotto
    Genova
    02
    20
    25
    12
    19
Alto