Ich habe nun meinen ATMega16 mit Hilfe eines MAX232 (Schaltung dürfte bekannt sein) an meinen PC angeschloßen.

Habe nun aber ein Problem:
Ich wollte das Tutorial zum URAT auf www.rowalt.de machen.

Also Teil 1:
Code:
$Regfile = "m16def.dat"  'ATMega16-Deklarationen
$Crystal = 16000000    'Quarz: 16 MHz
$Baud    = 9600       'Baudrate der UART: 9600 Baud

Dim i As Byte
Dim wTest As Word

i = 1
wTest = 35000

Do
  Printbin i ; wTest
  Print "Hallo AVR: " ; i ; wTest
  Print "<--->" ;
Loop
End
Die Baudrate müßte doch passen, oder?
Das Programm funktioniert auch, bekomme das "Hallo AVR" auf dem PC zu sehen.

Teil 2:
Code:
$Regfile  = "m16def.dat" 'ATMega16-Deklarationen
$Crystal  = 16000000     'Quarz: 16 MHz
$Baud     = 9600        'Baudrate der UART: 9600 Baud

Dim i As Byte

Do
  If USR.RXC = 1 Then  'Wenn Byte empfangen...
    i = UDR            'Byte aus UART auslesen
    Select Case i
    Case "H"
      Print "Hallo AVR"
    Case "h"
      Print "hallo avr"
    Case Else
      Print "Unbekannter Befehl"
    End Select
  End If
Loop
End
Nur das Funktioniert nicht: Bekomme nur wirre Zeichen auf den PC.
Aber das Senden muß ja funktionieren, Teil 1 funktioniert ja.
Warum bekomme ich bei Teil 2 nichts vernünftiges vom µC?