xbees not communicating.

[stephansbest]

hi all,

As part of my project i require that two pic microcontrollers communicate wirelessly using xbees.
My code is in pic basic pro,but the xebess dont seem to be communicating at all.
Below is the code i am using:
for the transmitter pic

INCLUDE "modedefs.BAS"
DEFINE HSER_TXSTA 24h
DEFINE HSER_RCSTA 90h
DEFINE HSER_BAUD 9600
DEFINE HSER_CLROERR 1
TRISC=   %10000000
LED1 VAR PORTc.0
char var byte
LOW LED1
high portC.0
HSerout ["1",13,10]
HIGH LED1
Pause 1000

and for the reciever pic:

INCLUDE "modedefs.BAS"
DEFINE HSER_TXSTA 24h
DEFINE HSER_RCSTA 90h
DEFINE HSER_BAUD 9600
DEFINE HSER_CLROERR 1
TRISC=%10000000
LED1 VAR PORTB.0
char var byte
LOW LED1
HSerin [char]
if char == "1" Then
HIGH LED1
Pause 2000
ENDIF

ild be glad if you can help me with this :sad:

 

[milan.rajik]

Which PIC are you using and what Fosc (crystal) you are using?

 

[stephansbest]

hi
i am using pic16f876a for the receiver side and pic 16f877a for the transmitter side, also i am using a 4mhz ceramic resonator,
Thanks

 

[milan.rajik]

I wrote a code using 2 x PIC16F877A. Change one PIC to PIC6F876A. PBP code and Proteus 8.1 file inside attached file. Simulate and see. The LED2 @ RB1 of Transreceiver #2 blinks whenever a "1" is received from Transreceiver #1.