Thanks Al for pointing out my mistake.
Dennis,
Just for fun, send this straight to the terminal, you might find it interesting.
Code:
XNUM VAR BYTE[8]
XNUM = 225 'CHANGE THIS NUMBER AS NEEDED
SEROUT2 GPIO.5,16780,[TRAIN,SYNK,DEC XNUM.7,DEC XNUM.6,DEC XNUM.5,_
DEC XNUM.4,DEC XNUM.3,DEC XNUM.2,DEC XNUM.1,DEC XNUM.0,_
"--",DEC XNUM,$d,$a]
More bytes?
SEND
Code:
XNUM VAR BYTE
YNUM VAR BYTE
ZNUM VAR BYTE
XNUM = 225
YNUM = 100
ZNUM = 4
START:
SEROUT2 GPIO.5,16780,[TRAIN,SYNK,XNUM,YNUM,ZNUM,$d,$a]
PAUSE 5000
GOTO START
RECEIVE
Code:
XNUM VAR BYTE
YNUM VAR BYTE
ZNUM VAR BYTE
START:
SERIN2 GPIO.5, 16780,[WAIT(SYNK),XNUM,YNUM,ZNUM]
SEROUT2 GPIO.4,16780,["X-",DEC XNUM," Y-",DEC YNUM," Z-",DEC ZNUM,$d,$a]
GOTO START
Bookmarks