Novità

Script biambo

Evidentemente non l'ho trascritto sul forum, dato che lo script ( quello che uso nell'altro programma) lo riporta
34.53;37.39 Sto: 48 At: 12

'Script usato per i risultati definitivi - Cinzia
Option Explicit
Sub main()

Dim ambi(4005,2)
Dim biambo(2,2)
Dim ru(2)
Dim so
Dim i,j,c,rt,st

ru(1)=11
ru(2)=12
so=2

For i= 34 To 89
For j= i+1 To 90
c=c+1
ambi(c,1)=i
ambi(c,2)=j
Next
Next

For i=19 To 4004 ' cambiare 1 con un numero superiore
biambo(1,1)=ambi(i,1)
biambo(2,1)=ambi(i,2)
For j=i+1 To 4005'i
biambo(1,2)=ambi(j,1)
biambo(2,2)=ambi(j,2)
rt=SerieRitardo (EstrazioneFin-51 , EstrazioneFin,biambo,ru,so)
If rt<14 Then 'imposta il ritardo attuale
st=SerieStorico (7440, EstrazioneFin,biambo,ru,so)
If st<160 Then 'imposta il ritardo storico

Scrivi CStr(biambo(1,1)) & "." & CStr(biambo(2,1)) & ";" & _
CStr(biambo(1,2)) & "." & CStr(biambo(2,2)) & vbtab & " Sto:" & _
FormatSpace(st,4,1)& " At:" &(FormatSpace(rt,4,1))
End If
End If



Next
Next

End Sub
 
Ottimo Edesimone
Manca dalla 15 alla 20 e poi abbiamo finito.


01.0551.81Att3Sto45
01.0906.89Att3Sto47
01.2231.52Att37Sto47
01.2245.74Att28Sto49
01.2247.55Att37Sto49
01.2264.74Att20Sto49
02.0808.42Att43Sto48
03.6931.67Att38Sto45
04.4606.89Att3Sto49
04.5106.89Att3Sto49
04.5122.30Att1Sto46
04.5122.47Att6Sto49
04.6106.89Att3Sto46
06.1708.61Att9Sto47
06.3063.80Att15Sto48
06.5726.30Att8Sto49
06.7710.13Att27Sto48
06.8454.65Att0Sto49
06.8915.34Att3Sto49
06.8927.66Att3Sto49
06.8933.36Att3Sto48
06.8936.74Att3Sto49
06.8940.82Att3Sto48
07.4838.61Att2Sto48
08.1848.67Att9Sto49
08.6209.56Att10Sto47
08.6320.51Att8Sto49
08.8557.80Att1Sto48
09.4575.82Att11Sto49
10.1361.69Att22Sto48
10.1382.86Att27Sto48
10.3475.82Att11Sto49
10.4464.78Att35Sto49
10.7033.36Att11Sto49
da inizio matrice fino "i" = 845
da "i" 2176 a fine matrice
0014118 Ambo 11.16 32.76 RitATT 005 RitSTO 047 Pre 169

0053865 Ambo 11.29 15.21 RitATT 001 RitSTO 049 Pre 173

0357034 Ambo 12.49 16.51 RitATT 028 RitSTO 049 Pre 155

0396934 Ambo 12.62 22.47 RitATT 006 RitSTO 048 Pre 193
Ambo 13.47 43.51 RitATT 021 RitSTO 049 Pre 195
Ambo 13.47 61.69 RitATT 021 RitSTO 045 Pre 198
Ambo 14.29 75.82 RitATT 007 RitSTO 049 Pre 169
Ambo 14.63 74.90 RitATT 000 RitSTO 049 Pre 176
Ambo 14.85 70.80 RitATT 000 RitSTO 049 Pre 171
Manca dalla 15 alla 20
0390077 Ambo 23.54 36.74 RitATT 020 RitSTO 049 Pre 153
0576391 Ambo 24.72 65.79 RitATT 031 RitSTO 046 Pre 185
0749526 Ambo 25.89 42.79 RitATT 018 RitSTO 048 Pre 192
0093714 Ambo 26.71 47.62 RitATT 032 RitSTO 048 Pre 172
0094153 Ambo 26.71 59.63 RitATT 014 RitSTO 049 Pre 178
0002094 Ambo 29.31 32.58 RitATT 013 RitSTO 049 Pre 167
0039119 Ambo 29.50 63.80 RitATT 024 RitSTO 049 Pre 175
0050647 Ambo 29.56 82.86 RitATT 035 RitSTO 049 Pre 193
0105003 Ambo 29.86 42.87 RitATT 005 RitSTO 049 Pre 172
30.5944.63Att2Sto47
30.8763.80Att15Sto49
31.7734.53Att11Sto44
31.9079.86Att15Sto49
32.5765.83Att1Sto49
32.7957.80Att1Sto49
33.3843.50Att25Sto49
33.3868.81Att28Sto49
34.5337.39Att11Sto44
37.4139.55Att15Sto48
37.4743.87Att23Sto49
37.4948.67Att9Sto49
37.7345.74Att7Sto48
38.6582.86Att2Sto49
39.7459.61Att2Sto49
42.7785.88Att4Sto48
47.5473.89Att3Sto49
54.8480.82Att10Sto49
60.8873.89Att8Sto48
73.8785.88Att8Sto49
 
Ciao Cinzia,
per non creare confusione, apro un altro post con i dati seguendo i miei parametri, se a qualcuno interessano, ciao
Matteo
 
Ciao
NON SI GARANTISCE CHE I DATI SIANO ESATTI :(
Codice: 
Non si garantisce che i dati siano esatti
Archivio 7440,10225
Come filtro Rmax ho inserito 50 compreso
id;Ambo1;Ambo2;Rmax;Rc
1; 01.05 ; 51.81 ;45;3
2; 01.09 ; 06.89 ;47;3
3; 01.09 ; 63.80 ;50;5
4; 01.22 ; 29.66 ;50;37
5; 01.22 ; 31.52 ;47;37
6; 01.22 ; 45.74 ;49;28
7; 01.22 ; 47.55 ;49;37
8; 01.22 ; 64.74 ;49;20
9; 01.67 ; 27.33 ;50;0
10; 01.88 ; 88.90 ;50;40
11; 02.08 ; 08.42 ;48;43
12; 02.11 ; 07.50 ;50;32
13; 03.69 ; 31.67 ;45;38
14; 03.69 ; 33.46 ;50;45
15; 04.46 ; 06.89 ;49;3
16; 04.51 ; 06.89 ;49;3
17; 04.51 ; 22.30 ;46;1
18; 04.51 ; 22.47 ;49;6
19; 04.51 ; 41.58 ;50;32
20; 04.51 ; 85.88 ;50;34
21; 04.59 ; 53.68 ;50;11
22; 04.61 ; 06.89 ;46;3
23; 04.61 ; 12.39 ;50;7
24; 05.43 ; 56.61 ;50;15
25; 05.56 ; 20.82 ;50;11
26; 05.57 ; 49.58 ;50;12
27; 06.17 ; 08.61 ;47;9
28; 06.30 ; 63.80 ;48;15
29; 06.57 ; 11.58 ;50;8
30; 06.57 ; 26.30 ;49;8
31; 06.74 ; 37.90 ;50;0
32; 06.77 ; 10.13 ;48;27
33; 06.84 ; 09.78 ;50;0
34; 06.84 ; 54.65 ;49;0
35; 06.84 ; 72.88 ;50;0
36; 06.89 ; 08.84 ;50;3
37; 06.89 ; 11.76 ;50;3
38; 06.89 ; 15.34 ;49;3
39; 06.89 ; 19.27 ;50;3
40; 06.89 ; 21.65 ;50;3
41; 06.89 ; 27.66 ;49;3
42; 06.89 ; 33.36 ;48;3
43; 06.89 ; 36.74 ;49;3
44; 06.89 ; 40.82 ;48;3
45; 06.89 ; 56.68 ;50;1
46; 06.89 ; 66.73 ;50;3
47; 06.90 ; 45.76 ;50;19
48; 07.20 ; 71.86 ;50;7
49; 07.48 ; 38.61 ;48;2
50; 07.53 ; 28.31 ;50;17
51; 07.55 ; 32.75 ;50;33
52; 08.18 ; 48.67 ;49;9
53; 08.42 ; 30.77 ;50;43
54; 08.51 ; 26.85 ;50;5
55; 08.62 ; 09.56 ;47;10
56; 08.63 ; 20.51 ;49;8
57; 08.85 ; 57.80 ;48;1
58; 09.15 ; 16.19 ;50;3
59; 09.45 ; 75.82 ;49;11
60; 10.11 ; 10.13 ;50;2
61; 10.13 ; 20.80 ;50;27
62; 10.13 ; 61.69 ;48;22
63; 10.13 ; 68.81 ;50;27
64; 10.13 ; 82.86 ;48;27
65; 10.34 ; 75.82 ;49;11
66; 10.44 ; 64.78 ;49;35
67; 10.70 ; 33.36 ;49;11
68; 11.16 ; 32.76 ;47;5
69; 11.29 ; 15.21 ;49;1
70; 11.29 ; 64.74 ;50;1
71; 11.33 ; 42.45 ;50;27
72; 11.58 ; 41.90 ;50;27
73; 11.58 ; 73.89 ;50;27
74; 11.61 ; 30.42 ;50;2
75; 12.49 ; 16.51 ;49;28
76; 12.56 ; 58.76 ;50;25
77; 12.62 ; 22.47 ;48;6
78; 12.62 ; 27.33 ;50;17
79; 12.62 ; 44.73 ;50;7
80; 12.68 ; 42.60 ;50;16
81; 12.80 ; 73.89 ;50;18
82; 13.20 ; 43.73 ;50;1
83; 13.44 ; 25.36 ;50;11
84; 13.47 ; 15.61 ;50;8
85; 13.47 ; 22.39 ;50;2
86; 13.47 ; 43.51 ;49;21
87; 13.47 ; 61.69 ;45;21
88; 13.48 ; 34.70 ;50;8
89; 14.22 ; 65.79 ;50;27
90; 14.29 ; 75.82 ;49;11
91; 14.63 ; 74.90 ;49;0
92; 14.80 ; 49.90 ;50;30
93; 14.85 ; 70.80 ;49;0
94; 15.59 ; 32.74 ;50;1
95; 15.81 ; 31.77 ;50;9
96; 15.82 ; 37.41 ;49;14
97; 15.82 ; 81.90 ;50;14
98; 16.68 ; 51.81 ;49;21
99; 17.20 ; 51.78 ;50;2
100; 17.22 ; 29.34 ;47;33
101; 17.56 ; 37.42 ;50;4
102; 18.25 ; 29.59 ;50;5
103; 18.45 ; 23.76 ;50;13
104; 18.52 ; 43.73 ;48;1
105; 18.52 ; 67.69 ;50;7
106; 19.24 ; 72.89 ;50;28
107; 20.39 ; 33.48 ;49;2
108; 20.45 ; 58.68 ;50;9
109; 20.51 ; 42.60 ;47;16
110; 20.51 ; 63.80 ;48;37
111; 20.54 ; 30.85 ;49;10
112; 20.55 ; 30.33 ;50;26
113; 20.55 ; 58.90 ;49;5
114; 20.65 ; 33.78 ;50;13
115; 20.81 ; 65.69 ;49;2
116; 20.82 ; 48.68 ;50;3
117; 21.47 ; 71.86 ;50;8
118; 21.81 ; 37.90 ;50;41
119; 22.47 ; 65.84 ;50;6
120; 22.49 ; 76.81 ;50;6
121; 23.45 ; 35.39 ;50;1
122; 23.54 ; 36.74 ;49;20
123; 24.72 ; 65.79 ;46;31
124; 24.88 ; 31.62 ;50;17
125; 25.33 ; 37.90 ;50;29
126; 25.33 ; 59.79 ;50;29
127; 25.84 ; 43.90 ;50;34
128; 25.89 ; 42.79 ;48;18
129; 26.48 ; 66.81 ;50;5
130; 26.60 ; 41.45 ;50;44
131; 26.71 ; 47.62 ;48;32
132; 26.71 ; 59.63 ;49;14
133; 26.85 ; 45.74 ;50;5
134; 28.67 ; 80.82 ;50;32
135; 29.31 ; 32.58 ;49;13
136; 29.50 ; 63.80 ;49;24
137; 29.56 ; 82.86 ;49;35
138; 29.62 ; 44.69 ;50;17
139; 29.86 ; 42.87 ;49;5
140; 30.33 ; 79.89 ;50;26
141; 30.59 ; 44.63 ;47;2
142; 30.77 ; 73.90 ;50;1
143; 30.87 ; 63.80 ;49;15
144; 31.34 ; 41.90 ;50;2
145; 31.34 ; 57.80 ;50;1
146; 31.77 ; 34.53 ;44;11
147; 31.90 ; 79.86 ;49;15
148; 32.57 ; 65.83 ;49;1
149; 32.79 ; 57.80 ;49;1
150; 33.36 ; 78.87 ;50;11
151; 33.38 ; 43.50 ;49;25
152; 33.38 ; 68.81 ;49;28
153; 34.53 ; 37.39 ;48;11
154; 35.37 ; 59.69 ;50;1
155; 37.41 ; 39.55 ;48;15
156; 37.47 ; 43.87 ;49;23
157; 37.49 ; 48.67 ;49;9
158; 37.73 ; 45.74 ;48;7
159; 38.65 ; 82.86 ;49;2
160; 39.74 ; 59.61 ;49;2
161; 40.77 ; 46.51 ;50;19
162; 42.77 ; 85.88 ;48;4
163; 45.51 ; 76.77 ;50;4
164; 47.51 ; 48.81 ;50;41
165; 47.54 ; 73.89 ;49;3
166; 47.78 ; 73.89 ;50;22
167; 47.82 ; 53.68 ;50;3
168; 48.67 ; 76.81 ;50;10
169; 49.68 ; 57.80 ;50;0
170; 54.84 ; 80.82 ;49;10
171; 57.65 ; 82.83 ;50;13
172; 57.80 ; 65.89 ;50;1
173; 58.90 ; 82.86 ;50;5
174; 60.88 ; 73.89 ;48;8
175; 61.69 ; 80.82 ;50;22
176; 73.87 ; 85.88 ;49;8

Solo per confronto dati
ho impiegato 3 ore ma se qualcuno ha un i7 recente ( senza scomodare super pc quantistici) dovrebbe essere molto piu veloce .

ovviamente è una routine ad Hoc .
un abito cucito su questa ricerca.
se i risultati sono esatti tutti sarebbe grandioso ;)


io ho trovato questi risultati Ma bisogna controllare non so se sono esatti
 
Fatto, Ilegend, i risultati collimano esattamente con la tabella, devi solo depennare i biambi con st 50, dato che tutta
la ricerca si basa sullo storico <50.
Anche gli attuali corrispondono, tranne il 14.29/75.82 che attualmente è 12, da te 11. nella tabella 7.
Ma è l'unico.
Resta da aspettare Edesimone per fare il confronto con 15-20.

Se non sono indiscreta
è più veloce la tua routine? Hai avuto tutti i risultati insieme o giorno per giorno?
Complimenti comunque!
 
Cinzia27 Risultato finale 15-20
0187245 Ambo 15.82 37.41 RitATT 014 RitSTO 049 Pre 194
0353072 Ambo 16.68 51.81 RitATT 021 RitSTO 049 Pre 167
0425079 Ambo 17.22 29.34 RitATT 033 RitSTO 047 Pre 169
0695606 Ambo 18.52 43.73 RitATT 001 RitSTO 048 Pre 189
1018842 Ambo 20.39 33.48 RitATT 002 RitSTO 049 Pre 179
1048836 Ambo 20.51 42.60 RitATT 016 RitSTO 047 Pre 185
0002093 Ambo 20.51 63.80 RitATT 037 RitSTO 048 Pre 197
0008035 Ambo 20.54 30.85 RitATT 010 RitSTO 049 Pre 173
0011764 Ambo 20.55 58.90 RitATT 005 RitSTO 049 Pre 175
0075288 Ambo 20.81 65.69 RitATT 002 RitSTO 049 Pre 183
 
LOGOSILOP.gif
SPMT vers. 1.6.34_Agg.Web e relativo plugin SVP vers. 1.0.56 e Plugin_FTP vers. 1.0 e SpazioScript vs.1.0.9 e RicercaLunghetta vers.1.0.31 e LottoOpen v.1.0.62 e SpazioLight.net V.1.0.38
======================
Ciao Cinzia ,
======================
ecco il secondo risultato dei biambi
======================
0052475 Ambo 13.47 43.51 RitATT 021 RitSTO 049 Pre 195
0053168 Ambo 13.47 61.69 RitATT 021 RitSTO 045 Pre 198
0223973 Ambo 14.29 75.82 RitATT 011 RitSTO 049 Pre 170
0322345 Ambo 14.63 74.90 RitATT 000 RitSTO 049 Pre 176
0385306 Ambo 14.85 70.80 RitATT 000 RitSTO 049 Pre 171
0587011 Ambo 15.82 37.41 RitATT 014 RitSTO 049 Pre 194
dopo ore 06:27:15
======================
ho ripreso dalla 1273 con ambo 16-59
sempre alla 1590 con ambo 20-90
Aspettiamo….
======================
======================
Buon mercoledì a tutto il forum.
======================
stickman.gif
A presto
Silop ;) ;) ;)
 
Cinzia27 ha scritto:
Gam, mi spieghi per favore nel dettaglio questi numeri che appaiono in output


In output
00:33:38
1108
1965
82378

E complimenti per lo script
Clicca per espandere...
Ciao Cinzia,
in ordine hai:

il tempo trascorso di elaborazione
l'ultimo "i" elaborato
l'ultimo "j" elaborato
il numero di biambi elaborati

Saluti
 
Ciao a tutti, ho cercato di fare ordine, lasciando in "sospeso" i dati di cui non ho certa verifica. E in questo caso chiedo a voi di confermare.

NB: la colonna dei valori Attuali potrebbe non essere corretta, ma con un + o - 1 a seconda che qualche ricerca sia stata fatta prima e dopo l'estrazione di ieri sera, ma ininfluente sullo storico.
01.05​
51.81​
Att​
3​
Sto​
45​
Cinzia​
​
01.09​
06.89​
Att​
3​
Sto​
47​
Cinzia​
​
01.22​
31.52​
Att​
37​
Sto​
47​
Cinzia​
​
01.22​
45.74​
Att​
28​
Sto​
49​
Cinzia​
​
01.22​
47.55​
Att​
37​
Sto​
49​
Cinzia​
​
01.22​
64.74​
Att​
20​
Sto​
49​
Cinzia​
​
02.08​
08.42​
Att​
43​
Sto​
48​
Cinzia​
​
03.69​
31.67​
Att​
38​
Sto​
45​
Cinzia​
​
04.46​
06.89​
Att​
3​
Sto​
49​
Cinzia​
​
04.51​
06.89​
Att​
3​
Sto​
49​
Cinzia​
​
04.51​
22.30​
Att​
1​
Sto​
46​
Cinzia​
​
04.51​
22.47​
Att​
6​
Sto​
49​
Cinzia​
​
04.61​
06.89​
Att​
3​
Sto​
46​
Cinzia​
​
06.17​
08.61​
Att​
9​
Sto​
47​
Cinzia​
​
06.30​
63.80​
Att​
15​
Sto​
48​
Cinzia​
​
06.57​
26.30​
Att​
8​
Sto​
49​
Cinzia​
​
06.77​
10.13​
Att​
27​
Sto​
48​
Cinzia​
​
06.84​
54.65​
Att​
0​
Sto​
49​
Cinzia​
​
06.89​
15.34​
Att​
3​
Sto​
49​
Cinzia​
​
06.89​
27.66​
Att​
3​
Sto​
49​
Cinzia​
​
06.89​
33.36​
Att​
3​
Sto​
48​
Cinzia​
​
06.89​
36.74​
Att​
3​
Sto​
49​
Cinzia​
​
06.89​
40.82​
Att​
3​
Sto​
48​
Cinzia​
​
07.48​
38.61​
Att​
2​
Sto​
48​
Gam​
Dal 07 al 10 con “i” da 520 al 845​
08.18​
48.67​
Att​
9​
Sto​
49​
Gam​
​
08.62​
09.56​
Att​
10​
Sto​
47​
Gam​
​
08.63​
20.51​
Att​
8​
Sto​
49​
Gam​
​
08.85​
57.80​
Att​
1​
Sto​
48​
Gam​
​
09.45​
75.82​
Att​
11​
Sto​
49​
Gam​
​
10.13​
61.69​
Att​
22​
Sto​
48​
Gam​
​
10.13​
82.86​
Att​
27​
Sto​
48​
Gam​
​
10.34​
75.82​
Att​
11​
Sto​
49​
Gam​
​
10.44​
64.78​
Att​
35​
Sto​
49​
Gam​
​
10.70​
33.36​
Att​
11​
Sto​
49​
Gam​
fino “i” = 845​
​
​
​
​
​
​
​
​
Work in ​
progress​
​
​
​
​
Silop2005​
Dal 11 al 20 con “i” da 846 al 1590​
​
​
​
​
​
​
​
​
11.16​
32.76​
Att​
5​
Sto​
47​
Silop2005​
Dal 11 al … con “i” da 846 al 1018​
11.29​
15.21​
Att​
1​
Sto​
49​
Silop2005​
​
12.49​
16.51​
Att​
28​
Sto​
49​
Silop2005​
​
12.62​
22.47​
Att​
6​
Sto​
48​
Silop2005​
​
​
​
​
​
​
​
​
​
13.47​
43.51​
Att​
21​
Sto​
49​
Master​
non si sa con certezza i di partenza e arrivo​
13.47​
61.69​
Att​
21​
Sto​
45​
Master​
​
14.29​
75.82​
Att​
7​
Sto​
49​
Master​
​
14.63​
74.90​
Att​
0​
Sto​
49​
Master​
​
14.85​
70.80​
Att​
0​
Sto​
49​
Master​
​
​
​
​
​
​
​
​
​
15.82​
37.41​
Att​
14​
Sto​
49​
edesimone​
Dal 15 al 20​
16.68​
51.81​
Att​
21​
Sto​
49​
edesimone​
​
17.22​
29.34​
Att​
33​
Sto​
47​
edesimone​
​
18.52​
43.73​
Att​
1​
Sto​
48​
edesimone​
​
20.39​
33.48​
Att​
2​
Sto​
49​
edesimone​
​
20.51​
42.60​
Att​
16​
Sto​
47​
edesimone​
​
20.51​
63.80​
Att​
37​
Sto​
48​
edesimone​
​
20.54​
30.85​
Att​
10​
Sto​
49​
edesimone​
​
20.55​
58.90​
Att​
5​
Sto​
49​
edesimone​
​
20.81​
65.69​
Att​
2​
Sto​
49​
edesimone​
​
​
​
​
​
​
​
​
​
23.54​
36.74​
Att​
20​
Sto​
49​
edesimone​
Dal 21 al 29 con “i” da 1591 al 2175​
24.72​
65.79​
Att​
31​
Sto​
46​
edesimone​
​
25.89​
42.79​
Att​
18​
Sto​
48​
edesimone​
​
26.71​
47.62​
Att​
32​
Sto​
48​
edesimone​
​
26.71​
59.63​
Att​
14​
Sto​
49​
edesimone​
​
29.31​
32.58​
Att​
13​
Sto​
49​
edesimone​
​
29.50​
63.80​
Att​
24​
Sto​
49​
edesimone​
​
29.56​
82.86​
Att​
35​
Sto​
49​
edesimone​
​
29.86​
42.87​
Att​
5​
Sto​
49​
edesimone​
​
30.59​
44.63​
Att​
2​
Sto​
47​
Cinzia​
Dal 30 al 32 con “i” da 2176 al 4004​
30.87​
63.80​
Att​
15​
Sto​
49​
Cinzia​
​
31.77​
34.53​
Att​
11​
Sto​
44​
Cinzia​
​
31.90​
79.86​
Att​
15​
Sto​
49​
Cinzia​
​
32.57​
65.83​
Att​
1​
Sto​
49​
Cinzia​
​
32.79​
57.80​
Att​
1​
Sto​
49​
Cinzia​
​
33.38​
43.50​
Att​
25​
Sto​
49​
Cinzia​
​
33.38​
68.81​
Att​
28​
Sto​
49​
Cinzia​
​
34.53​
31.77​
Att​
11​
Sto​
44​
Cinzia​
​
37.41​
39.55​
Att​
15​
Sto​
48​
Cinzia​
​
37.47​
43.87​
Att​
23​
Sto​
49​
Cinzia​
​
37.49​
48.67​
Att​
9​
Sto​
49​
Cinzia​
​
37.73​
45.74​
Att​
7​
Sto​
48​
Cinzia​
​
38.65​
82.86​
Att​
2​
Sto​
49​
Cinzia​
​
39.74​
59.61​
Att​
2​
Sto​
49​
Cinzia​
​
42.77​
85.88​
Att​
4​
Sto​
48​
Cinzia​
​
47.54​
73.89​
Att​
3​
Sto​
49​
Cinzia​
​
54.84​
80.82​
Att​
10​
Sto​
49​
Cinzia​
​
60.88​
73.89​
Att​
8​
Sto​
48​
Cinzia​
​
73.87​
85.88​
Att​
8​
Sto​
49​
Cinzia​
​
Dovremmo quasi esserci
 
Ciao a tutti:)


Queste ricerche sono per pc possenti.
Oppure si fa, come si è fatto questa volta in gruppo .

Stamattina ho rilanciato tutto e ci ha messo un po meno , a pc riposato e fresco.
Ora sono fuori perché ho degli impegni. Verso l una piu o meno posto lo script così chi vuole può provarlo
:)
Per curiosità proverò a eseguire anche lo script del bravissimo gam.
Ciao a tutti e a dopo.
 
edesimone ha scritto:
Cinzia27 Risultato finale 15-20
0187245 Ambo 15.82 37.41 RitATT 014 RitSTO 049 Pre 194
0353072 Ambo 16.68 51.81 RitATT 021 RitSTO 049 Pre 167
0425079 Ambo 17.22 29.34 RitATT 033 RitSTO 047 Pre 169
0695606 Ambo 18.52 43.73 RitATT 001 RitSTO 048 Pre 189
1018842 Ambo 20.39 33.48 RitATT 002 RitSTO 049 Pre 179
1048836 Ambo 20.51 42.60 RitATT 016 RitSTO 047 Pre 185
0002093 Ambo 20.51 63.80 RitATT 037 RitSTO 048 Pre 197
0008035 Ambo 20.54 30.85 RitATT 010 RitSTO 049 Pre 173
0011764 Ambo 20.55 58.90 RitATT 005 RitSTO 049 Pre 175
0075288 Ambo 20.81 65.69 RitATT 002 RitSTO 049 Pre 183
Clicca per espandere...
Confrontati anche i biambi 15-20 elaborati da Edesimone con quelli di Ilegend.
Tutti giusti.
Sono 82 biambi.
Qui la lista di Ilegend fino a storico 49
Siete stati tutti bravissimi. Grazie

01.05 ; 51.81 ;45;3
01.09 ; 06.89 ;47;3
01.22 ; 31.52 ;47;37
01.22 ; 45.74 ;49;28
01.22 ; 47.55 ;49;37
01.22 ; 64.74 ;49;20
02.08 ; 08.42 ;48;43
03.69 ; 31.67 ;45;38
04.46 ; 06.89 ;49;3
04.51 ; 06.89 ;49;3
04.51 ; 22.30 ;46;1
04.51 ; 22.47 ;49;6
04.61 ; 06.89 ;46;3
06.17 ; 08.61 ;47;9
06.30 ; 63.80 ;48;15
06.57 ; 26.30 ;49;8
06.77 ; 10.13 ;48;27
06.84 ; 54.65 ;49;0
06.89 ; 15.34 ;49;3
06.89 ; 27.66 ;49;3
06.89 ; 33.36 ;48;3
06.89 ; 36.74 ;49;3
06.89 ; 40.82 ;48;3
07.48 ; 38.61 ;48;2
08.18 ; 48.67 ;49;9
08.62 ; 09.56 ;47;10
08.63 ; 20.51 ;49;8
08.85 ; 57.80 ;48;1
09.45 ; 75.82 ;49;11
10.13 ; 61.69 ;48;22
10.13 ; 82.86 ;48;27
10.34 ; 75.82 ;49;11
10.44 ; 64.78 ;49;35
10.70 ; 33.36 ;49;11
11.16 ; 32.76 ;47;5
11.29 ; 15.21 ;49;1
12.49 ; 16.51 ;49;28
12.62 ; 22.47 ;48;6
13.47 ; 43.51 ;49;21
13.47 ; 61.69 ;45;21
14.29 ; 75.82 ;49;11
14.63 ; 74.90 ;49;0
14.85 ; 70.80 ;49;0
15.82 ; 37.41 ;49;14
16.68 ; 51.81 ;49;21
17.22 ; 29.34 ;47;33
18.52 ; 43.73 ;48;1
20.39 ; 33.48 ;49;2
20.51 ; 42.60 ;47;16
20.51 ; 63.80 ;48;37
20.54 ; 30.85 ;49;10
20.55 ; 58.90 ;49;5
20.81 ; 65.69 ;49;2
23.54 ; 36.74 ;49;20
24.72 ; 65.79 ;46;31
25.89 ; 42.79 ;48;18
26.71 ; 47.62 ;48;32
26.71 ; 59.63 ;49;14
29.31 ; 32.58 ;49;13
29.50 ; 63.80 ;49;24
29.56 ; 82.86 ;49;35
29.86 ; 42.87 ;49;5
30.59 ; 44.63 ;47;2
30.87 ; 63.80 ;49;15
31.77 ; 34.53 ;44;11
31.90 ; 79.86 ;49;15
32.57 ; 65.83 ;49;1
32.79 ; 57.80 ;49;1
33.38 ; 43.50 ;49;25
33.38 ; 68.81 ;49;28
34.53 ; 37.39 ;48;11
37.41 ; 39.55 ;48;15
37.47 ; 43.87 ;49;23
37.49 ; 48.67 ;49;9
37.73 ; 45.74 ;48;7
38.65 ; 82.86 ;49;2
39.74 ; 59.61 ;49;2
42.77 ; 85.88 ;48;4
47.54 ; 73.89 ;49;3
54.84 ; 80.82 ;49;10
60.88 ; 73.89 ;48;8
73.87 ; 85.88 ;49;8
 
Ciao a tutti , posto lo script
Lo script è cucito addosso ai parametri della ricerca , modificarlo potra solo peggiorare le prestazioni
Inserisco le raccomandazioni anche qui sul post.

per favore se non avete un pc performante evitate di lanciarlo.

Ho lasciato il messaggio per farvi valutare a che iterazioni si è e a quante formazioni sono state trovate
se si remma lo script guadagnera parecchio in velocita. ( almeno sul mio pc)

ho lanciato lo script di Gam
a spanne il mio potrebbe essere piu veloce.
se qualcuno lo utilizza mi faccia sapere i tempi. i risultati confrontati sembrano corretti, ma andare sempre con i piedi di piombo
questi sono gli avvisi presenti anche nello script
' N.B:
' NON SI GARANTISCE CHE LO SCRIPT RESTITUISCA DATI ESATTI
' LO SCRIPT NON DEVE ESSERE MODIFICATO POTREBBE RICHIEDERE MOLTISSIME ORE PER COMPLETARE LA RICERCA
' LO SCRIPT è IMPOSTATO PER DEI PARAMETRI RICHIESTI
' PARAMETRO 1: INIZIO 7440
' PARAMETRO 2: RITARDO <=49
' PARAMETRO 3: RUOTE: (1,2,3,4,5,6,7,8,9,10,12) =(tt+NZ)
' MAGGIORE E' IL RANGE DI ESTRAZIONI MAGGIORE SARA IL TEMPO DI IMPIEGO
' MAGGIARE SARA' IL RITARDO RICHIESTO , ESPONENZIALMENTE AUMENTERA IL NUMERO DI ORE PER LA RICERCA
' LO SCRIPT E' CUCITO ADDOSSO AI PARAMETRI RICHIESTI
' PER INTERROMPERE L ELABORAZIONE SARA' SUFFICENTE PREMERE IL TASTO STOP
' E' NECESSARIO AVERE UN PC POTENTE E MOLTO PERFOMANTE PER ESEGUIRE LO SCRIPT
' UN PC MEDIO CON POCA RAM O UN PROCESSORE INFERIORE A UN I7 DI ULTIMA GENERAZIONE
' FARà MOLTA FATICA A PORTARE A TERMINE L ELABORAZIONE , PERTANTO SE NE SCONSIGLIA
' L UTILIZZO
'IN NESSUN CASO L AUTORE SARA CONSIDERATO RESPONSABILE DELL UTILIZZO DEI DATI RICAVATI DALLO SCRIPT.
' DATI , CHE NON SI GARANTISCE SIANO ESATTI ED ACCURATI.
' vISTO CHE LO SCRIPT E IN CHIARO POTREBBE ESSERE MODIFICATO , POTREBBE ESSERE INSERITO CODICE NOCIVO, COME VIRUS TROJAN ECC.
' LO SCRIPT NON DEVE ESSERE VENDUTO DA NESSUNO IN QUANTO DONATO , E, FATTO SU RICHIESTA
' DELL UTENTE CINZIA27 , L IDEATRICE E PROMOTRICE DI QUESTA RICERCA.
' IN NESSUN CASO L AUTORE DELLO SCRIPT POTRA ESSERE RITENUTO RESPONSABILE DI EVENTUALI
'DANNI ,AI MEZZI INFORMATICI, PERDITE DI DATI , DI MEMORIA, DI DENARO O QUALSIASI ALTRA PERDITA.
' SOLO L UTILIZZATORE SARA RESPONSABILE DELL UTILIZZO DELLO STESSO.
' SE NON SI INTENDONO ACCETTARE ANCHE UNA SOLA DELLE CONDIZIONI , NON UTILIZZARE LO SCRIPT
Codice: 
Option Explicit
' N.B:
' NON SI GARANTISCE CHE LO SCRIPT RESTITUISCA DATI ESATTI
' LO SCRIPT NON DEVE ESSERE MODIFICATO POTREBBE RICHIEDERE MOLTISSIME ORE PER COMPLETARE LA RICERCA
' LO SCRIPT è IMPOSTATO PER DEI PARAMETRI RICHIESTI
' PARAMETRO 1: INIZIO 7440
' PARAMETRO 2: RITARDO <=49
' PARAMETRO 3: RUOTE: (1,2,3,4,5,6,7,8,9,10,12)  =(tt+NZ)
' MAGGIORE E' IL RANGE DI ESTRAZIONI MAGGIORE SARA IL TEMPO DI IMPIEGO
' MAGGIARE SARA' IL RITARDO RICHIESTO  , ESPONENZIALMENTE AUMENTERA IL NUMERO DI ORE PER LA RICERCA
' LO SCRIPT E' CUCITO ADDOSSO AI PARAMETRI RICHIESTI
' PER INTERROMPERE L ELABORAZIONE SARA' SUFFICENTE PREMERE IL TASTO STOP
' E' NECESSARIO AVERE UN PC POTENTE E MOLTO PERFOMANTE PER ESEGUIRE LO SCRIPT
' UN PC MEDIO CON POCA RAM O UN PROCESSORE INFERIORE A UN I7 DI ULTIMA GENERAZIONE
' FARà MOLTA FATICA A PORTARE A TERMINE L ELABORAZIONE , PERTANTO SE NE SCONSIGLIA
' L UTILIZZO
'IN NESSUN CASO L AUTORE SARA CONSIDERATO RESPONSABILE DELL UTILIZZO DEI DATI RICAVATI DALLO SCRIPT.
' DATI , CHE NON SI GARANTISCE SIANO ESATTI ED ACCURATI.
' vISTO CHE LO SCRIPT E IN CHIARO POTREBBE ESSERE MODIFICATO , POTREBBE ESSERE INSERITO CODICE NOCIVO, COME VIRUS TROJAN ECC.
' LO SCRIPT NON DEVE ESSERE VENDUTO DA NESSUNO IN QUANTO DONATO , E, FATTO SU RICHIESTA
' DELL UTENTE CINZIA27 , L IDEATRICE E PROMOTRICE DI QUESTA RICERCA.
' IN NESSUN CASO L AUTORE DELLO SCRIPT POTRA ESSERE RITENUTO RESPONSABILE DI EVENTUALI
'DANNI ,AI MEZZI INFORMATICI, PERDITE DI DATI , DI MEMORIA, DI DENARO O QUALSIASI ALTRA PERDITA.
' SOLO L UTILIZZATORE SARA RESPONSABILE DELL UTILIZZO DELLO STESSO.
' SE NON SI INTENDONO ACCETTARE ANCHE UNA SOLA DELLE CONDIZIONI , NON UTILIZZARE LO SCRIPT
Sub Main
    Dim aAmbi(4005,4)
    Dim aR:aR = Array(0,1,2,3,4,5,6,7,8,9,10,12)
    Dim e1,e2,k,aN,i,j
    Dim sIdEstr
    Dim Ini:Ini = 7440
    Dim Fin:Fin = EstrazioneFin
   
    Dim sid1,sid2,atemp,sRit,RitMax,Rit
    Dim LimRitMax:LimRitMax = 49
    Dim bRet,ntro,Rc
    Dim t:t = Timer
    For e1 = 1 To 89
        For e2 = e1 + 1 To 90
            k = k + 1
            aN = Array(0,e1,e2)
            aAmbi(k,1) = StringaNumeri(aN,,True)
            ReDim aRit(0),aId(0)
            Call ElencoRitardiTurbo(aN,aR,2,Ini,Fin,aRit,aId)
            sIdEstr = ""
            For i = 1 To UBound(aId) - 1
                sIdEstr = sIdEstr & aId(i) & "."
            Next
          
            aAmbi(k,2) = sIdEstr
            aAmbi(k,3) = aRit(1)
            aAmbi(k,4) = aRit(UBound(aRit))
        Next
    Next
    Scrivi FormattaSecondi(Timer - t)
    ntro = 0
    k = 0
    t = Timer
    For e1 = 1 To 4004
        For e2 = e1 + 1 To 4005
            If ScriptInterrotto Then Exit For
            If Minimo(aAmbi(e1,3),aAmbi(e2,3)) < LimRitMax Then
            Rc = Minimo(aAmbi(e1,4),aAmbi(e2,4))
                If Rc < LimRitMax Then
                    sid1 = aAmbi(e1,2)
                    sid2 = aAmbi(e2,2)
                    Call ConcatenaIdEstr(Ini,Fin,sid1,sid2,atemp)
                    RitMax = 0
                    bRet = True
                    sRit = ""
                    For i = 1 To UBound(atemp) - 1
                        j = i + 1
                        If atemp(j) <> atemp(i) Then
                            Rit =(atemp(j) - atemp(i)) - 1
                            If Rit > LimRitMax Then bRet = False:Exit For
                            If RitMax < Rit Then RitMax = Rit
                           ' sRit = sRit & Rit & ";"
                        End If
                    Next
                    If bRet Then
                        ntro = ntro + 1
                        Scrivi ntro & " ; " & aAmbi(e1,1) & " ; " & aAmbi(e2,1) & " ; " & RitMax & " ; " & Rc
                    End If
                    DoEventsEx
                End If
            End If
            k = k + 1
' questa sotto è  la eiga da remmare se si vuole aumentare la velocità ma non si avranno riferimenti.
           Call Messaggio(k & "  " & ntro)
        Next
    Next
   ' Scrivi k
    Scrivi FormattaSecondi(Timer - t)
End Sub
Sub ConcatenaIdEstr(Ini,Fin,sId1,sId2,aTemp)
    Dim s:s = ""
    s = "0." &(Ini - 1) & "." & sId1 & sId2 &(Fin + 1)
    aTemp = Split(s,".")
    Call OrdinaMatriceTurbo(aTemp,1)
End Sub
Function FormattaSecondi(s)
    'Questa Function trasforma il numero di secondi passato come parametro in una stringa
    ' passando i secondi si ottengono ore  minuti e secondi  in formato hh:mm:ss
    ' s ---> Numero di secondi da formattare
    ' ritorna una stringa il cui formato è hh:mm:ss (la function non funziona se in totale abbiamo piu di 99 ore )
    Dim hh
    Dim Mm
    Dim Ss
    Dim TimeStr
    hh = s \ 3600
    Mm =(s Mod 3600) \ 60
    Ss = s -((hh * 3600) +(Mm * 60))
    TimeStr = Format2(hh) & ":" & Format2(Mm) & ":" & Format2(Ss)
    FormattaSecondi = TimeStr
End Function
 
Ultima modifica:
Grazie, Ilegend per lo script.
Oltre ad essere stato utilissimo al caso, sarà per me un'ottima fonte di insegnamento.

I biambi ricavati grazie al nostro lavoro sono 82.
Il ritardo storico oscilla tra 44 (1 solo caso) e 49.
Con questo script molto semplice si ha la situazione dei ritardi attuali sotto mano.


Codice: 
'Biambi con massimo storico da 44 a 49 - sulle 11 ruote dall'estrazione 7440
Sub Main
Dim ru(11)
Dim r1,r2,r3,r4,r5,r6,r7,r8,r9,r10,r11
Dim n(2),n1(2)

r1 = 1:r2 = 2:r3 = 3:r4 = 4:r5 = 5:r6 = 6:r7 = 7:r8 = 8:r9 = 9:r10 = 10:r11 = 12
ru(1) = r1:ru(2) = r2:ru(3) = r3:ru(4) = r4:ru(5) = r5:ru(6) = r6:ru(7) = r7:ru(8) = r8:ru(9) = r9:ru(10) = r10:ru(11) = r11



 i = 1 : j = 5 : i1 = 51 : j1 = 81
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
 Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)
 
 i = 0:j = 0:i1 = 0:j1 = 0
 
  i = 1 : j = 9 : i1 = 6 : j1 = 89
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
 Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)
 
 
 

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 1 : j = 22 : i1 = 31 : j1 = 52
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 1 : j = 22 : i1 = 45 : j1 = 74
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 1 : j = 22 : i1 = 47 : j1 = 55
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 1 : j = 22 : i1 = 64 : j1 = 74
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)


  i = 0:j = 0:i1 = 0:j1 = 0
  i = 2 : j = 8 : i1 = 8 : j1 = 42
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)



  i = 0:j = 0:i1 = 0:j1 = 0
  i = 3 : j = 69 : i1 = 31 : j1 = 67
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)



  i = 0:j = 0:i1 = 0:j1 = 0
  i = 4 : j = 46 : i1 = 6: j1 = 89
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 4 : j = 51 : i1 = 6: j1 = 89
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 4 : j = 51 : i1 = 22 : j1 = 30
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 4 : j = 51 : i1 = 22 : j1 = 47
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 4 : j = 61 : i1 = 6 : j1 = 89
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)


  i = 0:j = 0:i1 = 0:j1 = 0
  i = 6: j = 17 : i1 = 8 : j1 = 61
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 6: j = 30 : i1 = 63 : j1 = 80
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 6: j = 57 : i1 = 26 : j1 = 30
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)


  i = 0:j = 0:i1 = 0:j1 = 0
  i = 6: j = 77 : i1 = 10 : j1 = 13
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)


  i = 0:j = 0:i1 = 0:j1 = 0
  i = 6: j = 84 : i1 = 54 : j1 = 65
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

 
  i = 0:j = 0:i1 = 0:j1 = 0
  i = 6: j = 89 : i1 = 15 : j1 = 34
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

 
  i = 0:j = 0:i1 = 0:j1 = 0
  i = 6: j = 89 : i1 = 27 : j1 = 66
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 6: j = 89 : i1 = 33 : j1 = 36
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 6: j = 89 : i1 = 36 : j1 = 74
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 6: j = 89 : i1 = 40 : j1 = 82
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)






  i = 0:j = 0:i1 = 0:j1 = 0
  i = 7: j = 48 : i1 = 38 : j1 = 61
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

 
  i = 0:j = 0:i1 = 0:j1 = 0
  i = 8: j = 18 : i1 = 48 : j1 = 67
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

 
  i = 0:j = 0:i1 = 0:j1 = 0
  i = 8: j = 62 : i1 = 9: j1 = 56
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 8: j = 63 : i1 = 20: j1 = 51
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 8: j = 85 : i1 = 57: j1 = 80
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)



  i = 0:j = 0:i1 = 0:j1 = 0
  i = 9: j = 45 : i1 = 75: j1 = 82
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 10: j = 13 : i1 = 61: j1 = 69
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 10: j = 13 : i1 = 82: j1 = 86
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 10: j = 34 : i1 = 75: j1 = 82
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 10: j = 44 : i1 = 64: j1 = 78
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 10: j = 70 : i1 = 33: j1 = 36
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 11: j = 16 : i1 = 32: j1 = 76
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)


  i = 0:j = 0:i1 = 0:j1 = 0
  i = 11: j = 29 : i1 = 15: j1 = 21
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 12: j = 49 : i1 = 16: j1 = 51
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 12: j = 62 : i1 = 22: j1 = 47
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 13: j = 47 : i1 = 43: j1 = 51
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)


  i = 0:j = 0:i1 = 0:j1 = 0
  i = 13: j = 47 : i1 = 61: j1 = 69
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 14: j = 29 : i1 = 75: j1 = 82
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 14: j = 63 : i1 = 74: j1 = 90
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 14: j = 85 : i1 = 70: j1 = 80
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 15: j = 82 : i1 = 37: j1 = 41
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 16: j = 68 : i1 = 51: j1 = 81
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 17: j = 22 : i1 = 29: j1 = 34
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 18: j = 52 : i1 = 43: j1 = 73
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 20: j = 39 : i1 = 33: j1 = 48
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 20: j = 51 : i1 = 42: j1 = 60
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 20: j = 51 : i1 = 63: j1 = 80
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 20: j = 54 : i1 = 30: j1 = 85
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 20: j = 55 : i1 = 58: j1 = 90
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 20: j = 81 : i1 = 65: j1 = 69
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 23: j = 54 : i1 = 36: j1 = 74
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 24: j = 72 : i1 = 65: j1 = 79
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 25: j = 89 : i1 = 42: j1 = 79
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 26: j = 71 : i1 = 47: j1 = 62
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 26: j = 71 : i1 = 59: j1 = 63
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 29: j = 31 : i1 = 32: j1 = 58
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 29: j = 50 : i1 = 63: j1 = 80
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 29: j = 56 : i1 = 82: j1 = 86
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)


  i = 0:j = 0:i1 = 0:j1 = 0
  i = 29: j = 86 : i1 = 42: j1 = 87
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)


  i = 0:j = 0:i1 = 0:j1 = 0
  i = 30: j = 59 : i1 = 44: j1 = 63
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 30: j = 87 : i1 = 63: j1 = 80
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 31: j = 77 : i1 = 34: j1 = 53
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 31: j = 90 : i1 = 79: j1 = 86
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 32: j = 57 : i1 = 65: j1 = 83
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 32: j = 79 : i1 = 57: j1 = 80
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 33: j = 38 : i1 = 43: j1 = 50
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 33: j = 38 : i1 = 68: j1 = 81
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 34: j = 53 : i1 = 37: j1 = 39
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)


  i = 0:j = 0:i1 = 0:j1 = 0
  i = 37: j = 41 : i1 = 39: j1 = 55
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)


  i = 0:j = 0:i1 = 0:j1 = 0
  i = 37: j = 47 : i1 = 43: j1 = 87
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)


  i = 0:j = 0:i1 = 0:j1 = 0
  i = 37: j = 49 : i1 = 48: j1 = 67
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)


  i = 0:j = 0:i1 = 0:j1 = 0
  i = 37: j = 73 : i1 = 45: j1 = 74
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 38: j = 65 : i1 = 82: j1 = 86
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 39: j = 74 : i1 = 59: j1 = 61
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 42: j = 77 : i1 = 85: j1 = 88
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 47: j = 54 : i1 = 73: j1 = 89
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 54: j = 84 : i1 = 80: j1 = 82
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 60: j = 88 : i1 = 73: j1 = 89
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)

  i = 0:j = 0:i1 = 0:j1 = 0
  i = 73: j = 87 : i1 = 85: j1 = 88
 n(1) = i:n(2) = j:n1(1) = i1:n1(2) = j1
 rt = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n,ru,2)
 rt1 = SerieRitardoTurbo(EstrazioneFin - 100,EstrazioneFin,n1,ru,2)
 m = Minimo(rt,rt1)
Scrivi StringaNumeri(n) & ";" & StringaNumeri(n1) & " " & FormatSpace(m,4,1)
End Sub
 
Devi accedere o registrarti per poter rispondere.

Ultima estrazione Lotto

  • Estrazione del lotto
    venerdì 10 gennaio 2025
    Bari
    40
    61
    11
    86
    37
    Cagliari
    31
    02
    51
    68
    87
    Firenze
    73
    55
    34
    52
    18
    Genova
    11
    40
    27
    82
    20
    Milano
    80
    71
    65
    19
    10
    Napoli
    50
    30
    03
    01
    36
    Palermo
    66
    42
    43
    76
    89
    Roma
    05
    22
    62
    35
    39
    Torino
    17
    58
    62
    86
    69
    Venezia
    43
    89
    14
    04
    40
    Nazionale
    64
    76
    35
    40
    19
    Estrazione Simbolotto
    Bari
    08
    07
    37
    33
    38
    Archivio estrazioni lotto Ritardi top 15 Frequenze top 15

Ultimi Messaggi

Indietro
Alto