;xp版232通信程序，9600速率，11.0592晶体
;***************************************************************************
ORG 0000H
AJMP main0
ORG 0030H
main0: MOV 20H,#00H
MOV TMOD,#22H ;设定时器工作方式
MOV SCON,#40H
MOV TH1,#0FAH ;速度9600
MOV PCON,#80H
SETB TR1
SETB REN ;允许接收
ajmp start
start: MOV dptr,#ok ;查表
senda: clr a ;
MOVc a,@a+dptr
cjne a,#'$',senda_0
ajmp $ ;遇到$停止。
senda_0:MOV sbuf,a
JNB TI,$ ;串行发送一帧结束了吗？
CLR TI ;
inc dptr ;指针加一
Ljmp senda
ok: db 0dh,0ah,0dh,0ah,"如果我还有一天寿命，那天我要做你女友。我还有一天的命吗？..没有。所以，很可惜。我今生仍然不是你的女友。如果我有翅膀，我要从天堂飞下来看你。我有翅膀吗？..没有。所以，很遗憾。我从此无法再看到你。",0dh,0ah,'$'
end