STC micro STC8A8K64D4 Series - Page 433

STC8A8K64D4 Series Manual
- 417 -
MOV RPTR,#00H
RET
UART4_SEND:
JB BUSY,$
SETB BUSY
MOV S4BUF,A
RET
UART4_SENDSTR:
CLR A
MOVC A,@A+DPTR
JZ SEND4END
LCALL UART4_SEND
INC DPTR
JMP UART4_SENDSTR
SEND4END:
RET
MAIN:
MOV SP, #5FH
MOV P0M0, #00H
MOV P0M1, #00H
MOV P1M0, #00H
MOV P1M1, #00H
MOV P2M0, #00H
MOV P2M1, #00H
MOV P3M0, #00H
MOV P3M1, #00H
MOV P4M0, #00H
MOV P4M1, #00H
MOV P5M0, #00H
MOV P5M1, #00H
LCALL UART4_INIT
MOV IE2,#10H
SETB EA
MOV DPTR,#STRING
LCALL UART4_SENDSTR
LOOP:
MOV A,RPTR
XRL A,WPTR
ANL A,#0FH
JZ LOOP
MOV A,RPTR
ANL A,#0FH
ADD A,#BUFFER
MOV R0,A
MOV A,@R0
LCALL UART4_SEND
INC RPTR
JMP LOOP
STRING: DB 'Uart Test !',0DH,0AH,00H