Novità

Dal quarto estratto di Venezia: sei ambi in attesa

FABIO60

Super member
Sperando che non sia: una lunga attesa...

Codice:
'Dal quarto Estratto della ruota di VENEZIA dell' ULTIMA Estrazione:
' SEI AMBI in gioco su Venezia
'ESEGUIRE ad ogni aggiornamento dell' archivio (gli CAMBIANO ad ogni estrazione)
[B][SIZE=2][/B][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Sub[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000000] Main()[/COLOR]
[/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Dim[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] n1(3)
[/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Dim[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] n2(2)
[/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Dim[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] ruota(1)
ruota(1) = 10
Ini = 8472
fin = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]EstrazioneFin
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]For[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] es = ini [/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]To[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] fin
nu = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Estratto[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](es,10,4)
colpi = colpi + 1
n1(1) = nu
n1(2) = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Fuori90[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](90 + nu + 1)
n1(3) = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Fuori90[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](90 + nu + 89)
n2(1) = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Fuori90[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](90 + nu + 7)
n2(2) = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Fuori90[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](90 + nu + 83)
a = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Fuori90[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](90 + nu + 7)
b = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Fuori90[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](90 + nu + 83)
c1 = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Fuori90[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](90 + nu + 89)
c2 = nu
c3 = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Fuori90[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](90 + nu + 1)
[/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]If[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] es < fin [/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Then
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] "Venezia - AMBI IN GIOCO per l'estrazione SUCCESSIVA al ..." & [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]DataEstrazione[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](es) & "...colpo..." & colpi & "° negativo",0,1
[/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] a & "." & c1 & ";" & a & "." & c2 & ";" & a & "." & c3,1,1
[/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] b & "." & c1 & ";" & b & "." & c2 & ";" & b & "." & c3,1,1
[/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]If[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]SerieFreq[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](es + 1,es + 1,n1,ruota,1) > 0 [/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]And [/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]SerieFreq[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](es + 1,es + 1,n2,ruota,1) > 0 [/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Then
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]ColoreTesto[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] 2
[/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] "SORTITO! gioco chiuso..." & [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]DataEstrazione[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](es + 1)
[/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Exit [/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Sub
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]End [/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]If
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]End [/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]If
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]If[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] es = fin [/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Then
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]ColoreTesto[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] 1
[/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] "Venezia - AMBI IN GIOCO per l'estrazione SUCCESSIVA al ..." & [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]DataEstrazione[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](fin) & "...colpo..." & colpi & "° in gioco",0,1
[/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]ColoreTesto[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] 0
[/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] a & "." & c1 & ";" & a & "." & c2 & ";" & a & "." & c3,1,1
[/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] b & "." & c1 & ";" & b & "." & c2 & ";" & b & "." & c3,1,1
[/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]End [/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]If
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Next
End [/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Sub
[/COLOR][/SIZE][/COLOR][/SIZE]

Saluti e Buone Feste a tutti
 
Ultima modifica:
Ciao Fabio , questo script , da errore sia su L8 che su Spaziometria.

:) manca lo spazio....

postata: IfSerieFreq(es + 1,es + 1,n1,ruota,1) > 0 And SerieFreq(es + 1,es + 1,n2,ruota,1) > 0 Then
giusta:
If SerieFreq(es + 1,es + 1,n1,ruota,1) > 0 And SerieFreq(es + 1,es + 1,n2,ruota,1) > 0 Then


 
Riprovo:


Codice:
'Dal quarto Estratto della ruota di VENEZIA dell' ULTIMA Estrazione:
' SEI AMBI in gioco su Venezia
'ESEGUIRE ad ogni aggiornamento dell' archivio (gli CAMBIANO ad ogni estrazione) 
[SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Sub[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000000] Main()[/COLOR]
[/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Dim[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] n1(3)
[/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Dim[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] n2(2)
[/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Dim[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] ruota(1)
ruota(1) = 10
Ini = 8472
fin = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]EstrazioneFin
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]For[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] es = ini [/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]To[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] fin
nu = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Estratto[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](es,10,4)
colpi = colpi + 1
n1(1) = nu
n1(2) = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Fuori90[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](90 + nu + 1)
n1(3) = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Fuori90[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](90 + nu + 89)
n2(1) = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Fuori90[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](90 + nu + 7)
n2(2) = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Fuori90[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](90 + nu + 83)
a = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Fuori90[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](90 + nu + 7)
b = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Fuori90[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](90 + nu + 83)
c1 = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Fuori90[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](90 + nu + 89)
c2 = nu
c3 = [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Fuori90[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](90 + nu + 1)
[/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]If[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] es < fin [/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Then
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] "AMBI per l'estrazione SUCCESSIVA al ..." & [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]DataEstrazione[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](es) & "...colpo..." & colpi & "° negativo",0,1
[/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] a & "." & c1 & ";" & a & "." & c2 & ";" & a & "." & c3,1,1
[/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] b & "." & c1 & ";" & b & "." & c2 & ";" & b & "." & c3,1,1
[/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]If [/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]SerieFreq[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](es + 1,es + 1,n1,ruota,1) > 0 [/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]And [/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]SerieFreq[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](es + 1,es + 1,n2,ruota,1) > 0 [/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Then
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]ColoreTesto[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] 2
[/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] "SORTITO! gioco chiuso..." & [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]DataEstrazione[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](es + 1)
[/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Exit [/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Sub
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]End [/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]If
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]End [/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]If
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]If[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] es = fin [/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Then
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]ColoreTesto[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] 1
[/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] "AMBI per l'estrazione SUCCESSIVA al ..." & [/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]DataEstrazione[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2](fin) & "...colpo..." & colpi & "° in gioco",0,1
[/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]ColoreTesto[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] 0
[/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] a & "." & c1 & ";" & a & "." & c2 & ";" & a & "." & c3,1,1
[/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#ea0000][SIZE=2][COLOR=#ea0000]Scrivi[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] b & "." & c1 & ";" & b & "." & c2 & ";" & b & "." & c3,1,1
[/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]End [/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]If
[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Next
End [/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2][COLOR=#000080][SIZE=2][COLOR=#000080]Sub
[/COLOR][/SIZE][/COLOR][/SIZE]
 
Ciao Romana , mille grazie , in definitiva si potrebbe giocare anche la cinquina 07.89.90.01.83 dico bene ?.
 
Scusa fabio, per quanti colpi si dovrebbero giocare? ed a quale estrazione si riferiscono i calcoli da effettuare?, grazie mille.
 

Ultima estrazione Lotto

  • Estrazione del lotto
    giovedì 20 agosto 2026
    Bari
    63
    19
    27
    70
    86
    Cagliari
    45
    67
    19
    57
    14
    Firenze
    67
    84
    83
    86
    42
    Genova
    32
    31
    11
    79
    84
    Milano
    30
    19
    71
    25
    87
    Napoli
    75
    06
    19
    42
    07
    Palermo
    18
    81
    25
    40
    14
    Roma
    56
    83
    54
    01
    18
    Torino
    72
    84
    37
    45
    23
    Venezia
    07
    63
    62
    56
    65
    Nazionale
    81
    09
    80
    42
    02
    Estrazione Simbolotto
    Nazionale
    43
    24
    28
    32
    08
Indietro
Alto