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.
Sull' Utilizzo che ne devi fare poi vedi tu, in pratica hai fatto tutti i numeri sviluppati in 10 terzine con relativi distanze.
Penso per vedere le varie distanze, ma poi hai tralasciato la condizione principale dell2 2 figure-distanza uguali.
Va bene cosi, sono tue scelte e vedute.
Solo non...
Zetrix , quando parlavo di legge del Kaos , sembravano parole ma poi come vedi d uno script si passa ad altra tipologia.
Ad ogni modo sono riuscito a simulare i tuoi dati.
script
Sub Main
Dim Nu(3),dist(3),Fig(3),T
Ini = EstrazioneFin - 2
fin = EstrazioneFin
For es = Ini To fin
T...
Io sono stato rigido al tuo esempio e nelle 2 condizioni imposte.
Per le altre somme o figure devi modificare lo script ultimo che estrapola le distanze con relativa somma e figure richieste.
Non capisco perchè dici che estrapola i numeri e non le distanze.
Capisci che non posso seguirti nel tua...
Prova questa bozza di script sembra che raccoglie le risultanze che vuoi ottenere.
Bozza...... il resto lo fai tu ( disegna estrazione e cerchio ciclometrico)
Sub Main
Dim Nu(5),aN(10),Fig(3)
Ini = EstrazioneFin - 20
fin = EstrazioneFin
T = Space(8) &"Info ES" & Space(15) & "Ruota"...
Te lo avevo detto sopra che ho cercato i numeri e non le distanze.
Cercare le 3 distanze con somma 84 è più complesso.
Ci vogliono più cicli e per ora non ho chiaro il modus operandi in fase di costrutto script.
Se riesco volentieri.
Ciao
No !!! Solare in questa tipologia di script non è possibile ottenere le sole decine.
Se un numero dopo spia o prima della spia ha tot presenze non è detto che i compagni della decina abbiano presenze valide.
Mi spiace.
Ciao
Zetrix, ti avevo fatto una bozza con i Numeri estratti con somma 84 e figura 1,4,7, ma poi mi sono accorto leggendo meglio che invece dei numeri vuoi le distanze.
Qui lo script si complica e bisogna pensare ad altro costrutto.
Per ora vedi la bozza con i numeri poi vedo se riesco con le...
Oscar io non uso questa sezione di spaziometria, ma potrebbe venirti utile (immagine 1)
Quello che vorresti con lo script è complicato
poi c'è anche un sottomenu > Sistemi > ImportaSistemi che ti permette di importare il sistema sviluppato file di testo e ridurlo alla garanzia, ma lo salva in...
Ciao Oscar, Joe, per svilupare una data combinazione in un sistema ridotto a garanzia n-1 n-2 etc, si potrebbe usare questo script presente in Test Spaziometria che allaccia e sviluppa le matrici di sistemi ridotti presenti in spaziometria.
ecco lo script e uno screenshot
Option Explicit
Sub...
Lo script è oramai stravolto nella sua costruzione logica, non comprendo la logica delle estrazioni prese in esame dal più ritardatario.
Comunque va bene così, l'utilizzo è a vostro carico e piacere.
Rispondo a Claudio per lo stringanumeri ?
In questo casi è meglio usare una stringa e...
Giusto per avere un'altra visione e partenza per raccogliere i dati.
Script delle Super Frequenze (già fatto).
Sub Main
Dim ru(1)
est = InputBox("Quante estrazioni analizzo",,18)
freq = CInt(InputBox("Quanti frequenti => a",,3))
Ini = EstrazioneFin - (est-1)
fin = EstrazioneFin -...
x Claudio (ciao) con il range che hai usato le frequenze-Presenze a me risultano uguali alle tue raccolte.
Poi come suggerisce anche i Legend con ini = fin - (qEstr-1) le estrazioni sono corrette alla richiesta dell'inputBox.
Per Il Colpo è inteso che si possa mettere se stiamo con fin a delle...
Abbastanza semplice nella stesura
Prova
Sub Main
Dim Nu(1),Ru(1),T
Dim qtEs,R,qFr,Ini,fin,k,n,rit,max,Incr,fre,Tot,MedFre,ic
qtEs = CInt(InputBox("Quante Estrazioni a Ritroso",,500))
R = ScegliRuota
qFr = CInt(InputBox("Quale presenza superiore > a : ",,0))
Ini =...
Raga, io non ho tempo, sono fuori sede e senza Pc.
Poi leggendovi non ho ben capito, spero che Salvo abbia compreso e soddisfi la richiesta.
Un saluto 👋
Ogni tanto gli facevo qualche script per i suoi progetti.
Ricordo una persona gentile e sempre educata nelle interazioni forum.
Un grande Saluto per il suo nuovo viaggio e condoglianze a famiglia e amici.
Ciao Arcor59
Noi tanti amici del forum.
:cry:
Su Spaziometria esiste in Statistica > su Ambi > Ambo con Capogioco la possibilità di vedere tutti i numeri e gli abbinamenti + frequenti.
Sarebbe meglio però un semplice script per vedere solo quello che interessa.
Option Explicit
Sub Main
Dim aRetAbb
Dim k,Num,r
Num = InputBox("Quale...
va bene :ROFLMAO::ROFLMAO::ROFLMAO:
però ancora non mi trovo con i bi-ambi devono essere ambi diversi , come le risultanze che raccoglie il mio script.
ecco le tue risultanze con ambi minimo > 1000 , l'ambo è un ambo uguale su 2 ruote.
Ciao C-64 , intanto grazie per aver sistemato l'utility Lottery, adesso funge tutto l'esport in spaziometria.
Poi ho anche scaricato Lotto per i Bi-Ambi è con una ricerca di min 1300 vine elencato il ritardo corretto (es. 1-10 / 1.17 = rit 1345).
quello che volevo segnalarti è che bisogna...
Bhe scaricare spaziometria è sicuramente una buona cosa è un programma da prendere ad esempio.
Per quello che dico io e mi interessa l'esport per spaziometria
esempio su millionday aggiornato all'ultima estrazione l'esport su file txt scrive tutto fino all'ultima estrazione
invece su VinciCasa...