Sorry, i'm not an expert but you could try something like
Code:
DEFINE OSC 20
DEFINE HSER_RCSTA 90h
DEFINE HSER_TXSTA 24h
DEFINE HSER_SPBRG 129 ' 9600 Bauds
wData var word SYSTEM
ADCData var word SYSTEM
xyzData var word SYSTEM
GOTO START
ASM
TRANSMIT macro ToSend
MOVE?WW ToSend, wData
L?CALL UTransmit
endm
UTransmit
endasm
HSEROUT [wdata / 100, wdata // 100]
return
START:
adcdata=1024
@ TRANSMIT ADCData
xyzdata = 500
@ TRANSMIT xyzData
PAUSE 500
GOTO START
Steve
It's not a bug, it's a random feature.
There's no problem, only learning opportunities.
Bookmarks