Grazie Marco buona serata
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.
Le mie solite idee
- Creatore Discussione Marco-elle
- Data di inizio
Marco-elle
Banned
Ammoreeeeeeee...... che bello che tu ti preoccupi x meciao Marco, tutto bene?
Marco-elle
Banned
IL CAVALLO (Full Version)
metodo statistico che ricava:
1 quartina x ambo
su ruote congeniali
metodo statistico che ricava:
1 quartina x ambo
su ruote congeniali
Codice:
Sub Main()
ColoreTesto 2
Scrivi "IL CAVALLO (Full Version) "
Scrivi "GIOCA PREVISIONE SU RUOTE CONGENIALI "
Scrivi "METODO E LIST BY Marco"
ColoreTesto 0
Dim poste(2)
Dim ruota(10)
Dim n1(4)
poste(2) = 1
clp = 12
ini = EstrazioneFin - 1000
fin = EstrazioneFin
co = 0
For es = ini To fin
Messaggio es
Call AvanzamentoElab(Ini,Fin,es)
For r = 1 To 1
For r1 = 2 To 2
a = Estratto(es,r,1)
b = Estratto(es,r1,3)
ok = 0
If Fuori90(a + b) = 1 Then
n1(1) = 8
n1(2) = 15
n1(3) = 56
n1(4) = 65
ruota(1) = 4
ruota(2) = 5
ok = 1
End If
If Fuori90(a + b) = 2 Then
n1(1) = 12
n1(2) = 15
n1(3) = 38
n1(4) = 75
ruota(1) = 1
ruota(2) = 3
ok = 1
End If
If Fuori90(a + b) = 3 Then
n1(1) = 6
n1(2) = 17
n1(3) = 19
n1(4) = 40
ruota(1) = 2
ruota(2) = 4
ok = 1
End If
If Fuori90(a + b) = 4 Then
n1(1) = 1
n1(2) = 9
n1(3) = 35
n1(4) = 46
ruota(1) = 1
ruota(2) = 5
ok = 1
End If
If Fuori90(a + b) = 5 Then
n1(1) = 8
n1(2) = 10
n1(3) = 11
n1(4) = 39
ruota(1) = 1
ruota(2) = 9
ok = 1
End If
If Fuori90(a + b) = 6 Then
n1(1) = 2
n1(2) = 5
n1(3) = 69
n1(4) = 74
ruota(1) = 1
ruota(2) = 4
ok = 1
End If
If Fuori90(a + b) = 7 Then
n1(1) = 24
n1(2) = 71
n1(3) = 75
n1(4) = 89
ruota(1) = 3
ruota(2) = 5
ok = 1
End If
If Fuori90(a + b) = 8 Then
n1(1) = 2
n1(2) = 9
n1(3) = 74
n1(4) = 86
ruota(1) = 1
ruota(2) = 6
ok = 1
End If
If Fuori90(a + b) = 9 Then
n1(1) = 25
n1(2) = 39
n1(3) = 40
n1(4) = 62
ruota(1) = 4
ruota(2) = 9
ok = 1
End If
If Fuori90(a + b) = 10 Then
n1(1) = 4
n1(2) = 6
n1(3) = 8
n1(4) = 38
ruota(1) = 3
ruota(2) = 8
ok = 1
End If
If Fuori90(a + b) = 11 Then
n1(1) = 6
n1(2) = 25
n1(3) = 30
n1(4) = 54
ruota(1) = 5
ruota(2) = 10
ok = 1
End If
If Fuori90(a + b) = 12 Then
n1(1) = 25
n1(2) = 33
n1(3) = 82
n1(4) = 86
ruota(1) = 3
ruota(2) = 7
ok = 1
End If
If Fuori90(a + b) = 13 Then
n1(1) = 2
n1(2) = 32
n1(3) = 61
n1(4) = 79
ruota(1) = 1
ruota(2) = 3
ok = 1
End If
If Fuori90(a + b) = 14 Then
n1(1) = 1
n1(2) = 6
n1(3) = 14
n1(4) = 20
ruota(1) = 6
ruota(2) = 10
ok = 1
End If
If Fuori90(a + b) = 15 Then
n1(1) = 13
n1(2) = 20
n1(3) = 23
n1(4) = 69
ruota(1) = 1
ruota(2) = 3
ok = 1
End If
If Fuori90(a + b) = 16 Then
n1(1) = 30
n1(2) = 31
n1(3) = 32
n1(4) = 66
ruota(1) = 2
ruota(2) = 10
ok = 1
End If
If Fuori90(a + b) = 17 Then
n1(1) = 19
n1(2) = 28
n1(3) = 34
n1(4) = 53
ruota(1) = 1
ruota(2) = 6
ok = 1
End If
If Fuori90(a + b) = 18 Then
n1(1) = 35
n1(2) = 56
n1(3) = 70
n1(4) = 73
ruota(1) = 2
ruota(2) = 4
ok = 1
End If
If Fuori90(a + b) = 19 Then
n1(1) = 1
n1(2) = 10
n1(3) = 35
n1(4) = 62
ruota(1) = 1
ruota(2) = 3
ok = 1
End If
If Fuori90(a + b) = 20 Then
n1(1) = 4
n1(2) = 15
n1(3) = 55
n1(4) = 79
ruota(1) = 1
ruota(2) = 8
ok = 1
End If
If Fuori90(a + b) = 21 Then
n1(1) = 56
n1(2) = 68
n1(3) = 69
n1(4) = 81
ruota(1) = 1
ruota(2) = 3
ok = 1
End If
If Fuori90(a + b) = 22 Then
n1(1) = 1
n1(2) = 7
n1(3) = 9
n1(4) = 56
ruota(1) = 1
ruota(2) = 2
ok = 1
End If
If Fuori90(a + b) = 23 Then
n1(1) = 1
n1(2) = 16
n1(3) = 22
n1(4) = 89
ruota(1) = 1
ruota(2) = 2
ok = 1
End If
If Fuori90(a + b) = 24 Then
n1(1) = 10
n1(2) = 15
n1(3) = 33
n1(4) = 76
ruota(1) = 1
ruota(2) = 3
ok = 1
End If
If Fuori90(a + b) = 25 Then
n1(1) = 28
n1(2) = 30
n1(3) = 44
n1(4) = 70
ruota(1) = 1
ruota(2) = 7
ok = 1
End If
If Fuori90(a + b) = 26 Then
n1(1) = 16
n1(2) = 60
n1(3) = 61
n1(4) = 76
ruota(1) = 2
ruota(2) = 9
ok = 1
End If
If Fuori90(a + b) = 27 Then
n1(1) = 1
n1(2) = 2
n1(3) = 19
n1(4) = 34
ruota(1) = 1
ruota(2) = 2
ok = 1
End If
If Fuori90(a + b) = 28 Then
n1(1) = 10
n1(2) = 28
n1(3) = 58
n1(4) = 82
ruota(1) = 1
ruota(2) = 9
ok = 1
End If
If Fuori90(a + b) = 29 Then
n1(1) = 10
n1(2) = 22
n1(3) = 35
n1(4) = 36
ruota(1) = 1
ruota(2) = 10
ok = 1
End If
If Fuori90(a + b) = 30 Then
n1(1) = 4
n1(2) = 13
n1(3) = 73
n1(4) = 74
ruota(1) = 1
ruota(2) = 6
ok = 1
End If
If Fuori90(a + b) = 31 Then
n1(1) = 10
n1(2) = 31
n1(3) = 47
n1(4) = 80
ruota(1) = 1
ruota(2) = 10
ok = 1
End If
If Fuori90(a + b) = 32 Then
n1(1) = 6
n1(2) = 34
n1(3) = 61
n1(4) = 78
ruota(1) = 1
ruota(2) = 10
ok = 1
End If
If Fuori90(a + b) = 33 Then
n1(1) = 25
n1(2) = 35
n1(3) = 61
n1(4) = 75
ruota(1) = 1
ruota(2) = 3
ok = 1
End If
If Fuori90(a + b) = 34 Then
n1(1) = 16
n1(2) = 34
n1(3) = 39
n1(4) = 79
ruota(1) = 1
ruota(2) = 4
ok = 1
End If
If Fuori90(a + b) = 35 Then
n1(1) = 5
n1(2) = 22
n1(3) = 34
n1(4) = 65
ruota(1) = 1
ruota(2) = 9
ok = 1
End If
If Fuori90(a + b) = 36 Then
n1(1) = 13
n1(2) = 15
n1(3) = 35
n1(4) = 39
ruota(1) = 1
ruota(2) = 8
ok = 1
End If
If Fuori90(a + b) = 37 Then
n1(1) = 7
n1(2) = 22
n1(3) = 29
n1(4) = 51
ruota(1) = 5
ruota(2) = 9
ok = 1
End If
If Fuori90(a + b) = 38 Then
n1(1) = 18
n1(2) = 56
n1(3) = 60
n1(4) = 63
ruota(1) = 2
ruota(2) = 3
ok = 1
End If
If Fuori90(a + b) = 39 Then
n1(1) = 44
n1(2) = 46
n1(3) = 71
n1(4) = 76
ruota(1) = 1
ruota(2) = 6
ok = 1
End If
If Fuori90(a + b) = 40 Then
n1(1) = 24
n1(2) = 31
n1(3) = 32
n1(4) = 54
ruota(1) = 1
ruota(2) = 2
ok = 1
End If
If Fuori90(a + b) = 41 Then
n1(1) = 6
n1(2) = 44
n1(3) = 61
n1(4) = 80
ruota(1) = 2
ruota(2) = 7
ok = 1
End If
If Fuori90(a + b) = 42 Then
n1(1) = 59
n1(2) = 64
n1(3) = 73
n1(4) = 77
ruota(1) = 1
ruota(2) = 7
ok = 1
End If
If Fuori90(a + b) = 43 Then
n1(1) = 6
n1(2) = 15
n1(3) = 37
n1(4) = 60
ruota(1) = 1
ruota(2) = 10
ok = 1
End If
If Fuori90(a + b) = 44 Then
n1(1) = 3
n1(2) = 28
n1(3) = 32
n1(4) = 78
ruota(1) = 3
ruota(2) = 4
ok = 1
End If
If Fuori90(a + b) = 45 Then
n1(1) = 4
n1(2) = 7
n1(3) = 31
n1(4) = 35
ruota(1) = 4
ruota(2) = 8
ok = 1
End If
If Fuori90(a + b) = 46 Then
n1(1) = 1
n1(2) = 13
n1(3) = 78
n1(4) = 83
ruota(1) = 1
ruota(2) = 3
ok = 1
End If
If Fuori90(a + b) = 47 Then
n1(1) = 11
n1(2) = 71
n1(3) = 76
n1(4) = 90
ruota(1) = 1
ruota(2) = 2
ok = 1
End If
If Fuori90(a + b) = 48Then
n1(1) = 31
n1(2) = 33
n1(3) = 38
n1(4) = 73
ruota(1) = 1
ruota(2) = 10
ok = 1
End If
If Fuori90(a + b) = 49 Then
n1(1) = 5
n1(2) = 10
n1(3) = 15
n1(4) = 34
ruota(1) = 1
ruota(2) = 4
ok = 1
End If
If Fuori90(a + b) = 50 Then
n1(1) = 6
n1(2) = 16
n1(3) = 27
n1(4) = 89
ruota(1) = 1
ruota(2) = 4
ok = 1
End If
If Fuori90(a + b) = 51 Then
n1(1) = 10
n1(2) = 57
n1(3) = 67
n1(4) = 81
ruota(1) = 4
ruota(2) = 5
ok = 1
End If
If Fuori90(a + b) = 52 Then
n1(1) = 5
n1(2) = 9
n1(3) = 26
n1(4) = 45
ruota(1) = 1
ruota(2) = 6
ok = 1
End If
If Fuori90(a + b) = 53 Then
n1(1) = 12
n1(2) = 16
n1(3) = 24
n1(4) = 34
ruota(1) = 1
ruota(2) = 7
ok = 1
End If
If Fuori90(a + b) = 54 Then
n1(1) = 3
n1(2) = 42
n1(3) = 56
n1(4) = 74
ruota(1) = 1
ruota(2) = 2
ok = 1
End If
If Fuori90(a + b) = 55 Then
n1(1) = 1
n1(2) = 27
n1(3) = 39
n1(4) = 54
ruota(1) = 2
ruota(2) = 9
ok = 1
End If
If Fuori90(a + b) = 56 Then
n1(1) = 2
n1(2) = 30
n1(3) = 50
n1(4) = 54
ruota(1) = 1
ruota(2) = 4
ok = 1
End If
If Fuori90(a + b) = 57 Then
n1(1) = 11
n1(2) = 21
n1(3) = 27
n1(4) = 48
ruota(1) = 2
ruota(2) = 10
ok = 1
End If
If Fuori90(a + b) = 58 Then
n1(1) = 5
n1(2) = 13
n1(3) = 21
n1(4) = 75
ruota(1) = 3
ruota(2) = 4
ok = 1
End If
If Fuori90(a + b) = 59 Then
n1(1) = 13
n1(2) = 49
n1(3) = 52
n1(4) = 54
ruota(1) = 3
ruota(2) = 9
ok = 1
End If
If Fuori90(a + b) = 60 Then
n1(1) = 35
n1(2) = 30
n1(3) = 78
n1(4) = 83
ruota(1) = 1
ruota(2) = 10
ok = 1
End If
If Fuori90(a + b) = 61 Then
n1(1) = 1
n1(2) = 2
n1(3) = 6
n1(4) = 18
ruota(1) = 2
ruota(2) = 10
ok = 1
End If
If Fuori90(a + b) = 62 Then
n1(1) = 5
n1(2) = 44
n1(3) = 68
n1(4) = 74
ruota(1) = 1
ruota(2) = 2
ok = 1
End If
If Fuori90(a + b) = 63 Then
n1(1) = 7
n1(2) = 12
n1(3) = 56
n1(4) = 89
ruota(1) = 4
ruota(2) = 8
ok = 1
End If
If Fuori90(a + b) = 64 Then
n1(1) = 1
n1(2) = 4
n1(3) = 5
n1(4) = 51
ruota(1) = 1
ruota(2) = 9
ok = 1
End If
If Fuori90(a + b) = 65 Then
n1(1) = 3
n1(2) = 15
n1(3) = 20
n1(4) = 40
ruota(1) = 1
ruota(2) = 3
ok = 1
End If
If Fuori90(a + b) = 66 Then
n1(1) = 5
n1(2) = 21
n1(3) = 31
n1(4) = 49
ruota(1) = 4
ruota(2) = 6
ok = 1
End If
If Fuori90(a + b) = 67 Then
n1(1) = 8
n1(2) = 11
n1(3) = 16
n1(4) = 59
ruota(1) = 2
ruota(2) = 3
ok = 1
End If
If Fuori90(a + b) = 68 Then
n1(1) = 7
n1(2) = 45
n1(3) = 69
n1(4) = 70
ruota(1) = 2
ruota(2) = 5
ok = 1
End If
If Fuori90(a + b) = 69 Then
n1(1) = 5
n1(2) = 13
n1(3) = 35
n1(4) = 73
ruota(1) = 5
ruota(2) = 8
ok = 1
End If
If Fuori90(a + b) = 70 Then
n1(1) = 2
n1(2) = 6
n1(3) = 9
n1(4) = 32
ruota(1) = 1
ruota(2) = 4
ok = 1
End If
If Fuori90(a + b) = 71 Then
n1(1) = 2
n1(2) = 6
n1(3) = 11
n1(4) = 51
ruota(1) = 1
ruota(2) = 7
ok = 1
End If
If Fuori90(a + b) = 72 Then
n1(1) = 1
n1(2) = 5
n1(3) = 52
n1(4) = 61
ruota(1) = 1
ruota(2) = 6
ok = 1
End If
If Fuori90(a + b) = 73 Then
n1(1) = 2
n1(2) = 27
n1(3) = 50
n1(4) = 89
ruota(1) = 2
ruota(2) = 8
ok = 1
End If
If Fuori90(a + b) = 74 Then
n1(1) = 2
n1(2) = 9
n1(3) = 21
n1(4) = 66
ruota(1) = 1
ruota(2) = 2
ok = 1
End If
If Fuori90(a + b) = 75 Then
n1(1) = 10
n1(2) = 13
n1(3) = 26
n1(4) = 57
ruota(1) = 1
ruota(2) = 7
ok = 1
End If
If Fuori90(a + b) = 76 Then
n1(1) = 24
n1(2) = 26
n1(3) = 46
n1(4) = 51
ruota(1) = 2
ruota(2) = 10
ok = 1
End If
If Fuori90(a + b) = 77 Then
n1(1) = 1
n1(2) = 2
n1(3) = 25
n1(4) = 35
ruota(1) = 2
ruota(2) = 8
ok = 1
End If
If Fuori90(a + b) = 78 Then
n1(1) = 15
n1(2) = 17
n1(3) = 23
n1(4) = 29
ruota(1) = 1
ruota(2) = 6
ok = 1
End If
If Fuori90(a + b) = 79 Then
n1(1) = 2
n1(2) = 56
n1(3) = 61
n1(4) = 64
ruota(1) = 1
ruota(2) = 5
ok = 1
End If
If Fuori90(a + b) = 80 Then
n1(1) = 1
n1(2) = 20
n1(3) = 24
n1(4) = 39
ruota(1) = 1
ruota(2) = 9
ok = 1
End If
If Fuori90(a + b) = 81 Then
n1(1) = 1
n1(2) = 18
n1(3) = 36
n1(4) = 74
ruota(1) = 1
ruota(2) = 9
ok = 1
End If
If Fuori90(a + b) = 82 Then
n1(1) = 6
n1(2) = 70
n1(3) = 74
n1(4) = 89
ruota(1) = 1
ruota(2) = 8
ok = 1
End If
If Fuori90(a + b) = 83 Then
n1(1) = 3
n1(2) = 20
n1(3) = 22
n1(4) = 77
ruota(1) = 1
ruota(2) = 6
ok = 1
End If
If Fuori90(a + b) = 84 Then
n1(1) = 9
n1(2) = 13
n1(3) = 23
n1(4) = 41
ruota(1) = 1
ruota(2) = 3
ok = 1
End If
If Fuori90(a + b) = 85 Then
n1(1) = 33
n1(2) = 48
n1(3) = 54
n1(4) = 88
ruota(1) = 1
ruota(2) = 7
ok = 1
End If
If Fuori90(a + b) = 86 Then
n1(1) = 5
n1(2) = 9
n1(3) = 26
n1(4) = 70
ruota(1) = 1
ruota(2) = 9
ok = 1
End If
If Fuori90(a + b) = 87 Then
n1(1) = 14
n1(2) = 28
n1(3) = 66
n1(4) = 89
ruota(1) = 2
ruota(2) = 5
ok = 1
End If
If Fuori90(a + b) = 88 Then
n1(1) = 3
n1(2) = 9
n1(3) = 11
n1(4) = 32
ruota(1) = 5
ruota(2) = 8
ok = 1
End If
If Fuori90(a + b) = 89 Then
n1(1) = 9
n1(2) = 19
n1(3) = 25
n1(4) = 28
ruota(1) = 1
ruota(2) = 6
ok = 1
End If
If Fuori90(a + b) = 90 Then
n1(1) = 10
n1(2) = 13
n1(3) = 57
n1(4) = 82
ruota(1) = 1
ruota(2) = 4
ok = 1
End If
If OK = 1 Then
co = co + 1
ColoreTesto 1
Scrivi String(80,"°") & " Caso n°" & co,1
Scrivi DataEstrazione(es) & " Cavallo BA-CA " & a & " - " & b & c,1
Scrivi String(80,"°"),1
ColoreTesto 0
ImpostaGiocata 1,n1,ruota,poste,clp,2
Gioca es,1
End If
Next
Next
Next
ScriviResoconto
End SubMarco-elle
Banned
Dopo molteplici ambate.....ambetti e ambi su TT
questa sera una vincita degna di nota con il metodo
dei ambi vertibili di BARI
questa sera una vincita degna di nota con il metodo
dei ambi vertibili di BARI
lotto_tom75
Advanced Premium Member
E' proprio il caso di dire... che 
!!! 
Complimenti! Bellissimo ambo secco Marco!
!!! Complimenti! Bellissimo ambo secco Marco!
Marco-elle
Banned
Con la ruota NZ (essendo l'unica nata) si riescono a ottenere delle buone ricerche
con altrettanta resa,detto ciò,vi propongo un altro metodo
AMBI IN CADENZA SULLA NZ NELLE PRIME 2 POSIZIONI
metodo statistico che ricava:
4 ambi
1 quartina
su ruote congeniali
con altrettanta resa,detto ciò,vi propongo un altro metodo
AMBI IN CADENZA SULLA NZ NELLE PRIME 2 POSIZIONI
metodo statistico che ricava:
4 ambi
1 quartina
su ruote congeniali
Codice:
Sub Main()
ColoreTesto 2
Scrivi "AMBO IN CADENZA SULLA NZ NELLE PRIME 2 POSIZIONI "
Scrivi "GIOCA PREVISIONE SU RUOTE CONGENIALI "
Scrivi "METODO E LIST BY Marco"
ColoreTesto 0
Dim poste(4)
Dim ruota(10)
Dim n1(2)
Dim n2(2)
Dim n3(2)
Dim n4(2)
Dim n5(4)
poste(2) = 1
clp = 12
ini = EstrazioneFin - 2400
fin = EstrazioneFin
co = 0
For es = ini To fin
Messaggio es
Call AvanzamentoElab(Ini,Fin,es)
r1 = 12
For p1 = 1 To 1
For p2 = p1 + 1 To 2
a = Estratto(es,12,p1)
b = Estratto(es,r1,p2)
ok = 0
If Cadenza(a) = 0 And Cadenza(b) = 0 Then
n1(1) = 3
n1(2) = 48
n2(1) = 3
n2(2) = 88
n3(1) = 33
n3(2) = 48
n4(1) = 33
n4(2) = 88
n5(1) = 12
n5(2) = 33
n5(3) = 48
n5(4) = 88
ruota(1) = 5
ruota(2) = 7
ok = 1
End If
If Cadenza(a) = 1 And Cadenza(b) = 1 Then
n1(1) = 45
n1(2) = 9
n2(1) = 45
n2(2) = 54
n3(1) = 2
n3(2) = 45
n3(2) = 2
n4(1) = 54
n5(1) = 3
n5(2) = 45
n5(3) = 52
n5(4) = 54
ruota(1) = 1
ruota(2) = 8
ok = 1
End If
If Cadenza(a) = 2 And Cadenza(b) = 2 Then
n1(1) = 14
n1(2) = 44
n2(1) = 14
n2(2) = 51
n3(1) = 1
n3(2) = 44
n3(2) = 1
n4(1) = 51
n4(2) = 33
n5(1) = 14
n5(2) = 30
n5(3) = 47
n5(4) = 58
ruota(1) = 4
ruota(2) = 5
ok = 1
End If
If Cadenza(a) = 3 And Cadenza(b) = 3 Then
n1(1) = 75
n1(2) = 43
n2(1) = 75
n2(2) = 64
n3(1) = 3
n3(2) = 43
n4(1) = 3
n4(2) = 64
n5(1) = 55
n5(2) = 64
n5(3) = 65
n5(4) = 75
ruota(1) = 1
ruota(2) = 7
ok = 1
End If
If Cadenza(a) = 4 And Cadenza(b) = 4 Then
n1(1) = 82
n1(2) = 8
n2(1) = 82
n2(2) = 33
n3(1) = 1
n3(2) = 8
n4(1) = 1
n4(2) = 33
n5(1) = 14
n5(2) = 21
n5(3) = 33
n5(4) = 82
ruota(1) = 2
ruota(2) = 8
ok = 1
End If
If Cadenza(a) = 5 And Cadenza(b) = 5 Then
n1(1) = 14
n1(2) = 42
n2(1) = 14
n2(2) = 87
n3(1) = 1
n3(2) = 42
n4(1) = 1
n4(2) = 87
n5(1) = 14
n5(2) = 27
n5(3) = 28
n5(4) = 36
ruota(1) = 5
ruota(2) = 9
ok = 1
End If
If Cadenza(a) = 6 And Cadenza(b) = 6 Then
n1(1) = 35
n1(2) = 4
n2(1) = 35
n2(2) = 45
n3(1) = 2
n3(2) = 4
n4(1) = 2
n4(2) = 45
n5(1) = 20
n5(2) = 30
n5(3) = 35
n5(4) = 61
ruota(1) = 1
ruota(2) = 8
ok = 1
End If
If Cadenza(a) = 7 And Cadenza(b) = 7 Then
n1(1) = 2
n1(2) = 43
n2(1) = 2
n2(2) = 83
n3(1) = 1
n3(2) = 43
n4(1) = 1
n4(2) = 83
n5(1) = 1
n5(2) = 2
n5(3) = 43
n5(4) = 83
ruota(1) = 1
ruota(2) = 6
ok = 1
End If
If Cadenza(a) = 8 And Cadenza(b) = 8 Then
n1(1) = 45
n1(2) = 63
n2(1) = 45
n2(2) = 76
n3(1) = 1
n3(2) = 63
n4(1) = 1
n4(2) = 76
n5(1) = 1
n5(2) = 45
n5(3) = 63
n5(4) = 76
ruota(1) = 3
ruota(2) = 7
ok = 1
End If
If Cadenza(a) = 9 And Cadenza(b) = 9 Then
n1(1) = 41
n1(2) = 2
n2(1) = 41
n2(2) = 16
n3(1) = 1
n3(2) = 2
n4(1) = 1
n4(2) = 16
n5(1) = 7
n5(2) = 10
n5(3) = 41
n5(4) = 84
ruota(1) = 2
ruota(2) = 6
ok = 1
End If
If ok = 1 Then
co = co + 1
ColoreTesto 1
Scrivi String(80,"^") & " Caso n°" & co,1
Scrivi DataEstrazione(es) & " AMBO IN CADENZA SULLA NZ " & a & " - " & b & c,1
Scrivi String(80,"^"),1
ColoreTesto 0
ImpostaGiocata 1,n1,ruota,poste,clp
ImpostaGiocata 2,n2,ruota,poste,clp
ImpostaGiocata 3,n3,ruota,poste,clp
ImpostaGiocata 4,n4,ruota,poste,clp
ImpostaGiocata 5,n5,ruota,poste,clp
Gioca es,1
End If
Next
Next
Next
ScriviResoconto
End Sub
camy64
Advanced Member >PLATINUM PLUS<
Marco-elle
Banned
Ciao Kira,e x chi NN capisce niente di script ???????
ti inserisco il link per scaricare il programma SPAZIOMETRIA aggiornato all'ultima versione
è gratuito e utile per fare tutte le ricerche che vuoi e facendo il copia-incolla degli script
il programma ti permette di leggere e salvare i Listati
Segui le istruzioni e vedrai che non è difficlile,poi la manualità,renderà le cosi più semplici
https://forum.lottoced.com/threads/programma-spaziometria.119980/
Marco-elle
Banned
Dovete fare uno sforzo e impare a usare questo programma che può regalare soddisfazioni,I Listati cominciano ad aumentare e di previsioni ce ne sono da giocare.Difficile e complicato aggiornare di volta in volta,lo scopo di queste mie idee,è quello di aiutare ad avere qualche convergenza ai propri numeri e magari mettere in gioco anche le mie previsioni che sono frutto di ricerche statistiche e che restituiscono numeri reali e non numeri ricavati dalle targhe automobilistiche oppure nell'agenda telefonica
Bravissimo
camy64
Advanced Member >PLATINUM PLUS<
Grazie tesoro
. Ottima intuizione. Il mio numero di telefono nel 2021 ha dato due terni. L’ultimo a Napoli il 21/07. Secondo te posso giocarlo ancora oppure aspetto il 2022? 
Serse
Advanced Member
Il programma si installa solo su computer,facendo una ricerca su google"guida a spaziometria Silop"dovrebbe comparire tra le prime voci il link al pdf sulla guida, poi qualcosina c'è anche su youtube ma mi pare solo su come usare gli script.Ciao Marco. Sei arrabbiato con me? Ho provato a scaricare Spaziometria, ma sul telefono non si apre
Marco-elle
Banned
Solo da PC….Ciao Marco. Sei arrabbiato con me? Ho provato a scaricare Spaziometria, ma sul telefono non si apre
buonasera a tutti sono nuovo del forum e mi sto cimentando per le prime volte con spaziometria ,non sono molto pratico ,volevo sapere se il programma è in grado di trovare i terni piu ritardatari in un arco di tempo circoscritto però genarati dalle cinquine estratte e non su tutti i numeri ,ringraziando anticipatamente
Ultima estrazione Lotto
-
Estrazione del lotto
venerdì 19 dicembre 2025Bari3129786661Cagliari4572653835Firenze8001331136Genova1581024783Milano8852047624Napoli1072375807Palermo7805344835Roma2322427502Torino7359484770Venezia0278313872Nazionale0428856057Estrazione Simbolotto
Venezia
3010432821
