Taster zum Stellen wie bei Digitaluhr u.a.

[Andree-HB]

...hab`s gerade selber vor ein paar Tagen eingebaut, mit zwei Tastern stellt man Variable T vor/zurück :

Dim T As Word
Config Pinc.4 = Input
Config Pinc.3 = Input

do
If Pinc.4 = 0 Then
      Waitms 80
      If Pinc.4 = 0 Then
      Incr T
      End If
   End If

   If Pinc.3 = 0 Then
      Waitms 80
      If Pinc.3 = 0 Then
      Decr T
      End If
   End If
print T
loop
end