【正文】 ,4 YEAR,5 MONTH,6 DAYMOV R1,00H。確定在調(diào)時不按鍵的最長時間，10秒后返回normal狀態(tài)MOV R7,00H。切換標(biāo)志MOV 40H,00H。十六進(jìn)制轉(zhuǎn)換BCD的高位 MOV 41H,00H。十六進(jìn)制轉(zhuǎn)換BCD的低位MOV R6,00H。調(diào)時的位閃爍的時間間隔MOV R4,00H。用來計數(shù)5ms的中斷次數(shù)，200次則一秒mov r3,00hSETB TR1。開始計時 AGAIN:ACALL PROSHOW。顯示AJMP AGAINPROSHOW:CJNE R3,00H,SHOWDATE。如果r3等于1就顯示日期，等于0就顯示時鐘 CJNE R7,04H,DATE1。顯示程序AJMP SHOWDATE。showdate顯示年月日 AJMP SHOWDATE DATE1: CJNE R7,05H,DATE2 DATE2: CJNE R7,06H,SHOWCLOCK AJMP SHOWDATEshowCLOCK: MOV R0,33H。showclock顯示時分秒，先顯示時ACALL PROHTODCJNE R7,01H,CLK1 INC R6CJNE R6,03H,CLK2。若處于調(diào)時狀態(tài)，則該位閃爍MOV R6 ,00H CLK1: clr mov a,41H MOV P0, a。顯示時的低位 ACALL DELAY3MS CLK2: SETB CLR mov a,40HMOV P0,a。顯示時的高位 ACALL DELAY3MS SETB MOV R0,32H。顯示分 ACALL PROHTOD CJNE R7,02H,CLK3 INC R6CJNE R6,03H,CLK4。若處于調(diào)時狀態(tài)，則該位閃爍MOV R6,00H CLK3: CLR mov a,41H MOV P0, a。顯示分的低位 ACALL DELAY3MS CLK4:SETB CLR mov a,40h MOV P0,a。顯示分的高位 ACALL DELAY3MS SETB MOV R0,31H。顯示秒ACALL PROHTOD CJNE R7,03H,CLK5 INC R6CJNE R6,03H,CLK6MOV R6,00H CLK5: CLR mov a,41H MOV P0, aACALL DELAY3MS CLK6: SETB CLR mov a,40h MOV P0,aACALL DELAY3MS SETB RETSHOWDATE: MOV R0,36HACALL PROHTOD CJNE R7,04H,DAY1 INC R6CJNE R6,03H,DAY2MOV R6,00H DAY1: CLR MOV P0,41HACALL DELAY3MS DAY2: SETB CLR MOV P0,40HACALL DELAY3MS SETB MOV R0,35HACALL PROHTOD CJNE R7,05H,MONTH1。若處于調(diào)時狀態(tài)，則該位閃爍。顯示秒的低位。顯示秒的高位。顯示年。若處于調(diào)時狀態(tài)，則該位閃爍。顯示年的低位。顯示年的高位。顯示月INC R6CJNE R6,03H,MONTH2。若處于調(diào)時狀態(tài)，則該位閃爍MOV R6,00H MONTH1: CLR MOV P0,41H。顯示月的低位ACALL DELAY3MS MONTH2: SETB CLR MOV P0,40H。顯示月的高位ACALL DELAY3MS SETB MOV R0,34HACALL PROHTOD CJNE R7,06H,YEAR1 INC R6CJNE R6,03H,YEAR2MOV R6,00H YEAR1: CLR MOV P0,41HACALL DELAY3MS YEAR2: SETB CLR MOV P0,40HACALL DELAY3MS SETB RETPROHTOD:PUSH ACCMOV A,R0 MOV B,0AH DIV AB MOV DPTR,0030H MOVC A,@A+DPTR MOV 40H,A MOV A,B MOVC A,@A+DPTR MOV 41H,A POP ACC RET。顯示日。若處于調(diào)時狀態(tài)，則該位閃爍。十六進(jìn)制數(shù)轉(zhuǎn)換成bcd碼,且可以直接輸出p0口DELAY3MS:。DELAY3MS MOV 45H,08H DELAY1: MOV 46H,0FFH DELAY2: DJNZ 46H,DELAY2 DJNZ 45H,DELAY1 RETPROINT0:CLR EX0。切換鍵中斷程序 MOV R3,00H ACALL PROSHOW MOV C, JC IEXIT0 MOV R1,00H INC R7 CJNE R7,07H,IEXIT0MOV R7,00H INT01: MOV C, JC INT02 ACALL PROSHOW AJMP INT01 INT02: ACALL PROSHOW IEXIT0: SETB EX0 RETIPROINT1:CLR EX1ACALL PROSHOW MOV C, JC IEXIT1 LCALL ISYEAR。判斷平年閏年LCALL ISMONTH。判斷月份，確定最大日數(shù)MOV R1,00H CJNE R7,00H,NEXT1。若不是調(diào)時狀態(tài)，按此鍵就是切換顯示日期、時鐘INC R3 CJNE R3,02H,IEXIT1 MOV R3,00H AJMP IEXIT1 NEXT1: mov r3,00hCJNE R7,03H,NEXT2。修改秒位 INC 31H MOV A,31H CJNE A,3CH,INT11。遇60變0 MOV 31H,00H AJMP IEXIT1NEXT2: CJNE R7,02H,NEXT3。修改分位INC 32H MOV A,31HCJNE A,3CH,INT11。遇60變0 MOV 31H,00H AJMP IEXIT1 NEXT3: CJNE R7,01H,NEXT4。修改時位INC 33H MOV A,33H CJNE A,18H,INT11。遇24變0 MOV 33H,00H AJMP IEXIT1 NEXT4: CJNE R7,06H,NEXT5。修改日INC 34H MOV A,34H CJNE A,49H,INT11。到月底就返回月初 MOV 34H,01H AJMP IEXIT1NEXT5: CJNE R7,05H,NEXT6。修改月INC 35HMOV A,35H CJNE A,0DH,INT11。十二月過后就跳回1月 MOV 35H,01H AJMP IEXIT1 NEXT6: CJNE R7,04H,INT11。修改年INC 36HMOV A,36H CJNE A,64H,INT11MOV 36H,00H MOV C, INT11: JC INT12 ACALL PROSHOW AJMP INT11 INT12: ACALL PROSHOW IEXIT1: setb EX1RETI PROTIME:MOV TMOD,10H MOV TH1,3CH。定時器初始化 MOV TL1,60H setb tr1 INC R4CJNE R4,0c8H,EXITMOV R4,00H。計滿1秒則清零 CJNE R7,00H,DIAOSHIAJMP NORMAL DIAOSHI:INC R1。調(diào)時不按鍵的最長時間為10秒，在此期間又鍵按下重新計時CJNE R1,0AH,EXIT MOV R7,00H。到10秒則返回正常顯示狀態(tài) MOV R1,00H AJMP EXITNORMAL:ACALL ISYEAR。判斷平閏年，返回標(biāo)志48h，0為平年，1為閏年ACALL ISMONTH。判斷哪個月，返回該月的最大日數(shù)，存放在49hINC 31HMOV A,31H。秒加一 CJNE A,3CH,EXIT MOV 31H,00HINC 32H。分加一 MOV A,32H CJNE A,3CH,EXIT MOV 32H,00H INC 33H。時加一 MOV A,33H CJNE A,18H,EXIT MOV 33H,00H INC 34HMOV A,34H CJNE A,49H,EXIT MOV 34H,01H INC 35HMOV A,35H CJNE A,0DH,EXIT MOV 35H,01H INC 36HMOV A,36H CJNE A,64H,EXIT MOV 36H,00H。年加一。月加一。日加一 EXIT:RETIISYEAR: MOV A,36H。判斷平閏年MOV B,04HDIV AB MOV A,B CJNE A,00H,EXITYEAR1 MOV 48H,01H。閏年 SJMP EXITYEAR MOV 48H,00H。平年 EXITYEAR1: EXITYEAR: RETIISMONTH:MOV A,35H。開始檢查月份 CJNE A,02H,NEXTMON1。判斷二月 MOV R2,48HCJNE R2,00H,RUNNIAN MOV 49H,1DH。平年為28天，賦29給49h AJMP EXITMONTH RUNNIAN:MOV 49H,1EH。閏年為29天，賦30天給49hAJMP EXITMONTHNEXTMON1: CJNE A,04H,NEXTMON2AJMP XIAOYUENEXTMON2:CJNE A,06H,NEXTMON3 AJMP XIAOYUENEXTMON3:CJNE A,09H,NEXTMON4 AJMP XIAOYUE NEXTMON4:CJNE A,0BH,DAYUE XIAOYUE: MOV 49H,1FH。四，六，九，十一月是小月，30天，但應(yīng)該賦31天給比較值49h，AJMP EXITMONTH DAYUE: MOV 49H,20H。其他月份為大月，31天，賦32天給49h EXITMONTH: RETI END