;==============================================

SNDTXT:   NOP                ;send text pointed at by DPTR
          MOV A, #0
          MOVC A, @A+DPTR
          CALL SND232        ; move it to com port
          RET

SND232:   JNB  SCON.1, $     ; wait for previous character to go..
          CLR  SCON.1        ; and send current character to COMM
          MOV  SBUF,  A
          RET

;================================================

SNDBYT:   PUSH ACC           ; send hex BYTE - each nibble as ASCII
          SWAP A             ; Will send Hi nibble first
          CALL SNDLOW        ; Sent.
          POP  ACC           ; Will send low nibble next
SNDLOW:   ANL  A, #0FH
          CLR  C
          ADD  A, #246
          JC   HEXOUT
          ADD  A, #58        ; 0 to 9 character
          JMP  SND232

SNDHEX:   ADD  A, #65        ; A to F character
          JMP  SND232

;==============================================