Statistica

[Xeroxs]

Ciao a Tutti Voi, e Buona Domenica

Vorrei chiedere se qualcuno può creare uno script che possa estrapolare le estrazione secondo alcuni parametri.
Decido l'anno
decido l'indice mensile, la prima estrazione del mese o la seconda e così via
la scelta della Ruota ma meglio 2 per ovvi motivi
e mi riporti l'elenco delle estrazioni con data e gli estratti
evidenziando ad esempio in rosso quali più frequenti

L'ideale sarebbe poter fare la scelta su più anni contemporaneamente almeno 5 con riportate tutte le estrazioni della prima del mese per i cinque anni evidenziando i numeri più frequenti in quelle ruote scelte

Ho cercato di chiedere questo tipo di ricerca perchè non so se si può creare uno scrip che scegliendo anni e indice mensile generi una tabella dei più frequenti in modo da avere una base statistica da poter prendere spunto per scelta di abbinamenti


Ho fatto spesso a mano queste ricerche, poi mi sono appoggiato ad excel ma credo che se qualcuno abbia voglia di creare uno script del genere possa servire a chiunque per le proprie scelte di gioco anche su base statistica.

Ho visto in passato che qualcuno aveva creato qualche script del genere ma non ho più modo di trovarli.

Spero che qualcuno possa aiutarmi.

Grazie ancora.

 

[*blacklotto*]

ciao,

questo listato preso in rete, leggermente portato a modifica potrebbe interessarti,
o comunque lo potrai modificare al tuo bisogno

RESOCONTO :

[09716] [145] 03.12.2019.................1° ESTRAZIONE DEL MESE............... INDICE ANNUALE 145.........

Estrazione generatrice del pronostico 09716 [145 - 03/12/2019]
G 0001 Numeri in gioco : 14.41 su PA per Estratto
N. [14.41 ] [PA] [.. .. .. .. ..] C. 1 09717 [146 - 05/12/2019]
N. [14.41 ] [PA] [.. .. .. .. ..] C. 2 09718 [147 - 07/12/2019]
V N. [14.41 ] [PA] [.. 41 .. .. ..] C. 3 Estratto 09719 [148 - 10/12/2019]
Interrotta per esito verificato

====================================================================================

[09729] [ 1 ] 02.01.2020.................1° ESTRAZIONE DEL MESE............... INDICE ANNUALE 1.........

Estrazione generatrice del pronostico 09729 [ 1 - 02/01/2020]
G 0001 Numeri in gioco : 01.10 su PA per Estratto
V N. [01.10 ] [PA] [.. 10 .. .. ..] C. 1 Estratto 09730 [ 2 - 04/01/2020]
Interrotta per esito verificato

====================================================================================

[09742] [ 14] 01.02.2020.................1° ESTRAZIONE DEL MESE............... INDICE ANNUALE 14.........

Estrazione generatrice del pronostico 09742 [ 14 - 01/02/2020]
G 0001 Numeri in gioco : 14.41 su PA per Estratto
N. [14.41 ] [PA] [.. .. .. .. ..] C. 1 09743 [ 15 - 04/02/2020]
N. [14.41 ] [PA] [.. .. .. .. ..] C. 2 09744 [ 16 - 06/02/2020]
N. [14.41 ] [PA] [.. .. .. .. ..] C. 3 09745 [ 17 - 08/02/2020]
N. [14.41 ] [PA] [.. .. .. .. ..] C. 4 09746 [ 18 - 11/02/2020]
N. [14.41 ] [PA] [.. .. .. .. ..] C. 5 09747 [ 19 - 13/02/2020]
N. [14.41 ] [PA] [.. .. .. .. ..] C. 6 09748 [ 20 - 15/02/2020]
V N. [14.41 ] [PA] [.. .. .. .. 41] C. 7 Estratto 09749 [ 21 - 18/02/2020]
Interrotta per esito verificato

====================================================================================

[09755] [ 27] 03.03.2020.................1° ESTRAZIONE DEL MESE............... INDICE ANNUALE 27.........

Estrazione generatrice del pronostico 09755 [ 27 - 03/03/2020]
G 0001 Numeri in gioco : 27.72 su PA per Estratto
N. [27.72 ] [PA] [.. .. .. .. ..] C. 1 09756 [ 28 - 05/03/2020]
N. [27.72 ] [PA] [.. .. .. .. ..] C. 2 09757 [ 29 - 07/03/2020]
N. [27.72 ] [PA] [.. .. .. .. ..] C. 3 09758 [ 30 - 10/03/2020]
N. [27.72 ] [PA] [.. .. .. .. ..] C. 4 09759 [ 31 - 12/03/2020]
N. [27.72 ] [PA] [.. .. .. .. ..] C. 5 09760 [ 32 - 14/03/2020]
V N. [27.72 ] [PA] [.. .. 27 .. ..] C. 6 Estratto 09761 [ 33 - 17/03/2020]
Interrotta per esito verificato

====================================================================================

Numero Totale mesi analizzati : 4

LISTATO

Sub Main()
Dim posta(10),poste(10),postee(10)
Dim ruote(5)
Dim am(10)
posta(1) = 1
poste(8) = 1
poste(9) = 1
casi = 0
fin = EstrazioneFin
ini = EstrazioneFin - 50
For es = ini To fin
If IndiceMensile(es) = 1 Then
a = IndiceAnnuale(es,0)
If a < 90 Then aa = a
If a > 90 And a < 100 Then aa = Fuori90(a)
If a > 100 Then aa = Left(a,2)
b = Vert(aa)
ColoreTesto 1
Scrivi GetInfoEstrazione(es) & ".................1° ESTRAZIONE DEL MESE............... ",1,0
Scrivi " INDICE ANNUALE " &(IndiceAnnuale(es,0)) & ".........",1
ColoreTesto 0
Scrivi
ruote(1) = 7
am(1) = aa
am(2) = b
ImpostaGiocata 1,am,ruote,posta,8,1
Gioca es
Scrivi"====================================================================================",1
Scrivi
casi = casi + 1
End If
Next
Scrivi
Scrivi
ColoreTesto 1
Scrivi "Numero Totale mesi analizzati : " & CInt(casi)
ColoreTesto 0
Scrivi
ScriviResoconto,0
End Sub

 

[Xeroxs]

grazie ne farò buon uso