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
Scrivi "1 Ambata su BA alla 5° del mese",0,1,1,4,4
Scrivi
Dim rt(1),pt(5)
Dim num(5)
'
pt(1) = 1 ' > estratto
'pt(2) = 1 ' > ambo
'pt(3) = 1 ' > terno
'pt(4) = 1 ' > quaterna
'pt(5) = 1 ' > cinquina
'
k = 6
'
rt(1) = BA_
'
ini = EstrazioneFin - 60
fin = EstrazioneFin
'
For es = ini To fin
r1 = VE_
r2 = NZ_
'
Messaggio(es)
If IndiceMensile(es) = 5 Then
'
ReDim MatriceCaselleDaEvid(10,1)
' 1
MatriceCaselleDaEvid(1,0) = r1 '
MatriceCaselleDaEvid(1,1) = 1 '
' 2
MatriceCaselleDaEvid(2,0) = r1 '
MatriceCaselleDaEvid(2,1) = 2 '
' 3
MatriceCaselleDaEvid(3,0) = r1 '
MatriceCaselleDaEvid(3,1) = 3 '
' 4
MatriceCaselleDaEvid(4,0) = r1 '
MatriceCaselleDaEvid(4,1) = 4 '
' 5
MatriceCaselleDaEvid(5,0) = r1 '
MatriceCaselleDaEvid(5,1) = 5 '
'
' 6
MatriceCaselleDaEvid(6,0) = r2 '
MatriceCaselleDaEvid(6,1) = 1 '
' 7
MatriceCaselleDaEvid(7,0) = r2 '
MatriceCaselleDaEvid(7,1) = 2 '
' 8
MatriceCaselleDaEvid(8,0) = r2 '
MatriceCaselleDaEvid(8,1) = 3 '
' 9
MatriceCaselleDaEvid(9,0) = r2 '
MatriceCaselleDaEvid(9,1) = 4 '
' 10
MatriceCaselleDaEvid(10,0) = r2 '
MatriceCaselleDaEvid(10,1) = 5 '
'
Call DisegnaEstrazione(es,MatriceCaselleDaEvid)
'
num(1) = Fuori90(DiametraleD(Estratto(es,VE_,4)) + (Estratto(es,NZ_,5) + 25))
num(2) = Vert(num(1))
'
Scrivi GetInfoEstrazione(es) & Space(3) & "4°" & SiglaRuota(VE_) & " Diam.D " & "+" & " 5°" & SiglaRuota(NZ_) & " + " & "25" & "",0,1,1,4,4
Scrivi GetInfoEstrazione(es) & Space(3) & "5°" & SiglaRuota(NZ_) & "",0,1,7,4,4
Scrivi
Scrivi
ImpostaGiocata 1,num,rt,pt,k
Gioca es,1,,1
End If
Next
Scrivi
Scrivi "script di Zetrix",0,1,3,7,4,4,8
Scrivi "richiesta di Imaging",0,1,7,6,4,4,8
Scrivi "1 Ambata su BA alla 5° del mese",0,1,4,7,4,4,8
End Sub
Sub Main
Scrivi "1 Ambata su MI alla 1° del mese",0,1,1,4,4
Scrivi
Dim rt(1),pt(5)
Dim num(5)
'
pt(1) = 1 ' > estratto
'pt(2) = 1 ' > ambo
'
k = 3
'
rt(1) = MI_
'
ini = EstrazioneFin - 50
fin = EstrazioneFin
'
For es = ini To fin
r1 = TO_
r2 = NZ_
'
Messaggio(es)
If IndiceMensile(es) = 1 Then
'
ReDim MatriceCaselleDaEvid(10,1)
' 1
MatriceCaselleDaEvid(1,0) = r1 '
MatriceCaselleDaEvid(1,1) = 1 '
' 2
MatriceCaselleDaEvid(2,0) = r1 '
MatriceCaselleDaEvid(2,1) = 2 '
' 3
MatriceCaselleDaEvid(3,0) = r1 '
MatriceCaselleDaEvid(3,1) = 3 '
' 4
MatriceCaselleDaEvid(4,0) = r1 '
MatriceCaselleDaEvid(4,1) = 4 '
' 5
MatriceCaselleDaEvid(5,0) = r1 '
MatriceCaselleDaEvid(5,1) = 5 '
'------------------------------------
' 6
MatriceCaselleDaEvid(6,0) = r2 '
MatriceCaselleDaEvid(6,1) = 1 '
' 7
MatriceCaselleDaEvid(7,0) = r2 '
MatriceCaselleDaEvid(7,1) = 2 '
' 8
MatriceCaselleDaEvid(8,0) = r2 '
MatriceCaselleDaEvid(8,1) = 3 '
' 9
MatriceCaselleDaEvid(9,0) = r2 '
MatriceCaselleDaEvid(9,1) = 4 '
' 10
MatriceCaselleDaEvid(10,0) = r2 '
MatriceCaselleDaEvid(10,1) = 5 '
'
Call DisegnaEstrazione(es,MatriceCaselleDaEvid)
'
num(1) = Fuori90(Estratto(es,TO_,4) + Estratto(es,NZ_,3))
'
Scrivi GetInfoEstrazione(es) & Space(3) & "4°" & SiglaRuota(r1) & " + ",0,1,1,4,4
Scrivi GetInfoEstrazione(es) & Space(3) & "3°" & SiglaRuota(r2) & " + ",0,1,7,4,4
Scrivi
Scrivi
ImpostaGiocata 1,num,rt,pt,k
Gioca es,1,,1
End If
Next
Scrivi
Scrivi "script di Zetrix",0,1,3,7,4,4,8
Scrivi "algoritmi sommativi",0,1,7,6,4,4,8
Scrivi "1 Ambata su MI alla 1° del mese",0,1,4,7,4,4,8
End Sub
Sub Main
Scrivi "1 Ambata su NZ alla 2° del mese",0,1,1,4,4
Scrivi
Dim rt(1),pt(5)
Dim num(5)
'
pt(1) = 1 ' > estratto
'pt(2) = 1 ' > ambo
'
k = 1
'
rt(1) = NZ_
'
ini = EstrazioneFin - 30
fin = EstrazioneFin
'
For es = ini To fin
r1 = RO_
'
Messaggio(es)
If IndiceMensile(es) = 2 Then
'
ReDim MatriceCaselleDaEvid(10,1)
' 1
MatriceCaselleDaEvid(1,0) = r1 '
MatriceCaselleDaEvid(1,1) = 1 '
' 2
MatriceCaselleDaEvid(2,0) = r1 '
MatriceCaselleDaEvid(2,1) = 2 '
' 3
MatriceCaselleDaEvid(3,0) = r1 '
MatriceCaselleDaEvid(3,1) = 3 '
' 4
MatriceCaselleDaEvid(4,0) = r1 '
MatriceCaselleDaEvid(4,1) = 4 '
' 5
MatriceCaselleDaEvid(5,0) = r1 '
MatriceCaselleDaEvid(5,1) = 5 '
'------------------------------------
'
Call DisegnaEstrazione(es,MatriceCaselleDaEvid)
'
num(1) = Diametrale(Estratto(es,RO_,3))
'
Scrivi GetInfoEstrazione(es) & Space(3) & "3°" & SiglaRuota(r1) & " + 45 ",0,1,1,4,4
Scrivi
Scrivi
ImpostaGiocata 1,num,rt,pt,k
Gioca es,1,,1
End If
Next
Scrivi
Scrivi "script di Zetrix",0,1,3,7,4,4,8
Scrivi "algoritmi sommativi",0,1,7,6,4,4,8
Scrivi "1 Ambata su NZ alla 2° del mese",0,1,4,7,4,4,8
End Sub
Non so usare lo script potresti mettere in chiaro i calcoli da effettuare? GrazieCodice:Sub Main Scrivi "1 Ambata su NZ alla 2° del mese",0,1,1,4,4 Scrivi Dim rt(1),pt(5) Dim num(5) ' pt(1) = 1 ' > estratto 'pt(2) = 1 ' > ambo ' k = 1 ' rt(1) = NZ_ ' ini = EstrazioneFin - 30 fin = EstrazioneFin ' For es = ini To fin r1 = RO_ ' Messaggio(es) If IndiceMensile(es) = 2 Then ' ReDim MatriceCaselleDaEvid(10,1) ' 1 MatriceCaselleDaEvid(1,0) = r1 ' MatriceCaselleDaEvid(1,1) = 1 ' ' 2 MatriceCaselleDaEvid(2,0) = r1 ' MatriceCaselleDaEvid(2,1) = 2 ' ' 3 MatriceCaselleDaEvid(3,0) = r1 ' MatriceCaselleDaEvid(3,1) = 3 ' ' 4 MatriceCaselleDaEvid(4,0) = r1 ' MatriceCaselleDaEvid(4,1) = 4 ' ' 5 MatriceCaselleDaEvid(5,0) = r1 ' MatriceCaselleDaEvid(5,1) = 5 ' '------------------------------------ ' Call DisegnaEstrazione(es,MatriceCaselleDaEvid) ' num(1) = Diametrale(Estratto(es,RO_,3)) ' Scrivi GetInfoEstrazione(es) & Space(3) & "3°" & SiglaRuota(r1) & " + 45 ",0,1,1,4,4 Scrivi Scrivi ImpostaGiocata 1,num,rt,pt,k Gioca es,1,,1 End If Next Scrivi Scrivi "script di Zetrix",0,1,3,7,4,4,8 Scrivi "algoritmi sommativi",0,1,7,6,4,4,8 Scrivi "1 Ambata su NZ alla 2° del mese",0,1,4,7,4,4,8 End Sub
ecco lo script con l'algoritmo espress ..ambata veloce..
giocate sempre con moderazione perche si tratta sempre di algoritmi..
e possono anche cambiare gli algoritmi..
Sub Main
Scrivi "1 Ambata sulla NZ alla 2° del mese",0,1,1,4,4
Scrivi
Dim rt(1),pt(5)
Dim num(5)
'
pt(1) = 1 ' > estratto
'pt(2) = 1 ' > ambo
'
k = 2
'
rt(1) = NZ_
'
ini = EstrazioneFin - 30
fin = EstrazioneFin
'
For es = ini To fin
r1 = NA_
'
Messaggio(es)
If IndiceMensile(es) = 2 Then
'
ReDim MatriceCaselleDaEvid(10,1)
' 1
MatriceCaselleDaEvid(1,0) = r1 '
MatriceCaselleDaEvid(1,1) = 1 '
' 2
MatriceCaselleDaEvid(2,0) = r1 '
MatriceCaselleDaEvid(2,1) = 2 '
' 3
MatriceCaselleDaEvid(3,0) = r1 '
MatriceCaselleDaEvid(3,1) = 3 '
' 4
MatriceCaselleDaEvid(4,0) = r1 '
MatriceCaselleDaEvid(4,1) = 4 '
' 5
MatriceCaselleDaEvid(5,0) = r1 '
MatriceCaselleDaEvid(5,1) = 5 '
'------------------------------------
'
Call DisegnaEstrazione(es,MatriceCaselleDaEvid)
'
num(1) = Diametrale(Estratto(es,NA_,5))
'
Scrivi GetInfoEstrazione(es) & Space(3) & "5°" & SiglaRuota(r1) & " + 45 ",0,1,1,4,4
Scrivi
Scrivi
ImpostaGiocata 1,num,rt,pt,k
Gioca es,1,,1
'
End If
Next
Scrivi
Scrivi "script di Zetrix",0,1,3,7,4,4,8
Scrivi "algoritmi sommativi",0,1,7,6,4,4,8
Scrivi "1 Ambata sulla NZ alla 2° del mese",0,1,4,7,4,4,8
End Sub
Bari 80______+1______81______+1______82
Bari 9_______________71_______________80
Bari 26______+27______53______+27______80
Bari 3_______________77_______________80
Bari 9_______________73_______________82
Bari 26______+28______54______+28______82
Bari 3_______________79_______________82
Bari 9_______________17_______________26
Bari 3______+3______6______+3______9
Bari 3_______________23_______________26
Cagliari 49______+15______64______+15______79
Cagliari 72_______________7_______________79
Cagliari 35______+22______57______+22______79
Cagliari 1______+39______40______+39______79
Cagliari 49_______________23_______________72
Cagliari 35______+7______42______+7______49
Cagliari 1______+24______25______+24______49
Cagliari 35_______________37_______________72
Cagliari 1_______________71_______________72
Cagliari 1______+17______18______+17______35
Firenze 11______+31______42______+31______73
Firenze 11_______________41_______________52
Firenze 11______+3______14______+3______17
Firenze 11______+28______39______+28______67
Firenze 52_______________21_______________73
Firenze 17______+28______45______+28______73
Firenze 67______+3______70______+3______73
Firenze 17_______________35_______________52
Firenze 52_______________15_______________67
Firenze 17______+25______42______+25______67
Genova 39_______________33_______________72
Genova 39_______________3_______________42
Genova 33______+3______36______+3______39
Genova 31______+4______35______+4______39
Genova 42______+15______57______+15______72
Genova 33_______________39_______________72
Genova 31_______________41_______________72
Genova 33_______________9_______________42
Genova 31_______________11_______________42
Genova 31______+1______32______+1______33
Milano 19_______________19_______________38
Milano 38_______________23_______________61
Milano 29_______________9_______________38
Milano 38______+24______62______+24______86
Milano 19______+21______40______+21______61
Milano 19______+5______24______+5______29
Milano 19_______________67_______________86
Milano 29______+16______45______+16______61
Milano 61_______________25_______________86
Milano 29_______________57_______________86
Napoli 17_______________47_______________64
Napoli 17_______________35_______________52
Napoli 17_______________17_______________34
Napoli 17_______________9_______________26
Napoli 52______+6______58______+6______64
Napoli 34______+15______49______+15______64
Napoli 26______+19______45______+19______64
Napoli 34______+9______43______+9______52
Napoli 26______+13______39______+13______52
Napoli 26______+4______30______+4______34
Palermo 41_______________41_______________82
Palermo 22_______________19_______________41
Palermo 41_______________31_______________72
Palermo 10_______________31_______________41
Palermo 22______+30______52______+30______82
Palermo 72______+5______77______+5______82
Palermo 10______+36______46______+36______82
Palermo 22______+25______47______+25______72
Palermo 10______+6______16______+6______22
Palermo 10______+31______41______+31______72
Roma 39_______________29_______________68
Roma 34_______________5_______________39
Roma 26_______________13_______________39
Roma 39______+10______49______+10______59
Roma 34______+17______51______+17______68
Roma 26______+21______47______+21______68
Roma 59_______________9_______________68
Roma 26______+4______30______+4______34
Roma 34_______________25_______________59
Roma 26_______________33_______________59
Torino 64______+13______77______+13______90
Torino 38______+26______64______+26______90
Torino 40______+25______65______+25______90
Torino 78______+6______84______+6______90
Torino 38______+13______51______+13______64
Torino 40______+12______52______+12______64
Torino 64______+7______71______+7______78
Torino 38______+1______39______+1______40
Torino 38______+20______58______+20______78
Torino 40______+19______59______+19______78
Venezia 17______+27______44______+27______71
Venezia 71_______________11_______________82
Venezia 12_______________59_______________71
Venezia 28_______________43_______________71
Venezia 17_______________65_______________82
Venezia 12_______________5_______________17
Venezia 17_______________11_______________28
Venezia 12______+35______47______+35______82
Venezia 28______+27______55______+27______82
Venezia 12______+8______20______+8______28
Nazionale 67______+9______76______+9______85
Nazionale 84_______________1_______________85
Nazionale 78_______________7_______________85
Nazionale 54_______________31_______________85
Nazionale 67_______________17_______________84
Nazionale 67_______________11_______________78
Nazionale 54_______________13_______________67
Nazionale 78______+3______81______+3______84
Nazionale 54______+15______69______+15______84
Nazionale 54______+12______66______+12______78
Estrazione lotto del 06.09.2022
Bari 80______+1______81______+1______82
Bari 9_______________+71_______________80
Bari 26______+27______53______+27______80
Bari 3_______________+77_______________80
Bari 9_______________+73_______________82
Bari 26______+28______54______+28______82
Bari 3_______________+79_______________82
Bari 9_______________+17_______________26
Bari 3______+3______6______+3______9
Bari 3_______________+23_______________26
Cagliari 49______+15______64______+15______79
Cagliari 72_______________+7_______________79
Cagliari 35______+22______57______+22______79
Cagliari 1______+39______40______+39______79
Cagliari 49_______________+23_______________72
Cagliari 35______+7______42______+7______49
Cagliari 1______+24______25______+24______49
Cagliari 35_______________+37_______________72
Cagliari 1_______________+71_______________72
Cagliari 1______+17______18______+17______35
Firenze 11______+31______42______+31______73
Firenze 11_______________+41_______________52
Firenze 11______+3______14______+3______17
Firenze 11______+28______39______+28______67
Firenze 52_______________+21_______________73
Firenze 17______+28______45______+28______73
Firenze 67______+3______70______+3______73
Firenze 17_______________+35_______________52
Firenze 52_______________+15_______________67
Firenze 17______+25______42______+25______67
Genova 39_______________+33_______________72
Genova 39_______________+3_______________42
Genova 33______+3______36______+3______39
Genova 31______+4______35______+4______39
Genova 42______+15______57______+15______72
Genova 33_______________+39_______________72
Genova 31_______________+41_______________72
Genova 33_______________+9_______________42
Genova 31_______________+11_______________42
Genova 31______+1______32______+1______33
Milano 19_______________+19_______________38
Milano 38_______________+23_______________61
Milano 29_______________+9_______________38
Milano 38______+24______62______+24______86
Milano 19______+21______40______+21______61
Milano 19______+5______24______+5______29
Milano 19_______________+67_______________86
Milano 29______+16______45______+16______61
Milano 61_______________+25_______________86
Milano 29_______________+57_______________86
Napoli 17_______________+47_______________64
Napoli 17_______________+35_______________52
Napoli 17_______________+17_______________34
Napoli 17_______________+9_______________26
Napoli 52______+6______58______+6______64
Napoli 34______+15______49______+15______64
Napoli 26______+19______45______+19______64
Napoli 34______+9______43______+9______52
Napoli 26______+13______39______+13______52
Napoli 26______+4______30______+4______34
Palermo 41_______________+41_______________82
Palermo 22_______________+19_______________41
Palermo 41_______________+31_______________72
Palermo 10_______________+31_______________41
Palermo 22______+30______52______+30______82
Palermo 72______+5______77______+5______82
Palermo 10______+36______46______+36______82
Palermo 22______+25______47______+25______72
Palermo 10______+6______16______+6______22
Palermo 10______+31______41______+31______72
Roma 39_______________+29_______________68
Roma 34_______________+5_______________39
Roma 26_______________+13_______________39
Roma 39______+10______49______+10______59
Roma 34______+17______51______+17______68
Roma 26______+21______47______+21______68
Roma 59_______________+9_______________68
Roma 26______+4______30______+4______34
Roma 34_______________+25_______________59
Roma 26_______________+33_______________59
Torino 64______+13______77______+13______90
Torino 38______+26______64______+26______90
Torino 40______+25______65______+25______90
Torino 78______+6______84______+6______90
Torino 38______+13______51______+13______64
Torino 40______+12______52______+12______64
Torino 64______+7______71______+7______78
Torino 38______+1______39______+1______40
Torino 38______+20______58______+20______78
Torino 40______+19______59______+19______78
Venezia 17______+27______44______+27______71
Venezia 71_______________+11_______________82
Venezia 12_______________+59_______________71
Venezia 28_______________+43_______________71
Venezia 17_______________+65_______________82
Venezia 12_______________+5_______________17
Venezia 17_______________+11_______________28
Venezia 12______+35______47______+35______82
Venezia 28______+27______55______+27______82
Venezia 12______+8______20______+8______28
Nazionale 67______+9______76______+9______85
Nazionale 84_______________+1_______________85
Nazionale 78_______________+7_______________85
Nazionale 54_______________+31_______________85
Nazionale 67_______________+17_______________84
Nazionale 67_______________+11_______________78
Nazionale 54_______________+13_______________67
Nazionale 78______+3______81______+3______84
Nazionale 54______+15______69______+15______84
Nazionale 54______+12______66______+12______78
Estrazione lotto del 06.09.2022