1a Estrazione - BA - CA

[Giulio Pedrinelli]

Ciao a tutti;

a partire dalla 1° estrazione del mese, 3 cinquine su Bari-Cagliari.
Periodo di gioco: 9 estrazioni.
Ultimi 36 mesi.
Inizio: 02/11/2023
Fine: 24/10/2026


Calcolo elementi

Salvo il post per inserire il collegamento all'interno dello script.

 

[Giulio Pedrinelli]

In allegatro lo script.

Anticipazione (Spoiler): Script

Sub main()
Dim rt(10),pt(4),n1(5)

pt(1)=0
pt(2)=1
pt(3)=0
pt(4)=0
' Giulio
' 1A-BACA
' https://forum.lottoced.com/threads/1a-estrazione-ba-ca.2229805/

clp=9 'colpi di gioco
rt(1)=1
rt(2)=2

ini=10328 '2/11/2023
fin=EstrazioneFin
co=0
For es=ini To fin
Messaggio (es)
If IndiceMensile (es)=1 Then
casi=casi+1
Scrivi String(60,"=")&" Caso n° "&casi,1
co=co+1
a=Estratto (es,3,4) + 83
b=Estratto (es,8,1) + 50
c=Estratto (es,2,3) + 39
d=Estratto (es,12,2) + 55
e=Estratto (es,5,2) + 85
n1(1)=Fuori90 (a+0)
n1(2)=Fuori90 (b+0)
n1(3)=Fuori90 (c+0)
n1(4)=Fuori90 (d+0)
n1(5)=Fuori90 (e+0)
ImpostaGiocata 1,n1,rt,pt,clp
a=Estratto (es,3,4) + 83
b=Estratto (es,8,1) + 50
c=Estratto (es,3,3) + 87
d=Estratto (es,2,4) + 87
e=Estratto (es,7,1) + 10
n1(1)=Fuori90 (a+0)
n1(2)=Fuori90 (b+0)
n1(3)=Fuori90 (c+0)
n1(4)=Fuori90 (d+0)
n1(5)=Fuori90 (e+0)
ImpostaGiocata 2,n1,rt,pt,clp
a=Estratto (es,3,4) + 83
b=Estratto (es,8,1) + 50
c=Estratto (es,12,4) + 11
d=Estratto (es,7,2) + 31
e=Estratto (es,3,2) + 32
n1(1)=Fuori90 (a+0)
n1(2)=Fuori90 (b+0)
n1(3)=Fuori90 (c+0)
n1(4)=Fuori90 (d+0)
n1(5)=Fuori90 (e+0)
ImpostaGiocata 3,n1,rt,pt,clp

Gioca es
End If
Next
Scrivi : Scrivi "Casi Rilevati "& CInt (co)
ScriviResoconto

End Sub

 

[Giulio Pedrinelli]

Ciao a tutti;

Ho messo in gioco le tre cinquine su BA-CA:

mar 03.11.2026 [10955]
G 1: A 33.73.09.21.45 Ba Ca 0/9
n.i. (9 colpi)
G 2: A 33.73.50.31.61 Ba Ca 0/9
n.i. (9 colpi)
G 3: A 33.73.61.62.32 Ba Ca 0/9
n.i. (9 colpi)