' {$BS2}

' {$PBASIC 2.5}

array VAR Byte(7)

DO

  SERIN 5,84,40,escape,[STR array/7]     

  IF array(6)=LF THEN DEBUG STR array\7   ' LF in array(6) means good data.

escape:

LOOP
 