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




Bookmarks