GRAZIE MILLE
@Edoardo_95 dalle mille e 1 potenzialità per aver subito implementato al volo la guida completa in pdf (sei incredibile...
) . Ti ringrazia anche QWEN
che in un nano secondo sembra aver capito tutto di come si programmi gli script nel tuo fantastico e super power gioiellino
. Questa cosa personalmente mi ha salvato... perchè pigro come sono ti confesso che molto probabilmente non mi sarei messo a riprogrammare tutti gli script fatti in .ls in questa nuova estensione... nè probabilmente a ricrearne di nuovi da zero..
Il pensiero è completo
Sì, Tom: ho recepito il contenuto della guida di
EstraCode Studio 1.20.1. Posso usarla come riferimento quando mi chiederai di costruire, modificare o spiegare script per quel programma.
In pratica posso aiutarti a:
- interpretare le funzioni della guida: AnalizzaFormazioneTurbo, Abbinamenti, AbbinamentiSuccessivi, EstrazioniArchivio, CreaTabella, CreaTabellaOrdinabile, CreaFileHtml, ecc.;
- preparare script in stile EstraCode Studio con Sub Main(), Dim, Scrivi, parametri facoltativi per nome, array con indice zero riservato, ecc.;
- usare correttamente ruote e sorti: BA_(), CA_(), MI_(), RO_(), NZ_(), TU_()/TT_(), ESTRATTO_(), AMBO_(), TERNO_(), QUATERNA_(), CINQUINA_();
- gestire intervalli di concorso: Inizio, Fine, EstrazioniArchivio();
- costruire ricerche su frequenze, ritardi, ritardi massimi, abbinamenti di spia, piramidi ritardi, tabelle HTML, resoconti e simulazioni;
- controllare la coerenza dei parametri prima di generare lo script, evitando errori tipici come confondere numero Lotto, indice array, posizione estrazionale e progressivo concorso.
Quando vuoi chiedermi uno script, per ottenere il risultato migliore puoi indicarmi più o meno queste cose:
- Obiettivo: per esempio “voglio il ritardo di un ambo”, “voglio gli abbinamenti di una spia”, “voglio una tabella con frequenze e ritardi”, ecc.
- Numeri o formazione: per esempio {0, 12, 34} oppure solo 12 come spia.
- Ruote: Bari, Tutte, Nazionale, una ruota precisa o più ruote.
- Sorte: estratto, ambo, terno, quaterna, cinquina.
- Intervallo: tutto l’archivio, ultime 100 estrazioni, ultime 500, ecc.
- Motore: normale o Turbo, se la guida prevede entrambe le varianti.
- Output desiderato: solo testo, tabella, HTML, messaggio, variabili da riutilizzare, ecc.
Ti confermo anche che seguirò la tua regola:
non cancellerò mai codice precedente solo per risparmiare righe.
Se per qualche motivo non riuscirò a completare uno script in un unico messaggio, ti avviserò.
Se invece dovessi proporre una modifica, ristrutturazione o rimozione di codice per migliorare realmente il programma, ti avviserò sempre prima, spiegando il motivo.
Se vuoi, possiamo già iniziare con un primo script di prova. Per esempio posso prepararti uno di questi:
- script base per analizzare una formazione con AnalizzaFormazioneTurbo;
- script per calcolare frequenza e ritardo di un ambo su una ruota;
- script per gli abbinamenti di una spia nella stessa estrazione;
- script per gli abbinamenti successivi dopo una spia;
- script con tabella HTML ordinabile.
Dimmi tu quale vuoi provare per primo.
Vai stupiscimi
Il pensiero è completo
Ti stupisco con uno
script EstraCode Studio già pronto che usa solo funzioni documentate nella guida.
Ti preparo un piccolo
“Osservatorio rapido ambi”:
- chiede un intervallo di concorsi, proponendo di default gli ultimi 100;
- conta, in quell’intervallo:
- gli ambi con somma 45;
- gli ambi uguali;
- mostra poi il dettaglio dell’ultimo concorso con data ed estrazione.
Questo è codice nuovo, quindi
non sto cancellando nulla. Se in futuro dovremo ampliarlo, conserveremo la base e aggiungeremo moduli sopra, come piace a te.
Codice:
'=====================================================================
' EstraCode Studio - Osservatorio rapido ambi
' Scansiona un intervallo di concorsi, default ultimi 100.
' Conta:
' 1) ambi con somma 45
' 2) ambi uguali
' Infine mostra l'ultimo concorso.
'=====================================================================
Sub Main()
Scrivi("OSSERVATORIO RAPIDO AMBI", Grassetto:=True)
' Ultimo concorso disponibile nell'archivio corrente.
Dim ultimo = EstrazioniArchivio()
' Propone come default gli ultimi 100 concorsi.
' Math.Max evita di scendere sotto il concorso 1.
Dim inizio = Math.Max(1, ultimo - 99)
Dim fine = ultimo
' Apre la finestra di scelta intervallo.
' Se l'utente annulla, lo script termina senza errori.
If Not ScegliRange(inizio, fine) Then
Scrivi("Operazione annullata dall'utente.")
Return
End If
' Controllo di sicurezza sull'intervallo scelto.
If inizio > fine Then
Scrivi("Intervallo non valido: il concorso iniziale è maggiore del finale.")
Return
End If
Scrivi("Concorso iniziale: " & inizio)
Scrivi("Concorso finale: " & fine)
Scrivi("Concorsi esaminati: " & (fine - inizio + 1))
' Variabili contatore.
Dim totaleAmbiSomma45 = 0
Dim totaleAmbiUguali = 0
' Variabili di appoggio per la scansione.
Dim concorso = inizio
Dim collSomma = Nothing
Dim collUguali = Nothing
Dim esitoSomma = Nothing
Dim esitoUguali = Nothing
' Scansione dei concorsi richiesti.
For concorso = inizio To fine
' Azzera le raccolte prima di ogni ricerca.
collSomma = Nothing
collUguali = Nothing
' Cerca ambi con somma 45 nel concorso corrente.
esitoSomma = GetAmbiSommaX(concorso, collSomma, 45)
If collSomma IsNot Nothing Then
totaleAmbiSomma45 = totaleAmbiSomma45 + collSomma.Count
End If
' Cerca ambi uguali nel concorso corrente.
esitoUguali = GetAmbiUguali(concorso, collUguali)
If collUguali IsNot Nothing Then
totaleAmbiUguali = totaleAmbiUguali + collUguali.Count
End If
Next
' Output colorato semplice.
ColoreTesto(Blu_())
Scrivi("Ambi con somma 45 trovati nel periodo: " & totaleAmbiSomma45)
ColoreTesto(Rosso_())
Scrivi("Ambi uguali trovati nel periodo: " & totaleAmbiUguali)
ColoreTesto(Nero_())
Scrivi("Dettaglio ultimo concorso:", Grassetto:=True)
Scrivi("Progressivo archivio: " & fine)
Scrivi("Data estrazione: " & DataEstrazione(fine))
' Mostra l'estrazione completa dell'ultimo concorso.
ScriviEstrazione(fine)
Scrivi("Elaborazione completata.", Grassetto:=True)
End Sub
Cosa fa questo script
- Apre una finestra ScegliRange
Ti propone gli ultimi 100 concorsi, ma puoi cambiarli.
- Conta gli ambi con somma 45
Usa GetAmbiSommaX, passando:
- il concorso;
- la variabile raccolta;
- la somma voluta, cioè 45.
- Conta gli ambi uguali
Usa GetAmbiUguali per ogni concorso dell’intervallo.
- Mostra l’ultimo concorso
Con:
- progressivo archivio;
- data estrazione;
- estrazione completa tramite ScriviEstrazione.
Funzioni della guida usate
- EstrazioniArchivio()
- ScegliRange(...)
- Math.Max(...)
- GetAmbiSommaX(...)
- GetAmbiUguali(...)
- DataEstrazione(...)
- ScriviEstrazione(...)
- Scrivi(...)
- ColoreTesto(...)
- Blu_()
- Rosso_()
- Nero_()
Come provarlo
- Apri EstraCode Studio.
- Crea un nuovo script .ecs.
- Incolla il codice.
- Verifica che l’archivio sia impostato correttamente.
- Premi F5.
Piccola avvertenza pratica
Se scegli un intervallo molto grande, per esempio tutto l’archivio, lo script può diventare lento perché ripete la ricerca per ogni concorso. Ti consiglio di provarlo prima su
100 concorsi, poi eventualmente salire.
Se vuoi stupirti ancora di più, al prossimo passo posso aggiungere una
tabella ordinabile con i concorsi, il numero di ambi trovati per ciascun concorso e magari un
grafico finale, sempre senza cancellare questo codice.
ps: Io fossi la lotto
a questo punto... comincerei davvero a tremare... 
. E' possibile pure importarvi e/o convertire le migliaia di scripts fatti e raccolti in tutti questi anni in formato .ls per caso? 
ps: ciliegina per il futuro se non ci hai già pensato e se è comunque possibile : integrazione con CLI e MCP per far lavorare direttamente AI e agenti AI come va tanto di moda fare adesso con quasi tutti i sw vecchi e nuovi.. 
quando dicevo che c'è molto di più non scherzavo 
