X Rubino X luigi Lottolive

[Roby]

cebino sky....pe non ce l'ho!

se no ti avrei già chiamato.

sto tentando di preparare lo script con le istruzioni di Luigi
ApriBaseDatiFT
ImpostaGiocataFT
GiocaFT

ma non funziona, eppure mi pare che il file di testo sia corretto!


attendo LUIGI.







-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

 

[LuigiB]

Ciao Rubino , secondo me hai usato la funzione ApriBaseDatiFt non nel modo giusto.

ApriBaseDatiFT(sFile,6,",")

sFile = Percorso del file da leggere
6 = quantita di numeri nella colonna letta dal file suddetto
"," = carattere separatore in questo caso è la virgola.

prova a lanciarla cosi

sFile = "c:\temp\EstrazioniLottoLive.txt"
ApriBaseDatiFT(sFile,6,";") dato che nel tuo file ci sono 6 numeri ad estrazione e il ; è il separatore.

Fl'overflow dipende dal numero progressivo dell'estrazione
che mi sembra davvero molto alto ...troncalo o sotituisci con 0..tanto non credo serva

 

[Roby]

per Luigi

Sub Main
	Dim sFileinput
	Dim sFileoutput
	Dim sRecord
	sFileinput = "c:\Temp\NumbersGBGold.txt"
	sFileoutput = "c:\Temp\NumbersGBGold2.txt"
	Call EliminaFile(sFileoutput)
	
	nx = GetScriviFileEstrazioni(sFileoutput,sFileinput)
	
	Call Messaggio(" Elaborato : " & nx)
	
'	Dim sRecord
'	' da ora in poi tutte le funzioni da utilizzare sono quelle che terminano con FT
'	' che servono per lavorare su archivi di file di testo
	If ApriBaseDatiFT(sFileoutput,6,";") Then
		
		ReDim aN(1)
		aN(1) = 2
		ReDim aPoste(1)
		aPoste(1) = 1
		
		Call ImpostaGiocataFT(1,aN,aPoste,10,1)
		Call GiocaFT(1)
		
	End If
	
	
Scrivi " Fine Elaborazione "


End Sub


''---------------------------------------------------------------------------------------------------------------------------

Function GetScriviFileEstrazioni(sFileoutput,sFileinput)

	Dim k
	Dim sRecord
	ReDim aRighe(0)
	ReDim n(8)
	
'''leggo fileinput
	
	LeggiRigheFileDiTesto sFileinput,aRighe
	'ricerca last record
	ultimo = UBound(aRighe)
	
	For k = 0 To ultimo
	ReDim aV(0)
	Call SplitByChar(aRighe(k),vbTab,aV) ' scompongo la riga ottenendo i valori separati dalle virgole in un array
	n(1) = aV(2)
	n(2) = aV(3)
	n(3) = aV(4)
	n(4) = aV(5)
	n(5) = aV(6)
	n(6) = aV(7)
	snconc = aV(1)

	sRecord = Format2(aV(1)) & ";" & Left(aV(0),10) & ";" & Format2(aV(2)) & ";" & Format2(aV(3)) & ";" & Format2(aV(4)) & ";" & Format2(aV(5)) & ";" & Format2(aV(6)) & ";" & Format2(aV(7))
		Call ScriviFile(sFileoutput,Left(sRecord,Len(sRecord)))
	Next
	
	
	nx = " Ricreato e preparato con suddivisione campi ';' file NumbersGBGold2.txt"
End Function

la data deve essere divisa dal "/"
[?]

questo è la bozza iniziale dello script




-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

 

[fillotto]

quote:Originally posted by cebino

quote:Originally posted by fillotto

Ciao Cebino e Rubino ma questo archivio "NumbersGBGold" che archivio è ? non riesco + a seguire[?]
che differenze con archivio lottolive [?]
Quest' ultimo script l'ho provato con l'archivio lottolive ma si blocca

Fill
non ti preoccupare
se tutto funziona a dovere fra qualche ora farò
in modo che il file da puntare si troverà su un mio server
e potremo avere l'archivio di lottolive in tempo reale
basterà farvi puntare lo script su quel sever

PS fin ora da i miei test posso dire che abbiamo un riscontro che sfiora il 95% di vincita per ambo ovviamente con progressione adeguata.

Con tutta sincerita ho intenzione di aprire un post nella sezione "giochi numerici" dove ad un'ora prestabilita della giornata pubblicare delle previsioni.

Che ne pensi ???

Ciao Cebi ho risolto , non avevo notato il file su mega...
Cosa ne penso? per quanto mi riguarda fai, occhio però fai tutti i riscontri possibili e immaginabili e in bocca al lupo

 

[Roby]

x luigiB





questo è il file

961812,20/03/2011,28,16,14,34,36,21
961813,20/03/2011,30,02,33,10,24,29
961814,20/03/2011,26,05,34,01,30,25
961815,20/03/2011,13,15,12,02,35,30
961816,20/03/2011,27,30,29,32,08,13
961817,20/03/2011,21,16,03,09,12,24
961818,20/03/2011,16,22,12,36,29,32
961819,20/03/2011,35,05,01,20,27,04
961820,20/03/2011,21,27,22,01,29,12
961821,20/03/2011,33,30,02,31,06,36
961822,20/03/2011,21,27,10,07,33,01
961823,20/03/2011,26,21,32,25,23,27
961824,20/03/2011,35,25,10,33,03,30
961825,20/03/2011,11,28,36,24,25,03
961826,20/03/2011,17,24,13,06,34,12
961827,20/03/2011,30,28,34,31,27,15
961828,20/03/2011,10,12,30,26,27,15
961829,20/03/2011,16,14,05,13,22,36
961830,20/03/2011,01,22,21,28,36,32
961831,20/03/2011,26,28,34,17,30,05
961832,20/03/2011,29,01,17,10,26,07
961833,20/03/2011,33,19,01,26,08,05
961834,20/03/2011,02,15,19,27,30,21
961835,20/03/2011,36,28,31,35,12,13
961836,20/03/2011,36,18,08,01,29,27

questo lo script per leggere il file

Sub Main
	Dim sFile
	Dim sRecord
	sFile = "c:\Temp\NumbersGBGold2.txt"
	
'	Dim sRecord
'	' da ora in poi tutte le funzioni da utilizzare sono quelle che terminano con FT
'	' che servono per lavorare su archivi di file di testo
	If ApriBaseDatiFT(sFile,6,",") Then
		
		ReDim aN(1)
		aN(1) = 16
		ReDim aPoste(1)
		aPoste(1) = 1
		
		Call ImpostaGiocataFT(1,aN,aPoste,10,1)
		Call GiocaFT(1)
		
	End If
	


End Sub

persiste la segnalazione
anche troncando eventualmente il nr.di estrazione


6 - overflow





-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

 

[LuigiB]

Bravo Rubino !!
Ascolta la conversione la fai solo per cambiare il tab in ; ?
Potresti direttamente passare vbTab alla funzione ApriBaseDatiFt
volendo ... tuttavia visto che hai fatto gia la routine di conversione
prova a troncare il campo che identifica il numero estrrazione
prendi ad esempio solo gli ultim 4 caratteri del numero ..per ottenere
i 4 caratteri a destra di una stringa si usa l'istruzione right.

sTemp ="123456789"
s = right(sTemp ,4 )

s conterra 6789

cosi superi il problema dell'overflow.

ciao !

 

[LuigiB]

il numero massimo che puo essere contenuto è 32767 .....
se passi numeri piu grandi l'errore capita di sicuro .. ciao !

 

[imported_n/a]

quote:Originally posted by rubino

cebino sky....pe non ce l'ho!

se no ti avrei già chiamato.

sto tentando di preparare lo script con le istruzioni di Luigi
ApriBaseDatiFT
ImpostaGiocataFT
GiocaFT

ma non funziona, eppure mi pare che il file di testo sia corretto!


attendo LUIGI.







-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

Ragazzi credetemi non vi seguo piu
io ho i miei limiti pero confido cecamente in voi
io continuo con i test che ormai evidenziano ottimi risultati
ore 15.00 utile cassa € 16.38 "non male" considerando che gioco con i centesimi.

Rubino dimmi in che modo posso contattarti
questa e la mia mail dsfabio@tiscali.it

ciao fatti vivo che ti chiamo

 

[Roby]

prima bozza del nuovo script

okkio che necessita di verifiche in più casi
sia nel contenuto dei dati previsionali
sia nel contenuto dei prospetti come la posta in gioco che vedo non funziona, nel riepilogo non figurano i valori.

è da tenere conto che il progressivo estrazioni ha un limite imposto come ha riferito da luigi, quindi non conoscendo quante estrazioni giornaliere avvengono, è chiaro che dopo qualche giorno lo script darà degli errori, come li dava nelle prove che ho scritto.

se sarà da implementare qualcosa, lo faremo solo quando ci sarà la sicurezza della correttezza di quello che sviluppa.

è chiaro fin da ora che sorgeranno problemi nella gestione di questo script, che dovranno essere superate solo manualmente purtroppo, vedi archivio e forse in qualche altra circostanza.

dovrete fare una scelta
se usare questo script che prepara in automatico l'archivio per avere un resoconto finale, una volta corretto e sistemato alcune cosette, oppure gestirvi qualche cosa con excel soprattutto nei riscontri delle vostre giocate, costi,vincite,utile/perdite etc....

Sub Main
	Dim sFileinput
	Dim sFileoutput
	Dim sRecord
	sFileinput = "c:\Temp\NumbersGBGold.txt"
	sFileoutput = "c:\Temp\NumbersGBGold2.txt"
	Call EliminaFile(sFileoutput)
	
	nx = GetScriviFileEstrazioni(sFileoutput,sFileinput)
	
	Call Messaggio(" Elaborato : " & nx)
	
	Dim sFile
	sFile = "c:\Temp\NumbersGBGold2.txt"
	Dim n(6)
	Dim Asom(6)
	Dim aRighe(0)
	Dim aposte(3)
	''''''''''''Considera inoltre che l'ambata paga 5.85,l'ambo 40 e il terno 345.
	aposte(1) = 2
	aposte(2) = 1
	aposte(3) = 1
	SetPremioPagatoFT 1, 1, 5.85
	SetPremioPagatoFT 2, 1, 2.925
	SetPremioPagatoFT 3, 1, 1.95
	SetPremioPagatoFT 2, 2, 40.00
	SetPremioPagatoFT 3, 2, 13.33
	SetPremioPagatoFT 3, 3, 345.00
'	' da ora in poi tutte le funzioni da utilizzare sono quelle che terminano con FT
	'	' che servono per lavorare su archivi di file di testo
	If ApriBaseDatiFT(sFile,6,",") Then
		Scrivi "_____________________________________________________________________________________________________________________________________________"
		ColoreTesto 0
		ultimo = EstrazioniArchivioFT
		storia = InputBox("Statistica Ult.Estrazione da Considerare   ",,ultimo)
		z = InputBox("Quante Estrazione vuoi esaminare? ",,450)
		v = InputBox("Somma nr.Consecutivi  2,3",,3)
		lis = InputBox("ambata=1, ambo=2, Terno=3",,2)
		co = InputBox("verifica riscontri in colpi n...",,25)
		fin = storia
		Ini = storia - z
		Iniz = Ini
		Scrivi "Rileva somme numeri  dal concorso n." & Iniz & "   al conc.n. " & fin & "    Per il LOTTO NumbersGBGold    "
		Scrivi "Quante Estrazione vuoi esaminare?.... " & z
		Scrivi "Somma nr. consecutività.." & v
		Scrivi "Verifica risultati n.colpi  " & co
		Scrivi "Conc.n.   01 02 03 04 05 06 ........somme......... 01 02 03 04 05 06 "
		Scrivi "______________________________________________________________________________________________________________________________________________________"
		ColoreTesto 1
		sRecord = "leggo L'archivio dall'estrazione " & GetInfoEstrazioneFT(Ini) & "   all'estrazione  " & GetInfoEstrazioneFT(EstrazioniArchivioFT)
		Scrivi sRecord,1
		sRecord = "si compone di " & EstrazioniArchivioFT	 & " estrazioni "
		Scrivi sRecord,1
		Scrivi "______________________________________________________________________________________________________________________________________________________"
		ColoreTesto 0
		''''leggo archivio
		For ini = ini + 1 To fin
			For t = 1 To 6
				Asom(t) = ""
			Next
			n(1) = EstrattoFT(ini,1)
			n(2) = EstrattoFT(ini,2)
			n(3) = EstrattoFT(ini,3)
			n(4) = EstrattoFT(ini,4)
			n(5) = EstrattoFT(ini,5)
			n(6) = EstrattoFT(ini,6)
			snconc = GetInfoEstrazioneFT(ini)
			riga = ""
			riga = riga & snconc & "    " & Format2(n(1)) & " " & Format2(n(2)) & " " & Format2(n(3)) & " " & Format2(n(4)) & " " & Format2(n(5)) & " " & Format2(n(6))
			If v = 2 Then
				For b = 1 To 5
					c = Int(n(b)) + Int(n(b + 1))
					If c > 3

 

[LuigiB]

Ciao Rubino , il motivo per il quale il resoconto non mostra la vincita
(se è a quella che ti riferisci ) è che lo script non sa quali siano i premi ... per farglielo sapere esiste una funzioen che si chiama
ImpostaPremiFt mi pare ... ora sono in ufficio e non posso controllare .. pero nell'help c'è scritto.

 

[Roby]

okey adesso ci guardo

ma i problemi sono altri.

ho messo
Dim aposte(3)
''''''''''''Considera inoltre che l'ambata paga 5.85,l'ambo 40 e il terno 345.
aposte(1) = 2
aposte(2) = 1
aposte(3) = 1
SetPremioPagatoFT 1, 1, 5.85
SetPremioPagatoFT 2, 1, 2.925
SetPremioPagatoFT 3, 1, 1.95
SetPremioPagatoFT 2, 2, 40.00
SetPremioPagatoFT 3, 2, 13.33
SetPremioPagatoFT 3, 3, 345.00



e calcola i valori nelle vincite
ma rimangono a zero i valori relativi alle spese.</u>



-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

 

[imported_n/a]

quote:Originally posted by rubino

okey adesso ci guardo

ma i problemi sono altri.

ho messo
Dim aposte(3)
''''''''''''Considera inoltre che l'ambata paga 5.85,l'ambo 40 e il terno 345.
aposte(1) = 2
aposte(2) = 1
aposte(3) = 1
SetPremioPagatoFT 1, 1, 5.85
SetPremioPagatoFT 2, 1, 2.925
SetPremioPagatoFT 3, 1, 1.95
SetPremioPagatoFT 2, 2, 40.00
SetPremioPagatoFT 3, 2, 13.33
SetPremioPagatoFT 3, 3, 345.00



e calcola i valori nelle vincite
ma rimangono a zero i valori relativi alle spese.</u>



-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

Ragazzi non oso chiedere
il conto finale
mandatemi la fattura a casa.
Io nel frattempo vado in banca per un mutuo



Rubino mi dispiace essere ripetitivo
non ho parole

 

[imported_n/a]

Rubino stop un attimo
correggi questo che e importante
---------
[05408] [4052] 21.03.2011 02 10 31 30 21 04....................... 12 05 25 15 25
[05408] [4052] 21.03.2011/5408------ somma..25 ....1(comb.)..31 30 ....2(comb.)..21 04 0
Estrazione generatrice del pronostico 05408 [4052 - 21/03/2011]
G 0001
Numeri in gioco : 31.30
V N. [31.30 ] [.. 30 .. .. .. .. ] C. 1 Estratto 05409 [4053 - 21/03/2011]
V N. [31.30 ] [.. .. .. .. 31 .. ] C. 2 Estratto 05410 [4054 - 21/03/2011]
N. [31.30 ] [.. .. .. .. .. .. ] C. 3 05411 [4055 - 21/03/2011]

In corso per altre 6 estrazioni
G 0002
Numeri in gioco : 21.04
V N. [21.04 ] [.. .. 21 .. .. .. ] C. 1 Estratto 05409 [4053 - 21/03/2011]
N. [21.04 ] [.. .. .. .. .. .. ] C. 2 05410 [4054 - 21/03/2011]
N. [21.04 ] [.. .. .. .. .. .. ] C. 3 05411 [4055 - 21/03/2011]


e uscito il 30 e il 21 ma li gioca separatamente, cioe due coppie voglio metterle in gioco per ambo, quindi 4 numeri per ambo. Cosi mi calcola le coppie isolate l'una dall'altra.
Nello script precedente funzionava correttamente

Altra cosa perche non hai lasciato nel nuovo file di testo l'orario e tutto come prima ?
964052 02 10 31 30 21 04....................... 12 05 25 15 25
964052/5407------ somma..25 ....1(comb.)..31 30 ....2(comb.)..21 04 0
21/03/2011 16:53:02/5408----964053 05 30 21 12 23 25.....esito:..Ambo ...30 21
ciao

 

[Roby]

perchè purtroppo il programma vuole per forza
un certo tracciato precostituito.


cioè

-------------------------------------------------------------
nr.estraz
data
n1
n2
n3
n4
n5
n6
etc.
fino ad un max di 90

nel campo nr.estrazione max 37000
nel campo data è prevista solo la data

-------------------------------------------------------------------
nel caso delle quartine, cinquine,sestine a garanzia dell'ambo/terno
adesso sistemo
-------------------------------------------------------------------



-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.

 

[Roby]

Sub Main
	Dim sFileinput
	Dim sFileoutput
	Dim sRecord
	sFileinput = "c:\Temp\NumbersGBGold.txt"
	sFileoutput = "c:\Temp\NumbersGBGold2.txt"
	Call EliminaFile(sFileoutput)
	
	nx = GetScriviFileEstrazioni(sFileoutput,sFileinput)
	
	Call Messaggio(" Elaborato : " & nx)
	
	Dim sFile
	sFile = "c:\Temp\NumbersGBGold2.txt"
	Dim n(6)
	Dim Asom(6)
	Dim aRighe(0)
	Dim aposte(3)
	''''''''''''Considera inoltre che l'ambata paga 5.85,l'ambo 40 e il terno 345.
	aposte(1) = 2
	aposte(2) = 1
	aposte(3) = 1
	SetPremioPagatoFT 1,1,5.85
	SetPremioPagatoFT 2,1,2.925
	SetPremioPagatoFT 3,1,1.95
	SetPremioPagatoFT 2,2,40.00
	SetPremioPagatoFT 3,2,13.33
	SetPremioPagatoFT 3,3,345.00
'	' da ora in poi tutte le funzioni da utilizzare sono quelle che terminano con FT
	'	' che servono per lavorare su archivi di file di testo
	If ApriBaseDatiFT(sFile,6,",") Then
		Scrivi "_____________________________________________________________________________________________________________________________________________"
		ColoreTesto 0
		ultimo = EstrazioniArchivioFT
		storia = InputBox("Statistica Ult.Estrazione da Considerare   ",,ultimo)
		z = InputBox("Quante Estrazione vuoi esaminare? ",,450)
		v = InputBox("Somma nr.Consecutivi  2,3",,3)
		lis = InputBox("ambata=1, ambo=2, Terno=3",,2)
		co = InputBox("verifica riscontri in colpi n...",,25)
		fin = storia
		Ini = storia - z
		Iniz = Ini
		Scrivi "Rileva somme numeri  dal concorso n." & Iniz & "   al conc.n. " & fin & "    Per il LOTTO NumbersGBGold    "
		Scrivi "Quante Estrazione vuoi esaminare?.... " & z
		Scrivi "Somma nr. consecutività.." & v
		Scrivi "Verifica risultati n.colpi  " & co
		Scrivi "Conc.n.   01 02 03 04 05 06 ........somme......... 01 02 03 04 05 06 "
		Scrivi "______________________________________________________________________________________________________________________________________________________"
		ColoreTesto 1
		sRecord = "leggo L'archivio dall'estrazione " & GetInfoEstrazioneFT(Ini) & "   all'estrazione  " & GetInfoEstrazioneFT(EstrazioniArchivioFT)
		Scrivi sRecord,1
		sRecord = "si compone di " & EstrazioniArchivioFT	 & " estrazioni "
		Scrivi sRecord,1
		Scrivi "______________________________________________________________________________________________________________________________________________________"
		ColoreTesto 0
		''''leggo archivio
		For ini = ini + 1 To fin
			For t = 1 To 6
				Asom(t) = ""
			Next
			n(1) = EstrattoFT(ini,1)
			n(2) = EstrattoFT(ini,2)
			n(3) = EstrattoFT(ini,3)
			n(4) = EstrattoFT(ini,4)
			n(5) = EstrattoFT(ini,5)
			n(6) = EstrattoFT(ini,6)
			snconc = GetInfoEstrazioneFT(ini)
			riga = ""
			riga = riga & snconc & "    " & Format2(n(1)) & " " & Format2(n(2)) & " " & Format2(n(3)) & " " & Format2(n(4)) & " " & Format2(n(5)) & " " & Format2(n(6))
			If v = 2 Then
				For b = 1 To 5
					c = Int(n(b)) + Int(n(b + 1))
					If c > 36 Then
						c = c - 36
					End If
					Asom(b) = CLng(c)
				Next
				lim = 5
			End If
			If v = 3 Then
				For b = 1 To 4
					c = Int(n(b)) + Int(n(b + 1)) + Int(n(b + 2))
					Do While c > 36
						If c > 36 Then
							c = c - 36
						End If
					Loop
					Asom(b) = Asom(b) & CLng(c)
				Next
				lim = 4
			End If
			rsomme = ""
			For f = 1 To Int(lim)
				rsomme = rsomme & Format2(Asom(f)) & " "
			Next
			Scrivi "___________________________________________________________________________________________________________________________________________________________"
			ColoreTesto(0)
			Scrivi riga & "....................... " & rsomme
			ColoreTesto 0
			''''riepilogo combinazioni con somme uguali
			For r = 1 To lim - 1
				For r2 = r + 1 To lim
					If Asom(r) = Asom(r2) Then
						t1 = Format2(n(r))
						t2 = Format2(n(r + 1))
						If v = 3 Then
							t3 = Format2(n(r + 2))
						End If
						u1 = Format2(n(r2))
						u2 = Format2(n(r2 + 1))
						If v = 3 Then
							u3 = Format2(n(r2 + 2))
						End If
						'''elimina numeri doppi

 

[imported_n/a]

Rubino
l'ultimo script mi da errore
sul "ScriviResocontoFT"
inoltre e consigliabile che l'estrazione come in questo momento

[05409] [4053] 21.03.2011/5409------ somma..20

diventi cosi

[964053] 21.03.2011/5409------ somma..20

come era nello script prima di generare il nuovo file di testo
praticamente manca la prima parte del id estrazione</u>
anche se io la preferivo cosi

21/03/2011 16:54:01/5409----964054 23 12 13 02 31 32.....esito:..Ambo ...23 12

ciao


mi correggo la funzione ScriviResocontoFT
ora funge commettevo un errore io

 

[LuigiB]

Ciao Rubino .. devo controllare forse ci sara un problema nel calcolo della spesa di gioco ..

 

[LuigiB]

Rubino ho dato uno sguardo al tuo script voglio ancora congratularmi
perche davver stai procedendo bene , c'è una cosa che ti volevo dire
per fare il fuori 36 c'è una funzioen apposta si chiam FuoriX

per esempio voglio fare il fuori35 di 40 ?

Risultato = FuoriX(40 ,36)

Risultato torna 4 e il tuo script è piu snello perche invece di 7 , 8 righe il fuori336 si fa con una riga sola ... inoltre le funzioni intrinseche del programma dato che sono complilate sono piu veloci di un semplice script che invece è interpretato non precompilato ...
Ti dico queste cose non per pignoleria bensi vedendo che stai imparando bene mi fa piacere spiegarti proprio perche vedo i risultati !!!

Ciao !

 

[LuigiB]

Cebino ce la fai a postare di nuovo la link del file input che hai dato a Rubino ?

 

[Roby]

inoltre e consigliabile che l'estrazione come in questo momento

[05409] [4053] 21.03.2011/5409------ somma..20

diventi cosi

[964053] 21.03.2011/5409------ somma..20

come era nello script prima di generare il nuovo file di testo
praticamente manca la prima parte del id estrazione
anche se io la preferivo cosi

21/03/2011 16:54:01/5409----964054 23 12 13 02 31 32.....esito:..Ambo ...23 12

purtroppo cebino, non è possibile per le motivazioni che ti ho riferito prima.

 il numero massimo che puo essere contenuto è 32767 .....
se passi numeri piu grandi l'errore capita di sicuro .. ciao

a meno di qualche dritta da LuigiB, io non posso farlo con questo metodo di file precostituiti.</u>



fatto il fuori36



-----------------------------
hobby e passatempo, il bello dello studio e della ricerca

Non giocare i miei numeri, sono derivanti da studi teorici e sperimentazioni.