Bei waitms 100 sieht man gerade so eine kurzzeitige Anderung.
Du musst das:
Portb.1 = 1
Waitms 100
Portb.1 = 0
noch in eine Do-Loop Schleife packen und ein "End" am Ende des Codes hinzufügen.
Sollte dann so aussehen:
jonCode:$regfile = "m128def.dat" $crystal = 8000000 $baud = 9600 Config Portb = Output do Portb.1 = 1 Waitms 100 Portb.1 = 0 loop End
Lesezeichen