Hallo alle miteinander,ich hätte auch noch einen Lösungsvorschlag,der
bei mir wunderbar funktioniert.
Code:
[$regfile = "m8def.dat"
$framesize = 52
$swstack = 62
$hwstack = 72
$crystal = 8000000
Config Portc.0 = Output
Config Pinb.0 = Input
Portb.0 = 1

Declare Sub Taste1

Do
Debounce Pinb.0 , 1 , Taste1 , Sub     'Tastenentprellen
Loop

Sub Taste1
Portc.0 = Not Portc.0       'geht auch mit mehreren Ports
End Sub]