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 Baffo. Ecco la versione limitata ai casi di due sole ripetizioni.
Option Explicit
Sub Main
Dim Vet_Controllo(90,5),Vet_ripetuti(20),pos,Num,Num1,k,kk,conta,conta1,conta2,Nr,Mat_estr_mod(21,5),Ultimo_indice,Vet_sv(5),Vet_somma_estr(21),Mat_sver(21,5),Mat_sver_mod(21,5),Mat_dver(21,5)...
Ciao Baffo. Ho "isolato" i numeri da te richiesti. Non sono sempre 4 ( dipende da quante volte la somma/differenza isotopa si ripete nel mese ) anche se nella maggioranza dei casi si hanno due ripetizioni e quindi 4 numeri. Ho previsto le varie situazioni e i numeri sono memorizzati nelle...
Ciao Baffo. Avevo notato anch'io l'incongruenza ed ho sistemato il problema (penso). Cosa intendi per "isolare i quattro numeri" ?
Option Explicit
Sub Main
Dim...
Ciao Baffo. Ho lavorato un po' sullo script in base alle tue indicazioni. Dai un'occhiata e verifica se è quello che hai chiesto. Lo script, essendo fatto a più riprese aggiungendo varie parti, non è proprio il massimo e si potrà migliorare. Ciao, Maldor
Option Explicit
Sub Main
Dim...
Ciao Baffo. Aggiunto piccolo passo, se può servire.
Option Explicit
Sub Main
Dim Vet_Controllo(90,5),Vet_ripetuti(20),pos,Num,Num1,k,kk,conta,Nr,Mat_estr_mod(21,5),Ultimo_indice,Vet_sv(5),Vet_somma_estr(21),Mat_sver(21,5),Mat_sver_mod(21,5),Mat_dver(21,5)
Dim...
Ciao Baffo. Ho modificato un poco lo script che ora calcola le somme verticali. E' organizzato in tabella e se può andare così si potrà implementare anche la parte successiva.
Option Explicit
Sub Main
Dim...
Sulla ruota Nazionale non si hanno esiti positivi dopo il 2/7/24 e quindi non può indicare anche le estrazioni successive. Prova a vedere sulle altre ruote, ad esempio su Venezia dà esito al 6/7/24.
Ciao Baffo. Vedi se tu può essere utile questa mia modifica. Ho isolato i numeri ripetuti e poi ho inserito una giocata fittizia che li considera tutti ( se sono meno di 10). Ciao, Maldor
Option Explicit
Sub Main
Dim a,b,c,d,e,x1,x2,x3,x4,x5
Dim es,r,x,j,esX,esj,ini,fin,co,clp
Dim...
Ciao Baffo. Prova a controllare queto.
Option Explicit
Option Explicit
Sub Main
Dim es,r,r1,r3,a,b,c,d,tm,clp,co,Mese1,Anno1
Dim Ini
Dim Fin
Dim ruote(1)
Dim posta(10)
Dim am1(2):Dim am2(2):Dim am3(2):Dim am4(2):Dim am5(2):Dim am6(2)
Fin = EstrazioneFin
r3...
Ciao Baffo. Ho provato a realizzare lo script richiesto. Non so se le giocate sono come le vuoi tu. Verifica se fa quanto tu hai richiesto.
Option Explicit
Sub Main()
Scrivi
Scrivi String(100,"*")
ColoreTesto 2
TestoInBandaPassante(" *** Metodo By BaffoBlù ***"),1,3,0
ColoreTesto...
Ciao Baffo. Lo script utilizza come dati gli estratti delle estrazioni es, es+1, es+2 e es+3. L'istruzione "Gioca es,1,,1" inizia le giocate da es+1 . Quindi in pratica sembra che lo script "veda" già alcuni estratti futuri. Probabilmente bisogna sostituire con "Gioca es+3,1,,1". Prova a...
Ciao Baffo. Tra ieri e oggi impegni di famiglia ma da stasera posso provarci. I numeri o gli ambi più presenti vanno ricercati in tutte le estrazioni precedenti (dal 1871) oppure solo nelle ultime X estrazioni?
Ciao Baffo. Piccola modifica per scegliere una coppia a piacere con somma 53.
Ciao, Maldor
Option Explicit
Sub Main()
Scrivi
Scrivi String(100,"*")
ColoreTesto 2
TestoInBandaPassante(" *** Metodo e Script By BaffoBlù ***"),1,3,0
ColoreTesto 0
Scrivi String(100," * ")
Dim...
Ciao Baffo.
Ho modificato il tuo script per effettuare la ricerca con tutte le sequenze. Dai una controllata per verificare se tutto è ok.
Ciao, Maldor
Option Explicit
Sub Main()
Scrivi
Scrivi String(100,"*")
ColoreTesto 2
TestoInBandaPassante(" *** A T T E N Z I O N E !!! Dalla...
Ciao Claudio. Non avevo ben chiaro i concetti di presenza/frequenza. In effetti nel mio programmi in VBA ho calcolato entrambe, riportando poi nello script solo quella che pensavo fosse la presenza. Se è come dici tu devo rivedere lo script. Analizzando la tua tabella comparativa delle due...
Ciao Baffo. Grazie per l'incoraggiamento e per il lavoro che fai.
Ho cercato gli ambi comuni e fra di essi ce ne sono due che hai già consigliato per Roma.
AMBI RIPETUTI
Presenze Roma 1-52
Presenze Roma 20-33
Posizione 1-52
Posizione 20-33
05-90
6
7
80
70
16-17
7
7
58
61
16-84
10
8
3...
Ciao. Allego qui uno script ( è il primo che faccio in spaziometria) che forse, può soddisfare le tue richieste. E' molto spartano e realizzato da chi non conosce le varie funzioni possibili per gli script in spaziometria. Certamente si può fare di meglio...
Option Explicit
Sub Main()
Dim...