-
lones.
User deleted
metodino da tenere sotto osservazioni ,per convergenze CODICE'marco To-ve Sub main()
Dim rt(2),nu(6),nn(9),pt(1),ptt(4),n(5),rtt(2)
pt(1)=1
ptt(2)=1 : ptt(3)=0.5 : ptt(4)=0.5
clp=12
rtt(1)=11 : rtt(2)=12
fin=EstrazioneFin
ini=fin-100
co=0
For es=ini To fin
Messaggio es
rt(1)=9 : rt(2)=10
a=Estratto (es,9,1) : b=Estratto (es,10,5)
a1=Estratto (es,9,5) : b1=Estratto (es,10,1)
a2=Abs(a-b):a3=Abs(a1-b1)
If a2<45 Then b2=a2 Else b2=90-a2
If a3<45 Then c=a3 Else c=90-a3
nn(1)=Fuori90(b2+c+31)
ImpostaGiocata 1,nn,rt,pt,clp,1
nu(1)=a1 : nu(2)=a2 : nu(3)=a1-1 : nu(4)=a2-1: nu(5)= nn(1): nu(6)=vert(nu(5))
ImpostaGiocata 2,nu,rt,ptt,clp
co=co+1
Scrivi String (65,"=")&" Caso n°"& co
Scrivi DataEstrazione (es)&" "& SiglaRuota (9)&" : "& StringaEstratti (es,9) &" -"& SiglaRuota (10)&": "& StringaEstratti (es,10)
Scrivi "Differenze ottenute "&a&"-"&b&" diff= "&a2
Scrivi "Differenze ottenute "&a1&"-"&b1&" diff= "&a3
Scrivi "ambata "&b2&"+"&c&"+31 = "& nn(1)
ColoreTesto 0
Gioca es
Next
ScriviResoconto
End Sub. -
.
che previsioni da? . -
.
ciao dart,grazie Lones,ecco cosa da' il listato: CODICE================================================================= Caso n°84
04.10.2011 To : 11.06.27.65.72 -Ve: 07.37.22.40.28
Differenze ottenute 11-28 diff= 17
Differenze ottenute 72-7 diff= 65
ambata 17+25+31 = 73
mar 04.10.2011 [8438]
G 1: M 73 To Ve 6/12
M 73 su Ve 6° colpo [8444/18.10.2011]
I6
G 2: ATQ 72.17.71.16.73.37 To Ve 12/12
negativo
================================================================= Caso n°85
06.10.2011 To : 47.83.22.68.15 -Ve: 55.48.60.41.43
Differenze ottenute 47-43 diff= 4
Differenze ottenute 15-55 diff= 40
ambata 4+40+31 = 75
gio 06.10.2011 [8439]
G 1: M 75 To Ve 4/12
M 75 su To 4° colpo [8443/15.10.2011]
I4
G 2: ATQ 15.04.14.03.75.57 To Ve 12/12
A 75.15 su To 4° colpo [8443/15.10.2011]
================================================================= Caso n°86
08.10.2011 To : 24.30.77.07.62 -Ve: 32.80.17.39.07
Differenze ottenute 24-7 diff= 17
Differenze ottenute 62-32 diff= 30
ambata 17+30+31 = 78
sab 08.10.2011 [8440]
G 1: M 78 To Ve 1/12
M 78 su To 1° colpo [8441/11.10.2011]
I1
G 2: ATQ 62.17.61.16.78.87 To Ve 12/12
A 78.16 su To 1° colpo [8441/11.10.2011]
A 17.61 su Ve 7° colpo [8447/25.10.2011]
================================================================= Caso n°87
11.10.2011 To : 78.23.60.42.16 -Ve: 66.68.58.72.53
Differenze ottenute 78-53 diff= 25
Differenze ottenute 16-66 diff= 50
ambata 25+40+31 = 6
mar 11.10.2011 [8441]
G 1: M 06 To Ve 12/12
negativo
G 2: ATQ 16.25.15.24.06.60 To Ve 12/12
negativo
================================================================= Caso n°88
13.10.2011 To : 84.82.72.56.28 -Ve: 36.53.83.09.32
Differenze ottenute 84-32 diff= 52
Differenze ottenute 28-36 diff= 8
ambata 38+8+31 = 77
gio 13.10.2011 [8442]
G 1: M 77 To Ve 3/12
M 77 su Ve 3° colpo [8445/20.10.2011]
I3
G 2: ATQ 28.52.27.51.77.79 To Ve 12/12
A 52.28.79 su To 2° colpo [8444/18.10.2011]
T 52.28.79 su To 2° colpo [8444/18.10.2011]
A 51.79 su Ve 7° colpo [8449/29.10.2011]
================================================================= Caso n°89
15.10.2011 To : 21.62.75.43.15 -Ve: 48.87.84.13.67
Differenze ottenute 21-67 diff= 46
Differenze ottenute 15-48 diff= 33
ambata 44+33+31 = 18
sab 15.10.2011 [8443]
G 1: M 18 To Ve 1/12
M 18 su Ve 1° colpo [8444/18.10.2011]
I1
G 2: ATQ 15.46.14.45.18.81 To Ve 12/12
A 14.81 su To 7° colpo [8450/02.11.2011]
================================================================= Caso n°90
18.10.2011 To : 52.28.42.50.79 -Ve: 73.10.18.32.09
Differenze ottenute 52-9 diff= 43
Differenze ottenute 79-73 diff= 6
ambata 43+6+31 = 80
mar 18.10.2011 [8444]
G 1: M 80 To Ve 8/12
M 80 su To 8° colpo [8452/05.11.2011]
I8
G 2: ATQ 79.43.78.42.80.08 To Ve 11/12
in corso (11° su 12)
================================================================= Caso n°91
20.10.2011 To : 20.74.82.70.81 -Ve: 88.56.81.77.44
Differenze ottenute 20-44 diff= 24
Differenze ottenute 81-88 diff= 7
ambata 24+7+31 = 62
gio 20.10.2011 [8445]
G 1: M 62 To Ve 8/12
M 62 su To 8° colpo [8453/08.11.2011]
I8
G 2: ATQ 81.24.80.23.62.26 To Ve 10/12
A 24.81 su To 5° colpo [8450/02.11.2011]
A 62.24 su To 9° colpo [8454/10.11.2011]
in corso (10° su 12)
================================================================= Caso n°92
22.10.2011 To : 77.46.82.66.76 -Ve: 02.55.41.54.35
Differenze ottenute 77-35 diff= 42
Differenze ottenute 76-2 diff= 74
ambata 42+16+31 = 89
sab 22.10.2011 [8446]
G 1: M 89 To Ve 9/12
in corso (9° su 12)
G 2: ATQ 76.42.75.41.89.88 To Ve 9/12
in corso (9° su 12)
================================================================= Caso n°93
25.10.2011 To : 79.71.04.30.61 -Ve: 02.17.09.23.61
Differenze ottenute 79-61 diff= 18
Differenze ottenute 61-2 diff= 59
ambata 18+31+31 = 80
mar 25.10.2011 [8447]
G 1: M 80 To Ve 5/12
M 80 su To 5° colpo [8452/05.11.2011]
I5
G 2: ATQ 61.18.60.17.80.08 To Ve 8/12
in corso (8° su 12)
================================================================= Caso n°94
27.10.2011 To : 83.87.40.63.52 -Ve: 87.09.76.51.13
Differenze ottenute 83-13 diff= 70
Differenze ottenute 52-87 diff= 35
ambata 20+35+31 = 86
gio 27.10.2011 [8448]
G 1: M 86 To Ve 2/12
M 86 su To 2° colpo [8450/02.11.2011]
I2
G 2: ATQ 52.70.51.69.86.68 To Ve 7/12
in corso (7° su 12)
================================================================= Caso n°95
29.10.2011 To : 32.78.69.41.90 -Ve: 51.55.74.71.79
Differenze ottenute 32-79 diff= 47
Differenze ottenute 90-51 diff= 39
ambata 43+39+31 = 23
sab 29.10.2011 [8449]
G 1: M 23 To Ve 6/12
in corso (6° su 12)
G 2: ATQ 90.47.89.46.23.32 To Ve 6/12
A 32.47 su Ve 3° colpo [8452/05.11.2011]
in corso (6° su 12)
================================================================= Caso n°96
02.11.2011 To : 48.86.14.24.81 -Ve: 41.30.28.12.35
Differenze ottenute 48-35 diff= 13
Differenze ottenute 81-41 diff= 40
ambata 13+40+31 = 84
mer 02.11.2011 [8450]
G 1: M 84 To Ve 1/12
M 84 su To 1° colpo [8451/03.11.2011]
I1
G 2: ATQ 81.13.80.12.84.48 To Ve 5/12
A 12.13 su To 3° colpo [8453/08.11.2011]
A 48.84 su Ve 5° colpo [8455/12.11.2011]
in corso (5° su 12)
================================================================= Caso n°97
03.11.2011 To : 35.84.66.02.60 -Ve: 56.66.01.35.88
Differenze ottenute 35-88 diff= 53
Differenze ottenute 60-56 diff= 4
ambata 37+4+31 = 72
gio 03.11.2011 [8451]
G 1: M 72 To Ve 4/12
in corso (4° su 12)
G 2: ATQ 60.53.59.52.72.27 To Ve 4/12
in corso (4° su 12)
================================================================= Caso n°98
05.11.2011 To : 02.30.33.80.85 -Ve: 32.47.84.41.27
Differenze ottenute 2-27 diff= 25
Differenze ottenute 85-32 diff= 53
ambata 25+37+31 = 3
sab 05.11.2011 [8452]
G 1: M 03 To Ve 3/12
in corso (3° su 12)
G 2: ATQ 85.25.84.24.03.30 To Ve 3/12
A 85.84 su Ve 3° colpo [8455/12.11.2011]
in corso (3° su 12)
================================================================= Caso n°99
08.11.2011 To : 88.62.78.12.13 -Ve: 58.34.32.27.87
Differenze ottenute 88-87 diff= 1
Differenze ottenute 13-58 diff= 45
ambata 1+45+31 = 77
mar 08.11.2011 [8453]
G 1: M 77 To Ve 2/12
M 77 su Ve 2° colpo [8455/12.11.2011]
I2
G 2: ATQ 13.01.12.77.79 To Ve 2/12
in corso (2° su 12)
================================================================= Caso n°100
10.11.2011 To : 21.62.78.01.24 -Ve: 17.40.34.48.14
Differenze ottenute 21-14 diff= 7
Differenze ottenute 24-17 diff= 7
ambata 7+7+31 = 45
gio 10.11.2011 [8454]
G 1: M 45 To Ve 1/12
in corso (1° su 12)
G 2: ATQ 24.07.23.06.45.54 To Ve 1/12
in corso (1° su 12)
================================================================= Caso n°101
12.11.2011 To : 38.21.62.15.70 -Ve: 48.28.85.84.77
Differenze ottenute 38-77 diff= 39
Differenze ottenute 70-48 diff= 22
ambata 39+22+31 = 2
sab 12.11.2011 [8455]
G 1: M 02 To Ve 0/12
i.c. (12 colpi)
G 2: ATQ 70.39.69.38.02.20 To Ve 0/12
i.c. (12 colpi). -
.
ok, ho capito grazie!!!
.