You are probably overwriting the TXREG before it's finished sending the previous packet. You didn't mention which PIC you're using, so refer to the appropriate data sheet for the exact Register naming, but something like this:

Code:
FOR I = 0 TO 31
        WHILE TXIF = 0
         WEND
        SEROUT2 PORTC.1,84,[HEX2 SquaresArray[I]]
     NEXT I
    SEROUT2 PORTC.1,84,[","]