visualizzatore seriale su lcd

[aduri]

Spero di non essero OT eventualmente chiedo scusa.

Ho trovato questo compilatore basic interessante (Mikrobasic) ed ho provato a tirare giu un terminale seriale su lcd.

Il problema e' questo:
ho preso gli esempi dell'help che riguardano la ricezione e la trasmissione della usart con pic16f628a + max232 ed e' andato tutto a buon fine;
ho preso poi l'esempio della visualizzazione su lcd anche questo OK.

Ho provato a metterli insieme per fare un terminalino seriale su lcd allego dunque il mikrolistato:

program lcd_serial
main:

dim received_byte as byte
Lcd_Init(PORT ' initialize LCD connected to portb
lcd_cmd( LCD_CLEAR) ' send command to LCD "clear display"
lcd_cmd( LCD_CURSOR_OFF) ' send command cursor off
lcd_out(1,1,"data") ' print txt to LCD, 1nd row, 1st column
Usart_Init(4800) ' Initialize USART module
while true
if Usart_Data_Ready = 1 then ' If data is received
received_byte = Usart_Read ' Read received data
' Usart_Write(received_byte) ' Send data via USART
lcd_out(2,1,Usart_Read) ' print gps data to LCD, 2nd row, 1st column
end if
wend

end.

A questi punti mi appare "data" sulla prima riga fin qua tutto ok ma quando mando una stringa dal tool usart terminal di mikrobasic mi scrive un serie di caratteri strani sulla prima riga (anziche' la seconda) subito dopo la scritta data.
Cortesemente qualcuno mi puo' dire dove sbaglio
E' la prima volta che programmo con questo SW ma gari e' una banalita'.

P.S. Ho provato anche a sostituire la variabile Usart_Read con received_byte (per essere sicuri del contenuto del buffer seriale) ma ottengo una sfilza di caratteri indecifrabili e partono sempre dalla riga 1.
Ho notato che se mando un solo carattere qualsiasi in un punto dell'LCD appare se ne metto 2 no.

[davidea]

partiamo dal concetto che non conosco quel linguaggio, ma ti dico cio' che penso possa essere che non va!, potrei anche dire delle fesserie, quindi prendimi con le pinze!

intanto la routine (tranne che non incrementi in automatico la posizione, dovrebbe scrivere sempre sullo stesso punto 2,1

assumendo che tu hai settato la seriale a 4800, (bit di parita?, quanti bit invia?) e che e' settata correttamente,
il dato che hai in ingresso, e' dello stesso tipo di quello in uscita? ossia, ricevi un char, e mandi un char? o ricevi un dato magari in due byte, e lo mandi come unico byte e quindi la routine impazzisce?
perche' non provi a fare un ciclo if, che scriva sull' lcd una stringa nota "carattere ricevuto correttamente" quando riceve un carattere scelto da te?

qualcosa di simile ad

if received_byte = "C" then lcd_out(2,1,"carattere C ricevuto")

in modo da esser sicuro che il carattere venga ricevuto correttamente!
se lo ricevi correttamente, poi puoi provare

if received_byte = "C" then lcd_out(2,1,received_byte)

io non userei la funzione Usart_Read , perche' non so' se e' un buffer, che una volta letto, non contiene piu' niente!

[aduri]

Innanzitutto grazie della risposta.
La prima routine della lettura della seriale l'ho adattata dall'esempio
presente nei samples del compilatore esso trasmetteva al pic una stringa e non un carattere da un terminale tipo hyperterminal di windows ed il pic ritrasmetteva il contenuto del buffer trasferito nella nuova variabile received_byte (cosicche' il rischio di avere il buffer vuoto e' scongiurato)
e tutto funzionava.
Io ho modificato il programma non ritrasmettendo la stringa dal pic al pc
perche' il pin tx usart e' occupato per la gestione dell'lcd e d'altronde mi sembrava inutile.

[power83]

ciao' volevo informarti che in rete tale progetto e' gia' vechio di anni, sia con connessione seriale che parallela, e funzia volendo pure su un LCD 16x2.

Tra l'altro il basic o simili nn sono proprio gli ideali x questi scopi.

Ah, un ultima cosa (giusto x le persone che come me non usano sistemi operativi Microsoft): funziona su quasi tutti i sistemi operativi

[davidea]

Originalmente inviato da aduri

Innanzitutto grazie della risposta.
.
.
.
.
Io ho modificato il programma non ritrasmettendo la stringa dal pic al pc
perche' il pin tx usart e' occupato per la gestione dell'lcd e d'altronde mi sembrava inutile.

penso che allora il problema sia li!!!

Originalmente inviato da aduri

lcd_out(1,1,"data") ' print txt to LCD, 1nd row, 1st column
Usart_Init(4800) ' Initialize USART module

tu prima scrivi sul display, e la routine di inizializzazione del display va' a buon fine,
poi inizializzi la seriale, e allora il pin che prima usavi per il display viene rimappato alla seriale, e da allora in poi son dolori!!!

per provare, inverti le due righe,
prima inizializza la seriale e poi scrivi data
se e' come penso, non dovresti veder spuntare piu' neanche quello!!

[davidea]

a proposito, visto che stai usando il 16f628, fai programmazione in circuit o ogni volta lo levi e lo metti nel programmatore?
se fai incircuit, che programmatore usi?

[aduri]

Niente da fare ho provato a fare come hai detto tu ed anche a customizzare i pins per liberare rb2(tx usart) ma fa lo stesso errore.
Nella terminal del pc (che riceve anche lui il dato) tronca la stringa alla terza lettera.

Io uso il programmatore di NE e sposto il pic pero' per non rovinare i piedini
lo piazzo su uno zoccolo cosi' eventualmente si rovinano i terminali dello zoccolo.

Per rispondere all'altro amico io sto esercitandomi per cui cerco di non copiare per quanto possibile ma di prendere spunti.
Comunque non mi dispiacerebbe se mi mandaste qualche link in c o basic.

Allego il file modificato:



program lcd_serial
dim received_byte as byte
main:
' Lcd_Init(PORT ' initialize LCD connected to portb
Lcd_Config(PORTB,0,3,0,7,6,5,4) ' pins custom
lcd_cmd( LCD_CLEAR) ' send command to LCD "clear display"
lcd_cmd( LCD_CURSOR_OFF) ' send command cursor off
lcd_out(1,1,"GPS data") ' print txt to LCD, 1nd row, 1st column
Usart_Init(4800) ' Initialize USART module
while true
if Usart_Data_Ready = 1 then ' If data is received
received_byte = Usart_Read ' Read received data
Usart_Write(received_byte) ' Send data via USART
lcd_out(2,1,"data:") ' print gps data to LCD, 2nd row, 1st column
lcd_out(2,7,received_byte) ' print gps data to LCD, 2nd row, 1st column
end if
wend
end.

[aduri]

Ho risolto l'arcano!!!!
Il segnale che arriva dal gps e' ttl ma va invertito e ho risolto con successo il problema con un normalissimo transistor bjt BC548 immettendo tramite una resistenza da 5,6K il segnale sulla base e prendendo il segnale invertito sul collettore inviandolo al pic.

Tanti auguri di buone feste a tutti

Ecco il prototipo con la prima decodifica