Novità

Tabellone ESTRATTI UGUALI isocroni

FABIO60

Super member
'script per spaziometria
'TABELLONE ESTRATTI UGUALI ISOCRONI
Sub Main()
Dim e
Dim a(1)
Dim riga
Dim ru1(1),ru2(1),ru3(1),ru4(1),ru5(1)
Dim ru6(1),ru7(1),ru8(1),ru9(1),ru10(1),ru12(1)
e = EstrazioneFin
Scrivi "Tabellone analitico calcolato all'estrazione del " + DataEstrazione(e)
Scrivi ""
GeneraAnalitico(e)
Scrivi String(163,"-")
For n = TabelloneAnalitico(0,0,0) To 0 Step - 1
Messaggio CStr(n)
riga = FormatSpace(n,3) + " " + SiglaRuota(1) + Space(1)
For r = 1 To 11
If r = 11 Then R = 12
For i = 1 To 5
a(1) = TabelloneAnalitico(n,r,i)
ru1(1) = 1:ru2(1) = 2:ru3(1) = 3:ru4(1) = 4
ru5(1) = 5:ru6(1) = 6:ru7(1) = 7:ru8(1) = 8
ru9(1) = 9:ru10(1) = 10:ru12(1) = 12
sr1 = SerieRitardo(e - 200,e,a,ru1,1)
sr2 = SerieRitardo(e - 200,e,a,ru2,1)
sr3 = SerieRitardo(e - 200,e,a,ru3,1)
sr4 = SerieRitardo(e - 200,e,a,ru4,1)
sr5 = SerieRitardo(e - 200,e,a,ru5,1)
sr6 = SerieRitardo(e - 200,e,a,ru6,1)
sr7 = SerieRitardo(e - 200,e,a,ru7,1)
sr8 = SerieRitardo(e - 200,e,a,ru8,1)
sr9 = SerieRitardo(e - 200,e,a,ru9,1)
sr10 = SerieRitardo(e - 200,e,a,ru10,1)
sr12 = SerieRitardo(e - 200,e,a,ru12,1)
If a(1) > 0 And sr1 = n And r <> ru1(1)_
Or a(1) > 0 And sr2 = n And r <> ru2(1)_
Or a(1) > 0 And sr3 = n And r <> ru3(1)_
Or a(1) > 0 And sr4 = n And r <> ru4(1)_
Or a(1) > 0 And sr5 = n And r <> ru5(1)_
Or a(1) > 0 And sr6 = n And r <> ru6(1)_
Or a(1) > 0 And sr7 = n And r <> ru7(1)_
Or a(1) > 0 And sr8 = n And r <> ru8(1)_
Or a(1) > 0 And sr9 = n And r <> ru9(1)_
Or a(1) > 0 And sr10 = n And r <> ru10(1)_
Or a(1) > 0 And sr12 = n And r <> ru12(1) Then
riga = riga + Format2(TabelloneAnalitico(n,r,i))
Else
riga = riga + Space(2)
End If
Next
rr = r + 1
If rr = 11 Then rr = 12
riga = riga + + Space(1) + SiglaRuota(rr) + Space(1)
Next
Scrivi CStr(riga)
Next
Scrivi String(173,"-")
End Sub


Da notare sulle ruote di NA-PA gli estratti 17.5.43.80



Riguardo la coppia bivalente 80.6 su Ba-CA attualmente a Rc 24

questi i precedenti che hanno superato rc 24 per estratto 4x1

[4043] 26.06.1948 Ba-Pa 60.87 sortito il 06.02.1954 rit => 25
[4229] 19.01.1952 Ba-Pa 25.85 sortito il 30.08.1952 rit => 29
[4365] 28.08.1954 Ba-Na 09.38 sortito il 28.03.1959 rit => 39
[4831] 10.08.1963 Mi-Na 62.63 sortito il 14.12.1968 rit => 29
[4840] 12.10.1963 Ca-Pa 45.25 sortito il 14.08.1965 rit => 27
[5072] 23.03.1968 Ba-Na 03.19 sortito il 18.05.1974 rit => 27
[5120] 22.02.1969 Ba-To 14.11 sortito il 05.09.1970 rit => 27
[5130] 03.05.1969 Ba-To 36.37 sortito il 06.06.1970 rit => 28
[5913] 05.05.1984 Ca-Na 72.64 sortito il 21.06.1986 rit => 26
[5949] 12.01.1985 Ro-Ve 61.50 sortito il 25.06.1988 rit => 28
[6308] 30.11.1991 Na-Pa 35.13 sortito il 19.11.1997 rit => 32
[6500] 05.08.1995 Ba-Ro 86.32 sortito il 09.03.1996 rit => 26
[6688] 11.03.1998 Ge-Na 44.26 sortito il 06.02.1999 rit => 27
[7005] 24.03.2001 Na-To 58.39 sortito il 02.05.2002 rit => 27
[7133] 12.06.2002 Ro-To 39.71 sortito il 12.02.2009 rit => 31
[7589] 02.05.2006 Fi-Ve 52.45 sortito il 11.09.2008 rit => 36
[7663] 21.10.2006 Ca-Ve 13.82 sortito il 01.07.2008 rit => 45
[7757] 29.05.2007 Fi-Ge 34.10 sortito il 12.08.2010 rit => 31
[8444] 18.10.2011 Ba-Ve 10.18 sortito il 27.07.2013 rit => 26
[8508] 15.03.2012 Pa-To 88.03 sortito il 25.03.2014 rit => 34
[8797] 18.01.2014 Ca-Ve 55.48 sortito il 12.02.2015 rit => 28
[9062] 29.09.2015 Na-Pa 08.39 sortito il 03.12.2015 rit => 27
[9311] 02.05.2017 Ba-Ca 86.23 sortito il 05.08.2017 rit => 30


Saluti
 

Ultima estrazione Lotto

  • Estrazione del lotto
    sabato 19 luglio 2025
    Bari
    70
    37
    36
    68
    01
    Cagliari
    57
    02
    64
    33
    41
    Firenze
    18
    62
    09
    05
    06
    Genova
    36
    10
    74
    37
    42
    Milano
    39
    07
    58
    23
    22
    Napoli
    18
    69
    28
    36
    40
    Palermo
    71
    66
    72
    64
    23
    Roma
    19
    64
    39
    77
    10
    Torino
    83
    63
    71
    08
    72
    Venezia
    51
    83
    26
    50
    74
    Nazionale
    89
    81
    63
    32
    03
    Estrazione Simbolotto
    Nazionale
    16
    32
    21
    19
    03
Indietro
Alto