[課程設(shè)計]基于51單片機的數(shù)字時鐘(編輯修改稿)
2024-11-15 10:03 本頁面
【文章內(nèi)容簡介】 0 , 0BH。 DJNZ 20H, OUT 。轉(zhuǎn)到中斷跳出 pop 程序 MOV 20H, 0AH 。 重裝： 100*10=1000 。進位程序 INC SEC MOV R6, SEC 。 CJNE R6, 60, OUT。比較 MOV SEC , 00 。 INC MIN MOV R6, MIN CJNE R6, 60, OUT MOV MIN , 00 INC HOUR MOV R6 , HOUR CJNE R6 , 25 , OUT MOV HOUR ,00 INC DAY MOV R5, MON CJNE R5, 1, MON_22。是否 1 月、不是轉(zhuǎn) 2月 MOV R5, DAY CJNE R5, 32, OUT 。 本月是否益出 INC MON MOV DAY,1 LJMP OUT OUT: POP 06H POP B POP ACC POP PSW RETI MON_22: MOV R5, MON CJNE R5 , 2 , MON_33。是否 2 月 、不是轉(zhuǎn) 3月 MOV A, YEAR 。判斷是否瑞年 MOV B, 4 DIV AB MOV A , B JNZ OUT_1。不是則轉(zhuǎn)（ A 不為零則轉(zhuǎn)） MOV R5 ,DAY CJNE R5,30, OUT。如是瑞年、判斷是否到29 天 INC MON MOV DAY ,1 LJMP OUT OUT_1: MOV R5, DAY CJNE R5, 29, OUT 。平年二月判斷 INC MON MOV DAY , 1 LJMP OUT MON_33: MOV R5, MON CJNE R5, 3 , MON_44 MOV R5, DAY CJNE R5 , 32, OUT INC MON MOV DAY , 1 LJMP OUT MON_44: MOV R5, MON CJNE R5,4, MON_55 MOV R5, DAY CJNE R5 ,31,OUT INC MON MOV DAY , 1 LJMP OUT MON_55: MOV R5,MON CJNE R5,5, MON_66 MOV R5,DAY CJNE R5,32,OUT INC MON MOV DAY,1 LJMP OUT MON_66: MOV R5, MON CJNE R5,6, MON_77 MOV R5, DAY CJNE R5 ,31,OUT INC MON MOV DAY , 1 LJMP OUT MON_77: MOV R5, MON CJNE R5,7, MON_88 MOV R5, DAY CJNE R5,32,L1 INC MON MOV DAY , 1 L1: LJMP OUT MON_88: MOV R5, MON CJNE R5,8, MON_99 MOV R5, DAY CJNE R5 ,32,L2 INC MON MOV DAY , 1 L2: LJMP OUT MON_99: MOV R5, MON CJNE R5,9, MON_00 MOV R5,DAY CJNE R5 ,31,L3 INC MON MOV DAY , 1 L3: LJMP OUT MON_00: MOV R5, MON CJNE R5,10, MON_AA MOV R5, DAY CJNE R5 ,32,L4 INC MON MOV DAY , 1 L4: LJMP OUT MON_AA: MOV R5, MON CJNE R5,11, MON_BB MOV R5,DAY CJNE R5,31,L5 INC MON MOV DAY , 1 L5: LJMP OUT MON_BB: MOV R5, DAY CJNE R5 ,32,L6 INC YEAR MOV MON, 1 MOV DAY , 1 L6:LJMP OUT 。按 SB2\定時器年單元加 1 子程序 SB3_2: LJMP SHOW_2 。二路沒編返回 SB3_3: LJMP SHOW_3 。三路沒編返回 SB3_1: MOV A , YEAR_1 。 調(diào)時年單元 MOV B ,10 DIV AB SWAP A ORL A,B MOV P0, A MOV P2, 01H LCALL READ LCALL DE250SM CJNE A, 01H, SB3_1 CJNE A, 0FBH, KEY2_7 。按 SB2 轉(zhuǎn)年調(diào)整 LJMP MON_111 。按 SB1 往下調(diào)月單 元 KEY2_7:CJNE A, 0FDH, SB3_1 INC YEAR_1 。 1 路年單元加 1 MOV R5,YEAR_1 CJNE R5,09,SB3_1 。益出 MOV YEAR_1, 00H AJMP SB3_1 。 。月單元加 1 子程序 MON_111: MOV A , MON_1 。 調(diào)時月單元顯示 MOV B ,10 DIV AB SWAP A ORL A,B MOV P0, A MOV P2, 02H LCALL READ LCALL DE250SM CJNE A, 01H, MON_111 CJNE A, 0FBH, KEY2_8 。按 SB2 轉(zhuǎn)月調(diào)整 LJMP DAY_111 KEY2_8: CJNE A,0FDH,MON_111 INC MON_1 。1 路
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1