this on work with HSERIN, should also work with SERIN2
Code:
    DEFINE   LOADER_USED 1
    DEFINE   OSC 20
    DEFINE   HSER_RCSTA 90h
    DEFINE   HSER_TXSTA 24h
    DEFINE   HSER_SPBRG 129 ' 9600 Bauds
    DEFINE   HSER_CLROERR 1
    
    discard  var byte
    ArrayVar var byte[10]

start:
    hserin 5000,NotReceivedYet,[wait("abc"),discard,wait("123"),str arrayvar\10\13] 
    hserout ["Discard:",discard,13,10,_
             "Received:",str arrayvar,13,10]
    goto start

NotReceivedYet:
    hserout [13,10,"no!",13,10]
    goto start