-
.
METODO REALIZZATO CON IL PROGRAMMA LOTTOGEOS II
Ruote di gioco: Ba.
Colpi di gioco: 10
Algoritmi/Numeri in gioco:
...
Ambata: SommaPentagono 2 di Nz + 01 *
Ambo: Complemento90 2 di Ca + 72 *
Ambo: Diametrale 3 di Ba + 05 *
Terno: SommaPentagono 2 di Fi + 50 *
BARI
Ambata
41
Abbinamenti per AMBO:
27.32
Abbinamento per TERNO:
30SPOILER (clicca per visualizzare)Data inizio ricerca : gio 25.07.2013
Data fine ricerca : gio 17.08.2023
Indici mensili abilitati : 1.2.3.4.5.6.7.8.9.10.11.12.13.14.15.16.17.18.19.ultima
Ruote di calcolo : BaCaFiGeMiNaPaRoToVeNz
Estratti calcolo : 12345
Tipo di ricerca : Estratto Qls di Ba + Estratto Qls di Ba = Estratto Qls di Ve = 15
Ruote di gioco : Ba
Colpi di gioco : 10
Posizioni di gioco : 12345
Ambate e/o capogioco :
SommaPentagono 2 di Nz + 01 * (41)
Abbinamenti x ambo :
Complemento90 2 di Ca + 72 * (27)
Diametrale 3 di Ba + 05 * (32)
abbinamenti x terno :
SommaPentagono 2 di Fi + 50 * (30)
Previsioni totali : 10
Previsioni positive : 9(90%)
Previsioni negative : 0(0%)
Previsioni in corso : 1(10%)
Ambate : 13(130%)
Ambi : 9(90%)
Terni : 5(50%)
Ruote di gioco: Ba.
Colpi di gioco: 10
Algoritmi/Numeri in gioco:
...
Ambata: SommaPentagono 2 di Nz + 01 *
Ambo: Complemento90 2 di Ca + 72 *
Ambo: Diametrale 3 di Ba + 05 *
Terno: SommaPentagono 2 di Fi + 50 *
gio 25.07.2013
Ambata 31
Abbinamenti per ambo: 72.23.
Abbinamenti per terno: 40.
Esiti:
gio 01.08.2013 al 3 colpo su Ba ambata 31
gio 01.08.2013 al 3 colpo su Ba ambo 31 - 72
gio 12.03.2015
Ambata 11
Abbinamenti per ambo: 72.33.
Abbinamenti per terno: 65.
Esiti:
gio 19.03.2015 al 3 colpo su Ba ambata 11
gio 19.03.2015 al 3 colpo su Ba ambo 11 - 72
gio 19.03.2015 al 3 colpo su Ba terno 11 - 72 - 65
gio 26.03.2015
Ambata 16
Abbinamenti per ambo: 83.6.
Abbinamenti per terno: 40.
Esiti:
gio 02.04.2015 al 3 colpo su Ba ambata 16
gio 02.04.2015 al 3 colpo su Ba ambo 16 - 6
gio 02.04.2015 al 3 colpo su Ba terno 16 - 6 - 40
mar 20.03.2018
Ambata 36
Abbinamenti per ambo: 31.60.
Abbinamenti per terno: 45.
Esiti:
gio 12.04.2018 al 10 colpo su Ba ambata 36
gio 12.04.2018 al 10 colpo su Ba ambo 36 - 60
sab 25.08.2018
Ambata 16
Abbinamenti per ambo: 22.76.
Abbinamenti per terno: 40.
Esiti:
sab 01.09.2018 al 3 colpo su Ba ambata 16
gio 13.09.2018 al 8 colpo su Ba ambata 16
gio 13.09.2018 al 8 colpo su Ba ambo 16 - 22
gio 13.09.2018 al 8 colpo su Ba terno 16 - 22 - 40
gio 24.10.2019
Ambata 16
Abbinamenti per ambo: 6.15.
Abbinamenti per terno: 30.
Esiti:
mar 29.10.2019 al 2 colpo su Ba ambata 16
mar 29.10.2019 al 2 colpo su Ba ambo 16 - 6
mar 29.10.2019 al 2 colpo su Ba terno 16 - 6 - 30
sab 16.11.2019 al 10 colpo su Ba ambata 16
mar 25.02.2020
Ambata 51
Abbinamenti per ambo: 54.66.
Abbinamenti per terno: 25.
Esiti:
sab 29.02.2020 al 2 colpo su Ba ambata 51
sab 07.03.2020 al 5 colpo su Ba ambata 51
sab 07.03.2020 al 5 colpo su Ba ambo 51 - 54
sab 06.06.2020
Ambata 51
Abbinamenti per ambo: 20.87.
Abbinamenti per terno: 5.
Esiti:
mar 23.06.2020 al 7 colpo su Ba ambata 51
mar 23.06.2020 al 7 colpo su Ba ambo 51 - 20
mar 20.12.2022
Ambata 11
Abbinamenti per ambo: 47.24.
Abbinamenti per terno: 20.
Esiti:
gio 05.01.2023 al 7 colpo su Ba ambata 11
sab 07.01.2023 al 8 colpo su Ba ambata 11
sab 07.01.2023 al 8 colpo su Ba ambo 11 - 24
sab 07.01.2023 al 8 colpo su Ba terno 11 - 24 - 20
gio 17.08.2023
Ambata 41
Abbinamenti per ambo: 27.32.
Abbinamenti per terno: 30.
Esiti:
IN CORSO ...
Data inizio ricerca : gio 25.07.2013
Data fine ricerca : gio 17.08.2023
Casi esaminati : 10
Casi positivi : 9
Casi negativi : 0
Casi in corso : 1
Casi positivi per ambata : 9
Casi positivi per ambo : 9
Casi positivi per terno : 5
Vincite totali nei colpi di gioco:
Ambate : 13
Ambi vinti : 9
Terni vinti : 5
Estratti in 1 posizione (0%)
Estratti in 2 posizione (31%)
Estratti in 3 posizione (15%)
Estratti in 4 posizione (15%)
Estratti in 5 posizione (38%)
Vincite su Ba (100%). -
..
-
.
Ciao, ti è possibile postare lo script , grazie. . -
.
Eccolo,
ma chissa' quando si ripetera una condizione simileSPOILER (clicca per visualizzare)ColoreTesto 1
Scrivi "============================= SPIA 15 VENEZIA E AMBO SOMMA 15 BARI by DjNomade",1
Scrivi
Scrivi Date &_
Chr (32) &Chr (108)& Chr (105)& Chr (115)&Chr (116)&Chr (46)& Chr (32) & Chr (98)& Chr (121)& Chr (32) & Chr (68) & Chr (106)& Chr (78) & Chr (111) & Chr ( 109) & Chr (97)& Chr ( 100) & Chr (101),1
Scrivi String (2,Chr(11)): ColoreTesto 1
ColoreTesto 0
ColoreTesto 0
Sub main()
Dim posta(5)
Dim poste(5),postee(5)
Dim ruote(5)
Dim am1(10),am(10),am3(10),cinq(10),nr(5)
posta(1)=1
poste(2)=1
postee(2)=1
postee(3)=1
'postee(4)=0.5
k=10
casi=0
fin=EstrazioneFin
ini=8721
For es=ini To fin
NG=0
For r=1 To 1
For p1=1 To 4
For p2=p1+1 To 5
For r1=10 To 10
For p3=1 To 5
n1=Estratto (es,r,p1)
n2=Estratto (es,r,p2)
If Fuori90(n1+n2)=15 Then
n3=Estratto (es,r1,p3)
If n3=15 And Fuori90(n1+n2)=15 Then 'CONDIZIONE DA RILEVARE :
casi=casi+1
Messaggio "Elaborazione estrazioni... " &(es) & " ---> script by DjNomade"
Scrivi String (80,"=")&" Caso n° "&casi,1
ColoreTesto 2:Scrivi "SPIA 15 VENEZIA E AMBO SOMMA 15 BARI by DjNomade",1
Scrivi DataEstrazione(es)&" "&Left(NomeRuota(1),3)&" "&_
StringaEstratti(es,1) &" -> "& Format2(n1)&" "& Format2(n2),True
Scrivi DataEstrazione(es)&" "&Left(NomeRuota(2),3)&" "&_
StringaEstratti(es,2) &" -> "& Format2(n1)&" "& Format2(n2),True
'ColoreTesto 0: Scrivi String (80,"="),1
co=co+1
cont=cont+1
nr(1)=Fuori90((Estratto (es,12,2)*5)+1)'OK
nr(2)=Fuori90(90-Estratto (es,2,2)+72)
nr(3)=Fuori90(Diametrale(Estratto (es,1,3))+5)
nr(4)=Fuori90((Estratto (es,3,2)*5)+50)
'**********************************************************
Rem se uno o più numeri si ripetono si fa il + 1 (Formula By Thauk)
rip = 0
If NumeriRipetuti(nr) Then
rip = 1
While NumeriRipetuti(nr)
For x = 1 To 03 ' numeri totali 7-1=6
For y = x + 1 To 4 ' 7 perche i numeri in totale sono 7
If nr( = nr(y) Then nr(y) = Fuori90(nr(y) + 1)
Next
Next
Wend
End If
Rem fine formula
'*****************************************************
ruote(1)=1
ruote(2)=1 'si puo'aggiungere altre ruote
am1(1)=nr(1)
ImpostaGiocata 1,am1,ruote,posta,k
am(1)=nr(1)
am(2)=nr(2)
ImpostaGiocata 2,am,ruote,poste,k
am(1)=nr(1)
am(2)=nr(3)
ImpostaGiocata 3,am,ruote,poste,k
am3(1)=nr(1)
am3(2)=nr(2)
am3(3)=nr(4)
ImpostaGiocata 4,am3,ruote,postee,k
am3(1)=nr(1)
am3(2)=nr(3)
am3(3)=nr(4)
ImpostaGiocata 5,am3,ruote,postee,k
Gioca es
End If
End If
Next
Next
Next
Next
Next
Next
ScriviResoconto
End Sub. -
.
È hai ragione .