【正文】 : NOPM1: MOV A,R2 。R2減一月天數(shù) CLR C SUBB A,29 MOV R1,A MOV A,R6 JB ,SM11 MOV A,R2 CLR C SUBB A,30 MOV R1,ASM11: JC SM12 MOV A,R1 。R2減1月天數(shù)，夠減 MOV R2,A 。轉(zhuǎn)二月 AJMP M2SM12: CJNE R3,00H,M13 。R2減1月天數(shù) LJMP Y1 。不夠減，判R3為0否M13: MOV A,R2 。不為0，R3加到R2中 ADD A,R3 。再讓一月減 MOV R2,A 。還不夠，則轉(zhuǎn)Y1 MOV R3,00H AJMP M1M2: CLR C 。R2減一月天數(shù)，夠減 MOV A,R2 。轉(zhuǎn)三月 SUBB A,29 MOV R1,A MOV A,R6 JB ,M21 MOV A,R2 CLR C SUBB A,30 MOV R1,AM21: JC M22 MOV A,R1 。R2減2月天數(shù)，夠減 MOV R2,A AJMP MM2M22: CJNE R3,00H,M23 。R2減2月天數(shù) LJMP Y2 。不夠減，判，R3為0否M23: MOV A,R2 。不為0，R3加到R2中 ADD A,R3 。再讓二月減 MOV R2,A 。還不夠，則轉(zhuǎn)Y2 MOV R3,00H AJMP M2MM2: LCALL CHECKRE 。查2月，如果不為閏月 CJNE A,02H,M3 。轉(zhuǎn)3月RM2: MOV A,R4 ANL A,0FH JNZ RM21 MOV A,R2 CLR C SUBB A,30 MOV R1,A AJMP RM22RM21: MOV A,R2 CLR C SUBB A,29 MOV R1,ARM22: JC RM23 MOV A,R1 。R2減閏2月天數(shù)，夠減 MOV R2,A 。轉(zhuǎn)3月 AJMP M3RM23: CJNE R3,00H,RM24 。R2減閏2月天數(shù) LJMP RY2 。不夠減，判，R3為0否RM24: MOV A,R2 。不為0，R3加到R2中 ADD A,R3 。再讓閏2月減 MOV R3,00H 。還不夠，則轉(zhuǎn)RY2 SUBB A,30 MOV R1,AM121: CJNE R3,00H,M122 。R2減12月天數(shù) LJMP Y12 。不夠減，判，R3為0否M122: MOV A,R2 。不為0，R3加到R2中 ADD A,R3 。再讓12月減 MOV R2,A 。還不夠，則轉(zhuǎn)Y12 MOV R3,00H LJMP M12Y1: MOV A,R2 MOV R0,A 。R2中為日的值 LCALL D_BCD MOV 56H,A MOV 57H,01H CLR F0 。非閏月 LJMP S_PLAYY2: CJNE R2,00H,Y21 MOV A,R6 。R2中為0，則為前一個(gè)月 MOV 56H,29H 。的的最后一天 JB ,Y22 MOV 56H,30HY22: MOV 57H,01H CLR F0 LJMP S_PLAYY21: MOV A,R2 MOV R0,A 。R2中為日的值 LCALL D_BCD MOV 56H,A MOV 57H,02H CLR F0 LJMP S_PLAYRY2: CJNE R2,00H,RY21 MOV 56H,29H 。R2中為0，則為前一個(gè)月 MOV A,R6 。的的最后一天 JB ,RY22 MOV 56H,30HRY22: MOV 57H,02H CLR F0 LJMP S_PLAYRY21: MOV A,R2 。R2中為日的值 MOV R0,A LCALL D_BCD MOV 56H,A MOV 57H,02H SETB F0 。閏月 LJMP S_PLAYY3: CJNE R2,00H,Y31 LCALL CHECKRE 。查前一個(gè)月是否為閏月 CJNE A,02H,Y32 MOV 56H,29H 。前一個(gè)月是閏月 MOV A,R4 ANL A,0FH 。R2中為0，則為前一個(gè)月 JNZ Y33 。的的最后一天 MOV 56H,30H MOV 57H,02H SETB F0 LJMP S_PLAYY33: MOV 57H,02H SETB F0 LJMP S_PLAYY32: MOV 56H,29H 。前一個(gè)月不是閏月 MOV A,R6 JB ,Y34 MOV 56H,30HY34: MOV 57H,02H CLR F0 LJMP S_PLAYY31: MOV A,R2 MOV R0,A 。R2中為日的值 LCALL D_BCD MOV 56H,A MOV 57H,03H CLR F0 LJMP S_PLAYRY3: CJNE R2,00H,RY31 MOV 56H,29H MOV A,R6 JB ,RY32 。R2中為0，則為前一個(gè)月 MOV 56H,30H 。的的最后一天RY32: MOV 57H,03H CLR F0 LJMP S_PLAYRY31: MOV A,R2 。R2中為日的值 MOV R0,A LCALL D_BCD MOV 56H,A MOV 57H,03H SETB F0 LJMP S_PLAYY4: CJNE R2,00H,Y41 LCALL CHECKRE 。查前一個(gè)月是否為閏月 CJNE A,03H,Y42 MOV 56H,29H 。前一個(gè)月是閏月 MOV A,R4 。R2中為0，則為前一個(gè)月 ANL A,0FH 。的最后一天 JNZ Y43 MOV 56H,30H MOV 57H,03H SETB F0 LJMP S_PLAYY43: MOV 57H,03H SETB F0 LJMP S_PLAYY42: MOV 56H,29H 。前一個(gè)月不是閏月 MOV A,R6 JB ,Y44 MOV 56H,30HY44: MOV 57H,03H CLR F0 LJMP S_PLAYY41: MOV A,R2 。R2中為日的值 MOV R0,A LCALL D_BCD MOV 56H,A MOV 57H,04H CLR F0 LJMP S_PLAYRY4: CJNE R2,00H,RY41 MOV 56H,29H 。R2中為0，則為前一個(gè)月 MOV A,R6 。的的最后一天 JB ,RY42 MOV 56H,30HRY42: MOV 57H,04H CLR F0 LJMP S_PLAYRY41: MOV A,R2 。R2中為日的值 MOV R0,A LCALL D_BCD MOV 56H,A MOV 57H,04H SETB F0 LJMP S_PLAYY5: CJNE R2,00H,Y51 LCALL CHECKRE 。查前一個(gè)月是否為閏月 CJNE A,04H,Y52 MOV 56H,29H 。前一個(gè)月是閏月 MOV A,R4 。R2中為0，則為前一個(gè)月 ANL A,0FH 。的最后一天 JNZ Y53 MOV 56H,30H MOV 57H,04H SETB F0 LJMP S_PLAYY53: MOV 57H,04H SETB F0 LJMP S_PLAYY52: MOV 56H,29H 。前一個(gè)月不是閏月 MOV A,R6 JB ,Y54 MOV 56H,30HY54: MOV 57H,04H CLR F0 LJMP S_PLAYY51: MOV A,R2 。R2中為日的值 MOV R0,A LCALL D_BCD MOV 56H,A MOV 57H,05H CLR F0 LJMP S_PLAYRY5: CJNE R2,00H,RY51 MOV 56H,29H 。R2中為0，則為前一個(gè)月 MOV A,R6 。的最后一天 JB ,RY52 MOV 56H,30HRY52: MOV 57H,05H CLR F0 LJMP S_PLAYRY51: MOV A,R2 。R2中為日的值 MOV R0,A LCALL D_BCD MOV 56H,A MOV 57H,05H SETB F0 LJMP S_PLAYY6: CJNE R2,00H,Y61 LCALL CHECKRE 。查前一個(gè)月是否為閏月 CJNE A,05H,Y62 MOV 56H,29H 。前一個(gè)月是閏月 MOV A,R4 。R2中為0，則為前一個(gè)月 ANL A,0FH 。的最后一天 JNZ Y63 MOV 56H,30H MOV 57H,05H SETB F0 LJMP S_PLAYY63: MOV 57H,05H SETB F0 LJMP S_PLAYY62: MOV 56H,29H 。前一個(gè)月不是閏月 MOV A,R6 JB ,Y64 MOV 56H,30HY64: MOV 57H,05H CLR F0 LJMP S_PLAYY61: MOV A,R2 。R2中為日的值 MOV R0,A LCALL D_BCD MOV 56H,A MOV 57H,06H CLR F0 LJMP S_PLAYRY6: CJNE R2,00H,RY61 MOV 56H,29H 。R2中為0，則為前一個(gè)月 MOV A,R6 。的最后一天 JB ,RY62 MOV 56H,30HRY62: MOV 57H,06H CLR F0 LJMP S_PLAYRY61: MOV A,R2 。R2中為日的值 MOV R0,A LCALL D_BCD MOV 56H,A MOV 57H,06H SETB F0 LJMP S_PLAYY7: CJNE R2,00H,Y71 LCALL CHECKRE 。查前一個(gè)月是否為閏月 CJNE A,06H,Y72 MOV 56H,29H 。前一個(gè)月是閏月 MOV A,R4 。R2中為0，則為前一個(gè)月 ANL A,0FH 。的最后一天 JNZ Y73 MOV 56H,30H MOV 57H,06H SETB F0 LJMP S_pLAYY73: MOV 57H,06H SETB F0 LJMP S_PLAYY72: MOV 56H,29H 。前一個(gè)月不是閏月 MOV A,R6 JB ,Y74 MOV 56H,30HY74: MOV 57H,06H CLR F0 LJMP S_PLAYY71: MOV A,R2 。R2中為日的值 MOV R0,A LCALL D_BCD MOV 56H,A MOV 57H,07H CLR F0 LJMP S_PLAYRY7: CJNE R2,00H,RY71 MOV 56H,29H 。R2中為0，則為前一個(gè)月 MOV A,R5 。的最后一天 JB ,RY72 MOV 56H,30HRY72: MOV 57H,07H CLR F0 LJMP S_PLAYRY71: MOV A,R2 。R2中為日的值 MOV R0,A