ser.asm

51单片机串口通信程序

ORG 0000H
AJMP main0
ORG 0030H
main0: MOV 20H,#00H ;设置串口工作方式
MOV TMOD,#22H
MOV SCON,#40H
MOV TH1,#0F3H ;设置速率4800,(12M晶体）
MOV PCON,#80H
SETB TR1
SETB REN ;允许接收
clr p2.7 ;开数码管的最后一位
ajmp start

start:
l1:jnb p2.0,l3 ;检测键盘，如果P2.0按下则执行L3
jnb p2.1,l4
jnb p2.2,l5
JNB P2.3,L6
jbc ri,rec
mov p0,#0ffh
;jmp l1
rec: mov a,sbuf ;缓冲数据送到a
mov p1,a
CJNE A,#00110001b,T00
MOV P0,#0f9H ;数码管显示2
t00: CJNE A,#00110010b,T2
MOV P0,#0a4H ;数码管显示2
T2: CJNE A,#00110011b,T3
MOV P0,#0b0H
T3: CJNE A,#00110100b,T4
MOV P0,#99H
T4: CJNE A,#00110101b,T5
MOV P0,#92H
T5: CJNE A,#00110110b,T6
MOV P0,#82H
T6: CJNE A,#00110111b,T7
MOV P0,#0f8H
T7: CJNE A,#00111000b,T8
MOV P0,#80H
T8: CJNE A,#00111001b,t9
MOV P0,#90H
T9: CJNE A,#00110000b,t10
MOV P0,#28H
t10:ljmp L1

l3: mov dptr,#ok1 ;置表头1
ajmp senda3
senda3: clr a ;
movc a,@a+dptr
cjne a,#'$',senda_3
ajmp start ;遇到$则从头开始执行。

senda_3:mov sbuf,a ;发送数据
JNB TI,$;
CLR TI ;
inc dptr
Ljmp senda3

l4: mov dptr,#ok2 ;置表头2
ajmp senda3

l5: mov dptr,#ok3 ;置表头3
ajmp senda3

l6: mov dptr,#ok4 ;置表头4
ajmp senda3




ok1: db 0dh,"www.eagui.com",0ah,'$'
ok2: db 0dh,"51/avr",0ah,'$'
ok3: db 0dh,"^-^",0ah,'$'
ok4: db 0dh," ^0^",0ah,'$'


end