R
Roby
Guest
A Milano c'era 23-41 e lo script è li.
A Napoli invece adesso troviamo 41-23 come coppia verticale, eccovi uno script.
Poi seguirà lo script della coppie 45-05 che troverete più in basso, buona fortuna
Questo è imminente per Napoli coppia 41-23
Questo è il rapporto finale dategli uno sguardo
Questo a bari e un altra ruota che lo script ancora non segnala occhio alla coppia 45-05
A Napoli invece adesso troviamo 41-23 come coppia verticale, eccovi uno script.
Poi seguirà lo script della coppie 45-05 che troverete più in basso, buona fortuna
Questo è imminente per Napoli coppia 41-23
Codice:
Option Explicit
Sub Main
Dim es,ini,fin,clp,eEsc,r,p,s1,s2,a,b,ok
Dim am1(10)
Dim poste(10)
Dim rg(1)
poste(2) = 3
poste(3) = 1
poste(4) = 1
s1 = 41
s2 = 23
eEsc = InputBox("Quante estrazioni controllo? ","N° ESTRAZIONI di CONTROLLO ",5345)
clp = InputBox("Quanti colpi di gioco? ","COLPI di GIOCO ",9)
ini = EstrazioneFin - eEsc
fin = EstrazioneFin
For es = ini To fin
For r = 1 To 12
If r = 11 Then r = 12
Messaggio "Estraz n° " &(es) & " del " & DataEstrazione(es) & " per " & NomeRuota(r)
Call AvanzamentoElab(ini,fin,es)
For p = 1 To 5
a = Estratto(es - 1,r,p)
b = Estratto(es,r,p)
ok = 0
If((a = s1 And b = s2))Then
ok = 1
End If
If ok = 1 Then
am1(1) = 47
am1(2) = 19
am1(3) = 55
am1(4) = 79
am1(5) = 16
am1(6) = 21
am1(7) = 27
am1(8) = 7
am1(9) = 31
am1(10) = 76
' 75-72-77 gli altri numeri, ma non entravano nella decina
rg(1) = r
Scrivi String(70,"-")
Scrivi DataEstrazione(es - 1) & " [ " & SiglaRuota(r) & " " & StringaEstratti(es - 1,r) & " ] trovato in pos " & p & " [ " & Format2(Estratto(es - 1,r,p)) & " ]",1,,,1
Scrivi DataEstrazione(es) & " [ " & SiglaRuota(r) & " " & StringaEstratti(es,r) & " ] trovato in pos " & p & " [ " & Format2(Estratto(es,r,p)) & " ]",1,,,1
ImpostaGiocata 1,am1,rg,poste,clp
Gioca es,False,,1
If ScriptInterrotto Then Exit For
End If
Next
Next
Next
ScriviResoconto,False
End SubQuesto è il rapporto finale dategli uno sguardo
Codice:
----------------------------------------------------------------------
28.04.2018 [ NA 62.52.41.46.57 ] trovato in pos 3 [ 41 ]
02.05.2018 [ NA 85.88.23.47.75 ] trovato in pos 3 [ 23 ]
Estrazione generatrice del pronostico 09467 [ 52 - 02/05/2018]
G 0001 Numeri in gioco : 47.19.55.79.16.21.27.07.31.76 su NA per Ambo,Terno,Quaterna
N. [47.19.55.79.16.21.27.07.31.76 ] [NA] [.. .. .. 31 ..] C. 1 Estratto 09468 [ 53 - 03/05/2018] [52.85.44.31.17]
In corso per altre 8 estrazioni
+----------------------------------------+
| Prima Giocata : 4364 |
| Ultima Giocata : 9467 |
| Range : 5104 |
| Casi giocab perc. : 0,803% |
+----------------------------------------+ +----------------------------------+ +----------------------------------+ +----------------------------------+
| RESOCONTO | | DISTRIBUZIONE ESITI | | DISTRIBUZIONE ESITI PERCENTUALI | | DISTRIBUZIONE CASI |
+----------------------------------------+ +----------------------------------+ +----------------------------------+ +----------------------------------+
| Casi esaminati : 41 | | RT | Est | Amb | Ter | Qua | Cin | | RT | Est | Amb | Ter | Qua | Cin | | RT | Q | |
| Casi vincenti : 29 | +----------------------------------+ +----------------------------------+ +----------------------------------+
| Percentuale pos. : 70,73 % | | BA | | 10| 4| 1| | | BA | |11,24|23,53| 50| | | BA | 4| |
| Pronostici totali : 41 | | CA | | 10| 1| | | | CA | |11,24| 5,88| | | | CA | 5| |
| Pronostici vinc. : 29 | | FI | | 11| 2| | | | FI | |12,36|11,76| | | | FI | 5| |
| Percentuale pos. : 70,73 % | | GE | | 3| 1| | | | GE | | 3,37| 5,88| | | | GE | 2| |
| Giocate in corso : 1 | | MI | | 19| 2| | | | MI | |21,35|11,76| | | | MI | 5| |
| Giocate terminate : 40 | | NA | | 17| 5| 1| | | NA | | 19,1|29,41| 50| | | NA | 5| |
| Bollette giocate : 361 | | PA | | 6| 1| | | | PA | | 6,74| 5,88| | | | PA | 4| |
| Bollette vincenti : 61 | | RO | | 3| | | | | RO | | 3,37| | | | | RO | 3| |
| Attesa media : 4 | | TO | | 7| 1| | | | TO | | 7,87| 5,88| | | | TO | 4| |
| Spesa : 1.805,00 € | | VE | | 3| | | | | VE | | 3,37| | | | | VE | 3| |
| Vincita : 3.053,93 € | | NZ | | | | | | | NZ | | | | | | | NZ | 1| |
| Guadagno : 1.248,93 € | | TT | | | | | | | TT | | | | | | | TT | | |
| Perc. Rendimento : 69,193 % | +----------------------------------+ +----------------------------------+ +----------------------------------+
| Mass. Esposizione : 135,00 € |
| Estratto su ruota : 135 |
| Ambo su ruota : 89 |
| Terno su ruota : 17 |
| Quaterna su ruota : 2 |
| |
+----------------------------------------+Questo a bari e un altra ruota che lo script ancora non segnala occhio alla coppia 45-05
Codice:
Option Explicit
Sub Main
Dim es,ini,fin,clp,eEsc,r,p,s1,s2,a,b,ok
Dim am1(10)
Dim poste(10)
Dim rg(1)
poste(2) = 3
poste(3) = 1
poste(4) = 1
s1 = 45
s2 = 5
eEsc = InputBox("Quante estrazioni controllo? ","N° ESTRAZIONI di CONTROLLO ",5345)
clp = InputBox("Quanti colpi di gioco? ","COLPI di GIOCO ",9)
ini = EstrazioneFin - eEsc
fin = EstrazioneFin
For es = ini To fin
For r = 1 To 12
If r = 11 Then r = 12
Messaggio "Estraz n° " &(es) & " del " & DataEstrazione(es) & " per " & NomeRuota(r)
Call AvanzamentoElab(ini,fin,es)
For p = 1 To 5
a = Estratto(es - 1,r,p)
b = Estratto(es,r,p)
ok = 0
If((a = s1 And b = s2))Then
ok = 1
End If
If ok = 1 Then
am1(1) = 60
am1(2) = 9
am1(3) = 59
am1(4) = 4
am1(5) = 37
am1(6) = 83
am1(7) = 2
am1(8) = 51
am1(9) = 69
am1(10) = 76
'8-10-85 sono gli altri numeri, ma non entrano nella decina
rg(1) = r
Scrivi String(70,"-")
Scrivi DataEstrazione(es - 1) & " [ " & SiglaRuota(r) & " " & StringaEstratti(es - 1,r) & " ] trovato in pos " & p & " [ " & Format2(Estratto(es - 1,r,p)) & " ]",1,,,1
Scrivi DataEstrazione(es) & " [ " & SiglaRuota(r) & " " & StringaEstratti(es,r) & " ] trovato in pos " & p & " [ " & Format2(Estratto(es,r,p)) & " ]",1,,,1
ImpostaGiocata 1,am1,rg,poste,clp
Gioca es,False,,1
If ScriptInterrotto Then Exit For
End If
Next
Next
Next
ScriviResoconto,False
End Sub
Codice:
----------------------------------------------------------------------
26.04.2018 [ BA 83.49.23.45.05 ] trovato in pos 4 [ 45 ]
28.04.2018 [ BA 78.30.44.05.76 ] trovato in pos 4 [ 05 ]
Estrazione generatrice del pronostico 09466 [ 51 - 28/04/2018]
G 0001 Numeri in gioco : 60.09.59.04.37.83.02.51.69.76 su BA per Ambo,Terno,Quaterna
N. [60.09.59.04.37.83.02.51.69.76 ] [BA] [.. .. .. .. ..] C. 1 09467 [ 52 - 02/05/2018] [42.26.89.79.18]
N. [60.09.59.04.37.83.02.51.69.76 ] [BA] [.. .. .. .. ..] C. 2 09468 [ 53 - 03/05/2018] [15.34.82.03.49]
In corso per altre 7 estrazioni
----------------------------------------------------------------------
02.05.2018 [ VE 87.45.34.17.22 ] trovato in pos 2 [ 45 ]
03.05.2018 [ VE 19.05.75.42.50 ] trovato in pos 2 [ 05 ]
Estrazione generatrice del pronostico 09468 [ 53 - 03/05/2018]
G 0001 Numeri in gioco : 60.09.59.04.37.83.02.51.69.76 su VE per Ambo,Terno,Quaterna
In corso per altre 9 estrazioni
+----------------------------------------+
| Prima Giocata : 4230 |
| Ultima Giocata : 9468 |
| Range : 5239 |
| Casi giocab perc. : 0,916% |
+----------------------------------------+ +----------------------------------+ +----------------------------------+ +----------------------------------+
| RESOCONTO | | DISTRIBUZIONE ESITI | | DISTRIBUZIONE ESITI PERCENTUALI | | DISTRIBUZIONE CASI |
+----------------------------------------+ +----------------------------------+ +----------------------------------+ +----------------------------------+
| Casi esaminati : 48 | | RT | Est | Amb | Ter | Qua | Cin | | RT | Est | Amb | Ter | Qua | Cin | | RT | Q | |
| Casi vincenti : 38 | +----------------------------------+ +----------------------------------+ +----------------------------------+
| Percentuale pos. : 79,17 % | | BA | | 5| | | | | BA | | 5,75| | | | | BA | 5| |
| Pronostici totali : 48 | | CA | | 9| 1| | | | CA | |10,34| 9,09| | | | CA | 6| |
| Pronostici vinc. : 38 | | FI | | 7| | | | | FI | | 8,05| | | | | FI | 4| |
| Percentuale pos. : 79,17 % | | GE | | 15| 1| | | | GE | |17,24| 9,09| | | | GE | 7| |
| Giocate in corso : 2 | | MI | | 8| 1| | | | MI | | 9,2| 9,09| | | | MI | 2| |
| Giocate terminate : 46 | | NA | | 7| 2| | | | NA | | 8,05|18,18| | | | NA | 4| |
| Bollette giocate : 416 | | PA | | 11| 1| | | | PA | |12,64| 9,09| | | | PA | 6| |
| Bollette vincenti : 68 | | RO | | 15| 5| 1| | | RO | |17,24|45,45| 100| | | RO | 7| |
| Attesa media : 4 | | TO | | 5| | | | | TO | | 5,75| | | | | TO | 3| |
| Spesa : 2.080,00 € | | VE | | 5| | | | | VE | | 5,75| | | | | VE | 4| |
| Vincita : 2.274,26 € | | NZ | | | | | | | NZ | | | | | | | NZ | | |
| Guadagno : 194,26 € | | TT | | | | | | | TT | | | | | | | TT | | |
| Perc. Rendimento : 9,34 % | +----------------------------------+ +----------------------------------+ +----------------------------------+
| Mass. Esposizione : 135,00 € |
| Estratto su ruota : 145 |
| Ambo su ruota : 87 |
| Terno su ruota : 11 |
| Quaterna su ruota : 1 |
| |
+----------------------------------------+
Ultima modifica:
