Novità

NUOVO AMBIENTE SCRIPT AREA TECNICA

G

giomi

Banned
ciao mi potete fare un esempio di come utilizare quste function
Codice: 
If c.Init(sFile, 8, 1, 90) Then
Call EditEstrazione()
Call SalvaModifiche()
grazie
 
i legend

i legend

Premium Member
Tom per favore mi potresti postare un esempio di lettura di file di testo e scrittura sempre su txt?
In pratica leggo poi faccio un filtro e scrivo.
Ho un idea che vorrei sviluppare.
Un esempio easy silo lettura e scrittura.
Grazie. :)
 
lotto_tom75

lotto_tom75

Advanced Premium Member
i legend ha scritto:
Tom per favore mi potresti postare un esempio di lettura di file di testo e scrittura sempre su txt?
In pratica leggo poi faccio un filtro e scrivo.
Ho un idea che vorrei sviluppare.
Un esempio easy silo lettura e scrittura.
Grazie. :)
Clicca per espandere...

lettura

Codice: 
    Dim sfile As String
    Dim f As String
    Dim sbuf As String
    sfile = ".\solonumeri-52446-21g6-by90.txt"
       
                    f = FreeFile
                 
                    Open sfile For Input As f
                   
                    Do Until EOF(f)
                   
                    Line Input #f, sbuf
                   
                    Print sbuf
                                                     
                    Loop
                   
                    Close f

scrittura

Codice: 
Dim f As Integer
Dim sriga As String = "prova scrittura file"
f = FreeFile
Open ".\gruppipossibilidiruoteunite.txt" For Append As f
Print #f, sriga
Close f



ps: per vedere il print su form devi abilitare la proprietà autoredraw e complimenti per essere entrato per primo nello smess di luigi e rookie :)
 
i legend

i legend

Premium Member
Grazie Rookie:) , grazie Tom:)
Per i complimenti:)
Speriamo che sia ok.
È un ottimo esercizio ora si prosegue:)
Non vedo l ora di testare il nuovo giocattolo :)
Tom grazie per il codice.
Ho un file di 24.000.000 di quindicina da testare :)
 
X

Xeroxs

Advanced Member >PLATINUM<
Buongiorno, I-Legend
Come Vedi Ti Sei Migliorato ampliando il tuo sapere anche in questo progetto, Complimenti e sono contento anche per Luigi che ha trovato in alcuni di Voi un ottimo aiuto per continuare il progetto che sicuramente avrebbe potuto fare da solo , ma con il vostro appoggio è un altra cosa in fin dei conti era il suo obbiettivo fin dall'inizio. Complimenti anche a Rookie e Lotto_Tom75, ottimi anche Voi.
 
L

LuigiB

Guest
giomi ha scritto:
ciao mi potete fare un esempio di come utilizare quste function
Codice: 
If c.Init(sFile, 8, 1, 90) Then
Call EditEstrazione()
Call SalvaModifiche()
grazie
Clicca per espandere...
è difficile da spiegare qui in un post ma per vederl obasta che apri isorgenti del tempalter dello script , la procedura che dici viene richiamata nella funzione InizializzaScript
 
solare

solare

Advanced Member >PLATINUM<
Ciao a tutti e complimenti della vostra bravura nel portare avanti un progetto così importante.
Chiedo, non essendo esperto di script: è possibile scaricare questo programma ? dove lo trovo ?
Grazie
 
lotto_tom75

lotto_tom75

Advanced Premium Member
i legend ha scritto:
Ho un file di 24.000.000 di quindicina da testare :)
Clicca per espandere...

:eek: ho letto bene 24 mln legend? 🙀
Se si pensi di riuscire ad analizzarlo con la tua nuova idea e risorse in pochi minuti? 😮
Se così fosse la trovo una notizia spettacolare e ti faccio già i complimenti al buio! 💪👋🤖🤩

ps: Se non sono troppo indiscreto che caratteristica hanno queste 15ine? Visto che con 90 elementi si generano ben 4.57956739644608E+16 formazioni di classe 15 penso che siano originate almeno da un gruppo ristretto doc rispetto i 90... giusto? Se ho ipotizzato correttamente... di che classe è questo tuo gruppo base? :unsure: Per curiosità ho cercato di capire la classe del gruppo base di sviluppo delle tue 15ine ipotizzandone uno sviluppo integrale.. e a 24 mln non arrivo in nessun modo..

x classe 15 : 17383860 formazioni x gruppo base di 27 elementi
x classe 15 : 37442160 formazioni x gruppo base di 28 elementi

in pratica il tuo 24 mln di formazioni starebbe tra la classe 27 e 28 del rispettivo gruppo base 👁️
quindi ne deduco.., forse comunque erroneamente, che si tratti di un gruppo di formazioni con qualche grado di presenza voluto e originato a sua volta dai 90 (con grado di presenza basso... o da un gruppo + ristretto con grado di presenza maggiore...).
 
Ultima modifica:
i legend

i legend

Premium Member
Tom non so se riesco ad elaborare. E in che tempi . Con spaziometria neanche si apriva.
Le lunghette sono formate da gruppi di consecutivi a girare.
Non è un sistema, volevo ottenere tante formazioni.
Non mi ricordo come ho fatto ma se trovo li script se non l ho cancellato te lo posto.
Oggi vedo se riesco a farlo.il mio pc doveva andare in pensione, ma con i tempi che corrono e cose vari non credo che la vedrà, è più facile che schiatti compiendo il suo dovere.🤣🤣🤣🤣🤣👍
 
lotto_tom75

lotto_tom75

Advanced Premium Member
i legend ha scritto:
Tom non so se riesco ad elaborare. E in che tempi . Con spaziometria neanche si apriva.
Le lunghette sono formate da gruppi di consecutivi a girare.
Non è un sistema, volevo ottenere tante formazioni.
Non mi ricordo come ho fatto ma se trovo li script se non l ho cancellato te lo posto.
Oggi vedo se riesco a farlo.il mio pc doveva andare in pensione, ma con i tempi che corrono e cose vari non credo che la vedrà, è più facile che schiatti compiendo il suo dovere.🤣🤣🤣🤣🤣👍
Clicca per espandere...

Ok quindi mi sembra di capire che sia una sorta di file txt per benchmark test e che non preveda nè grado di presenza determinato nè uno sviluppo con termine prefissato di righe giusto? Ottima idea comunque quella di formarlo con dei consecutivi in classe medio ampia a girare! 💪👋 ;)

La ricerca della classe del tuo gruppo base ipotetico me ne ha stuzzicata un'altra... ovvero il trovare quante formazioni di classe 15 si svilupperebbero in modo integrale da una classe abs molto ridotta (es. quella 22 di Cinzia, che saluto, x A su TTeNZ dalla es 7440)...

con 22 elementi si generano in modo integrale

x classe 1 : 22 formazioni
x classe 2 : 231 formazioni
x classe 3 : 1540 formazioni
x classe 4 : 7315 formazioni
x classe 5 : 26334 formazioni
x classe 6 : 74613 formazioni
x classe 7 : 170544 formazioni
x classe 8 : 319770 formazioni
x classe 9 : 497420 formazioni
x classe 10 : 646646 formazioni
x classe 11 : 705432 formazioni
x classe 12 : 646646 formazioni
x classe 13 : 497420 formazioni
x classe 14 : 319770 formazioni
x classe 15 : 170544 formazioni SOLO... 170k ca :)
x classe 16 : 74613 formazioni
x classe 17 : 26334 formazioni
x classe 18 : 7315 formazioni
x classe 19 : 1540 formazioni
x classe 20 : 231 formazioni
x classe 21 : 22 formazioni
x classe 22 : 1 formazioni

e ti faccio un'altra pregunta... Why proprio c15?

Adesso torno a cercare di sviluppare il mio primo grafico twinbasic statico... x provare ad implementarne poi uno dinamico in robot boss 😜🤖🤡😸 👋:)
 
Ultima modifica:
i legend

i legend

Premium Member
15 perché volevo avere una base su cui lavorare .
Cmq per cominciare bene la giornata ho scaricato la versione 267.
L antivirus non mi fa più aprire nulla , neanche i mie script .ho provato a cancellare l ultimo aggiornamento ma non mi fa fare neanche quello.

P.s: dopo 3 riavvii è andata.
 
Ultima modifica:
lotto_tom75

lotto_tom75

Advanced Premium Member
i legend ha scritto:
15 perché volevo avere una base su cui lavorare .
Clicca per espandere...

Ok

i legend ha scritto:
Cmq per cominciare bene la giornata ho scaricato la versione 267.
L antivirus non mi fa più aprire nulla , neanche i mie script .ho provato a cancellare l ultimo aggiornamento ma non mi fa fare neanche quello.

P.s: dopo 3 riavvii è andata.
Clicca per espandere...

Sono felice che ti sia ripartito tutto (y)😜


Riguardo questo grafico statico invece io sono ancora in alto mare... 😬🥴


' r Firenze n 04.19.27 c 3- s 2- clp 1- r ra 360 rs 278 fq 20 incmax 82
' RITARDI .151.93.84.30.171.3.15.116.278.165.21.29.3.48.25.13.273.52.43.100.360
' INCREMENTI .-58.-9.-54.141.-168.12.101.162.-113.-144.8.-26.45.-23.-12.260.-221.-9.57.260

Credevo che con l'esempio seguente presente nel file help della dllgiochi di luigi potessi ricostruirne un altro... analogo...

Codice: 
'      Dim aValue (3, 1) As Long
   
' aValue(0, 0) = 0  ' x
' aValue(0, 1) = 0  ' y
' aValue(1, 0) = 10 ' x
' aValue(1, 1) = 10 ' y
' aValue(2, 0) = 20 ' x
' aValue(2, 1) = 20 ' y
' aValue(3, 0) = 30 ' x
' aValue(3, 1) = 30 ' y   
' Call AddSerieGrafico("RITARDI", aValue, vbBlue)
' Call DisegnaGrafico("test grafico statico")


così...

Codice: 
     Dim aValue (20, 1) As Long
   
aValue(0, 0) = 151  ' x
aValue(0, 1) = 151  ' y
aValue(1, 0) = 93 ' x
aValue(1, 1) = 93 ' y
aValue(2, 0) = 84 ' x
aValue(2, 1) = 84 ' y
aValue(3, 0) = 30 ' x
aValue(3, 1) = 30 ' y
'-- -- -- -- -- -- -- -- -- -- -
aValue(4, 0) = 171  ' x
aValue(4, 1) = 171  ' y
aValue(5, 0) = 3 ' x
aValue(5, 1) = 3 ' y
aValue(6, 0) = 15 ' x
aValue(6, 1) = 15 ' y
aValue(7, 0) = 116 ' x
aValue(7, 1) = 116 ' y
'-- -- -- -- -- -- -- -- -- -- -- -- -- --
aValue(8, 0) = 278  ' x
aValue(8, 1) = 278  ' y
aValue(9, 0) = 165 ' x
aValue(9, 1) = 165 ' y
aValue(10, 0) = 21 ' x
aValue(10, 1) = 21 ' y
aValue(11, 0) = 29 ' x
aValue(11, 1) = 29 ' y
'-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -
aValue(12, 0) = 3  ' x
aValue(12, 1) = 3  ' y
aValue(13, 0) = 48 ' x
aValue(13, 1) = 48 ' y
aValue(14, 0) = 25 ' x
aValue(14, 1) = 25 ' y
aValue(15, 0) = 13 ' x
aValue(15, 1) = 13 ' y
'-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --
aValue(16, 0) = 273  ' x
aValue(16, 1) = 273  ' y
aValue(17, 0) = 52 ' x
aValue(17, 1) = 52 ' y
aValue(18, 0) = 43 ' x
aValue(18, 1) = 43 ' y
aValue(19, 0) = 100 ' x
aValue(19, 1) = 100 ' y
aValue(20, 0) = 360 ' x
aValue(20, 1) = 360 ' y
'-------------------------------------------------

     
Call AddSerieGrafico("RITARDI", aValue, vbBlue)
Call DisegnaGrafico("test grafico statico")

Ma invece, non avendo assolutamente chiaro nè il concetto di matrice multidimensionale nè come si programma un grafico in vb o twinbasic o in altro modo... mi viene solo questo... 👇😑:LOL:

graficoerrato.jpg
 
i legend

i legend

Premium Member
Al grafico non mi sono dedicato ancora, mi spiace tom.
P.s
Il file lo legge fino ad un certo punto. Poi mi dice memoria piena. E non mi salva neanche le formazioni xhe aveva trovato.
Ho provato a dichiarare f as long e va avanti un po di più. Long long non me lo accetta.
ma credo che sia normale il file pesa quasi 2 giga🤣
 
Devi accedere o registrarti per poter rispondere.

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 02 luglio 2024
    Bari
    34
    27
    73
    89
    44
    Cagliari
    14
    48
    57
    47
    80
    Firenze
    81
    37
    67
    83
    64
    Genova
    07
    15
    19
    32
    39
    Milano
    90
    63
    26
    64
    70
    Napoli
    16
    65
    85
    45
    21
    Palermo
    12
    03
    56
    43
    62
    Roma
    81
    29
    05
    43
    27
    Torino
    40
    49
    17
    02
    22
    Venezia
    27
    62
    33
    03
    40
    Nazionale
    29
    44
    17
    21
    18
    Estrazione Simbolotto
    Nazionale
    01
    14
    35
    19
    30
    Archivio estrazioni lotto Ritardi top 15 Frequenze top 15

Ultimi Messaggi

Alto