Follow along with the video below to see how to install our site as a web app on your home screen.
Nota: This feature may not be available in some browsers.
Sub Main
Dim Nu(2),aN(2),Ru(1),T,V,Posta(2)
Posta(2) = 1
Ini = EstrazioneFin - 200
fin = EstrazioneFin
T = Array(T,"Casi","Info Data","Numeri Cercati","1° Ambo","2° Ambo","Verifica 1°Ambo","clp 1A","Verifica 2° Ambo","Clp 2A")
Call InitTabella(T)
For es = Ini To fin
If IsUltimaDelMese(es) Then
k = k + 1
a = Estratto(es,BA_,1)
b = Estratto(es,VE_,5)
Nu(1) = a
Nu(2) = Fuori90(Nu(1) + b)
aN(1) = a
aN(2) = Differenza(a,b)
Ru(1) = 11
Call VerificaEsito(Nu,Ru,es + 1,2,13,,esito1,clp1,es1,id1)
Call VerificaEsito(aN,Ru,es + 1,2,13,,esito2,clp2,es2,id2)
V = Array(V,k,GetInfoEstrazione(es),a & " + " & b,StringaNumeri(Nu),StringaNumeri(aN),es1,clp1,es2,clp2)
Call AddRigaTabella(V)
Call Gioca(es,,,,,False)
Call ImpostaGiocata(1,Nu,Ru,Posta,13,2)
Call ImpostaGiocata(2,aN,Ru,Posta,13,2)
End If
Next
CreaTabella
ScriviResoconto
End Sub
Alien.;n2151920 ha scritto:cosa è quel discorso di 26 in effetti va in positivo ma di poco si potrebbe vedere le frequenze delle uscite su singola ruota !!
salvo50;n2151922 ha scritto:Ciao Alien
E' solo una mia curiosità, non riesco a capire, per come ho spostato quella riga, secondo il mio parere dovrebbe essere ininfluente, invece cambia tutto è evidente che mi sto sbagliando, vorrei capire perchè.
Sub Main
Dim Nu(2),aN(2),Ru(1),T,V,Posta(2)
Posta(2) = 1
Ini = EstrazioneFin - 200
fin = EstrazioneFin
T = Array(T,"Casi","Info Data","Numeri Cercati","1° Ambo","2° Ambo","Verifica 1°Ambo","clp 1A","Verifica 2° Ambo","Clp 2A")
Call InitTabella(T)
For es = Ini To fin
If IsUltimaDelMese(es) Then
k = k + 1
a = Estratto(es,CA_,3)
b = Estratto(es,PA_,2)
Nu(1) = a
Nu(2) = Fuori90(Nu(1) + b)
aN(1) = a
aN(2) = Differenza(a,b)
Ru(1) = 11
Call VerificaEsito(Nu,Ru,es + 1,2,18,,esito1,clp1,es1,id1)
Call VerificaEsito(aN,Ru,es + 1,2,18,,esito2,clp2,es2,id2)
V = Array(V,k,GetInfoEstrazione(es),a & " + " & b,StringaNumeri(Nu),StringaNumeri(aN),es1,clp1,es2,clp2)
Call AddRigaTabella(V)
Call Gioca(es,,,,,False)
Call ImpostaGiocata(1,Nu,Ru,Posta,18,2)
Call ImpostaGiocata(2,aN,Ru,Posta,18,2)
End If
Next
CreaTabella
ScriviResoconto
End Sub
Mike58;n2152086 ha scritto:
[TABLE="border: 1, cellpadding: 0, cellspacing: 0"]
[TR]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]Casi [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]Info Data [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]Numeri Cercati [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]1° Ambo [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]2° Ambo [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]Verifica 1°Ambo [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]clp 1A [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]Verifica 2° Ambo [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]Clp 2A [/COLOR][/SIZE][/FONT][/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]1 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000][09389] [130] 31.10.2017 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]23 + 28 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]23.51 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]23.5 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]TO 51 .. .. 23 .. [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]4 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 [/COLOR][/SIZE][/FONT][/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]2 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000][09402] [143] 30.11.2017 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]68 + 13 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]68.81 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]68.55 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]MI 68 81 .. .. .. [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]4 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]PA 55 68 .. .. .. [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]7 [/COLOR][/SIZE][/FONT][/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]3 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000][09415] [156] 30.12.2017 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 + 50 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18.68 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18.32 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 [/COLOR][/SIZE][/FONT][/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]4 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000][09428] [ 13] 30.01.2018 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]66 + 2 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]66.68 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]66.64 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]NA .. 66 .. .. 68 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]11 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 [/COLOR][/SIZE][/FONT][/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]5 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000][09440] [ 25] 27.02.2018 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]74 + 30 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]74.14 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]74.44 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 [/COLOR][/SIZE][/FONT][/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]6 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000][09454] [ 39] 31.03.2018 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]7 + 16 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]7.23 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]7.9 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]MI 07 .. 23 .. .. [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]10 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 [/COLOR][/SIZE][/FONT][/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]7 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000][09466] [ 51] 28.04.2018 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]66 + 22 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]66.88 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]66.44 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]PA .. 44 .. 66 .. [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]4 [/COLOR][/SIZE][/FONT][/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]8 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000][09480] [ 65] 31.05.2018 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]43 + 40 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]43.83 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]43.3 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]MI 43 .. .. 83 .. [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]4 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 [/COLOR][/SIZE][/FONT][/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]9 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000][09493] [ 78] 30.06.2018 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]3 + 76 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]3.79 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]3.73 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]FI 03 .. 73 .. .. - TO 03 .. 73 .. .. [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]7 [/COLOR][/SIZE][/FONT][/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]10 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000][09506] [ 91] 31.07.2018 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]8 + 77 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]8.85 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]8.69 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 [/COLOR][/SIZE][/FONT][/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]11 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000][09519] [104] 30.08.2018 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]51 + 89 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]51.50 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]51.38 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 [/COLOR][/SIZE][/FONT][/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]12 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000][09532] [117] 29.09.2018 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]57 + 3 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]57.60 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]57.54 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]MI .. .. 60 57 .. [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]1 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 [/COLOR][/SIZE][/FONT][/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]13 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000][09545] [130] 30.10.2018 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]50 + 50 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]50.10 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]50.90 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][COLOR=#FF0000][FONT=Ms Sans serif][SIZE=2]RO .. .. 10 .. 50[/SIZE][/FONT][/COLOR][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][COLOR=#FF0000][FONT=Ms Sans serif][SIZE=2]18 [/SIZE][/FONT][/COLOR][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 [/COLOR][/SIZE][/FONT][/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]14 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000][09558] [143] 29.11.2018 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]71 + 35 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]71.16 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]71.36 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]18 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]GE 71 .. 36 .. .. [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]12 [/COLOR][/SIZE][/FONT][/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]15 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000][09571] [156] 29.12.2018 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]56 + 5 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]56.61 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]56.51 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000] [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]13 [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]BA .. .. 56 51 .. [/COLOR][/SIZE][/FONT][/TD]
[TD="bgcolor: #ffffff, align: center"][FONT=Ms Sans serif][SIZE=2][COLOR=#000000]1 [/COLOR][/SIZE][/FONT][/TD]
[/TR]
[/TABLE]
Mike58;n2152250 ha scritto:Ciao Fill
Per la dicitura citata era "NON LO SO'"
Poi secondo me il Resocondo Economico è dato dalla impostaGiocata e Gioca anche se questa non viene scritta in quanto dichiarata False.
Quindi analizzando questo,Tu hai messo in Imposta giocata la fermata dei colpi al raggiungimento della prima vincita UtileCall Gioca(es,,,,,False)
Call ImpostaGiocata(1,Nu,Ru,Posta,18,2)Call ImpostaGiocata(2,aN,Ru,Posta,18,2)
togli quel interruzione di giocata e fai tutte le verifiche dovute.
Sub Main
'Lo script trova 2 sommativi migliori per la formazione di 2 ambi da giocare su tutte
'il 1° num del 1° ambo così come il 1° num del 2° ambo sono identici e cambiano ogni
' ultima del mese
Dim Nu(2),aN(2),Ru(1),T,V,Posta(2)
Posta(2) = 1
Ini = EstrazioneFin - 200
fin = EstrazioneFin
iks = InputBox("cambia e trova il sommativo migliore "," scegliere da 2 a 90 ",1) '
z = ScegliRuota'
p = InputBox("scegli la posizione ",,1) '
For es = Ini To fin
If IsUltimaDelMese(es) Then
k = k + 1
a = Estratto(es,z,1) ' qui si puo cambiare qui BA 1
b = Fuori90(a + iks - p)
Nu(1) = a
Nu(2) = b
aN(1) = a
aN(2) = Fuori90(b + iks)
Ru(1) = 11
ImpostaGiocata 1,Nu,Ru,Posta,13,2
ImpostaGiocata 2,aN,Ru,Posta,13,2
Scrivi " il Primo numero dei due ambi individuato nel " & p & "° " & " numero " & "dell'ultima estrazione del mese della ruota di " & SiglaRuota(z) & " è (in questo caso): " & a
Scrivi " il sommativo scelto per il 2° numero del 1° ambo è = al primo + " & iks - 1 & " (" & iks & " -1 " & ")"
Scrivi " il sommativo Generato per il 2° numero del 2° ambo è = al primo + " & iks*2 - 1 & " (" & iks*2 & " -1 " & ") " & " eventualmente se>90 operarà Fuori90"
Gioca es,,,1
End If
Next
ScriviResoconto
End Sub