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

　　

【正文】 始化寄存器 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è)論文 27 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è)論文 28 JI2:JNB ,JIAN3 。判 K2 鍵為 0 轉 JNB ,JIAN3 。判 K3 鍵為 0 轉 JIAN0:MOV P1,0FFH JNB ,JIAN3 。判 K4 鍵為 0 轉 JNB ,JIAN1 。判 K1 鍵為 0 轉 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 。比較轉移指令 A 不等于 時，轉移 LJMP TIAOM 。轉調(diào)秒子程序 JIA1:MOV A,5FH CJNE A,2,JIA2 LJMP TIAOF 。轉調(diào)分子程序 JIA2:MOV A,5FH CJNE A,3,JIA3 LJMP TIAOS 。轉調(diào)時子程序 JIA3:MOV A,5FH CJNE A,4,JIA4 LJMP TIAOR 。轉調(diào)日子 程序 JIA4:MOV A,5FH CJNE A,5,JIA5 XXXXXXX 畢業(yè)論文 29 LJMP TIAOY 。轉調(diào)月子程序 JIA5:MOV A,5FH CJNE A,6,JIA6 LJMP TIAON 。轉調(diào)年子程序 JIA6: LJMP TIAOX 。轉調(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 。加轉移 JNB ,MIAOJ 。減轉移 LJMP JIAN0 MIAOZ:LCALL DELAY 。調(diào)延時去抖動 JNB ,MIAOZ1 LJMP JIAN0 MIAOZ1:LCALL XIAN XXXXXXX 畢業(yè)論文 30 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è)論文 31 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 。加轉移 JNB ,FENJ 。減轉移 LJMP JIAN0 XXXXXXX 畢業(yè)論文 32 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è)論文 33 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è)論文 34 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 LJMP SHIZ2 SHIJ:LCALL DELAY JNB ,SHIJ1 LJMP JIAN0 SHIJ1:LCALL XIAN JNB ,SHIJ1 MOV A,32H MOV B,10H DIV AB MOV 63H,B MOV B,10 MUL AB ADD A,63H DEC A MOV B,10 DIV AB XXXXXXX 畢業(yè)論文 35 SWAP A ADD A,B MOV 32H,A CJNE A,96H,SHIZ2 MOV 32H,23H SHIZ2:MOV A,32H ANL A,0FH MOV 44H,A MOV A,32H SWAP A ANL A,0FH MOV 45H,A SETB MOV A,10001110B ACALL WBYTE MOV A,00H ACALL WBYTE CLR SETB MOV A,84H ACALL WBYTE MOV A,32H ACALL WBYTE ACALL XIAN LJMP JIAN0 RET XXXXXXX 畢業(yè)論文 36 。調(diào)日 TIAOR:CLR ZHUAN4 SETB ZHUAN3 LCALL XIAN JNB ,RIZ JNB ,RIJ LJMP JIAN0 RIZ:LCALL DELAY JNB ,RIZ1 LJMP JIAN0 RIZ1:LCALL XIAN JNB ,RIZ1 MOV A,33H ADD A,1 DA A