Try this.
--------------------------------------------------------------------------
Include "modedefs.bas" 'to enable the mode option for n9600

trisa = %00010
TRISB = %00000000

symbol sec = 1000

d0 var byte
s_out var porta.0 'set pin no as output pin
s_in var porta.1 'set pin no as input pin
led var portb.4

loop:
Serin s_in, T9600, 1000, no_data, ("x"), [d0]
serout s_out, T9600, [d0]

goto loop

no_data:
high led
pause sec
goto loop

end
--------------------------------------------------------------------------
Sphere