MCS-51 单片机设计应用程序实例 - Read
MCS-51 单片机设计应用程序实例 - Read
MCS-51 单片机设计应用程序实例 - Read
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
;<br />
CLR ET0<br />
CLR TR0<br />
<strong>MCS</strong>-<strong>51</strong> 系 列 单 片 机 设 计 实 例<br />
MOV A,#0B7H ;中 断同步修正<br />
ADD A,TL0<br />
MOV TL0,A<br />
MOV A,#3CH<br />
ADD A,TH0<br />
MOV TH0,A<br />
SETB TR0<br />
DJNZ R4, OUTT0<br />
ADDSS: MOV R4,#14H<br />
MOV R0,#71H<br />
ACALL ADD1 ;加 1 程序<br />
MOV A,R3<br />
CLR C<br />
CJNE A,#60H,ADDMM<br />
ADDMM: JC OUTT0<br />
ACALL CLR0<br />
MOV R0,#77H<br />
ACALL ADD1<br />
MOV A,R3<br />
CLR C<br />
CJNE A,#60H,ADDHH<br />
ADDHH: JC OUTT0<br />
ACALL CLR0<br />
MOV R0,#79H<br />
ACALL ADD1<br />
MOV A,R3<br />
CLR C<br />
CJNE A,#24H,HOUR<br />
HOUR: JC OUTT0<br />
ACALL CLR0<br />
OUTT0: MOV 72H,76H<br />
MOV 73H,77H<br />
MOV 74H,78H<br />
MOV 75H,79H<br />
POP PSW<br />
POP ACC<br />
SETB ET0<br />
RETI<br />
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<br />
;; 闪 动调时 程 序 ;;<br />
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;<br />
PDF created with FinePrint pdfFactory trial version http://www.fineprint.com<br />
8
Change language