The USART RX pin should definitely idle high, but this routine has some major issues;
Code:
BEGIN:
For K = 240 TO 240 ' <-- BIG problem here
teller = teller + 1
ADRESS = K
AANTAL = 1
buffero(K) = teller ' <-- there is no buffero(240)
GoSub WEGSCHRIJVEN
PauseUs 200
ADRESS = K
AANTAL = 1
GoSub OPHALEN
IF OK = 1 Then
lcdbufO(K) = bufferi(K) ' <-- same issue here
LCDBUFI(K) = BUFFERO(K) ' <-- and here
GoSub LCD
OK = 0
GoTo HIER1
EndIF
LCDBUFO(K) = 0
LCDBUFI(K) = 0
GoSub LCD
HIER1: Next
K = 240, but your largest array variables are only 6 bytes. I.E. buffero(0) to buffero(5) would be the last byte available in your buffero array.
Bookmarks