Stai usando un browser molto obsoleto. Puoi incorrere in problemi di visualizzazione di questo e altri siti oltre che in problemi di sicurezza. . Dovresti aggiornarlo oppure usare usarne uno alternativo, moderno e sicuro.
Ciao Salvo e tutti
..mi ha incuriosito il tuo script, a solo scopo didattico...
allego una versione diversa che agisce sulle distanze, che potrebbe ovviare a possibili errori, ed accorcia il codice di riga..
è solo uno scopo didattico per tenerci allenati, magari può servire...
PS: se è una...
...mi sembra tu abbia preso una strada tortuosa, nella compilazione dello script...
ti metto qui una soluzione al volo, giusto per limitare la lunga digitazione (ed evitare errori)
Un caro saluto
Option Explicit
'Analisi esito direttrice estrazionale
'Ramco 20/01/2024
Sub Main()
Dim...
Utilizzava il valore dell' I.C. senza decimali, il software arrotondava, ma nelle colorazioni (come è stato menzionato, i decimali venivano considerati)... Alcune assegnazioni, e questo dipendeva dal software in questione, dipendevano dal K "Posizioni" o K "Settimane di Ritardo"...
Si, Joe
ho scritto "Frequenza" nel post per non creare ulteriore confusione, nei quadri di Spaziometria è riportato il titolo "Frequenza" e volevo solo fare riferimento a quello...
Ciao Genios
I.C.
E' il rapporto tra Ritardo Cronologico e Ciclicità effettiva.
Si calcola così:
riporto un esempio reale attuale sul primo ritardatario presente su Bari, ma il concetto è identico e ripetibile per qualsiasi formazione e per qualsiasi esito della formazione stessa...
Alla data...
Ciao a tutti...
intervengo solo per sottolineare che il Kcritico citato, chiamato così a suo tempo dal Prof. Ennio.... non è altro che l'Indice di Convenienza su Spaziometria...
👋
Ciao, ho inserito una tabella veloce (si può fare molto di più a livello grafico, ma non ne ho il tempo) che comunque riassume i dati che ti servono...
Se altri vogliono "abbellire" c'è spazio...
Option Explicit
Sub Main
Dim...
Ciao, ho cercato di fare un minimo d'ordine... cerca di capire cosa mettere prima e cosa mettere dopo, evita le ripetizioni se non servono... (possono solo aumentare gli errori), far ciclare le distanze è inutile, la condizione si attua con l'if... già presente.
Ho inserito la Ruota Nazionale...
Ciao.. senza cambiare nulla, mi son permesso di aggiustare qualche riga... solo x logica ho spostato qualche "if..."
Sub Main
Dim ambata1(1),ambo1(2),ambo2(2),ambo3(2),calc(4),ruota(2),ruote(4),posta(1),poste(2)
Dim ambo4(2),rs
Dim a,b,c,d,x,v,z,p1,p2,p3,es
Dim r1,r2,clp,caso...
...forse è meglio utilizzare la condizione "diverso da"..
If a<>c And b<>c Then....
("a" e "b" sono diversi per forza essendo estratti nella stessa ruota...)
Option Explicit
'VERSIONE PULITA x LOTTODESK
Sub Main()
' Lo script scandaglia l'archivio per rilevare la presenza di un estratto Isocrono su coppia di ruote in estrazioni continue
' Se tale condizione è rilevata lo script calcola il ritardo raggiunto dall'estratto su entrambe le ruote, il...
...ho smanettato sullo script di joe (spero non me ne vorrà, se ho compilato cretinate..)
cercando di capire ciò che Eugenio richiedeva...
Magari una cosa simile può andare...
Sub Main
'Frequenze Recenti delle Posizioni Script BY JOE
Dim F,R,P,I,N,PP,es,Nu(5),NN(5),xf,E,PF(90),cc,Valorefr,x...
Ciao a Tutti...
Allego questa tabella di riferimento "Premi", è quella da ritenersi valida, con trattenuta all'8% (nel gioco del Lotto questa è la trattenuta in caso di vincita, in altri giochi c'è qualcosas di diverso...)