Novità

Qualcuno riesce?

Giusto! c'è anche Claudio spesso disponibile che ringrazio tanto.
Lo script gira bene sul mio archivio txt ,ma non vedo i ritardi che avevano gli estratti caduti!
Lo script di Mike usa la funzione ritardo per altri scopi.
Te lo ho riscritto ad hoc.
Codice:
Option Explicit
Sub Main
     Dim nu(5),T,V,aN(55)
     Dim sFileBd,Ini,FIn,x,es,p
     Dim sChrSep
     sChrSep = ","
     sFileBd = "C:\Users\my\OneDrive\Desktop\ArcomodEx.txt" ' Qui specificare il proprio percorso e file archivio
     Call ApriBaseDatiFT(sFileBd,5,sChrSep,55) ' x MillionDay
     Ini = EstrazioniArchivioFT - 59
     FIn = EstrazioniArchivioFT
     Scrivi " Ritardi che avevano i numeri estratti"
     ReDim T(7)
     T(1) = "Data"
     T(2) = "Estratti"
     For x = 1 To 5
          T(x + 2) = "rit." & x & "°E"
     Next
     Call InitTabella(T)
     For es = Ini To FIn
          ReDim V(7)
          V(1) = DataEstrazioneFT(es)
          V(2) = StringaEstrattiFT(es)
          For p = 1 To 5
               x = EstrattoFT(es,p)
               V(2 + p) = EstrattoRitardoFT(x,0,es - 1)
          Next
          Call AddRigaTabella(V)
     Next
     CreaTabella
End Sub

Saluti
 
1739630119663.png

Qui ci sono solo le strazioni regolari, non le extra. Per fare la macro ho dato in pasto lo Script di claudio8 alla AI, con qualche modifica.
Tutto ciò che funziona è merito di claudio8, qualsiasi casino, errore, orrore è merito mio :cool:
Le modifiche: possibilità di inserire data inizio e fine, calcolo di quante volte, nel periodo richiesto, il ritardo era tra 1 e 9, 10 e 18 ecc.
Le altre macro mi stanno dando notevoli problemi, secondo una di queste il 38 ritarda da 14567 estrazioni... Giocatelo!
Baciccia
 
Vedi l'allegato 2297600

Qui ci sono solo le strazioni regolari, non le extra. Per fare la macro ho dato in pasto lo Script di claudio8 alla AI, con qualche modifica.
Tutto ciò che funziona è merito di claudio8, qualsiasi casino, errore, orrore è merito mio :cool:
Le modifiche: possibilità di inserire data inizio e fine, calcolo di quante volte, nel periodo richiesto, il ritardo era tra 1 e 9, 10 e 18 ecc.
Le altre macro mi stanno dando notevoli problemi, secondo una di queste il 38 ritarda da 14567 estrazioni... Giocatelo!
Baciccia
Il 38 a Palermo è uscito :oops::oops::oops:
Baciccia
 
Il 38 a Palermo è uscito :oops::oops::oops:
Baciccia
Naturalmente il 38 uscito a Palermo era una boutade.
Il 38 l'avevo inventato tanto per significare l'assurdità di certi risultati. Diffatti se guardate la ruota non c'è.
Ho solo guardato se, per caso, il 38 era uscito da qualche parte. E ho fatto il Post.
Non avete idea, tra i furbetti, quanto questa tecnica sia applicata. Non cascateci.
Ba ciccion (acc. quasi 100 chili! In 50 cm d'altezza)
 
Ciao @Baciccia nel tuo file xls hai qualcosa con le triple di figura ?
Se la risposta è no ti andrebbe di abbozzare qualcosa ?
Ti posso fornire una mia idea ti va ?
Il file è fermo la doppia estrazione porta un insieme di errori (o situazioni non previste) abnorme. Qui uno script si rivela superiore, se chi lo fa, lo sa fare. Io non lo so fare.
Aspetto una AI un pochino più "CAPACE", non come ora "capace" di fare casini immensi.
Esempio: il semplicfe tabellone al ritardo 0: poiché le estrazioni normali giornaliere sono due, uno o più numeri possono ripetersi:
la macro però SA che al ritardo 0 ci devono essere 10 numeri e mette anche i doppioni. Tutti i tentativi che ho fatto per evitare questo hanno comportato errori a cascata sui restanti ritardi. (se mettessi anche le estrazioni Extra, sia io che la AI ci suicideremmo mangiando 36 chili di ravioli con sugo di salsiccia io, e con un voltaggio di 20.000 volt la AI.
Baciccia
 
Ultima modifica:

Ultima estrazione Lotto

  • Estrazione del lotto
    sabato 05 aprile 2025
    Bari
    10
    58
    03
    61
    14
    Cagliari
    04
    67
    36
    85
    87
    Firenze
    70
    45
    80
    62
    06
    Genova
    05
    66
    32
    59
    89
    Milano
    20
    56
    02
    87
    47
    Napoli
    60
    63
    75
    72
    06
    Palermo
    14
    80
    30
    76
    70
    Roma
    73
    42
    36
    79
    08
    Torino
    26
    74
    83
    78
    31
    Venezia
    06
    60
    85
    76
    40
    Nazionale
    44
    11
    71
    06
    37
    Estrazione Simbolotto
    Genova
    26
    14
    36
    31
    44
Indietro
Alto