
Originally Posted by
cunninghamjohn
Ok I now have a working prototype, thanks to all that contributed.
Transmitter:
INCLUDE "modedefs.bas"
N VAR BYTE
FOR N=0 TO 255
serout PORTB.0,N300,[N]
TOGGLE PORTB.1
PAUSE 100
NEXT N
Receiver:
INCLUDE "modedefs.bas"
N VAR BYTE
PAUSE 1000
START
LCDOUT $FE,$C0,"SERIAL RECEIVER"
SERIN PORTB.4,N300,N
LCDOUT $FE,1,#N
PAUSE 50
GOTO START
Bookmarks