Interrupt driven Buffered Serial Input

[johnmiller]

I tried your code, and now I tried the one above and still does not work

ReadSerial:
   DataRec var byte[5] : DataRec = 0
   
   While CounterA <= 55
        HSERIN [serdata2]        'save serial port data right away
        if serdata2 = $13 THEN
           i = 0
           KP = 1
        ENDIF
        if KP = 1 then
           IF i=5 THEN
              SerData(CounterA) = serdata2
              CounterA = CounterA + 1
              KP = 0
           endif
           i = i + 1
        endif
   wend

   FOR COUNTERB=42 to COUNTERA
        SEROUT2 SerWRT,16416,[hex2 SerDATA(COUNTERB), 10, 13]
        NEXT COUNTERB
   Goto ReadReadyLoop

I tried this one as well and it doesn't work either:

    SERIN2 [WAIT($20), SKIP 4, serdata2]

PS: it doesn't work it's like the pic is not reading the data fast enough. It is supposed to read the data from a keyboard that than sends data over a serial link at 19200 (not inverted).

All the above codes work if I press a key once per second or so, but they don't work any faster. Anybody can tell me why