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