$regfile = "m8def.dat"
$crystal = 7372800
$baud = 9600


Config Print0 = Portd.2 , Mode = Set
Config Pind.2 = Output



Dim I As Byte
Dim Key As Byte



Do






'Print A
Print "Hallo" ' oder print0 "Hallo"


wait 1

Loop


End