HSERIN / SERIN Problem with 16f690

[skimask]

Skimask,
Okay, I put in your program. The light blinks once (when I release from reset - I don't touch anything), no character is displayed and that's it. I tried putting a HSEROUT before your main loop and it does send out a character. Any thoughts about turning off the built in analog stuff?

My bad...yes, turn off all of the analog ports...everything over to digital.

Include "modedefs.bas"
DEFINE OSC 3
DEFINE HSER_RCSTA 90h
DEFINE HSER_TXSTA 24h
DEFINE HSER_SPBRG  92
DEFINE HSER_CLROERR 1
cm1con0 = 0 : cm2con0 = 0 : ansel = 0 : anselh = 0
Char VAR BYTE : led var portb.6 : output led : input portb.5 : output portb.7
led=1 : pause 500 : led=0 : pause 500 : led=1 : pause 500 : led=0 : pause 500
Main: HSERIN [Char] : led = 1 : HSEROUT [Char] : pause 10 : led = 0 : GOTO Main
END