20 bucks says you haven't given CR any definition...
Something like:
cr var byte : cr = 13......
EDIT:
And you're using CR as a 'STR' terminating character.
If you fix the TX part, and leave the RX part the same, I believe the CR will be thrown out, not sure about it though...
Bookmarks