Novità

Per Ilegend o chi è capace

solare

Advanced Member >PLATINUM<
Solare dato che si tratta di un estratto non capisco che senso ha verificare le ultime uscite e verificarne gli storici.
Se inserisci ultime 10 presenze è quell estratto ha avuto un iperfrequenza ( 3,4,5 volte) in pochissime estrazioni che statistica ne ricavi?
A mio personalissimo avviso è concettualmente errato.
Mi spiace ,ma non posso fare una cosa che ritengo errata anche se magari per altri è esatta . Lo script originale l ho regalato, se qualcuno volesse modificarlo per accontentarti ,liberissimo di farlo

Mi spiace ma io non posso.
Se hai bisogno di altro chiedi pure ,se sono in grado e condivido l idea sarò felice di aiutarti.
Ciao :)
Ilegend, mi avevi detto che la cosa non ti interessava perché ritenevi errata, adesso sei incuriosito.
Io non sono un programmatore, ma ti avevo semplicemente chiesto di modificare quello che ti ho allegato con quella statistica riportata da quel listato. L'unica differenza anziché elaborare dal al considerare solo le ultime 15/20 volte che era sortito il numero a me interessato.
Tutto quà.
 

solare

Advanced Member >PLATINUM<
Eccoti una breve ricerca relativa alla ruota di Bari in merito al numero 90 sortito le ultime 15 volte.
Ovvio che più dati abbiamo meglio è in merito alla statistica, tipo rit min. rit. max ecc.

Immagine.gif
 

i legend

Advanced Member >PLATINUM PLUS<
Ilegend, mi avevi detto che la cosa non ti interessava perché ritenevi errata, adesso sei incuriosito.
Io non sono un programmatore, ma ti avevo semplicemente chiesto di modificare quello che ti ho allegato con quella statistica riportata da quel listato. L'unica differenza anziché elaborare dal al considerare solo le ultime 15/20 volte che era sortito il numero a me interessato.
Tutto quà.
Ciao Solare :)

Se non ho un confronto dati ,non mi sento di postare qualcosa che potrebbe essere errato.

Ho fatto lo script nel tempo che potevo dedicarci.
Aspetto te per verificare e confrontare i dati.
Fai con il tempo che puoi dedicarci.
Ciao :)
P.s :
Non sono incuriosito. Lo script che mi hai chiesto di modificare potrebbe già fare questo.
Infatti se vuoi controllare gli ultimi n casi
Si potrebbe fare come ho suggerito.
In statistica veloce conti i casi ,vedi la data del primo caso che ti interessa , e la inserisci in scegliRange, e lasci estrazionefin per avere la statistica alla ultima estrazione che hai in archivio aggiornato. In pratica
Ottieni quello che vuoi con lo script che già hai.
Mi scuso se chiedo di dedicare del tempo per un confronto dati.
Spero di aver fatto bene, e che il risultato finale ,vi soddisfi a pieno.

Ciao , :)
 

i legend

Advanced Member >PLATINUM PLUS<
Ok. Grazie
Solare potresti postare 15 casi?
Hai scritto 15 ma in foto ci sono solo 10 casi.
P.s : se hai già lo script a che serviva modificare l altro ? Quello che ho realizzato fa le stesse cose.
Complimenti alla autore dello script.
 

solare

Advanced Member >PLATINUM<
i legend, siano 15 casi o 10 casi non cambia nulla, il senso della ricerca è quello. Userò quel listato, in qualche modo farò lo stesso
Grazie
 

i legend

Advanced Member >PLATINUM PLUS<
Cercherò di riportarti qualche caso ma non di più in quanto a mano si fa molta difficoltà.
tu sicuramente attraverso il listato fai molto prima.
Comunque appena posso inserisco qualche caso.
Poi vedi tu se postarlo o meno.
Hai scritto che a mano si fa molta difficoltà ,ma hai già uno script che fa la ricerca in due secondi,
Questo non lo capisco.
Questo mi fa dispiacere.
 

solare

Advanced Member >PLATINUM<
I legend, per fare questa ricerca, anche tramite spaziometria ci si impiega 10 minuti, basta trovare le ultime x volte che è sortito il numero che interessa, vedere i numeri ripetuti ed il ritardo in posizione. Non serve nessun listato. Ovvio che per velocizzare il tutto, serve un listato. Ma comunque non preoccuparti, faccio lo stesso. Poi io penso, se si vuole fare un listato lo si fa senza tanti misteri.
Ti ho già detto grazie mille e la chiudiamo qua.
 

i legend

Advanced Member >PLATINUM PLUS<
I legend, per fare questa ricerca, anche tramite spaziometria ci si impiega 10 minuti, basta trovare le ultime x volte che è sortito il numero che interessa, vedere i numeri ripetuti ed il ritardo in posizione. Non serve nessun listato. Ovvio che per velocizzare il tutto, serve un listato. Ma comunque non preoccuparti, faccio lo stesso. Poi io penso, se si vuole fare un listato lo si fa senza tanti misteri.
Ti ho già detto grazie mille e la chiudiamo qua.
Ho letto tutto quello che ho scritto e non ho trovato nulla di scortese nelle mie risposte da portarti a scrivere la chiudiamo qua.

dato che avevo scritto che per me era importante il confronto dei dati, se puo interessarti li ho allineati ai tuoi
e ti posto conferma,


Cordiali Saluti.
 
Ultima modifica:

solare

Advanced Member >PLATINUM<
Ok grazie ancora
nel caso tu decidessi di postare il tuo listato sarà sicuramente utile per tutti.
Ciao
 

joe

Advanced Member >PLATINUM<
I dati al messaggio 23, mi risultano corretti.

Ho scritto un semplice programma,

per limitare l'output al numero di presenze volute.

Sperando sia gradito ed utile lo allego qui di seguito:

Codice:
Option Explicit
Sub Main
  'Demo InputBox Interattivo By Joe
  Dim Ini,Fin,Es,G,R,N,K,Q
  Ini = EstrazioneIni : Fin = EstrazioneFin
  ReDim P(Fin - Es)
  R = BA_ : N = 90
  For Es = Ini To Fin
    If Posizione(Es,R,N) > 0 Then
      G = G + 1
      P(G) = Es
    End If
  Next
  Messaggio "Trovate " & G & " presenze del n° " & N & " a " & NomeRuota(R)
  Q = InputBox("Quante ?","ULTIME ESTRAZIONI",G)
  Ini = P(G - Q + 1)
  Scrivi "Ultime " & Q & " presenze del n° " & N & " a " & NomeRuota(R)
  Scrivi
  For Es = Ini To Fin
    If Posizione(Es,R,N) > 0 Then
      K = K + 1
      Scrivi FormatSpace(K,3) & Space(1),True,False
      Scrivi DataEstrazione(Es) & Space(1) & SiglaRuota(R) & Space(1),False,False
      Scrivi StringaEstratti(Es,R)
    End If
  Next
End Sub

:) Buona Serata a tutte/i.
 

salvo50

Advanced Member >PLATINUM PLUS<
I dati al messaggio 23, mi risultano corretti.

Ho scritto un semplice programma,

per limitare l'output al numero di presenze volute.

Sperando sia gradito ed utile lo allego qui di seguito:

Codice:
Option Explicit
Sub Main
  'Demo InputBox Interattivo By Joe
  Dim Ini,Fin,Es,G,R,N,K,Q
  Ini = EstrazioneIni : Fin = EstrazioneFin
  ReDim P(Fin - Es)
  R = BA_ : N = 90
  For Es = Ini To Fin
    If Posizione(Es,R,N) > 0 Then
      G = G + 1
      P(G) = Es
    End If
  Next
  Messaggio "Trovate " & G & " presenze del n° " & N & " a " & NomeRuota(R)
  Q = InputBox("Quante ?","ULTIME ESTRAZIONI",G)
  Ini = P(G - Q + 1)
  Scrivi "Ultime " & Q & " presenze del n° " & N & " a " & NomeRuota(R)
  Scrivi
  For Es = Ini To Fin
    If Posizione(Es,R,N) > 0 Then
      K = K + 1
      Scrivi FormatSpace(K,3) & Space(1),True,False
      Scrivi DataEstrazione(Es) & Space(1) & SiglaRuota(R) & Space(1),False,False
      Scrivi StringaEstratti(Es,R)
    End If
  Next
End Sub

:) Buona Serata a tutte/i.
Ciao a Tutti.

Bello!
 

i legend

Advanced Member >PLATINUM PLUS<
Ciao Joe :)
come al solito il tuo codice è semplice ed elegante ;)
Ho impiegato del tempo per fare lo script solo perche volevo regalare ,un qualcosa di piu articolato, e visualmente più user friendly .
ottimo lavoro

(y)
 

Ultima estrazione Lotto

  • Estrazione del lotto
    Tuesday 27 October 2020
    Bari
    88
    72
    12
    87
    49
    Cagliari
    22
    20
    56
    59
    30
    Firenze
    05
    39
    74
    53
    86
    Genova
    57
    72
    07
    46
    02
    Milano
    88
    40
    30
    33
    38
    Napoli
    23
    14
    11
    90
    20
    Palermo
    12
    18
    89
    06
    20
    Roma
    76
    03
    45
    20
    44
    Torino
    64
    30
    43
    69
    16
    Venezia
    56
    60
    32
    17
    46
    Nazionale
    59
    74
    12
    50
    54
    Estrazione Simbolotto
    12
    25
    26
    23
    13
Alto