Mein Taster ist bei INT0 angeschlossen. (Ist ein fertiges Programmierboard).

Und das ist mein Quelltext:
Dim A As Byte

Anfang:
A = 0
Do
If Pind.3 = 0 Then A = A + 1
Cls
Lcd " " ; A
Waitms 250
Loop