NUOVO AMBIENTE SCRIPT AREA TECNICA

[LuigiB]

perche per vincere si deve fare 6

 

[giomi]

ok,capo

 

[rubino2]

ciao LuigiB
una domanda ancora per provare a fare un grafico

i tuoi vanno benissimo, ma io volevo farne uno che agisce con la media mobile a 5 o a 12 concorsi
perchè 5? perchè ho un foglio excel che avevo preparato qualche anno fa, quindi potrei controllare
se tutti i dati corrispondono.


Dim sFileBmp As String
Dim k As Long
sFileBmp = GetAppPathTemp & "grafico.bmp"
Dim picgrafico
Dim picGraficoRit
If KillFile(sFileBmp) Then

ho preso un po come base quella che tu hai predisposto in analisi combinazioni
dove sul lato dx escono i due grafici

a me serve solo aserieRit, che ho riempito con il valore della mediamobile

ho cercato di fare la stessa cosa nelle statistiche Rubino, attivando un bottone indicando
un estratto
una ruota

un periodo di calcolo della media mobile dei ritardi 5 o 12 o qualsivoglia
un tot di estrazioni 300 estrazioni da valutare, (valore fisso), perchè mi serve solo per un periodo precedente
all'ultima estrazione in archivio

tutti i dati corrispondono perchè evidenziandoli a video e sommandoli con la calcolatrice, corrispondono e sono esatti

ma non ottengo il grafico, mi dice che object richiesto

non ho sicuramente messo qualcosa o specificato nel modo giusto qualcosa.

dubbio che ho è :

picGrafico
PicGraficoRit
non so come vengono definiti,

o come avviene il riconoscimento del grafico che deve esplodere a video.?

o qualcosa altra cosa che sicuramente devo capire.

quando hai voglia se mi indica qualcosa, intanto cerco di proseguire per capire come avviene nei tuoi.

 

[rubino2]

solo per curiosità
nel frattempo una cinquina bicifrica per ambo può sfaldare a breve

11.77.03.17.71

 

[LuigiB]

si tratta di due picturebox presenti sul form , la picturebox è un oggetto in graado si visualizzare immagini

 

[lotto_tom75]

... presto condividerò il tutto nella tom's bakery sperando poi di riuscire a rifare l'intero script... anche in twinbasic..

Fatto! 👋🙂

 

[Rookie]

Fatto! 👋🙂

S'ode un lieve cinquettio (non viene da twitter ) che annuncia il tuo Genetliaco 🎂... e quindi Buon Compleanno Tom!

 

[i legend]

Buon giorno a tutti.
Non so se sia una cosa troppo impegnativa, ma ho tempo da dedicarci.
Vorrei costruire un mini browser con la possibilità di evidenziare alcuni numeri.

Se utilizzi lostbox è il più semplice, metto uno scrollbar nella list l estrazione collegata, ma non posso evidenziare le colonne
Costruisco un array di 55 caselle le collego allo scrollbar e dovrei essere in grado , più complesso
Oppure utilizzo la LuigiB 's Grid.


In ogni caso non sarà una cosa che farò velocemente.
Se utilizzassi una picturebox , si potrebbe evidenziare il tutto?
In realtà l avevo fatto con spaziometria ed era anche bellino.

Suggerimenti, per un compromesso tra la fattibilità e qualcosa di carino?

 

[joe]

Buon giorno a tutti.
Non so se sia una cosa troppo impegnativa, ma ho tempo da dedicarci.
Vorrei costruire un mini browser con la possibilità di evidenziare alcuni numeri.

Se utilizzi lostbox è il più semplice, metto uno scrollbar nella list l estrazione collegata, ma non posso evidenziare le colonne
Costruisco un array di 55 caselle le collego allo scrollbar e dovrei essere in grado , più complesso
Oppure utilizzo la LuigiB 's Grid.


In ogni caso non sarà una cosa che farò velocemente.
Se utilizzassi una picturebox , si potrebbe evidenziare il tutto?
In realtà l avevo fatto con spaziometria ed era anche bellino.

Suggerimenti, per un compromesso tra la fattibilità e qualcosa di carino?

Coincide maggiormente con quanto sto (molto pian piano) realizzando.

Se può essere utile ho pensato che le caselle da evidenziare, siano

Cella (Riga, Colonna = ((Ruota - 1) * 5 + Posizione))

Formula, che naturalmente non ho provato ma che penso possa funzionare,

almeno come spunto di riferimento.

Perché in fase di test si deve anche considerare anche il -1 di cui ha scritto Luigi.

 

[i legend]

Joe sicuramente sarà un gran bel lavoro come tutti i tuoi del resto.

 

[LuigiB]

aggiornamento dei 2 progetti twinbasic

 

[i legend]

Io per aggiornare aspetto che venga postato tutto il progetto così sostituisco tutta la cartella.
Ieri ho fatto un disastro
però ho reinstallato tutto e non ho perso nulla.

 

[LuigiB]

non credo che avverrà presto perhe quelal la aggiorno se cambio la dll ..

 

[i legend]

Ok. Grazie LuigiB. 👍

 

[rubino2]

come si chiama questo grafico di sx?

su quello di destra, manca qualcosa del tipo la prima serie perchè mi tira la riga dall'angolo al top attuale?

ho modificato qualcosa sul secondo, perchè all'inizio non lo faceva.

 

[i legend]

Ciao , domandona.
Ho provato a studiare l esempio della grid di Luigi.
Credo sia l unico esempio, se non ne ho perso qualcuno per strada.
Se volessi utilizzarla c è una funzione che richiama il tutto oppure bisogna copiare grid.ctl.tbcontrol e grid.ctl.twin in test consumer e poi inizializzare la griglia?
Questi giorni sono un po piu Rixxo del solito . Sto passando ore senza combinare nulla, ma poco male.
Grazie.
Ovviamente se già è stato discusso e risolto l argomento, basta indicarmi il post , il posto posso immaginarlo da solo 🤣🤣🤣🤣🤣

 

[happy]

come si chiama questo grafico di sx?

Dim aValoriRitardi(20, 1) As Variant
Dim aValoriIncrementi(20, 1) As Variant
Dim sRitardi As String, sIncrementi As String
Dim k As Long
 aValoriRitardi(0, 0) = 0
 aValoriIncrementi(0, 0) = 0
 sRitardi = "Serie Ritardi"
 sIncrementi = "Serie Incrementi"
 
 

    For k = 1 To 20
 
        aValoriRitardi(k, 0) = k
        aValoriRitardi(k, 1) = NumeroCasuale(1, 100)
        aValoriIncrementi(k, 0) = k
        aValoriIncrementi(k, 1) = NumeroCasuale(1, 100)
    Next

Call AddSerieGrafico(sRitardi, aValoriRitardi, vbBlue)
Call AddSerieGrafico(sIncrementi, aValoriIncrementi, vbRed)
Call DisegnaGrafico("“To be, or not to be, that is the question”", , eTipoGrafico_Area, 1280, 720, 1, 5)

👋

 

[LuigiB]

Ciao , domandona.
Ho provato a studiare l esempio della grid di Luigi.
Credo sia l unico esempio, se non ne ho perso qualcuno per strada.
Se volessi utilizzarla c è una funzione che richiama il tutto oppure bisogna copiare grid.ctl.tbcontrol e grid.ctl.twin in test consumer e poi inizializzare la griglia?
Questi giorni sono un po piu Rixxo del solito . Sto passando ore senza combinare nulla, ma poco male.
Grazie.
Ovviamente se già è stato discusso e risolto l argomento, basta indicarmi il post , il posto posso immaginarlo da solo 🤣🤣🤣🤣🤣

usa questo esempio per capire come funziona.
E' ovvio che tu debab importare nel tuo progetto i fiel delal griglia.

 

[happy]

su quello di destra, manca qualcosa del tipo la prima serie perchè mi tira la riga dall'angolo al top attuale?

ho modificato qualcosa sul secondo, perchè all'inizio non lo faceva.

Dovrebbe dipendere da una discrepanza tra i parametri x ed y se non ricordo male, qualche volta mi è successo in Spaziometria.

 

[rubino2]

una domanda

ma la aSerieRit(0,0) e aSerieRit(0,1)
iniziano con indice 0 oppure dall' 1 ?


aSerieRit è predisposta a ricevere eventuali medie con valore positivo ma 3 decimali?

è definita Long


il messaggio d'errore dice :

il valore non può essere null
nome parametro xvalue