Co tu jest nie tak?
ta sama skladnia na sprzetowym UARTcie dziala dobrze
dane idą z GPS odczytuje je na LCD
zamiast kodów własciwych ASCII, otrzymuje krzaki
ta sama skladnia na sprzetowym UARTcie dziala dobrze
dane idą z GPS odczytuje je na LCD
zamiast kodów własciwych ASCII, otrzymuje krzaki
$regfile = "m8def.dat"
$crystal = 8000000
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = Portd.5 , Db5 = Portd.6 , Db6 = Portd.7 , Db7 = Portd.4 , E = Portd.3 , Rs = Portd.2
Cursor Off
Cursor Off Noblink
Dim Odebraneznakiascii As String * 20
Dim Rs As Byte
Open "comc.3:4800,8,n,1," For Input As #1
Do
Rs = Inkey(#1)
Odebraneznakiascii = Chr(rs)
Lcd Odebraneznakiascii
Loop
Close #1
