PC與RS232串行通迅程序

??????????????? S4?EQU?P3.6? ; 按鍵端口
??????????????? ORG???? 0000H????????? ;程序執(zhí)行開始地址
??????????????? LJMP??? START????????? ;跳至START
??????????????? ORG???? 0003H????????? ;外中斷0中斷程序入口
??????????????? RETI??? ;跳至INTEX0中斷服務(wù)程序
??????????????? ORG???? 000BH?? ;定時(shí)器T0中斷程序入口
??????????????? RETI??? ;中斷返回
??????????????? ORG???? 0013H????????? ;外中斷1中斷入口
??????????????? RETI??? ;跳至INTEX1中斷服務(wù)程序
??????????????? ORG???? 001BH?? ;定時(shí)器T1中斷程序入口
??????????????? RETI??? ;跳至INTT1中斷服務(wù)程序
??????????????? ORG???? 0023H?? ;串口中斷入口地址
??????????????? RETI??? ;中斷返回
??????????????? ORG???? 002BH????????? ;定時(shí)器T2中斷入口地址
??????????????? RETI??? ;中斷返回
;*******************************************************???????????????
START:?????????
??????????????? MOV???? SP,#60H????????? ; 堆棧在60H開始
???????? MOV?TMOD,#20H? ? ; 定時(shí)器1工作于8位自動(dòng)重載模式,用于產(chǎn)生波特率
???????? MOV?TH1,#0FDH
???????? MOV?TL1,#0FDH? ; 波特率9600
?
???????? MOV?SCON,#50H? ; 設(shè)定串行口工作方式
??? ???????? ANL?PCON,#0EFH? ; 波特率不倍增
?
???? ???????? SETB?TR1?? ; 啟動(dòng)定時(shí)器1
???????? MOV?IE,#0?? ; 禁止任何中斷
;******************************************************* ?
MAIN:
????? ??????? JNB?RI,MAIN1? ; 是否有數(shù)據(jù)到來
??????? CLR?RI
??????? MOV?A,SBUF?? ; 暫存接收到的數(shù)據(jù)
??????? MOV?P2,A?? ; 數(shù)據(jù)傳送到P2口
??????? LCALL?SEND????????? ; 回傳接收到的數(shù)據(jù)
?
MAIN1:
??????? JB?????? S4,MAIN????????? ;
??????? LCALL?DELAY10MS ? ;? 延時(shí)去抖動(dòng)
??????? JB?????? S4,MAIN????????? ;
??????? JNB????? S4,$???????????? ;
??????? LCALL?KEY_SEND? ;? 鍵處理
??????? SJMP?MAIN???????????? ;
;******************************************************* ?
; 按鍵處理子程序 --- 發(fā)送字符串到PC?
;*******************************************************?
KEY_SEND:
??????? MOV?DPTR,#TABLE ? ; 字串表格地址
SEND_1:
??????? CLR?A??????????????? ;
??????? MOVC?A,@A+DPTR??????? ;
??????? JZ?SEND_END? ; 查到00H時(shí),表示字串結(jié)束
??????? ACALL?SEND???????????? ;
??????? INC?DPTR?? ; 下一字符
??????? SJMP?SEND_1?????????? ;
SEND_END:
??????? RET????????????????? ;
;*******************************************************?
; 傳送一個(gè)字符 ACC為(要發(fā)送的數(shù)據(jù))
;*******************************************************?
SEND:
?????? MOV?SBUF,A
?????? JNB?TI,$? ? ; 等特?cái)?shù)據(jù)傳送
?????? CLR?TI?? ; 清除數(shù)據(jù)傳送標(biāo)志
?????? RET
;*******************************************************?
;按鍵延時(shí)
;*******************************************************?
DELAY10MS:
?????? MOV?R7,#10?????????? ;
DELAY1:
?? ?????? MOV?R6,#0D8H???????? ;
DELAY2:
?????? NOP??????????????????????? ;
?????? NOP??????????????????????? ;
?????? DJNZ?R6,DELAY2??????? ;
?????? DJNZ?R7,DELAY1??????? ;
?????? RET??????????????????????? ;
;*******************************************************?
TABLE:
?????? DB?"www.picavr.com" ;
???? ?????? DB?0AH,0DH?? ;換行/回車
?????? DB?00H????????????? ;
?????? END??????????????????????? ;