Mente da programmatore

[LuigiB]

non ci riecso a che fare ?

 

[Edoardo_95]

Non so spiegarmi bene. Diciamo che non riesco a "preparare" l'array dei numeri spia/estratto/presenze per poi ordinarli con la struttura che hai creato te.

 

[LuigiB]

io direi che prima di tutto devi scrivere una funzione GetPresenzeDopoNumero (NumeroSpia,NumeroSpiato)

dopo di che fai 2 cicli nidificati

for NumeroSpia = 1 to 90
for NumeroSpiato = 1 to 90
i +=1
redim preserve aStructSpia (i)
aStructSpia (i).NumeroSpia = NumeroSpia
aStructSpia (i).NumeroSpiato = NumeroSpiato
aStructSpia (i).Presenze = GetPresenzeDopoNumero (NumeroSpia,NumeroSpiato)
next
next

dopo di che devi implementare una classe icomparer per la struttura STRUCT_SPIA
e er farl osegui la flsa riga di come faccio io nella classe degli archivi paralleli.

 

[LuigiB]

per quanto riguard a gli script ho implementato impostagiocata e gioca inizia ad integrare gli script nei tuoi sorgenti oppure da a me i tuoi sorgenti e ci penso io cosi poi possiamo lavorare su quello ...

LottoEdoardo

MediaFire is a simple to use free service that lets you put all your photos, documents, music, and video in a single place so you can access them anywhere and share them everywhere.

www.mediafire.com

 

[Edoardo_95]

Appena posso finisco di implementare il tutto e posto sorgenti qui e versione aggiornata su altro post

 

[Edoardo_95]

io direi che prima di tutto devi scrivere una funzione GetPresenzeDopoNumero (NumeroSpia,NumeroSpiato)

dopo di che fai 2 cicli nidificati

for NumeroSpia = 1 to 90
for NumeroSpiato = 1 to 90
i +=1
redim preserve aStructSpia (i)
aStructSpia (i).NumeroSpia = NumeroSpia
aStructSpia (i).NumeroSpiato = NumeroSpiato
aStructSpia (i).Presenze = GetPresenzeDopoNumero (NumeroSpia,NumeroSpiato)
next
next

dopo di che devi implementare una classe icomparer per la struttura STRUCT_SPIA
e er farl osegui la flsa riga di come faccio io nella classe degli archivi paralleli.

Quindi rimane nello stesso modo... Solo che invece che caricare un array bidimensionale carico le presenza della struttura ...inizio a capire ... Grazie. Provo a mettermi all'opera

 

[Edoardo_95]

Ok fatto tutto. Devo risolvere solo un piccola cavolata. Domani appena finisco posto

 

[LuigiB]

potevi pure fare una struttura o una classe che al suo interno avesse un array o una collection per i numeri spiati , cosi ogni numero spia nella sua struttura/classe si portava a presso gli altri 90 numeri che poi potevi ordinare..
comunque se hai risolto va bene

stucture struct_Spia
nSpia as integer
aSpie () as struct_presenza
end structure

structure struct_presenza
Numero as integer
presenze as integer
end structure

 

[LuigiB]

a questo punto ritengo utile individuare un canale di comunicazione tra noi diverso dal forum.
Se è vero che i sorgenti li scaricano in tanti ma a parlare di codice siamo solo noi è giusto che da questo punto in poi ne parliamo in privato tu che dici ?

 

[Edoardo_95]

a questo punto ritengo utile individuare un canale di comunicazione tra noi diverso dal forum.
Se è vero che i sorgenti li scaricano in tanti ma a parlare di codice siamo solo noi è giusto che da questo punto in poi ne parliamo in privato tu che dici ?

Penso proprio tu abbia ragione ...

 

[Edoardo_95]

potevi pure fare una struttura o una classe che al suo interno avesse un array o una collection per i numeri spiati , cosi ogni numero spia nella sua struttura/classe si portava a presso gli altri 90 numeri che poi potevi ordinare..
comunque se hai risolto va bene

stucture struct_Spia
nSpia as integer
aSpie () as struct_presenza
end structure

structure struct_presenza
Numero as integer
presenze as integer
end structure

Davvero! Va beh intanto adesso va. Devo solo risolvere il largechange della barra verticale della tabella

 

[Edoardo_95]

Ti ho scritto

 

[LuigiB]

allora se sulla falsa riga della funzione che ho scritto io EstrattoRitardo ti dedichi ad aggiungere altre funzioni statistiche
come

AmboRitardo
SerieRitardo
EstrattoStat
AmboStat
SerieStat

attenzione che nell'archivio c'è differenza tra la funzione ritardo e la funzione statistica , la funzione ritardo parte dalal fine ed esce al primo esito trovato

la funzione statistica invece analizza tutte le estrazioni ed è un po piu lenta perche ha piu lavoro.
le funzioni statistiche devono tornare ritardo , ritardomax , frequenzza , presenze , incrementoRitMax quindi usa i parametri byref


mi raccomando fai una funzione alla volta poi la insersci sia nel file cfg sia nel file bas , ricompili la dll la metti nelle dir debug e release e fai il test
solo dopo fai la prossima funzione.
Inoltre metti i ltry catch in tutte le funzioni ,vedi come ho fatto io nelle altre dove memorizzo in una variabile il messaggio dell'errore.
A proposito crea pure nella libreria una funzione GetLastError che ritorna per l'appunto il valore della variabile che contiene l'ultimo messaggiio di errore anche dsi questa bisogna mettere sia nel cfg che nel bas ..

non modificare direttamente i file cfg e bas nelle directory debug e release ma modifica quelli in

 

[i legend]

Ragazzi siete grandi

 

[LuigiB]

legend ti va di aiutarci nei prossimi giorni ? Quello che ti chiedo è questo : le funzioni di script stanno per crescere , io sono certo che tu visto uno script di esempio capirai subto la logica.
Quindi per ogni funzione delolo spazioscriptnet ti chiederei di realizzare un piccolo script di esempio con i relativi commenti.
Io sono certo che potrai aiutarci , non ti preoccupare una volta visto il primo script fare dei piccoli scriptini per testare singolarmente le funzioni sarà facile.

che dici te la senti ?

in pratica un esempio esite la funzione EstrattoRitardo()
tu la implemti in un piccolo esempio tipo questo e spieghi acosa servno i parametri , inoltre verifiche se funziona , se c'è qualche funzione non chiara ce la chiedi tranquillamente..


dim Ritardo as integer
dim numero as integer = 10
dim Fine as integer = EstrazioniArchivio
ritardo = estrattoritardo ( numero , ruota , Fine)

insomma legend ci vuoi entrare o no nella storia con quel nick che hai la risposta dovrebbe essere obbligata...

 

[Edoardo_95]

allora se sulla falsa riga della funzione che ho scritto io EstrattoRitardo ti dedichi ad aggiungere altre funzioni statistiche
come

AmboRitardo
SerieRitardo
EstrattoStat
AmboStat
SerieStat

attenzione che nell'archivio c'è differenza tra la funzione ritardo e la funzione statistica , la funzione ritardo parte dalal fine ed esce al primo esito trovato

la funzione statistica invece analizza tutte le estrazioni ed è un po piu lenta perche ha piu lavoro.
le funzioni statistiche devono tornare ritardo , ritardomax , frequenzza , presenze , incrementoRitMax quindi usa i parametri byref


mi raccomando fai una funzione alla volta poi la insersci sia nel file cfg sia nel file bas , ricompili la dll la metti nelle dir debug e release e fai il test
solo dopo fai la prossima funzione.
Inoltre metti i ltry catch in tutte le funzioni ,vedi come ho fatto io nelle altre dove memorizzo in una variabile il messaggio dell'errore.
A proposito crea pure nella libreria una funzione GetLastError che ritorna per l'appunto il valore della variabile che contiene l'ultimo messaggiio di errore anche dsi questa bisogna mettere sia nel cfg che nel bas ..

non modificare direttamente i file cfg e bas nelle directory debug e release ma modifica quelli in

Vedi l'allegato 2226769

Allora fermi tutti ahah. Siamo partiti a 3000 ma non ho la tua esperienza ricorda ahaha quindi:

Prima creo le funzioni qui


Poi modifico il file cfg



Poi ricompilo





Giusto?

 

[Edoardo_95]

E modifico ModScriptWrapper

 

[i legend]

Beh se si tratta di fare degli script di test certamente.
Faccio fatica a stare concentrato ma ci sto
Grazie

 

[LuigiB]

E modifico ModScriptWrapper

basta che segui la falsa riga e capisci la logica.

le fnzioni sono esposte dalal dll quindi vanno prima di tutto scritte li prendendo spunto da altre simili che gia ci sono
per poter essere individuate dall'editor il quale suggerira i vari parametri la firma della funzione deve essere scritta nel file cfg come le altre
per poter essere usata con una semlice chiamta ci deve essere la funzione wrapper nel file bas.
tutti e 3 i file , dll , cfg e bas poi devono essere inseriti nella dir dell'eseguibile sia debug che release

dopo di che la pouoi testare .. appena ne inseriamo un po passiamo la palla a legend che fara gl iscriptdi esempi oepr ognni funzione cosi poi li distribuiamo insieme al programma.

 

[LuigiB]

prova con la prima function AmboRitardo che è uguale ad EstrattoRitardo se non fosse che hai 2 parametri per passare numero 1 e numero 2 ..