Per Salvo50 o altro scripter

[sorujoe]

Innanzitutto ringrazio vivamente Magia e Rubino è inutile e superfluo dire ed esprimere la mia ammirazione.
Per quanto riguarda la ricerca se immetto concorso 9600 oggi e faccio l'elaborazione in sestina a garanzia 4 se la rifacessi più in la sempre concorso 9600 4su 6 le sestine sarebbero uguali o varierebbero? Ciò al fine di avere dati uguali su cui fare statistica

 

[sorujoe]

L'ideale è avere formazioni sempre uguali cioè che non cambiano ogni volta che elaboro. In piu poter avere la possibilità di lavorare sull'integrale ad esempio terzine per ambo non saranno miliardi di combinazioni, se ci mette molto tempo mi prendo l'onere di aspettare. Quindi un'elaborazione parziale ma non random in quanto variano i dati e la possibilità di immettere volendo l'integrale di tutte le combinazioni che utilizzerò per analisi tipo terzine per ambo.

 

[sorujoe]

ho notato che nello sviluppo mette terni ripetuti come mai

 

[sorujoe]

Chissa se vi fosse la possibilità di immettere da 1 a massimo 3 fisse se fosse piu fattibile

 

[sorujoe]

fisse 0,1,2,3 ideale

 

[Rubino]

sto facendo e controllando uno script che lavora su integrale, ed uno su ridotto, vedendo i tempi di elaborazione.

domani vediamo se riesco a cavarci fuori qualcosa.

Sviluppo in Classe 4 sorte 3 Sviluppo Richiesto I N T E G R A L E
tempo 14 minuti.
---------------------------------------------------------------------
Combinazioni Rit.Att.
18.38.41.72....0618
21.43.61.84....0407
17.19.46.68....0392
19.45.62.68....0385
4.35.43.71....0381
2.27.32.49....0381
39.43.58.68....0376
27.28.36.68....0373
14.38.41.86....0365
2.27.36.37....0359
39.46.51.81....0359
36.38.43.46....0359
18.38.49.72....0357
45.49.53.68....0356
13.17.49.53....0356
38.43.67.84....0346
2.7.26.43....0343
2.27.84.88....0343
7.39.47.63....0339
27.36.49.87....0332
65.67.78.80....0330
18.27.46.49....0330
18.27.48.49....0330
00:13:38



Sviluppo in Classe 4 Sorte 3 Sviluppo Richiesto R I D O T T O
---------------------------------------------------------------------
Combinazioni Rit.Att.
2.27.36.37....0359
2.17.86.87....0312
2.12.40.41....0233
2.5.41.42....0211
1.18.39.40....0179
1.17.24.25....0162
1.2.39.40....0148

tempo 53 secondi


come si vede non ci siamo, i dati sviluppati con il questo metodo ridotto, non intercetta le stesse combinazioni e migliori ritardi.

 

[sorujoe]

Thanks se riesci a immettere pure 0,1,2,3 fisse è il massimo

 

[Rubino]

DOMANDA:
ma Byron, se ti serve controllare le combinazioni più ritardatarie
Terzine x Ambo e/o terno 90-03-03
perchè non importi un file contenete tutti 117480 terni, nelle tabelle di spaziometria?
una volta che le hai caricate, possono valere sia per il lotto, che per il 10elotto, e per il superenalotto eventualmente.

e con 29395 quartine puoi avere la sicurezza matematica di tutti i terni 90-04-03

stessa cosa per 90-05-03 col.12956

oltre può diventare un problema!

 

[sorujoe]

a me servirebbe uno script che lavori tipo quello che hai fatto ma il randomizzato mi da formazioni sempre differenti a me questo non va bene. Possibilmente poter mettere una o piu basi così da focalizzare l'interesse su un gruppo minore di combinazioni.

 

[sorujoe]

le basi sono importanti 0,1,2,3 poi se per affinare e ridurre il numero di colonne magari possiamo mettere il ritardo minimo da considerare che varia in base alla formazione ed al punteggio immesso

 

[Rubino]

credo che con uno script, più di così io non riesco a fare, se non inserendo delle ulteriore condizioni, ma non ne vale la pena.

questo è ciò che si riesce a fare, con classi piccole. 3-4-5-6,7,8 max
il max classe 8, già deve elaborare in ridotto miliardi colonne, ridotto a milioni.

per l'integrale è impensabile sviluppare 90 numeri in sestine e superiori

Pertanto ho predisposto di diminuire i numeri, permettendo all'utente di selezionare i numeri che vuole
nella quantità che vuole e per la sorte che vuole.

questo script è concepito per ricercare solo delle combinazioni più ritardatarie al momento.
bisogna prendere nota che le combinazioni intercettate dall'integrale sono tutte le colonne matematiche mentre nel caso di una sviluppo Ridotto, si prenda atto che non per forza le colonne in ritardato che vengono intercettate corrispondano esattamente a quelle dell'integrale.
saranno solo parziali.

Inutile inserire condizionamenti, come fissi, perchè se non si sceglie 90 numeri ma esempio trenta, verranno sviluppate le combinazione matematicamente con trenta numeri.


questo è un esempio di 90 numeri RIDOTTO classe cinque per tre punti = 1 minuto circa tempo elab.





questo è in classe 6 per tre punti RIDOTTO sempre 1 minuto circa tempo elab.

 

[Rubino]

questo è lo script, non posso andare oltre.

Option Explicit
Sub Main
   Dim coltot,i,acol,ctr,Classe,nsorte,x,minr,frer,aretritardi,Inizio,fine,aretidestr,aretcol,h,rit,z,svi,n,LISTA,LISTA1,LISTA2,lista3
   Dim anum(90),comb(500000,3),MINMIN(30,9)
   svi = InputBox("Sviluppo I / R  ",,"R")
   Classe = InputBox("Classe",,5)
   nsorte = InputBox("Sorte",,3)
   MINMIN(4,2) = 26
   MINMIN(4,3) = 330
   MINMIN(5,2) = 31
   MINMIN(5,3) = 140
   MINMIN(5,4) = 1140
   MINMIN(6,3) = 65
   MINMIN(6,4) = 397
   MINMIN(6,5) = 5000
   MINMIN(7,3) = 40
   MINMIN(7,4) = 250
   MINMIN(7,5) = 1800
   MINMIN(8,5) = 900
   ''''carica 90 numeri
   Call ScegliNumeri(anum)
   n = UBound(anum)
   LISTA = StringaNumeri(anum,".")
   LISTA1 = Mid(LISTA,1,80)
   LISTA2 = Mid(LISTA,82,89)
   lista3 = Mid(LISTA,172,90)
   Call ImpostaArchivio10ELotto(1)
   Inizio = EstrazioneIniDL : fine = EstrazioneFinDL
   ColoreTesto(2)
   Scrivi "--Combinazioni in Ritardo al 10 E Lotto   (Rubino-DL) ",1
   Scrivi "Situazione 10 E LOTTO - Combinazioni in ritardo ",1
   Scrivi "Periodo: " & EstrazioneIniDL & " / " & EstrazioneFinDL & " - " & DataEstrazioneDL(EstrazioneFinDL),1
   ColoreTesto(1)
   Scrivi "Sviluppo in Classe " & Classe,1
   Scrivi "Sorte " & nsorte,1
   Scrivi "Ritardo Minimo  " & MINMIN(Classe,nsorte),1
   ColoreTesto(0)
   Scrivi "Tot.Numeri Scelti.." & n,1
   Scrivi "Numeri  " & LISTA1,1
   Scrivi "Numeri  " & LISTA2,1
   Scrivi "Numeri  " & lista3,1
   ColoreTesto(2)
   If svi = "I" Then Scrivi "Sviluppo Richiesto     I N T E G R A L E   ",1
   If svi = "R" Then Scrivi "Sviluppo Richiesto     R I D O T T O  ",1
   ColoreTesto(0)
   Scrivi "---------------------------------------------------------------------",1
   '''rileva a campione Ritardo Minimo di classe scelta
   minr = MINMIN(Classe,nsorte)
   ''''
   coltot = InitSviluppoIntegrale(anum,Classe)
   If svi = "I" Then
      If coltot > 0 Then
         '''' I N T E G R A L E
         Do While GetCombSviluppo(acol) = True
            i = i + 1
            Call Messaggio("Col.Tot. " & coltot & " / Int." & i & " Trovate " & h)
            If ScriptInterrotto Then Exit Do
            rit = RitardoCombinazioneDL(acol,nsorte,fine)
            If rit >= minr Then
               h = h + 1
               comb(h,1) = StringaNumeri(acol,".")
               comb(h,2) = FormattaStringa(rit,"0000")
            End If
         Loop
      End If
   End If
   ''''  R I D O T T O
   If svi = "R" Then
      If coltot > 0 Then
         Do While GetCombSviluppoRid(acol,nsorte) = True
            i = i + 1
            Call Messaggio("Col.Tot. " & coltot & " / Rid." & i & " Trovate " & h)
            If ScriptInterrotto Then Exit Do
            rit = RitardoCombinazioneDL(acol,nsorte,fine)
            If rit >= minr Then
               h = h + 1
               comb(h,1) = StringaNumeri(acol,".")
               comb(h,2) = FormattaStringa(rit,"0000")
            End If
         Loop
      End If
   End If
   Scrivi "Combinazioni Elaborate..." & i,1
   Scrivi
   ''''RIEPILOGO COMBINAZIONI FILTRATE
   Call OrdinaMatrice(comb,- 1,2)
   Scrivi "Combinazioni  Rit.Att.",1
   For z = 1 To h
      Scrivi comb(z,1) & "...." & comb(z,2),1
   Next
   Scrivi TempoTrascorso,1
End Sub

fatemi sapere, se funziona tutto, a me sembra di si, sul mio pc.

 

[sorujoe]

Grazie gentilissimo

 

[sorujoe]

Ciao Rubino ho provato lo script ma non
1. segna i valori che hanno raggiunto lo storico
2. non posso inserire un concorso su cui fare la rilevazione retro attiva per vedere gli esiti vincenti maturati
3. non c'è la possibilità di inserire da 0 a 3 fisse

per cui è lontano da quello che mi interessa, comunque grazie per il tuo intervento. A me servono o combinazioni integrali o se ridotte sempre uguali non che variano perchè se elaboro ad una determinata data in quella devono comparire sempre le stesse formazioni, per questo non accetto le random.

 

[Rubino]

1. segna i valori che hanno raggiunto lo storico​

Combinazioni RitAtt./R.Max Freq.
68.80.84.85....0201 / 0201 0227
13.61.66.67....0151 / 0181 0206
20.35.66.67....0151 / 0151 0205
35.61.66.67....0151 / 0151 0226


Combinazioni trovate...4
Combinazione Esito Fav.
-----------------------------------------------------------------------------------------------------------------------------------

. non posso inserire un concorso su cui fare la rilevazione retro attiva per vedere gli esiti vincenti maturati​

Combinazioni RitAtt./R.Max Freq.
12.18.40.41....0223 / 0223 0220
----> Esito 9604 colpo n.4 .. .. 12 18 .. .. .. .. 40 .. .. .. .. .. .. .. .. .. .. ..
68.80.84.85....0181 / 0181 0227
61.76.85.86....0168 / 0168 0228
27.42.84.85....0156 / 0205 0192
----> Esito 9610 colpo n.10 .. .. .. .. .. .. .. .. .. 27 .. .. .. .. .. .. .. 84 85 ..
5.43.68.69....0202 / 0202 0232
5.41.68.69....0194 / 0194 0226
27.68.84.85....0149 / 0279 0207
----> Esito 9608 colpo n.8 .. .. .. .. .. .. 27 .. .. .. .. .. .. .. 68 .. .. .. 85 ..
24.39.82.83....0209 / 0209 0197
----> Esito 9616 colpo n.16 .. .. .. .. 24 .. .. .. .. .. .. .. .. .. .. .. .. 82 83 ..
61.64.82.83....0153 / 0201 0213
----> Esito 9616 colpo n.16 .. .. .. .. .. .. .. .. .. .. .. .. .. .. 61 .. .. 82 83 ..
43.58.68.69....0195 / 0195 0222


Combinazioni trovate...10
Combinazione Esito Fav.5
----------------------------------------------------------------------------------------------------------------------------------------------

3. non c'è la possibilità di inserire da 0 a 3 fisse​

non ho capito a cosa devono servire le 3 fisse, se filtrare le combinazioni in ritardo per diminuirne il numero e se deve
calcolare gli esiti delle combinazioni che contengono solo i fissi.

se me lo spieghi, forse risulterà chiaro.

A me servono o combinazioni integrali o se ridotte sempre uguali ​

le combinazioni risultano sempre uguali ad una data, se elabori per integrale o se elabori per ridotto.
quello che conta è la data.

ciò che non combacia tra integrale e ridotto, che le colonne ridotte non essendo in numero uguali all'integrale
non possono eventualmente intercettare quelle più in ritardo.

su tre cose che rimangono in sospeso dal tuo punto di vista, 2 sono risolte, la terza quelle delle fisse aspetto di capire
a cosa servono.

Intanto ti faccio io una domanda:
le combinazioni che hanno ritardo alto, ma che non hanno superato il loro ritardo massimo, devono comparire in output o devono essere
scartate?



Poi lo script ha possibilità limitate, deve servire per fare qualche controllo, certo non può tendere
a sostituire un programma completo e più articolato.

 

[sorujoe]

I ritardi alti che non hanno superato lo storico non mi servono. Le fisse mi servono per restringere il campo ai soli esiti che mi interessano grazie

 

[sorujoe]

a me non mi fa vedere gli esiti ne ritardo attuale e storico la data di elaborazione non so come inputarla ecco cosa vedo su una elaborazione terni ...punti 2 ridotto sui 90 numeri

 

[sorujoe]

Con i fissi in sostanza lo script mi filtrerà le combinazioni che li contengono quindi 0 senza fissi, 1 per 1 fissa 2 con 2 fisse 3 tutte e tre i fissi se li trova.
Se analizzo al concorso 9600 lo script dovrà esaminare gli esiti vincenti maturati dal 9601 in poi. Per quanto concerne il mio output è diverso dal tuo (sicuramente per mia incompetenza ...farò qualche errore di procedura) tuttavia come postato nella immagine non vedo ne esiti vincenti ne storici raggiunti dal cronologico .....solo ritardo attuale

 

[sorujoe]

Ho il dubbio che lo script postato da te non sia quello ultimo presente sul tuo pc ....a me fa altro. Errore di dimenticanza o sono io un disastro

 

[Rubino]

Certo che non li vedi lo farà lo script modificato che ti posterò domani.

Devo fare le modifiche in sospeso

1-- escludere i rit. Minori del massimo perché non li vuoi vedere
2 -- gli esiti riguarderanno solo le combinazioni checonterranno i fissi che metti
3-- 0123 fissi in and se ci sono