also so funktioniert mein neuer Code nicht:

Code:
' set buffer for hardware UART input
Config Serialin = Buffered , Size = 254
Enable Interrupts

Dim A As Byte
Dim B As String * 7
dim buffer(10) as byte
Dim Bufferindex As Byte



B = Chr(&H00) + Chr(&H05) + Chr(&H08) + Chr(&H7d) + Chr(&H00) + Chr(&H70) + Chr(&H00)

Anfang:
Bufferindex = 1
   If Ischarwaiting() <> 0 Then
      Buffer(Bufferindex) = INKEY()
      incr Bufferindex
      If Bufferindex > 7 Then
      Goto Abfrage:
      End If
   End If

Abfrage:
  If Buffer(bufferindex) = B Then
  Goto Klappen:
  Else
  Goto Anfang:
  End If


Klappen:

Waitms 200
Printbin &H3F ; &H06 ; &H00 ; &H0C ; &H01 ; &H39 ; &H01 ; &H0C ;
Waitms 200
Printbin &H3F ; &H06 ; &H00 ; &H0C ; &H02 ; &H39 ; &H01 ; &H0F ;

Bufferindex = 1                                             ' Index zurücksetzen

Goto Anfang:



End
jetzt läuft das Programm komplett durch wenn anscheinend ein Code darin vorkommt. Aber es soll ja erst so sein wenn die ganze Abfrage in der Reihenfolge in dem Codewirwar vorkommt.

Was mach ich falsch ?

Merci !