Novità

CAFIGE in 13 mesi 17 ambi e 2 terni (in quartina)

Giulio Pedrinelli

Super Member >PLATINUM<
Ciao a tutti;

Questo mio metodo mette in gioco su Cagliari, Firenze e Genova una quartina per ambo e terno, periodo di gioco 9 estrazioni, alla 1° estrazione.

Inizio Ricerca: 03/09/2024
Fine Ricerca: 27/09/2025

1° N. quartina: 2° GE + 5
2° N. quartina: 5° CA + 85
3° N. quartina: 4° NA + 7
4° N. quartina: 3° TO + 29

Lo script è impostato per interrompere la giocata al 1° esito vincente, anche se potrebbero esserci altre uscite di ambo e/o terno dopo.
Entro la 5° estrazione il 76,9% ed il 23,1% dalla 6° estrazione in poi.

Qui di seguito lo script.

Sub main()
Dim rt(3),pt(4),n1(7)

pt(1)=0
pt(2)=1
pt(3)=1
pt(4)=0

clp=9
rt(1)=2
rt(2)=3
rt(3)=4


ini=10502
fin=EstrazioneFin
co=0
For es=ini To fin
Messaggio (es)
If Indicemensile (es)=1 Then
casi=casi+1
Scrivi String(60,"=")&" Caso n° "&casi,1
co=co+1
a=Estratto (es,4,2) + 5
b=Estratto (es,2,5) + 85
c=Estratto (es,6,4) + 7
d=Estratto (es,9,3) + 29
n1(1)=Fuori90 (a+0)
n1(2)=Fuori90 (b+0)
n1(3)=Fuori90 (c+0)
n1(4)=Fuori90 (d+0)
ImpostaGiocata 1,n1,rt,pt,clp,2

Gioca es
End If
Next
Scrivi : Scrivi "Casi Rilevati "& CInt (co)
ScriviResoconto

End Sub
 
Ciao a tutti;

Questo mio metodo mette in gioco su Cagliari, Firenze e Genova una quartina per ambo e terno, periodo di gioco 9 estrazioni, alla 1° estrazione.

Inizio Ricerca: 03/09/2024
Fine Ricerca: 27/09/2025

1° N. quartina: 2° GE + 5
2° N. quartina: 5° CA + 85
3° N. quartina: 4° NA + 7
4° N. quartina: 3° TO + 29

Lo script è impostato per interrompere la giocata al 1° esito vincente, anche se potrebbero esserci altre uscite di ambo e/o terno dopo.
Entro la 5° estrazione il 76,9% ed il 23,1% dalla 6° estrazione in poi.

Qui di seguito lo script.

Sub main()
Dim rt(3),pt(4),n1(7)

pt(1)=0
pt(2)=1
pt(3)=1
pt(4)=0

clp=9
rt(1)=2
rt(2)=3
rt(3)=4


ini=10502
fin=EstrazioneFin
co=0
For es=ini To fin
Messaggio (es)
If Indicemensile (es)=1 Then
casi=casi+1
Scrivi String(60,"=")&" Caso n° "&casi,1
co=co+1
a=Estratto (es,4,2) + 5
b=Estratto (es,2,5) + 85
c=Estratto (es,6,4) + 7
d=Estratto (es,9,3) + 29
n1(1)=Fuori90 (a+0)
n1(2)=Fuori90 (b+0)
n1(3)=Fuori90 (c+0)
n1(4)=Fuori90 (d+0)
ImpostaGiocata 1,n1,rt,pt,clp,2

Gioca es
End If
Next
Scrivi : Scrivi "Casi Rilevati "& CInt (co)
ScriviResoconto

End Sub
bravo ottimo metodo
 
Ciao a tutti;

Questo mio metodo mette in gioco su Cagliari, Firenze e Genova una quartina per ambo e terno, periodo di gioco 9 estrazioni, alla 1° estrazione.

Inizio Ricerca: 03/09/2024
Fine Ricerca: 27/09/2025

1° N. quartina: 2° GE + 5
2° N. quartina: 5° CA + 85
3° N. quartina: 4° NA + 7
4° N. quartina: 3° TO + 29

Lo script è impostato per interrompere la giocata al 1° esito vincente, anche se potrebbero esserci altre uscite di ambo e/o terno dopo.
Entro la 5° estrazione il 76,9% ed il 23,1% dalla 6° estrazione in poi.

Qui di seguito lo script.

Sub main()
Dim rt(3),pt(4),n1(7)

pt(1)=0
pt(2)=1
pt(3)=1
pt(4)=0

clp=9
rt(1)=2
rt(2)=3
rt(3)=4


ini=10502
fin=EstrazioneFin
co=0
For es=ini To fin
Messaggio (es)
If Indicemensile (es)=1 Then
casi=casi+1
Scrivi String(60,"=")&" Caso n° "&casi,1
co=co+1
a=Estratto (es,4,2) + 5
b=Estratto (es,2,5) + 85
c=Estratto (es,6,4) + 7
d=Estratto (es,9,3) + 29
n1(1)=Fuori90 (a+0)
n1(2)=Fuori90 (b+0)
n1(3)=Fuori90 (c+0)
n1(4)=Fuori90 (d+0)
ImpostaGiocata 1,n1,rt,pt,clp,2

Gioca es
End If
Next
Scrivi : Scrivi "Casi Rilevati "& CInt (co)
ScriviResoconto

End Sub
Ciao Giulio, ho provato a far girare su spaziometria questo tuo script ma il programma mi risponde che c'è un errore di run time 500: riga 9 non definita "clp=9"....come posso risolverlo? grazie Enrico
 
Ciao Giulio, ho provato a far girare su spaziometria questo tuo script ma il programma mi risponde che c'è un errore di run time 500: riga 9 non definita "clp=9"....come posso risolverlo? grazie Enrico

enry@62 a me funziona.

Complimenti a Giulio Pedrinelli: ottimo listato con ottimi risultati ! 👏👏

Lo proverò a novembre 🤞
 
Ciao Antondavide,

la previsione elaborata alla 1° estrazione di ottobre era la seguente:

49.84.42.04

Che è andata a segno alla 7° estrazione con gli ambi 49-04 su Fi e 49-84 su Ge.
 
Ciao Giulio, ho provato a far girare su spaziometria questo tuo script ma il programma mi risponde che c'è un errore di run time 500: riga 9 non definita "clp=9"....come posso risolverlo? grazie Enrico
Ciao. Togli Option Explicit che ti mette spaziometria di default...
 

Ultima estrazione Lotto

  • Estrazione del lotto
    sabato 25 ottobre 2025
    Bari
    68
    58
    45
    69
    51
    Cagliari
    31
    24
    11
    47
    87
    Firenze
    80
    18
    17
    60
    53
    Genova
    64
    54
    09
    48
    38
    Milano
    34
    29
    12
    63
    39
    Napoli
    79
    75
    44
    69
    43
    Palermo
    28
    75
    85
    22
    47
    Roma
    21
    39
    55
    43
    88
    Torino
    09
    40
    76
    84
    16
    Venezia
    26
    36
    52
    66
    25
    Nazionale
    22
    38
    88
    65
    40
    Estrazione Simbolotto
    34
    26
    09
    31
    04
Indietro
Alto