Estrazioni da file txt

[Roby]

Salve a tutti
avrei un problema con questo script della grande Rosanna se qualcuno ha tempo e voglia di risolverlo, sempre se possibile
ringrazio anticipatamente.




Sub main()
'Rosanna
'rif. 0901_41b SISTEMA importato automaticamente

Dim fso, tr 'servono per FileSystemObject
Dim n(200),sis(200,5),vett(5),num(90),ru(1),poste(2),nu(1),numeri(90,2)
'---------------------------------------------------------------------------
'ATTENZIONE dimensionare:
'- n al numero di Serie (cioè le righe del SISTEMA)
'- vett alla lunghezza delle Serie
'- sis() al numero serie come righe e alla lunghezza delle serie come colonne)
'num() al numero di numeri da sistemare nel SISTEMA

'-----------------------------------------------------------------------------
'Il sistema elaborato col generatore va salvato in formato txt in
'c:\programmi\L8+61\sviluppo_sistema.txt
'ATTENZIONE AL NOME FILE = sviluppo_sistema.txt
'------------------------------------IMPORTANTE IMPOSTARE I DATI DEL SISTEMA!!!
serie=200 'numero delle serie (righe)
lun=5 'lunghezza delle combinazioni da giocare
nn=90 'numero di numeri
'-------------------------------------------------------------------------------
Const ForReading = 1
Set fso = CreateObject("Scripting.FileSystemObject")
Set tr = fspenTextFile("c:\prova2.txt", ForReading)

For i= 1 To serie
a=tr.readline 'leggo ciascuna riga del file
n(i)=Chr(34)&chr(46)&a&chr(46)&chr(34)
m= split(n(i),".") 'effettuo lo split di ogni stringa
For x= 1 To lun
sis(i,x)=CInt(m(x)) 'carico i vari valori sulla matrice sis
Next
Next
tr.close
'-----------------------------------------------OUTPUT DELLA MATRICE DEL SISTEMA
ColoreTesto 2
'Scrivi " SISTEMA DI PROVA",1
ScriviMatrice sis
ColoreTesto 0
'----------------------------------------------------ORA IL LISTATO
End Sub


IL listato legge un file txt prcedentemente salvato in una directory (in qesto caso "c:\prova2.txt" )
questo è l'output




69 16 12 33 61
58 89 37 56 64
73 38 5 54 25
75 82 27 1 29
60 42 87 39 25
21 66 89 20 80
5 46 11 27 53
79 16 14 64 65
29 57 41 28 73
83 40 32 48 82
81 57 68 73 49
72 33 11 12 44
41 47 37 43 63
86 38 52 76 57
9 46 70 7 90
85 56 71 33 26
54 82 22 11 45
18 46 48 67 34
12 41 24 10 8
6 4 35 84 53
37 2 74 3 12
19 88 84 34 31
41 53 37 8 66
22 11 6 7 56
26 81 7 35 12
7 67 85 39 5
56 21 80 55 1
64 9 11 65 10
30 2 71 78 83
40 5 35 58 67
22 60 41 12 11
2 52 84 31 26
28 64 61 90 6
9 74 85 42 47
60 18 61 7 38
8 42 54 55 7
69 52 87 3 88
64 42 7 45 68
40 5 58 19 86
34 40 33 15 27
89 24 26 16 76
90 9 84 30 46
66 44 13 48 14
77 85 47 60 51
43 2 47 68 30
20 43 5 37 47
51 67 77 65 83
78 25 16 11 81
11 56 64 65 25
71 2 30 21 28
5 11 66 23 35
87 20 23 2 37
81 7 37 45 32
21 28 87 5 31
90 70 43 37 75
21 87 30 17 4
37 31 84 19 6
72 62 80 49 28
8 7 85 34 9
15 60 12 33 42
7 47 80 2 32
61 56 81 82 9
73 82 71 3 56
12 72 61 64 18
62 35 23 30 19
60 76 20 46 39

 

[LuigiB]

Ciao , il secondo listato quello da adattare fa uso di funzioni che operano direttamente sull'archivio del programma e attualmente non è possibile farlo lavorare sulle estrazioni che dici tu e che sono presenti nel file di testo.
Per risolvere il problema dovresti creare uno script che contenga tutto un set di istruzioni apposite per lavorare su archivi letti da file di testo.
La cosa è possibile anche se un po' complicata ,ci vuole un bravo scripter .. forse prima o poi aggiungero nel linguaggio spazio script
delle nuove istruzioni per operare su archivi definiti dall'utente che non necessariamente debbano essere 5 numeri a colonna , in questo modo
si potrebbero far contenti anche quelli che vorrebbero adoperare il programma per il lotto estero (almeno a livelllo di script ) non l'ho ancora fatto perche coloro che vorrebbero giocare al lotto estero mi sa che di script non masticano piu di tanto e aggiungendo simili funzioni non farei altro che aumentare le richieste di nuovi script per i 2 o 3 che sono capaci di farli.

ciao

 

[rosss]

Salve a tutti
LuigiB grazie x la risposta e x il programma , non sarebbe male avere la possibilità con spaziometria di operare su archivi importati da txt .

1 saluto
rosss

 

[imported_n/a]

quote:Originally posted by LuigiB

Ciao , il secondo listato quello da adattare fa uso di funzioni che operano direttamente sull'archivio del programma e attualmente non è possibile farlo lavorare sulle estrazioni che dici tu e che sono presenti nel file di testo.
Per risolvere il problema dovresti creare uno script che contenga tutto un set di istruzioni apposite per lavorare su archivi letti da file di testo.
La cosa è possibile anche se un po' complicata ,ci vuole un bravo scripter .. forse prima o poi aggiungero nel linguaggio spazio script
delle nuove istruzioni per operare su archivi definiti dall'utente che non necessariamente debbano essere 5 numeri a colonna , in questo modo
si potrebbero far contenti anche quelli che vorrebbero adoperare il programma per il lotto estero (almeno a livelllo di script ) non l'ho ancora fatto perche coloro che vorrebbero giocare al lotto estero mi sa che di script non masticano piu di tanto e aggiungendo simili funzioni non farei altro che aumentare le richieste di nuovi script per i 2 o 3 che sono capaci di farli.

ciao

Grande Luigi
se fai questo te ne saro grato per sempre che bel regalo !!!!!!
Secondo me e meglio fare una funzione fuori dal gestore script un modulo nella sezione "base dati" dove indicare quante colonne e quanti numeri deve essere l'archivio da importare magari da excel
ciao bello

PS non per forza devi usare lo scripter fare statistica basta avere l'archivio e poter interagire con il modulo di spaziometria. Li gia sarebbe una bella cosa poter testare su lotto estero

 

[LuigiB]

Ciao Cebino , invece è proprio quella la parte estrremamente complicata.
Non si potra usare spaziometria con le sue funzioni di programma sul lotto estero questo è sicuro.
Inserire delle funzioni nel linguaggio che operino su file di testo invece è complicato lo stesso ma è fattibile.
Vedremo ...

 

[imported_n/a]

quote:Originally posted by LuigiB

Ciao Cebino , invece è proprio quella la parte estrremamente complicata.
Non si potra usare spaziometria con le sue funzioni di programma sul lotto estero questo è sicuro.
Inserire delle funzioni nel linguaggio che operino su file di testo invece è complicato lo stesso ma è fattibile.
Vedremo ...

Perdona la mia ingnoranza in merito di programmazione, ma se io cerco una figura quadra su una ruota con estrazioni da 6 numeri che cambia ??? Ovviamente potro gestire molto meno figure e condizioni pero le cose piu semplici si. Ripeto scusami se faccio domande magari assurde
ciao

 

[LuigiB]

eheh caro cebino cambia cambia .... tu vedi le cose da utente e dall'esterno ti sembra tutto facile..invece il programma dietro è molto complicato e non è semplice inserire a posteriori cio che non era stato proggettato prima quindi rassegnati e impara a fare gli script perche sara l'unico modo di usare spaziometria con un archivio diverso da quello del lotto.
Ciao

 

[imported_n/a]

per cebino... ma tu intendi fare e trovare figure spaziometriche?

 

[imported_n/a]

quote:Originally posted by Morfeo

per cebino... ma tu intendi fare e trovare figure spaziometriche?

Esatto morfeo

Per Luigi saro ben felice di studuare per fare script e gia un gran passo avanti
sempre grazie Luigi e lo sai le mie domande sono solo da un amico scompetente

 

[imported_n/a]

come mai non oè la stessa cosa far lavorare spaziometria
su un archivio del lotto estero

che potrebbe rapperesentare una ruota a sette numeri??

che cambia????

non capisco... il perche?

 

[LuigiB]

la versione 1.1.62 da la possibilita di lavorare su archivi letti da file di testo , ulteriori spiegazioni nell'help dello script.

 

[imported_n/a]

quote:Originally posted by Morfeo

come mai non è la stessa cosa far lavorare spaziometria
su un archivio del lotto estero?

che potrebbe rapperesentare una ruota a sette numeri??

che cambia????

non capisco... il perche?

 

[LuigiB]

cosa c'è da capire di piu ? ho gia detto che inserire una cosa a posteriori che non era stata preventivamente proggettata è difficile e non mi va di farlo.

 

[imported_n/a]

ok , credevo che era semplice, bastava caricare l'archivio

povero Cebino...

ciao