y este es el codigo que uso para el receptor:

DEFINE OSC 4


include "modedefs.bas"


LEDS VAR BYTE


CMCON=7


TRISA=$FF


TRISB=%00000000


PORTB=0


PORTA=0


HIGH PORTB.0
PAUSE 1000
LOW PORTB.0


INICIO:


SERIN2 PORTB.1,84,300,INICIO,[LEDS]


IF LEDS=2 THEN


PORTB.0=1


PAUSE 500


ENDIF
goto inicio