send.asm

学习89C51/S51/S52/C52好的基础程序

org 0000h
clr p1.5
;以下是串口初始化程序
mov scon,#40h ;选择串口工作于方式1
mov tmod,#20h ;定时器T1 设置为工作方式2，用作波特率发生器
mov tl1,#0f4h ;按照波特率为2400 计算初值
mov th1,#0f4h ;把计数初值送入常数缓冲器
mov pcon,#80h ;smod＝1，波特率变成4800
setb tr1 ;启动定时器T1
;以下判断是否按键k0 按下
wait1: jb p3.4,wait1 ;k0 没有按下，等待
acall del10ms ;延时10ms 去抖动
jb p3.4,wait1 ;再次查询k0，是抖动返回
wait2: jnb p3.4,wait2 ;等待按键弹起
mov a,#62h ; 01100010 送到a
mov sbuf,a ;发送信息，传送的一帧信息为：0＋01100010＋1
ajmp wait1 ;返回继续查询k0 是否按下
del10ms: mov r7,#20 ;延时10ms 子程序
del1: mov r6,#0ffh
del2: djnz r6,del2
djnz r7,del1
ret
end