Per Joe91

[stefania1972]

Ciao Joe91 in rete ho trovato un tuo script :

'Frequenze nelle decine. V.0.0 Per Eugenio scritto da Joe91 6/2/2008.
Sub main() 
Dim Nu(1)
Dim Ru(1) : RU(1)=1
Test = 50 
Fin=EstrazioneFin 
Scrivi NomeRuota (ru(1)),1,1
Scrivi "Dalla estrazione " & fin - test & " alla " & fin,1,1 
scrivi 
For n=1 To 90 step 10
Scrivi DecinaNaturale  (n) & "  " ,1,0 
For a = 0 To 9 
Scrivi format2 (10 * Int((n-1)/10)+ a +1) & " " ,0,0
Next 
scrivi
Scrivi "Fr ",0,0 
For a = 0 To 9 
NU(1)=  (10 * Int((n-1)/10)+ a +1)
Scrivi Format2 (SerieFreq(fin-test,fin,nu,ru,1)) & " ",0,0
Next 
Scrivi 
Scrivi 
Next
End Sub

Volevo sapere se esiste una tua evoluzione di questo script , grazie , ciao.

 

[Joe91]

Ciao Sefania penso tu abbia trovato quello script (che ora non ricordo) su uno dei Forum

tra i più vecchi che fu chiuso ... poi riaperto, poi Ri-chiuso poi ri-aperto ... e, ora, aperto, è poco frequentato.

Per questa ragione alcune cose ... sembra ... siano rimaste (rimangano) "sospese".

Puoi provare a cercare: Joe91 56939699 con il classico Google.

Se ricordo bene è una delle varie "continuazioni", che ci furono.

A dire la verità esisterebbe anche una versione capace di distinguere e

conteggiare alcuni tipi di ritardi "particolari" ma mis-conosciuti e nell'incapacità generale

anche di immaginarne l'esistenza volutamente non l'ho mai pubblicato. Tenendo per me il copyright.

Comunque nulla di miracoloso non lo uso da molto tempo.

Buona Serata a tutte/i.

 

[stefania1972]

Grazie Joe91 sei forte , ciao.