ORG 0000H
LJMP MAIN
ORG 0100H
MAIN:MOV TMOD,#20H //定时器设为工作模式二
MOV SCON,#50H //串口方式设为1
MOV TH1,#0FDH
MOV TL1,#0FDH
SETB TR1
LOOP:MOV A,@R0
ACALL L1
MOV @R1,A
INC R0
INC R1
DJNZ R7,LOOP
SJMP $
L1:ACALL DELAY
MOV SBUF,A
JNB TI,$ //判断是否发送完成
CLR TI
MOV A,SBUF //启动串口
RET
//延时子程序
DELAY:MOV R6,#250
D1:MOV R5,#250
D2:DJNZ R6,D2
DJNZ R5,D1
RET
END