08.01.2013 Views

MCS-51 单片机设计应用程序实例 - Read

MCS-51 单片机设计应用程序实例 - Read

MCS-51 单片机设计应用程序实例 - Read

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

;******************************<br />

; 接 收程序<br />

;******************************<br />

INTEX0: CLR EX0<br />

JNB P3.1,READ1<br />

READOUTT0: SETB EX0<br />

;<br />

RETI<br />

READ1: CLR A<br />

MOV DPH,A<br />

MOV DPL,A<br />

HARD1: JB P3.1,HARD11<br />

INC DPTR<br />

NOP<br />

NOP<br />

AJMP HARD1<br />

HARD11: MOV A,DPH<br />

JZ READOUTT0<br />

CLR A<br />

READ11: INC A<br />

READ12: JNB P3.1,READ12<br />

MOV R1,#06H<br />

READ13: JNB P3.1,READ11<br />

LCALL DELAY<br />

DJNZ R1,READ13<br />

DEC A<br />

DEC A<br />

JZ FUN0<br />

DEC A<br />

JZ FUN1<br />

DEC A<br />

JZ FUN2<br />

DEC A<br />

JZ FUN3<br />

DEC A<br />

JZ FUN4<br />

DEC A<br />

JZ FUN5<br />

DEC A<br />

JZ FUN6<br />

DEC A<br />

JZ FUN7<br />

DEC A<br />

JZ FUN8<br />

<strong>MCS</strong>-<strong>51</strong> 系 列 单 片 机 设 计 实 例<br />

PDF created with FinePrint pdfFactory trial version http://www.fineprint.com<br />

46

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!