Visualizza post

Questa sezione ti permette di visualizzare tutti i post inviati da questo utente. N.B: puoi vedere solo i post relativi alle aree dove hai l'accesso.


Post - kicco

Pagine: 1 ... 110 111 [112] 113 114
1666
Programmazione / File Append on Top
« il: 05 Ottobre 2012, 13:51:47 »
Ciao,
sto registrando degli eventi in un log in formato testo. (data, ora, evento)
Mi piacerebbe che gli eventi nuovi venissero scritti all'inizio del file.

Esiste un Append "al contrario"? :)


1667
Programmazione / Re: Accesso alla Porta Seriale
« il: 13 Settembre 2012, 22:12:51 »
Citazione da: md9327 - 13 Settembre 2012, 18:40:38
che riesci a ricevere tutti i byte nei tempi attesi, togliendo ovviamente quello che è solo di test (loop ritardo, ecc.).
forse manca una negazione.... non riesco a ricevere tutti i byte....

Credo d'aver inteso il tuo discorso...
Ti confermo anche che sto usando una interfaccia USB-RS232.
Provo a lavorare senza grafica.

grazie :)

1668
Programmazione / Re: Accesso alla Porta Seriale
« il: 13 Settembre 2012, 13:28:17 »
Si certo, e funziona.

Ma dopo aver modificato i permessi, con l'open del device e poi il read dei dati, non succede niente!
 :-\

1669
Programmazione / Re: Accesso alla Porta Seriale
« il: 13 Settembre 2012, 13:16:47 »
Quello che non mi piace è che nel primo caso ci sono ben 3 EoF per catturare 16 byte che arrivano da una periferica che li spedisce tutti insieme.
E' chiaro che se attendo un tempo sufficiente creo un EoF per ogni byte che ricevo, ma questa soluzione è "poco pulita"!
Mi viene da pensare ad un bug del componente SerialPort

Ho tentato allora di accedere alla porta così

Codice: gambas [Seleziona]

    Private fl As File  
    Public Sub Button1_Click()  
                fl = Open "/dev/ttyUSB0" For Read Watch  
     End       
           
    Public Sub File_Read()    
            
     Dim b As Byte    
           
    ' legge i dati "grezzi" provenienti dal file-device....   
        Read #fl, b    
           
    '...e li mostra in console:      
        Print b           
    End 

come suggerito da Vuott, ma non funziona forse perchè la porta va settata (velocità bit stop ecc)..e non ho trovato info su come si fa :-\

1670
Programmazione / Accesso alla Porta Seriale
« il: 12 Settembre 2012, 18:31:24 »
Accedendo alla porta seriale i 16 byte che devo leggere mi arrivano non di seguito.

L'accesso alla porta lo eseguo con il componente SerialPort così:
Codice: gambas [Seleziona]

Public Sub SerialPort1_Read()    
     Dim i As Integer
     Dim millisec As String
        While Not Eof(SerialPort1)  
               Read #SerialPort1, b  
                  s = CStr(b)
                   If b < 99 Then s = 0 & s
                    If b < 10 Then s = 0 & s
                     millisec = Right$(CString(Now), 3)
                      ss = ss & s                               ' compongo la stringa "sommando" i byte
                      Print s & " " & millisec 
                    ' For i = 1 To 50000             ' impongo un ritardo  altrimenti salto dei byte
                    ' Next
        Wend 
        TextArea2.Text = ss
        Split_byte(ss)          'chiamata alla subroutine Split_byte
        ss = ""                         'dopo aver mandato la stringa ss alla subroutine, qui viene  "azzerata"
     End
 '###################################


I byte sono 16 e i tempi di acquisizione risultano

042 796
062 806
000 806
000 806
076 806
065 806
083 806
079 806
078 815
069 815
065 815
087 815
082 815
082 815
000 815
000 815

Se tolgo il commento alle istruzioni:
Codice: gambas [Seleziona]

' For i = 1 To 50000             ' impongo un ritardo  altrimenti salto dei byte
                    ' Next


allora diventano:
042 719
062 736
000 746
000 766
076 775
065 802
083 822
079 .84
078 843
068 858
065 861
087 869
082 873
082 886
000 894
000 904

Il pacchetto di 16 byte è spedito correttamente, nel senso che con l'oscilloscopio ( e perdendo quasi la vista) ho ricostruito tutti i singolo bit e non ci sono anomalie sui tempi e sui bit di start e stop!

Sbaglio qualcosa o il componente SerialPort ha qualche problema?

1671
Domande tecniche / Re: Dichiarazione automatica di una variabile locale non dichiarata
« il: 11 Settembre 2012, 21:13:18 »
Qualcuno un giorno dovrà scrivere vita morte e miracoli di Ceskho.

Come nuovo arrivato "vorrei" essere messo al corrente di certi pericoli che corro  a frequentare questo forum :)

Kicco (in persona)

1672
Domande tecniche / Re: Coraggio di chiedere: Tutto col puntino davanti
« il: 11 Settembre 2012, 21:10:47 »
Intendiamoci, va bene così, chiedevo il perchè pensando ci fosse una ragione precisa.
Contate che questo fatto non mi permette di tenere i progetti su UbuntuOne condividendoli a casa e al lavoro.
Anche questo non è un problema di per sè.
 E' che non capisco perché.

Ragazzi abbiate pazienza, sono fatto così, un po' curioso.
..ah non è sto il pupo con rm -RF :)

VIVA GAMBAS!

1673
Programmazione / Re: Password di sudo
« il: 11 Settembre 2012, 20:59:52 »
Ok, organizzo in maniera coerente tutte le informazioni e poi apro una nuova discussione.
datemi tempo!!! :)

1674
Programmazione / Re: Password di sudo
« il: 11 Settembre 2012, 14:07:38 »
Scusa ho sbagliato:
in realtà ho usato l'oggetto SerialPort

1675
Programmazione / Re: Password di sudo
« il: 11 Settembre 2012, 13:45:35 »
grazie,

allora io sto utilizzando i dati come natura crea..

Sulla porta trovo delle cose strane, poi racconterò, magari aprendo un'altra discussione perchè questa col titolo originale non c'entra niente ed è quindi poco utile a chi fa una ricerca. Sembra che i byte non arrivino, come dire uno dietro all'altro, ma dopo il primo ci sia una lunga (relativamente) pausa. I dati visti all'oscilloscopio invece sono in un unico pacchetto.

Va beh alla fine ho raccontato.....

1676
Domande tecniche / Re: Coraggio di chiedere: Tutto col puntino davanti
« il: 11 Settembre 2012, 13:36:50 »
La mia domanda è:
Che necessità c'è di avere tutto il contenuto della cartella di progetto nascosto?

(Qualcuno mi ha cancellato i progetti perchè le cartelle sembravano vuote.) :'(

Presumo che un motivo ci sia, mi interessava conoscerlo.

Non ci credo che nessuno si sia mai posto la domanda :)

1677
Programmazione / Re: Password di sudo
« il: 11 Settembre 2012, 09:00:17 »
Eminenza,
è da lì che sono partito dal programmino SerialPort.

Invece volevo chiederti che differenza c'è tra leggere i dati dalla porta con l'istruzione

 fl = Open "/dev/ttyUSB0" For Read Watch 
 Read #fl, b   
Qui dici che i dati sono "grezzi"

o invece

 Read #SerialPort1, s, Lof(SerialPort1)
Dove i dati sono letti come byte

1678
Domande tecniche / Coraggio di chiedere: Tutto col puntino davanti
« il: 10 Settembre 2012, 20:26:42 »
Parto con le domande del principiante:

Perchè tutto il contenuto della cartella di progetto è reso nascosto (Hidden file, Hidden directory).
Questo rende (mi sembra) impossibile avviare gambas cliccando su un file.
Cioè associare un programma ad un file.

So che qualcuno sorriderà, (gli esperti), ma chi si affaccia a questo mondo, lo può trovare un pò "bizzarro".
Spero che questo possa contribuire alla comprensione e  alla diffusione di Gambas, della serie...
quello che non avete mai avuto il coraggio di chiedere :)

Abbiate pazienza, ma si cresce insieme!!!!!! :) :) :)

1679
Programmazione / Re: Password di sudo
« il: 10 Settembre 2012, 20:18:55 »
Vuott, sei un mito :ok:
Funzia perfettamente!!

1680
Programmazione / Re: Password di sudo
« il: 10 Settembre 2012, 08:38:19 »
Grazie ragazzi.
Vuott grazie, si hai capito bene è proprio quello che devo fare.
Appena riesco, provo :)

Pagine: 1 ... 110 111 [112] 113 114