Bascom: Tastenentrpellung + long press Erkennung

Hi,


Ich hab in Bascom eine Tastenentprellung ueber den Timer1 realisiert
(Tim0 und Tim2 meines ATmega 8 werden schon benutzt).


Es funktioniert auch soweit. Den Debounce Befehl konnte ich nicht
nutzen da ich auch erkennen wollte wie lange die Taste gedrueckt wird
um verschiedene Funktionen aufzurufen.

Nun haenge ich fest wie ich erkennen soll ob die Taste >3 Sek gedrueckt
wurde .... Kann mir jemand vielleicht eine Hilfestellung geben?

Hier ein Auszug zur Entprellung der Taste:


Main:
  Do
  If Keypressshort_flag = 1 Then
  If Pinc.5 = 0 Then
  Toggle Portd.3
  End If
  end if

  Keypressshort_flag = 0


  loop
  End

'
********************************************************************
' * Timer 1 ISR


  Tim1_isr:

  Keypressshort_flag = 0
  Incr Nticks
  If Nticks = 500 Then
  Nticks = 0
  End If

  Temp = Nticks Mod 5
  If Temp = 0 Then
  Keypressshort_flag = 1
  End If


  Return


'
********************************************************************


Mfg

Dirk