well the easiest solution is to do a simple loop and waiting of an EOT, CR,LF or else to finish storing into ARRAY. i'll assume a 8 element array here.
Code:
SerialDataIn VAR BYTE
MyArray VAR BYTE[8]
Looping VAR BYTE

CR con 13
Looping = 0

start:
while (Looping<8) and (SerialDataIn != CR)
     serin serpin,baudrate,SerialDataIn
     if SerialDataIn != CR then
          MyArray[Looping] = SerialDataIn
          Looping = Looping +1
     endif
wend