jetzt der quelltext

$regfile = "m8def.dat"
$hwstack = 82
$framesize = 68
$swstack = 68

$crystal = 16000000 'Quarzfrequenz
$baud = 19200

Config Adc = Single , Prescaler = Auto , Reference = Avcc

Timsk = &B00100101
Mcucr = &B00001010
Gicr = &B11000000
Sreg = &B10000000
Tccr1b = &B11000010

Config Pinc.0 = Input
Config Pinc.1 = Input
Config Pinc.2 = Input
Config Pinc.3 = Input

Config Pind.0 = Input
Config Pind.2 = Input
Config Pind.3 = Input

Dim I As Byte

Do

If Ucr.rxc <> 0 Then
I = Udr

Select Case I
Case "H"
Print "Hallo H"
Case "h"
Print "Du"
Case Else
Print "hääää"
End Select
End If

Loop
End



so! also jetzt müsste doch wenn ich im avrterm was sende (egal was) auf jeden fall wenigstens ein häää aushegeben werden??!!

oder