sorry if i worded my post wrong, i am using 2 pic's one to transmit, and one to receive.

it works with a direct link between the two mcu's

and i'm using the good old 16f84a just wanted to start off simple


transmitter code
Code:
include "modedefs.bas"



'transmitter on portb.1

trisb.1=0

transmit_data var byte
restart_counter var byte

restart_counter=0

init:

pause500
lcdout "Serial"
lcdout $fe,$c0, "Transmitter"
pause 1000
main:

for transmit_data=0 to 100
serout2 portb.1,n2400,[$55,$55,$60,transmit_data]
pause 500
lcdout $fe,1
lcdout "Transmitting"
lcdout $fe,$c0,dec3 transmit_data, " "
if transmit_data=100 then restart_timer
next transmit_data
goto main


restart_timer:
pause 500
lcdout $fe,1 ' clear lcd
for restart_counter=0 to 10
lcdout "Data sent"
lcdout $fe,$c0, "restart in10:",dec2 restart_counter," "
pause 500
if restart_counter=10 then main
next restart_counter
goto restart_timer
receiver code

Code:
include "modedefs.bas"

'receiver on portb.0

trisb.0=1

data_received var byte

data_received=0

init:
pause500
lcdout "Serial Data"
lcdout $fe,$c0, "Receiver"
pause 1000

lcdout $fe,1
lcdout "Waiting For"
lcdout $fe,$c0, "Data"


main:
serin2 portb.0,n2400,[wait($60),data_received]
pause 500
lcdout $fe,1 ' clear lcd
lcdout "Receiving Data"
lcdout $fe,$c0,dec3 data_received," "
goto main