【導讀】時分秒及周信息，具有可調(diào)整日期和時間功能。在設計的同時對單片機的理論基礎和外。圍擴展知識進行了比較全面準備。實時日歷和時鐘顯示的設計過程在硬件與軟件方面進行同步設計。以具有人性化的操作和直觀的顯示效果。所有程序編寫完成后，在wave軟件中進行調(diào)試，確定沒有問題后，在。Proteus軟件中嵌入單片機內(nèi)進行仿真。

　　

【正文】 57H 。星期開閃爍的標志位 ORG 0000H LJMP START 。開始并初始化 ORG 000BH 。定 時 /計數(shù) T0 中斷 LJMP ZDUAN ORG 001BH 。定時 /計數(shù) T1 中斷 LJMP ZDUAN2 ZDUAN:MOV TH0,00H 。使 ZHUAN 由正到負周期大約為 即當開閃爍時 每秒大約閃爍 次環(huán)境 MOV TL0,00H DJNZ R7,ZDUAN1 。循環(huán)指令 CPL ZHUAN 。閃爍標志位求反 MOV R7,3 ZDUAN1:RETI 。中斷返回 ZDUAN2:MOV TH1,0FCH MOV TL1,43H CPL RETI XXXXXXX 畢業(yè)論文 29 XXXXXXX 畢業(yè)論文 30 ORG 0100H START:MOV SP,70H 。設堆棧 MOV TMOD,11H 。T0,TI 工作方式 1 MOV TH0,00H MOV TL0,00H MOV TH1,0FCH MOV TL1,43H SETB EA 。開放 CPU SETB ET0 。開放 T0 中斷 SETB TR0 。啟動 T0 工作 CLR ZHUAN1 。初始化標志位 CLR ZHUAN2 CLR ZHUAN3 CLR ZHUAN4 CLR ZHUAN5 CLR ZHUAN6 CLR ZHUAN7 MOV R7,3 MOV 5FH,00H 。初始化寄存器 MOV 30H,01H 。時間賦初始值 MOV 31H,01H MOV 32H,01H MOV 33H,01H MOV 34H,01H MOV 35H,01H MOV 36H,10H SETB 。啟動設置寫保護寄存器 MOV A,10001110B 。命令字節(jié)， 07H 寄存器寫 ACALL WBYTE XXXXXXX 畢業(yè)論文 31 MOV A,00H 。允許寫數(shù)據(jù)字節(jié) ACALL WBYTE CLR 。RST=0,停止傳送 MOV R0,30H 。數(shù)據(jù)存放首地址 MOV R2,8 。寫 8 個字節(jié) SETB 。啟動連續(xù)寫 8 個字節(jié) MOV A,0BEH 。設多字節(jié)寫命令字 LCALL WBYTE CHUSHI:MOV A,@R0 。取數(shù)據(jù) LCALL WBYTE 。寫一個字節(jié) INC R0 DJNZ R2,CHUSHI 。循環(huán)寫 8 個字節(jié) 。主程序 MAIN:LCALL JIAN 。調(diào)鍵盤子程序 LCALL RILI 。調(diào)日歷時鐘程序 LCALL XIAN 。調(diào)顯示程序 SJMP MAIN 。鍵盤程序 JIAN:MOV P1,0FFH 。初始 MOV A,P1 CPL A JNZ JI1 。判鍵按下 LJMP JIAN4 JI1:LCALL DELAY 。調(diào)延時 CPL A JNZ JI2 LJMP JIAN4 XXXXXXX 畢業(yè)論文 32 JI2:JNB ,JIAN3 。判 K2 鍵為 0 轉(zhuǎn) JNB ,JIAN3 。判 K3 鍵為 0 轉(zhuǎn) JIAN0:MOV P1,0FFH JNB ,JIAN3 。判 K4 鍵為 0 轉(zhuǎn) JNB ,JIAN1 。判 K1 鍵為 0 轉(zhuǎn) LJMP JIANX JIAN1:LCALL DELAY 。調(diào)延時去抖動 JB ,JIANX 。為 1 就是鍵抖動 JIAN11:LCALL XIAN 。調(diào)顯示 JNB ,JIAN11 。判鍵 K1 松開 MOV A,5FH ADD A,1 。寄存器加 1 MOV 5FH,A CJNE A,8,JIANX LJMP JIAN3 JIANX:MOV A,5FH CJNE A, 1,JIA1 。比較轉(zhuǎn)移指令 A 不等于 時，轉(zhuǎn)移 LJMP TIAOM 。轉(zhuǎn)調(diào)秒子程序 JIA1:MOV A,5FH CJNE A,2,JIA2 LJMP TIAOF 。轉(zhuǎn)調(diào)分子程序 JIA2:MOV A,5FH CJNE A,3,JIA3 LJMP TIAOS 。轉(zhuǎn)調(diào)時子程序 JIA3:MOV A,5FH CJNE A,4,JIA4 LJMP TIAOR 。轉(zhuǎn)調(diào)日子程序 JIA4:MOV A,5FH CJNE A,5,JIA5 XXXXXXX 畢業(yè)論文 33 LJMP TIAOY 。轉(zhuǎn)調(diào)月子程序 JIA5:MOV A,5FH CJNE A,6,JIA6 LJMP TIAON 。轉(zhuǎn)調(diào)年子程序 JIA6: LJMP TIAOX 。轉(zhuǎn)調(diào)星期子程序 JIAN3:CLR ZHUAN1 。標志位清 0 CLR ZHUAN2 CLR ZHUAN3 CLR ZHUAN4 CLR ZHUAN5 CLR ZHUAN6 CLR ZHUAN7 MOV 5FH,00H JIAN2:LCALL XIAN 。調(diào)顯示子程序 MOV A,P1 CPL A JNZ JIAN2 JIAN4:RET 。調(diào)秒 TIAOM:SETB ZHUAN6 。秒閃爍標志位置 1 LCALL XIAN JNB ,MIAOZ 。加轉(zhuǎn)移 JNB ,MIAOJ 。減轉(zhuǎn)移 LJMP JIAN0 MIAOZ:LCALL DELAY 。調(diào)延時去抖動 JNB ,MIAOZ1 LJMP JIAN0 MIAOZ1:LCALL XIAN XXXXXXX 畢業(yè)論文 34 JNB ,MIAOZ1 。判鍵 K2 松開 MOV A,30H 。取秒 數(shù)據(jù) ADD A,1 。加 1 DA A 。十進制調(diào)整指令 MOV 30H,A 。送回秒寄存器 CJNE A,60H,MIAOZ2 MOV 30H,00H 。秒值過 60 為 0 LJMP MIAOZ2 MIAOJ:LCALL DELAY。調(diào)延時去抖動 JNB ,MIAOJ1 LJMP JIAN0 MIAOJ1:LCALL XIAN JNB ,MIAOJ1 。判鍵 K3 松開 MOV A,30H 。取秒數(shù)據(jù) MOV B,10H DIV AB 。A 除以 B MOV 61H,B 。數(shù)據(jù)個位放到 61H MOV B,10 MUL AB 。A 乘以 B ADD A,61H 。不帶進位加法 DEC A 。A 減 1 MOV B,10 DIV AB SWAP A ADD A,B MOV 30H,A CJNE A,96H,MIAOZ2 MOV 30H,59H MIAOZ2:MOV A,30H XXXXXXX 畢業(yè)論文 35 ANL A,0FH 。分離低四位 MOV 40H,A 。存數(shù) 據(jù)到寄存器 MOV A,30H SWAP A 。半字節(jié)交換 ANL A,0FH MOV 41H,A 。存數(shù)據(jù)到寄存器 SETB 。啟動設置寫保護寄存器 MOV A,10001110B 。命令字節(jié)，寄存器 07H ACALL WBYTE MOV A,00H 。允許寫數(shù)據(jù)字節(jié) ACALL WBYTE CLR 。停止傳送 SETB 。啟動寫 MOV A,80H 。秒寫命令字節(jié) LCALL WBYTE MOV A,30H 。寫秒數(shù)據(jù)到 DS1302 LCALL WBYTE LCALL XIAN LJMP JIAN0 RET 。調(diào)分 TIAOF:CLR ZHUAN6 。清秒標志位 SETB ZHUAN5 。置分標志位 LCALL XIAN JNB ,FENZ 。加轉(zhuǎn)移 JNB ,FENJ 。減轉(zhuǎn)移 LJMP JIAN0 XXXXXXX 畢業(yè)論文 36 FENZ:LCALL DELAY 。調(diào)延時去抖動 JNB ,FENZ1 LJMP JIAN0 FENZ1:LCALL XIAN JNB ,FENZ1 。判鍵 K2 松開 MOV A,31H 。取秒數(shù)據(jù) ADD A,1 。加 1 DA A 。十進制調(diào)整指令 MOV 31H,A 。送回分寄存器 CJNE A,60H,FENZ2 MOV 31H,00H 。值過 60 為 0 LJMP FENZ2 FENJ:LCALL DELAY 。調(diào)延時去抖動 JNB ,FENJ1 LJMP JIAN0 FENJ1:LCALL XIAN JNB ,FENJ1 。判鍵 K3 松開 MOV A,31H 。取秒數(shù)據(jù) MOV B,10H DIV AB 。A 除以 B MOV 62H,B 。數(shù)據(jù)個位放到 62H MOV B,10 MUL AB 。A 乘以 B ADD A,62H 。不帶進位加法 DEC A 。A 減 1 MOV B,10 DIV AB SWAP A ADD A,B MOV 31H,A XXXXXXX 畢業(yè)論文 37 CJNE A,96H,FENZ2 MOV 31H,59H FENZ2:MOV A,31H ANL A,0FH 。分離低四位 MOV 42H,A 。存數(shù)據(jù)到寄存器 MOV A,31H SWAP A 。半字節(jié)交換 ANL A,0FH MOV 43H,A 。存數(shù)據(jù)到寄存器 SETB 。啟動設置寫保護寄存器 MOV A,10001110B 。命令字節(jié)，寄存器 07H ACALL WBYTE MOV A,00H 。允許寫數(shù)據(jù)字節(jié) ACALL WBYTE CLR 。停止傳送 SETB 。啟動寫 MOV A,82H 。分寫命令字節(jié) ACALL WBYTE MOV A,31H 。寫分數(shù)據(jù)到 DS1302 ACALL WBYTE ACALL XIAN LJMP JIAN0 RET 。調(diào)時 TIAOS:CLR ZHUAN5。相同，后面略 SETB ZHUAN4 LCALL XIAN XXXXXXX 畢業(yè)論文 38 JNB ,SHIZ JNB ,SHIJ LJMP JIAN0 SHIZ:LCALL DELAY JNB ,SHIZ1 LJMP JIAN0 SHIZ1:LCALL XIAN JNB ,SHIZ1 MOV A,32H ADD A,1 DA A MOV 32H,A CJNE A,24H,SHIZ2 MOV 32H,00H