Moin Jungs!
Ich steh grad vor einem kleinen Problem und ich komme ienfach nicht auf die (wahrscheinlich zu triviale) Lösung.
Ich möchte auf einem LCD die Anzahl von Tastendrücken zählen (LCD funktioniert).
Allerdings wird momentan so lange weiter gezählt, wie der Taster gedrückt wird, und nicht pro Tastensruck Einmal.
Ich hoffe, ihr versteht, was ich meine...
Und das mit dem Entprellen bekomm ich auch nicht hin

Hier mein Jetziger Code:
Code:
$regfile = "2313def.dat"
$crystal = 8000000

Config Pind.6 = Input
Taster Alias Pind.6
Dim Ist As Integer
Ist = 0
Cursor Off
 Cls
Do
   If Taster = 1 Then
Ist = Ist + 1
  Locate 1,1
  Lcd "Ist :" ; Ist
  End If
Loop
End
Vielen Danke!

PS: Skinner-Box: http://de.wikipedia.org/wiki/Skinner-Box