Novità

SerieFreq?

i legend

Premium Member
Codice:
fP1 = SerieFreqTurbo(Ini,Fin,aNum,aRuote,1) 'frequenza complessiva
            fP2 = SerieFreqTurbo(Ini,Fin,aNum,aRuote,6) ' Freq estratto determinato 1 pos
se scrivo l'indice 6 restituisce =0
Dove sbaglio?
Ciao vorrei fare uno script per Paolo , maa non riesco a fare la statistica per posizione.
Devo usare questa funzione perchè c' è array Numero
es: Sceglinumeri(aNum)
Calcolare la frequenza dei numeri in 1 pos

Grazie e ciao;)
 
ciao legend con quella funzione non si puo , devi usare StatisticaFormazione
l'ultimo parametro di questa funzione è un array
redim aPos(5)
aPos(1) = true
aPos(2) = false
aPos(3) = false
aPos(4) = false
aPos(5) = false

oppure
redim aPos(1)
aPos(1) = 1


e poi lo passi come parametro
 
Ultima modifica di un moderatore:
Ciao Luigi grazie per la risposta
ma non trovo aPos
Codice:
StatisticaFormazione(aNumeri, aRuote, Sorte, Ritardo, RitardoMax, IncrRitMax, Frequenza, Optional inizio = 0, Optional fine = 0, Optional idArchivio = 0)
Help:)

in pratica
vorrei scrivere quante volte i numeri/o è uscito in tutte le sue posizioni
xPaolo.jpg
 
Ultima modifica:
ciao legend , parti da qui

Codice:
Option Explicit
Sub Main
    Dim nRetRit,nRetRitMax,nRetIncrRitMax,nRetFreq
    ReDim aPos(5)
    aPos(1) = True
    aPos(2) = False
    aPos(3) = False
    aPos(4) = False
    aPos(5) = True
    ReDim aN(1)
    aN(1) = 45
    ReDim aR(1)
    aR(1) = BA_
    Call StatisticaFormazione(aN,aR,1,nRetRit,nRetRitMax,nRetIncrRitMax,nRetFreq,EstrazioneIni,EstrazioneFin,0,aPos)
    Scrivi "Il numero " & aN(1) & " ritarda da " & nRetRit & " estrazioni, è uscito " & nRetFreq & " volte in posizioni " & ArrayBToString(aPos)
End Sub
 
La soluzione proposta da Di Saronno è ottima .. molto piu esaustiva della mia.
ciao ...
 
Ciao ottimo lo script di Disaronno, complimenti :)
Luigi ho spaziometria 1.5.4, i parametri di statistica formazione sono differenti,
Non riesco a fare gli aggiornamenti, perchè una lumaca è piu vbeloce del mio pc
Grazie ad entrambi,
il quesito resta .
come posso verificare una formazione per ogni posizione, con la versione vecchia?
sicuramente si puo fare, ci penso su:)
 
LuigiB;n1892451 ha scritto:
ciao legend , parti da qui

Codice:
Option Explicit
Sub Main
Dim nRetRit,nRetRitMax,nRetIncrRitMax,nRetFreq
ReDim aPos(5)
aPos(1) = True
aPos(2) = False
aPos(3) = False
aPos(4) = False
aPos(5) = True
ReDim aN(1)
aN(1) = 45
ReDim aR(1)
aR(1) = BA_
Call StatisticaFormazione(aN,aR,1,nRetRit,nRetRitMax,nRetIncrRitMax,nRetFreq,EstrazioneIni,EstrazioneFin,0,aPos)
Scrivi "Il numero " & aN(1) & " ritarda da " & nRetRit & " estrazioni, è uscito " & nRetFreq & " volte in posizioni " & ArrayBToString(aPos)
End Sub



ottimo,che per caso LUIGIB.,POTRESTI ampliarmi lo script che mi dia i 5 numeri con maggior frequenza su ogni singola ruota e suo ritardo ?Grazie.
 
Ciao a tutti, grazie all'illuminante script di disaronno, mi sto avvicinando alla soluzione che avevo in mente:)
Grazie lo posto quanto prima:)
 
Si che è possibile, basta usare dopo il call inittabella il set colorecella.
Codice:
Sub Main

Dim t,v

t = Array(t,"1111","2222","3333")

Call InitTabella(t,,,3,0)

Call SetColoreCella(2,2,4)

Call SetColoreCella(3,3,1)

v = Array(v,"1","2","ccc")

Call AddRigaTabella(v,,,3)

Call SetColoreCella(1,4,2)

CreaTabella

End Sub

Io questo script lo avrei realizzato se ti serve input vedi videata.

[TABLE="border: 1, cellpadding: 0, cellspacing: 0"]
[TR]
[TD="bgcolor: #0000ff, align: center"]Numero [/TD]
[TD="bgcolor: #0000ff, align: center"]Ritardo TT Pos [/TD]
[TD="bgcolor: #0000ff, align: center"]Freq. TT Pos [/TD]
[TD="bgcolor: #0000ff, align: center"]storico TT [/TD]
[TD="bgcolor: #0000ff, align: center"]Data Storico [/TD]
[TD="bgcolor: #0000ff, align: center"]RD1 [/TD]
[TD="bgcolor: #0000ff, align: center"]RD2 [/TD]
[TD="bgcolor: #0000ff, align: center"]RD3 [/TD]
[TD="bgcolor: #0000ff, align: center"]RD4 [/TD]
[TD="bgcolor: #0000ff, align: center"]RD5 [/TD]
[TD="bgcolor: #0000ff, align: center"]FrD1 [/TD]
[TD="bgcolor: #0000ff, align: center"]FrD2 [/TD]
[TD="bgcolor: #0000ff, align: center"]FrD3 [/TD]
[TD="bgcolor: #0000ff, align: center"]FrD4 [/TD]
[TD="bgcolor: #0000ff, align: center"]FrD5 [/TD]
[TD="bgcolor: #0000ff, align: center"]St1 [/TD]
[TD="bgcolor: #0000ff, align: center"]St2 [/TD]
[TD="bgcolor: #0000ff, align: center"]St3 [/TD]
[TD="bgcolor: #0000ff, align: center"]St4 [/TD]
[TD="bgcolor: #0000ff, align: center"]st5 [/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"]31 [/TD]
[TD="bgcolor: #ffffff, align: center"]127 [/TD]
[TD="bgcolor: #ffffff, align: center"]481 [/TD]
[TD="bgcolor: #ffffff, align: center"]167 [/TD]
[TD="bgcolor: #ffffff, align: center"]15.04.2000 [/TD]
[TD="bgcolor: #ffff00, align: center"]145 [/TD]
[TD="bgcolor: #ffff00, align: center"]244 [/TD]
[TD="bgcolor: #ff0000, align: center"]127 [/TD]
[TD="bgcolor: #ffff00, align: center"]190 [/TD]
[TD="bgcolor: #ffff00, align: center"]188 [/TD]
[TD="bgcolor: #00ff00, align: center"]104 [/TD]
[TD="bgcolor: #00ff00, align: center"]96 [/TD]
[TD="bgcolor: #00ff00, align: center"]91 [/TD]
[TD="bgcolor: #00ff00, align: center"]94 [/TD]
[TD="bgcolor: #00ff00, align: center"]96 [/TD]
[TD="bgcolor: #ffffff, align: center"]395 [/TD]
[TD="bgcolor: #ffffff, align: center"]426 [/TD]
[TD="bgcolor: #ffffff, align: center"]513 [/TD]
[TD="bgcolor: #ffffff, align: center"]478 [/TD]
[TD="bgcolor: #ffffff, align: center"]471 [/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"]54 [/TD]
[TD="bgcolor: #ffffff, align: center"]77 [/TD]
[TD="bgcolor: #ffffff, align: center"]493 [/TD]
[TD="bgcolor: #ffffff, align: center"]100 [/TD]
[TD="bgcolor: #ffffff, align: center"]13.05.2014 [/TD]
[TD="bgcolor: #ffff00, align: center"]165 [/TD]
[TD="bgcolor: #ffff00, align: center"]340 [/TD]
[TD="bgcolor: #ffff00, align: center"]111 [/TD]
[TD="bgcolor: #ff0000, align: center"]77 [/TD]
[TD="bgcolor: #ffff00, align: center"]152 [/TD]
[TD="bgcolor: #00ff00, align: center"]106 [/TD]
[TD="bgcolor: #00ff00, align: center"]95 [/TD]
[TD="bgcolor: #00ff00, align: center"]102 [/TD]
[TD="bgcolor: #00ff00, align: center"]100 [/TD]
[TD="bgcolor: #00ff00, align: center"]90 [/TD]
[TD="bgcolor: #ffffff, align: center"]303 [/TD]
[TD="bgcolor: #ffffff, align: center"]434 [/TD]
[TD="bgcolor: #ffffff, align: center"]380 [/TD]
[TD="bgcolor: #ffffff, align: center"]429 [/TD]
[TD="bgcolor: #ffffff, align: center"]378 [/TD]
[/TR]
[TR]
[TD="bgcolor: #ffffff, align: center"]18 [/TD]
[TD="bgcolor: #ffffff, align: center"]67 [/TD]
[TD="bgcolor: #ffffff, align: center"]489 [/TD]
[TD="bgcolor: #ffffff, align: center"]105 [/TD]
[TD="bgcolor: #ffffff, align: center"]30.04.1876 [/TD]
[TD="bgcolor: #ffff00, align: center"]105 [/TD]
[TD="bgcolor: #ffff00, align: center"]72 [/TD]
[TD="bgcolor: #ff0000, align: center"]67 [/TD]
[TD="bgcolor: #ffff00, align: center"]88 [/TD]
[TD="bgcolor: #ffff00, align: center"]143 [/TD]
[TD="bgcolor: #00ff00, align: center"]93 [/TD]
[TD="bgcolor: #00ff00, align: center"]99 [/TD]
[TD="bgcolor: #00ff00, align: center"]100 [/TD]
[TD="bgcolor: #00ff00, align: center"]97 [/TD]
[TD="bgcolor: #00ff00, align: center"]100 [/TD]
[TD="bgcolor: #ffffff, align: center"]547 [/TD]
[TD="bgcolor: #ffffff, align: center"]496 [/TD]
[TD="bgcolor: #ffffff, align: center"]488 [/TD]
[TD="bgcolor: #ffffff, align: center"]428 [/TD]
[TD="bgcolor: #ffffff, align: center"]344 [/TD]
[/TR]
[/TABLE]
 
Ciao GrandeMike, al momento con la nuova statisticaFormazione si puo fare tutto, spero di riuscire a scaricare la nuova versione, ma oggi ci ho messo 35 minuti per accedere qui....non so
ciao a tutti
 

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 10 giugno 2025
    Bari
    48
    32
    74
    59
    08
    Cagliari
    77
    73
    72
    18
    66
    Firenze
    56
    33
    86
    23
    75
    Genova
    81
    29
    70
    25
    28
    Milano
    27
    21
    87
    88
    90
    Napoli
    80
    57
    86
    24
    43
    Palermo
    47
    30
    37
    69
    27
    Roma
    57
    51
    16
    18
    50
    Torino
    61
    11
    12
    83
    33
    Venezia
    11
    21
    53
    74
    39
    Nazionale
    29
    48
    42
    83
    81
    Estrazione Simbolotto
    Napoli
    31
    25
    11
    06
    16

Ultimi Messaggi

Indietro
Alto