Novità

solo FI alla 3a mese

vivo

Advanced Member >PLATINUM<
per ridurre le spe io consiglio
A - lunghetta con le ambate da sole pr ambo
B le due ambate con un ambo per ambo e terno
ne risultano 1 sestina con le ambate, 4 quartine per ambo e terno
garantisco solo la perdita, i precedenti mesi buoni
 

Allegati

  • photo19025.png
    photo19025.png
    37,5 KB · Visite: 1
  • photo19026.png
    photo19026.png
    34 KB · Visite: 1
Ultima modifica:
Grazie vivo dei tuoi metodi
Grazie anche per le due vincite realizzate sulla ruota di TO 72-10 ambo secco e 22-23 ambo in terzina
 
Se ti riferisci a quello che mi ha dato le vincite è questo:

Tre terzine x ambata ambo e terno su TO - le ruotre sono espresse o a n° o a sigla per farti comprendere come farVi eventuali modifiche
Sub Main()
Dim ruote(2)
Dim numeri1(3) '1a trezina di numeri in gioco
Dim numeri2(3) '2a "
Dim numeri3(3) '3a "
Dim poste(5)
Dim posta(5)
posta(1) = 1
ruote(1) = 9 ' torino
caso = 0
ini = 9436 ' 17/02/2018
For n = ini To EstrazioneFin
If IndiceMensile(n) = 8 Then
caso = caso + 1
Scrivi "------------------------------------------------------------- caso n° " & Format2(caso)
numeri1(1) = Fuori90(DiametraleD(Estratto(n,7,3)) + Estratto(n,10,3) + 28) ' ambata 1° gruppo
numeri1(2) = Fuori90(3*(Estratto(n,2,2)) + Estratto(n,1,1) + 32)
numeri1(3) = Fuori90(ComplAdX(Estratto(n,3,5)) + Estratto(n,7,5) + 9)
ImpostaGiocata 1,numeri1,ruote,posta,9,0
numeri2(1) = Fuori90(DiametraleD(Estratto(n,9,1)) + Estratto(n,NZ_,5) + 1) ' ambata 2° gruppo
numeri2(2) = Fuori90(ComplAdX(Estratto(n,12,4)) + Estratto(n,NA_,2) + 8)
numeri2(3) = Fuori90(ComplAdX(Estratto(n,4,3)) + Estratto(n,NZ_,3) + 23)
ImpostaGiocata 2,numeri2,ruote,posta,9,0
numeri3(1) = Fuori90(ComplAdX(Estratto(n,BA_,1)) + Estratto(n,TO_,3) + 1) ' ambata 3° gruppo
numeri3(2) = Fuori90(ComplAdX(Estratto(n,1,3)) + Estratto(n,TO_,2) + 1)
numeri3(3) = Fuori90(ComplAdX(Estratto(n,1,1)) + Estratto(n,GE_,4) + 1)
ColoreTesto 1
Scrivi DataEstrazione(n) & " numeri 1a giocata " & numeri1(1) & "." & numeri1(2) & "." & numeri1(3)
Scrivi DataEstrazione(n) & " numeri 2a giocata " & numeri2(1) & "." & numeri2(2) & "." & numeri2(3)
Scrivi DataEstrazione(n) & " numeri 3a giocata " & numeri3(1) & "." & numeri3(2) & "." & numeri3(3)
ColoreTesto 0
ImpostaGiocata 3,numeri3,ruote,posta,13,0
Gioca n,True,,1'con ",True" vengono elencate per tutti i casi solo le estrazioni che sono positive
End If
Next
ScriviResoconto
End Sub
 
Acc....Solare nel primo post mi sei parsa un po....stizzita ma poi hai rimediato alla grande dandomi il metodo con lo script,i.Semplicemente , grazie.


[IMG2=JSON]{"data-align":"none","data-size":"full","src":"https:\/\/www.giorgiomontanari.com\/wp-content\/uploads\/2008\/12\/cat_127.jpg"}[/IMG2]
 
Ultima modifica:
come ti ho detto altre volte bisogna avere pazienza Alien, per il tutto e subito c'è già il McDonalds, inutile poi dire che vi faccio spendere un capitale
vi assucuro sempre l perdita, poi non piangere su latte versato. Complimenti Solero
 

Ultima estrazione Lotto

  • Estrazione del lotto
    sabato 01 agosto 2026
    Bari
    46
    54
    36
    47
    01
    Cagliari
    77
    30
    04
    79
    18
    Firenze
    84
    76
    10
    27
    44
    Genova
    32
    13
    71
    38
    46
    Milano
    10
    23
    18
    20
    03
    Napoli
    73
    36
    10
    90
    07
    Palermo
    61
    46
    24
    57
    32
    Roma
    89
    78
    23
    07
    35
    Torino
    21
    59
    34
    73
    86
    Venezia
    74
    01
    30
    46
    54
    Nazionale
    71
    65
    17
    09
    20
    Estrazione Simbolotto
    Nazionale
    03
    09
    37
    30
    39
Indietro
Alto