串行通讯程序有问题 实验仿真不输出

ORG 0000H
JMP START
ORG 0030H
START:
MOV TMOD,#20H
MOV PCON,#80H
MOV TH1,#0FDH
MOV SCON,#50H
MOV R0,#0AAH
SETB REN
SETB TR1
MOV A,R0
OUT3:CPL A
MOV SBUF,A
OUT1:JNB TI,OUT1
CLR TI
OUT2:JNB RI,OUT2
CLR RI
MOV A,SBUF
MOV P0,A
CALL DELAY
lJMP OUT3
DELAY:
MOV R6,#20
D:MOV R7,#25
D1:DJNZ R7,D
DJNZ R6,D
RET
END

没头没脑，自己玩吧！

这是原来的程序  上边的程序是按我自己的理解来写的  这个程序可以发送数据而我写的发送不了  想不通
org 0000H
AJMP START
ORG 30H
START:
mov SP,#5fh ;
mov TMOD,#20h ;T1: 工作模式2
mov PCON,#80h ;SMOD=1
mov TH1,#0FDH ;初始化波特率（参见表）
mov SCON,#50h ;Standard UART settings
MOV R0,#0AAH ;准备送出的数
SETB REN ;允许接收
SETB TR1 ;T1开始工作
WAIT:
MOV A,R0
CPL A
MOV R0,A
MOV SBUF,A
LCALL DELAY
JBC TI,WAIT1 ;如果TI等于1，则清TI并转WAIT1
AJMP WAIT
WAIT1: JBC RI,READ ;如果RI等于1，则清RI并转READ
AJMP WAIT1
READ:
MOV A,SBUF ;将取得的数送P1口
MOV P1,A
LJMP WAIT
DELAY: ;延时子程序
MOV R7,#0ffH
DJNZ R7,$
RET
END