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
    martedì 15 settembre 2026
    Bari
    03
    02
    53
    44
    29
    Cagliari
    85
    81
    31
    53
    23
    Firenze
    27
    40
    34
    71
    81
    Genova
    55
    62
    72
    63
    27
    Milano
    79
    09
    49
    80
    68
    Napoli
    58
    90
    88
    77
    50
    Palermo
    45
    39
    22
    08
    31
    Roma
    39
    41
    04
    54
    63
    Torino
    53
    08
    80
    58
    54
    Venezia
    63
    51
    69
    09
    74
    Nazionale
    16
    45
    75
    60
    18
    Estrazione Simbolotto
    Palermo
    44
    32
    03
    31
    15

Ultimi Messaggi

Indietro
Alto