Ambo con distanza 30 su MI-NA (29-59 e 15-75)

[Giulio Pedrinelli]

Ciao a tutti;

Considerando gli esiti positivi del passato con le distanze 30 su due ruote, ho deciso di postare questo metodo.

[td width="154.962px"]MILANO[/td]

[td]

29​

[/td][td]

65​

[/td][td]

54​

[/td][td]

84​

[/td][td]

59​

[/td]​

[td width="154.962px"]NAPOLI[/td]

[td]

27​

[/td][td]

15​

[/td][td]

38​

[/td][td]

04​

[/td][td]

75​

[/td]​

Ambi 29-59 e 15-75 aventi distanza 30, estrazione del 06/11/2026.

Inizio:28/01/2023
Fine: 06/11/2026

Corrispondenti a 36 casi, periodo di gioco: 9 estrazioni.
Condizione: doppio ambo con distanza 30 su Mi-Na.

Algoritmi:

2° Estratto di NA / 3° Estratto di GE + 27 / 4° Estratto di GE + 53 / 3° Estratto di MI + 80
2° Estratto di NA / 3° Estratto di GE + 27 / 3° Estratto di CA + 82 / 3° Estratto di GE + 85

Ho messo in gioco due quartine: su MI-NA per 9 estrazioni

15-28-81-44 e 15-28-53-86

 

[Giulio Pedrinelli]

Anticipazione (Spoiler): Script

Sub Main()
Dim ruote(10),ruota(10),x1,x2,x3,x4,x5,x6,r2
Dim poste(10),nu2(4),es,r1,Ini,fin,k,ok,casi
Dim a,b,c,d,p,pp,q,qq,dd
poste(1) = 0
poste(2) = 1
'-------------------parametri estrazioni
' GIULIO
' https://forum.lottoced.com/threads/ambo-con-distanza-30-su-mi-na-29-59-e-15-75.2229956/
fin = EstrazioneFin
Ini = 10192 '28/1/2023
'---------------------------------------parametro distanza che può essere indicizzato
dd = 30
'------------------------------------------------------------------------------------
For es = Ini To fin
AvanzamentoElab Ini,fin,es
r1 = 5
r2 = 6
For p = 1 To 4
For pp = p + 1 To 5
a = Estratto(es,r1,p)
b = Estratto(es,r1,pp)
If Distanza(a,b) = dd Then '<<-- qui troviamo la prima distanza in r1
For q = 1 To 4
For qq = q + 1 To 5
c = Estratto(es,r2,q)
d = Estratto(es,r2,qq)
If Distanza(c,d) = dd Then '<<-- qui troviamo la seconda distanza in r2
'quindi il caso è validato e procediamo con gli algoritmi
casi = casi + 1
x1 = Fuori90(Estratto(es,6,2) + 0)
x2 = Fuori90(Estratto(es,4,3) + 27)
x3 = Fuori90(Estratto(es,4,4) + 53)
x4 = Fuori90(Estratto(es,5,3) + 80)
x5 = Fuori90(Estratto(es,2,3) + 82)
x6 = Fuori90(Estratto(es,4,3) + 85)
Scrivi String(75,"=") & " caso n° " &(casi),1
Scrivi DataEstrazione(es,1)
Scrivi
ruota(1) = r1: ruota(2) = r2
k = 9
nu2(1) = x1
nu2(2) = x2
nu2(3) = x3
nu2(4) = x4
ImpostaGiocata 1,nu2,ruota,poste,k
nu2(1) = x1
nu2(2) = x2
nu2(3) = x5
nu2(4) = x6
ImpostaGiocata 2,nu2,ruota,poste,k
Gioca es
End If
Next
Next
End If
Next
Next
Next
ScriviResoconto
End Sub

 

[Giulio Pedrinelli]

Agghiungo che su MI-NA ci sono 3 ambi con distanza 30 (29-59 + 54-84 e 15-75) , poichè l'ultima previsione viene riportata due volte:

=========================================================================== caso n° 35
ven 06.11.2026

ven 06.11.2026 [10957]
G 1: A 15.28.81.44 Mi Na 0/9
n.i. (9 colpi)
G 2: A 15.28.53.86 Mi Na 0/9
n.i. (9 colpi)
=========================================================================== caso n° 36
ven 06.11.2026

ven 06.11.2026 [10957]
G 1: A 15.28.81.44 Mi Na 0/9
n.i. (9 colpi)
G 2: A 15.28.53.86 Mi Na 0/9
n.i. (9 colpi)