LMAO! and they're teacher? Really???

First of all i would suggest you remove the PAUSE 100 and use something like
HSERIN [STR char]
HSEROUT [STR char]

refer to HSERIN/HSEROUT section of the manual. the above may miss something in.


You can also try this one.. simple...
Code:
        DEFINE HSER_RCSTA 90h ' Enable serial port & continuous receive
        DEFINE HSER_TXSTA 20h ' Enable transmit, BRGH = 0
        DEFINE HSER_SPBRG 25  ' 2400 Baud @ 4MHz, 0.17%
        DEFINE HSER_CLROERR 1 ' Clear overflow automatically

        Main var byte

Main:
        Hserin [Char]
        Hserout[Char]
        GOTO Main