RC5 mit BASCOM8051

Damit auf den Druck auf den Knopf auf dem Pult das Programm wie zu machen ьbernahm wie der Druck einmal, und nicht wie den Druck oftmals?

In diesem Beispiel, den Knopf fьnf wenn zu halten, so wird das Programm stдndig die Zahl fьnf ьbernehmen! Damit das Programm wie zu machen ьbernahm nur einmal fьnf, und auf den zweiten Druck soll das Programm das zweite Mal, aber nicht oftmals fьr zwei Drucke ьbernehmen.

Code:

---

Dim New As Bit
Dim Command As Byte , Subaddress As Byte

Reset Tcon.0                                                  'triggered by rising edge
On Int0 Receiverc5
Enable Int0
Enable Interrupts
Do
  If New = 1 Then                                            'received new code
    Disable Int0
    Print Command ; "  " ; Subaddress
    New = 0                                                  'reset new bit
    Enable Int0
  End If
Loop



Receiverc5:                                                  'interrupt routine
  'the getrc5 routine uses 30 bytes ! of the stack for measuring
  'the interval between the bits
  Getrc5(Subaddress,command)
  New = 1                                                    'set flag
Return

---

Helfen Sie bitte!!!