Novità

TERNO UGUALEb

Tizi

Super Member >PLATINUM<
Buonasera, è uscito un terno uguale su ruote consecutive, qualcuno ha un metodo interessante da applicare ?

Grazieee
 
Buonasera, è uscito un terno uguale su ruote consecutive, qualcuno ha un metodo interessante da applicare ?

Grazieee
vedi se ti puo interessare questa di 3 numeri in 2 ruote

FIRENZE-GENOVA spie 34.77.90

Capigioco : 90 - (presenze : 254 su 274 (93%) - frequenza : 571 - [571])

Terzina scelta per ambo : 7.37.83 (227)

Quartina scelta per ambo : 21.31.32.56 (433)


Concorso n° 10947 del 22/10/2026-169- Ruote : Firenze-Genova Ambata : 90 Formazione : 90
Previsione in Corso (valida ancora per 13 estrazioni).


non metto la statistica altrimenti è troppo lunga ma se vuoi che la metto basta dirlo ;)
 
Ciao Tizi,

ho impostato uno script.

Sub Main()

Dim Ini, Fin, Es, E2, Colpo
Dim R, P, N, I, J
Dim Comuni(90), Frequenze(90)
Dim NumComuni, TotCasi
Dim Temp, MaxFreq, NumMax
Dim Trovato

Ini = 8272
Fin = EstrazioneFin

TotCasi = 0

For N = 1 To 90
Frequenze(N) = 0
Next

Scrivi "STUDIO FIRENZE - GENOVA"
Scrivi "Condizione: almeno 3 numeri uguali"
Scrivi "Estrazione iniziale: " & Ini
Scrivi "Periodo successivo: 9 estrazioni"
Scrivi "--------------------------------"

For Es = Ini To Fin

AvanzamentoElab Ini,Fin,Es

NumComuni = 0

For N = 1 To 90

Trovato = 0

For P = 1 To 5
If Estratto(Es,3,P) = N Then
Trovato = Trovato + 1
End If
If Estratto(Es,4,P) = N Then
Trovato = Trovato + 1
End If
Next

If Trovato = 2 Then
NumComuni = NumComuni + 1
Comuni(NumComuni) = N
End If

Next

If NumComuni >= 3 Then

TotCasi = TotCasi + 1

Scrivi ""
Scrivi "CASO N. " & TotCasi
Scrivi "Estrazione: " & Es

Dim RigaNumeri
RigaNumeri = "Numeri comuni: "

For I = 1 To NumComuni
RigaNumeri = RigaNumeri & Comuni(I) & " "
Next

Scrivi RigaNumeri

For Colpo = 1 To 9

E2 = Es + Colpo

If E2 <= Fin Then

For R = 3 To 4
For P = 1 To 5

N = Estratto(E2,R,P)
Frequenze(N) = Frequenze(N) + 1

Next
Next

End If

Next

End If

Next

Scrivi ""
Scrivi "================================"
Scrivi "RESOCONTO FINALE"
Scrivi "================================"
Scrivi "Totale condizioni: " & TotCasi
Scrivi ""
Scrivi "FREQUENZE NUMERI 1-90"
Scrivi "Nelle 9 estrazioni successive"
Scrivi "Ruote: Firenze e Genova"
Scrivi ""

For I = 1 To 90

MaxFreq = -1
NumMax = 0

For N = 1 To 90
If Frequenze(N) > MaxFreq Then
MaxFreq = Frequenze(N)
NumMax = N
End If
Next

If MaxFreq > 0 Then
Scrivi NumMax & " - Frequenza: " & MaxFreq
End If

Frequenze(NumMax) = -1

Next

End Sub

L'inizio è dall'estrazione 8272 che corrisponde all'11/09/2010.
Calcola i numeri più frequenti dopo l'uscita di un terno uguale su Fi-Ge.
 

Ultima estrazione Lotto

  • Estrazione del lotto
    sabato 31 ottobre 2026
    Bari
    15
    60
    11
    81
    74
    Cagliari
    24
    40
    55
    20
    09
    Firenze
    63
    14
    53
    68
    73
    Genova
    55
    16
    90
    39
    58
    Milano
    19
    72
    51
    41
    39
    Napoli
    09
    17
    13
    70
    47
    Palermo
    41
    17
    54
    38
    20
    Roma
    47
    81
    19
    75
    52
    Torino
    74
    20
    44
    67
    55
    Venezia
    04
    44
    50
    03
    58
    Nazionale
    90
    09
    57
    02
    28
    Estrazione Simbolotto
    32
    15
    35
    11
    01

Ultimi Messaggi

Indietro
Alto