============================================================ Caso n° 14
Estrazione generatrice del pronostico 10775 [204 - 23/12/2025]
G 0001 Numeri in gioco : 67.42.11.16 su MI NA per Estratto,Ambo,Terno,Quaterna
N. [67.42.11.16 ] [MI] [.. .. .. .. ..] C. 1 10776 [205 - 24/12/2025]
N. [67.42.11.16 ] [NA] [.. .. .. .. ..] C. 1 10776 [205 - 24/12/2025]
N. [67.42.11.16 ] [MI] [.. .. .. .. ..] C. 2 10777 [206 - 27/12/2025]
V N. [67.42.11.16 ] [NA] [11 .. .. .. ..] C. 2 Estratto 10777 [206 - 27/12/2025]
N. [67.42.11.16 ] [MI] [.. .. .. .. ..] C. 3 10778 [207 - 29/12/2025]
N. [67.42.11.16 ] [NA] [.. .. .. .. ..] C. 3 10778 [207 - 29/12/2025]
N. [67.42.11.16 ] [MI] [.. .. .. .. ..] C. 4 10779 [208 - 30/12/2025]
N. [67.42.11.16 ] [NA] [.. .. .. .. ..] C. 4 10779 [208 - 30/12/2025]
In corso per altre 9 estrazioni
G 0002 Numeri in gioco : 08.05.71.06 su MI NA per Estratto,Ambo,Terno,Quaterna
N. [08.05.71.06 ] [MI] [.. .. .. .. ..] C. 1 10776 [205 - 24/12/2025]
N. [08.05.71.06 ] [NA] [.. .. .. .. ..] C. 1 10776 [205 - 24/12/2025]
V N. [08.05.71.06 ] [MI] [.. 08 .. .. ..] C. 2 Estratto 10777 [206 - 27/12/2025]
N. [08.05.71.06 ] [NA] [.. .. .. .. ..] C. 2 10777 [206 - 27/12/2025]
N. [08.05.71.06 ] [MI] [.. .. .. .. ..] C. 3 10778 [207 - 29/12/2025]
N. [08.05.71.06 ] [NA] [.. .. .. .. ..] C. 3 10778 [207 - 29/12/2025]
N. [08.05.71.06 ] [MI] [.. .. .. .. ..] C. 4 10779 [208 - 30/12/2025]
V N. [08.05.71.06 ] [NA] [.. .. .. .. 08] C. 4 Estratto 10779 [208 - 30/12/2025]
In corso per altre 9 estrazioni
intendevo questo
Sub Main()
Dim rt(2),rt1(2),pt(4),n1(7)
pt(1) = 1
pt(2) = 2
pt(3) = 0.5
pt(4) = 0.5
clp = 13
rt(1) = 5
rt(2) = 6
rt1(1) = 11
rt1(2) = 12
ini = 10541
fin = EstrazioneFin
co = 0
For es = ini To fin
Messaggio(es)
If IndiceMensile(es) = 13 Then
casi = casi + 1
Scrivi String(60,"=") & " Caso n° " & casi,1
co = co + 1
a = Estratto(es,2,2) + 45
b = Estratto(es,8,2) + 30
c = Estratto(es,5,3) + 45
d = Estratto(es,6,1) + 7
n1(1) = Fuori90(a + 0)
n1(2) = Fuori90(b + 0)
n1(3) = Fuori90(c + 0)
n1(4) = Fuori90(d + 0)
ImpostaGiocata 1,n1,rt,pt,clp
a = Estratto(es,3,1)
b = Estratto(es,7,1)
c = Estratto(es,1,4)
d = Estratto(es,7,2)
E = Estratto(es,8,5)
F = Estratto(es,7,1)
G = Estratto(es,3,5)
H = Estratto(es,7,5)
n1(1) = Fuori90(A + B + 70)
n1(2) = Fuori90(C + D + 60)
n1(3) = Fuori90(C + E + 56)
n1(4) = Fuori90(G + H + 78)
ImpostaGiocata 2,n1,rt,pt,clp
Gioca es
End If
Next
Scrivi : Scrivi "Casi Rilevati " & CInt(co)
ScriviResoconto
End Sub
sono due quartine indipendenti ma unite nello stesso script tutte due ricavate alla 13à e si giocano sulle stesse ruote quindi la prima quartina ancora in gioco
fatemi sapere