Un Ambo Secco a Tutte!!! 3

sean69

Posted on 10/5/2022, 15:54

.

sean69

Group: Administrator

Posts: 5,897

Location: Provincia di Roma..

Status: Offline

Salve a Tutti,ecco un metodo che ricava un solo Ambo secco da giocare su Tutte.Procedimento semplice,eccolo:

Terza Estrazione del Mese

Sommare al Quinto Estratto di Palermo i fissi 45 e 70

Ecco Statistica del Metodo:

CITAZIONE

gio 07.10.2021 [9987]
G 2: A 65.90 Tu 13/13
A 65.90 su Tu (Pa) 6° colpo [9993/21.10.2021]

sab 06.11.2021 [10000]
G 2: A 75.10 Tu 13/13
A 10.75 su Tu (Mi) 5° colpo [10005/18.11.2021]

mar 07.12.2021 [10013]
G 2: A 34.59 Tu 13/13
A 34.59 su Tu (Ve) 6° colpo [10019/21.12.2021]

ven 07.01.2022 [10026]
G 2: A 81.16 Tu 13/13
A 81.16 su Tu (Ca) 8° colpo [10034/25.01.2022]
A 81.16 su Tu (Mi) 8° colpo [10034/25.01.2022]

sab 05.02.2022 [10039]
G 2: A 15.40 Tu 13/13
A 15.40 su Tu (Ge) 1° colpo [10040/08.02.2022]

sab 05.03.2022 [10051]
G 2: A 57.82 Tu 13/13
A 82.57 su Tu (Mi) 1° colpo [10052/08.03.2022]
A 57.82 su Tu (Ve) 7° colpo [10058/22.03.2022]

gio 07.04.2022 [10065]
G 2: A 25.50 Tu 13/13
A 25.50 su Tu (To) 2° colpo [10067/12.04.2022]

sab 07.05.2022 [10078]
G 2: A 07.32 Tu 0/13
i.c. (13 colpi)

Quindi la Previsione in corso e' la seguente:

TUTTE

07-32

per Ambo Secco

Qui' trovate il listato l8+:

SPOILER (clicca per visualizzare)

Scrivi "Metodo by Sean69 "
Sub main
Dim r(10)
Dim r1(10)
Dim aa(10)
Dim posta(5),poste(2)
poste(2)=1
r(1)=11
r1(1)=11
k=13
For n=9986 To EstrazioneFin
If IndiceMensile(n)=3 Then

aa(1)=Fuori90(Estratto(n,7,5)+45)
aa(2)=Fuori90(Estratto(n,7,5)+70)
EliminaRipetuti aa
ImpostaGiocata 2,aa,r,poste,k,y
For a=1 To 2
For b=1 To 2
'ImpostaInterruzioni a,b,2
Next
Next
Gioca n
End if
Next
ColoreTesto 2
ColoreTesto 0
Scrivi : Scrivi "Casi Rilevati "& CInt (co)
ScriviResoconto
End Sub

Saluti,sean69!!!

:pos 47: