Novità

Bangkok....


41//43 Ambo Spaccanoci il mio obbiettivo...Milano...

18//57 .... Milano ...

Vedendo mirando ... queste palline ... svolazzanti dè quà e dè là....

mirando Genova... 72-73-74 e mirando Milano... numero mancante 75....

Genova 75... 64.. ? vertibile del 46 ?

Milano 75//64 ... Ambo ...

Gioco Aperto .. per estrazione del 28-09-2023...
 
Option Explicit

Sub Main
Dim Nu(4),Ru(1),T,V
Dim Sorte, eIni, eFin, eTot, LivArch
Dim Rit, Max, Incr, Fre
Dim a, b, c, d, k, r
Dim ic, id

Sorte = 1
eIni = EstrazioneFin-100
eFin = EstrazioneFin
eTot = eFin - eIni + 1

T = Array(T,"Ruota","Quartina a coesione Matematica","Ritardo","Storico","Incr","Freq","Indice Convenienza"," LivArch")
Call InitTabella(T)

For LivArch = 0 To 0 ' cambiando il parametri si ottiene la statisticha su uno o più archivi

For r = 1 To 12 : If r = 11 Then r = 12
For a = 1 To 22
k = k + 1
b = 46 - a
c = a+b+k-1
d = 90 - k + 1
Nu(1) = a : Nu(2) = b : Nu(3) = c : Nu (4)= d : Ru(1) = r

Call StatisticaFormazione(Nu,Ru, Sorte,Rit,Max,Incr,Fre,eIni,eFin,LivArch)

ic = Round((Fre/eTot*Rit),2)
Call Messaggio("Elaboro Ruote . . . . " & NomeRuota(r))
Call AvanzamentoElab(1,12,r)
V = Array(V,NomeRuota(r),StringaNumeri(Nu,,1),Rit,Max,Incr,Fre,ic,LivArch)
Call AddRigaTabella(V)
Next
k=0
Next
Next
Call CreaTabellaOrdinabile(3)

End Sub
 
Devi accedere o registrarti per poter rispondere.

Ultima estrazione Lotto

  • Estrazione del lotto
    giovedì 03 settembre 2026
    Bari
    73
    60
    38
    83
    26
    Cagliari
    28
    59
    51
    08
    88
    Firenze
    62
    26
    54
    05
    81
    Genova
    62
    08
    53
    77
    79
    Milano
    06
    54
    16
    09
    40
    Napoli
    09
    32
    15
    29
    80
    Palermo
    83
    76
    46
    49
    82
    Roma
    80
    16
    31
    08
    88
    Torino
    77
    40
    02
    74
    59
    Venezia
    81
    30
    15
    80
    12
    Nazionale
    34
    72
    90
    87
    83
    Estrazione Simbolotto
    Palermo
    17
    07
    15
    26
    01
    Archivio estrazioni lotto Ritardi top 15 Frequenze top 15

Ultimi Messaggi

Indietro
Alto