Hallo, ich bin neu hier und habe ein kleines Problem. Ich versuche mit einem Atmega8 einen GPS-Empfänger auszulesen.
Der GPS-Emfänger geht problemlos am pc über
RS232 und mit dem Hyperterminal.
Der Atmega8 gibt leider nür müll aufsDisplay
Das ist mein Code:
$regfile "m8def.dat"
$crystal = 4000000
Baud = 9600
Dim B As Byte
Dim X As Byte
Dim Y As Byte
Open "comc.0:9600,8,n,1,inverted" For Input As #1
Config Lcdpin = Pin , Db4 = Portd.3 , Db5 = Portd.2 , Db6 = Portd.1 , Db7 = Portd.0 , E = Portd.4 , Rs = Portb.6
Cursor Off
Display On
Cls
Locate 1 , 1
X = 0
Y = 1
Do
X = X + 1
If X = 9 Then Gosub Voll
Get #1 , B
Locate Y , X : Lcd Chr(b)
Loop
Voll:
If Y = 2 Then Cls
X = 1
Y = Y + 1
If Y = 3 Then Y = 1
Locate Y , X
Return
Was mache ich falsch?
Lesezeichen