NUOVO AMBIENTE SCRIPT AREA TECNICA

[LuigiB]

ho fatto una modifica per la quale se i lvalore passato non è un numero non lo formatta e ritorna quel valore li.

 

[i legend]

Luigi entro domani mattina( a meno che non stia bene) te lo posto ma bisogna controllarlo. Mi spiace essere così lento.
Domani mattina mi alzo di buon ora e vedo di finirlo..
Buona notte a tutti.

 

[LuigiB]

senza fretta legend .. stavc scherzando .. anche io devo finire le cose che ci stavo facendo ..

 

[i legend]

Il lavoro è finito.
Questo pomeriggio ,ho degli impegni ,ma appena mi libero provo a riordinare il codice e
E fare delle verifiche.

Purtroppo io ho realizzato tutto in base al mio monitor 15
Se uno avesse un monitor più piccolo non ci starebbe dentro.
Magari avrebbe pure problemi a chiudere il form se non inquadra il pulsante di chiusura.
Suggerimenti in merito?
A dopo

 

[LuigiB]

Non ti preoccupare legend le cose le vediamo piano pano , se c'è qualche bug o altre cose poi si corregge ..

 

[LuigiB]

ce fine ha fatto Rookie ? non vorrei mandare un paio di astronavia cercarlo..

 

[rubino2]

una info per cortesia,

lancio uno script che dopo circa un minuto che sta lavorando, arriva questo messaggio
che lo interrompe. cosa vuol dire?

0001 15:29:53.002 NATIVE EXCEPTION: EXCEPTION &HE0434F4E /ModWrapperDLL.twin LINE 000142

 

[LuigiB]

che c'è un problema di twinbasic , qando te lo fa prova a vedere nel task managere quanta memoria è occupata , questo capita spesso anche a me ..

 

[happy]

Ciao, lo fa spesso anche a me quando modifico o scrivo uno script, a volte facendo salva progetto lo stesso script funziona. Ho provato ad osservare la quantità di memoria occupata dallo script: poco più di 900 mega, quella totale in uso se non ricordo male il 13% (su un totale di 32 giga).

 

[i legend]

Da quello che vedo sono l unico ad avere un PC anziano e smemorato
Il suo pensionamento si aggiorna all ultima riforma

 

[i legend]

Appena rientrato.
Mi metto a lavoro. Spero di finire per stasera.

 

[lotto_tom75]

Studiare... anche... il twinbasic conviene!



Grazie al primissimo output di test del mio cucciolo twinbasic boss robot... pag 101 msg #2013

Dettaglio output by Boss Robot

by 8ina aurea analizzata con nuovo programmino twinbasic dalla es 8117 alla es 7/3/2023

Numero Ruota Ritardo RitardoMax Incmax Freq

04.05.78 Venezia 491 491 0 11
04.67.90 Nazionale 232 232 0 15

VE NZ 4-5-67-78-90

Peccato solo... averle unite!

 

[i legend]

Ciao Luigi ho finito.
Però è da controllare. Ci sono tante righe di codice e ci potrebbero essere degli errori.
Ho raggruppato il codice per argomento.
Posto un immagine finale .
Domani mattina controllo i risultati in modo random.
Devo aggiungere il ritardo storico.che è importantissimo .
Domani lo posto
, oltre deselezionare la dllgiochi ci sono altre cose che devo deselezionare?
Scusa la domanda stupida , ma sai quanto sono imbranato e che affogo in un bicchiere d acqua
Devo stare attento caso mai si agganciano file excel write dove ho i miei curriculum, informazioni personali insomma che non interessano a nessuno?

 

[i legend]

ecco l immagine
domani inserisco il ritardo storico nella tabella verde , controllo i risultai e ........rullo di tamburi

poi credo di aver finito

 

[i legend]

Buona notte a tutti

 

[giomi]

ciao a tutti,
chiedo a LigiB,
si puo rendere veramente modulabile, il comando
Call AvanzamentoElaborazione()
o sbaglio io ad usarlo .
posto il listato di esempio

Dim nGiornoPartenza As Long
Dim nMesePartenza As Long
Dim nAnnoPartenza As Long
Dim sDataPartenza As Date
Dim nGiornoNuova As Long
Dim nMeseNuova As Long
Dim nAnnoNuova As Long
Dim sDataNuova As Date
Dim sData As String
nGiornoPartenza = 01
nMesePartenza = 01
nAnnoPartenza = 1500
sDataPartenza = nGiornoPartenza & "/" & nMesePartenza & "/" & nAnnoPartenza
'----------------------
nGiornoNuova = Day(Now)
nMeseNuova = Month(Now)
nAnnoNuova = Year(Now)
sDataNuova = nGiornoNuova & "/" & nMeseNuova & "/" & nAnnoNuova
'---------------------------------------------------------------------------
Do While Format(sDataPartenza, "yyyymmdd") <= Format(sDataNuova, "yyyymmdd")
   Call Messaggio(sDataPartenza)
   Call AvanzamentoElaborazione(nAnnoPartenza, nAnnoNuova)
   If bScriptInterrotto Then Exit Do
   sDataPartenza = DateAdd("yyyy", 01, sDataPartenza)
Loop

 

[Rookie]

ce fine ha fatto Rookie ? non vorrei mandare un paio di astronavia cercarlo..

Buongiorno a tutti e un cordiale ben tornato a Rubino!
Osservo il graduale successo dell‘idea che ha portato allo SMESS! E mi compiaccio dell’ottimo lavoro sviluppato fin qui da SLDR e sopratutto da coloro che hanno creduto in questo progetto. Sopratutto ai ragazzi della prima ora, dai quali spiccano The legend per le sue interfacce e Tom per le complicazioni non necessarie che sta imparando a non implementare … Buon lavoro a tutti

 

[i legend]

Ben ritrovato Rookie
Buon di a tutti

 

[LuigiB]

ciao a tutti,
chiedo a LigiB,
si puo rendere veramente modulabile, il comando
Call AvanzamentoElaborazione()
o sbaglio io ad usarlo .
posto il listato di esempio

Dim nGiornoPartenza As Long
Dim nMesePartenza As Long
Dim nAnnoPartenza As Long
Dim sDataPartenza As Date
Dim nGiornoNuova As Long
Dim nMeseNuova As Long
Dim nAnnoNuova As Long
Dim sDataNuova As Date
Dim sData As String
nGiornoPartenza = 01
nMesePartenza = 01
nAnnoPartenza = 1500
sDataPartenza = nGiornoPartenza & "/" & nMesePartenza & "/" & nAnnoPartenza
'----------------------
nGiornoNuova = Day(Now)
nMeseNuova = Month(Now)
nAnnoNuova = Year(Now)
sDataNuova = nGiornoNuova & "/" & nMeseNuova & "/" & nAnnoNuova
'---------------------------------------------------------------------------
Do While Format(sDataPartenza, "yyyymmdd") <= Format(sDataNuova, "yyyymmdd")
   Call Messaggio(sDataPartenza)
   Call AvanzamentoElaborazione(nAnnoPartenza, nAnnoNuova)
   If bScriptInterrotto Then Exit Do
   sDataPartenza = DateAdd("yyyy", 01, sDataPartenza)
Loop

Non ho capito la domanda , quella funzione li fa una percentuale tra il valore corrente e il valore massimo possibile , non vabene come l'hai usata tu perche il valore corrente deve partire da 0 e arrivare al valore massimo , nel tuo caso parti da un anno X e arrivi ad un anno Y , l'anno x però è diverso da 0 ma che ne so parti dal 2000 fai finta quindi alla prima chiamata quello fa la percentuale per ottenre il valore da dare alla progressbar calcola la percentuale di 2000 rispetto a 2023 , invece tu a priore dovresti sapere che ci sono 24 anni e i valori da passare a quella funzione va da 0 a 24 per i lvalore corrente e 24 per il valore massimo ..

 

[LuigiB]

Ciao Luigi ho finito.
Però è da controllare. Ci sono tante righe di codice e ci potrebbero essere degli errori.
Ho raggruppato il codice per argomento.
Posto un immagine finale .
Domani mattina controllo i risultati in modo random.
Devo aggiungere il ritardo storico.che è importantissimo .
Domani lo posto
, oltre deselezionare la dllgiochi ci sono altre cose che devo deselezionare?
Scusa la domanda stupida , ma sai quanto sono imbranato e che affogo in un bicchiere d acqua
Devo stare attento caso mai si agganciano file excel write dove ho i miei curriculum, informazioni personali insomma che non interessano a nessuno?

tante volte non ti fossi accorto caro legend le domande stupide mi fanno leggermente incazzare ... che c'entrano i tuoi curriculum ?