【正文】 C = IIF(R6=1, 0, 1) MOV F0, C 。3 年 366 + 365 + 365 = 7*156+3 + 1 。1 年 366 = 7*52 + 1 + 1 。X 1 年: 。 A = (BIN \4 ) * 2 ** MOV C, F0 。 X 4年：3 * 365 + 366 = 7*209 + (2) ** XRL A, R6 。 MOD4 ANL A, 3 XCH A, R6 。 ADD A, R6 。 16X+Y == 10X+Y SWAP A MOV B, (2566) 。 STACK: 0 bytes (不包括調(diào)用） MOV R6, A 。 C IIF( (BIN(A) MOD 4)=0, 1, 0 ) 。 ACC (BIN(A) \ 4) * 2 (BIN(A) MOD 4) F0 。 F0 : 大世紀(jì) 。 入口： 。 B. MOD 4 。12H 17: 調(diào)整數(shù) BCD2BIN_MOD4: 。10H BIT 5..7: 星期調(diào)整數(shù) DB 2*2 + 1 * 32+16 。0EH RET 。0CH ANL C, F0 。0AH ANL A, 07H 。 6 BYTES 。8 BIT 4: 0: 1/2月 DB 2*2 + 3 * 32+16 。6 11: 31 天 DB 3*2 + 4 * 32+16 。4 01： DB 3*2 + 6 * 32+16 。2 ** BIT 1..2: 月大小 DB 3*2 + 1 * 32+16 。 大年調(diào)整準(zhǔn)備 ADDC A, 28 POP PSW RETWNL_TAB: DB 3*2 + 5 * 32+0 。 月調(diào)整 MOV B, 7 DIV AB 。 0 = 0 + 0 + 1 + (1) *** MOV R5, AWNL_1: MOV A, YF ADD A, (WNL_TAB$4) MOVC A, A+PC MOV R6, A SWAP A ACALL WNL_F0。 R5: 星期 MOV A, NH JZ WNL_1 ACALL BCD2BIN_MOD4 XCH A, R5 SUBB A, R5 。 邊界調(diào)整 MOV R5, A 。 A=A*2+C A = {1,2,4,6} **** XRL A, 10000111B 。 {1,2,4,6} MOV A, R6 。 200年 = 7 * 10435 + 7 + 1 4 4 = 2 * 2 。 000年 = 7 * 0 + 0 + 1 1 1 = 0 * 2 + 1 **** 。 =146097天 = 7 * 20871 + 0 天 。沒有鍵按下,存入0FFH M_K_VALUE DATA 58H //存放鍵值 C_CHOOSE DATA 59H //選擇某個(gè)鬧鐘進(jìn)行設(shè)置,存00H表示未選中任何鬧鐘 K_STORE DATA 5AH L_R_BUTTON DATA 5BH //記錄左/右移動(dòng)按鈕按下次數(shù) C_STATUS DATA 5CH //用其中前5位分別記錄5個(gè)鬧鐘開/關(guān)的狀態(tài) K_SCAN DATA 0F8FFH //矩正鍵盤行控制,列讀取 //位變量: T_SET_SWI BIT 7FH //存放時(shí)間設(shè)置開關(guān)的狀態(tài) D_SHOW_SWI BIT 7EH //存放萬(wàn)年歷顯示開關(guān)的狀態(tài) //M_K_CHECK: MOV DPTR , K_SCAN MOV A , 0FEH MOV R3 , 00HSTA_CHECK: PUSH ACC MOVX DPTR , A MOVX A , DPTR ANL A , 0FH CJNE A , 0FH , K_DOWN AJMP NEXT_COLK_DOWN: LCALL DELAY_20MS MOV K_STORE , A MOVX A , DPTR ANL A , 0FH CJNE A , K_STORE , NEXT_COL //抖動(dòng)，掃描下一行 LCALL K_D_DEALK_J: CJNE A , 0AH , SITU1 //判斷時(shí)間設(shè)置開關(guān) CPL T_SET_SWI MOV C_CHOOSE , 00H CLR D_SHOW_SWI MOV L_R_BUTTON , 00H JMP WAITSITU1: CJNE A , 0BH , SITU2 //判斷鬧鐘選擇開關(guān) LCALL S1_DEAL JMP WAITSITU2: CJNE A , 0DH , SITU3 //判斷萬(wàn)年歷顯示開關(guān) SETB D_SHOW_SWI CLR T_SET_SWI MOV C_CHOOSE , 00H JMP WAITSITU3: CJNE A , 0EH , SITU4 //判斷是否為鬧鐘開、關(guān)設(shè)置開關(guān) LCALL S3_DEAL JMP WAIT SITU4: CJNE A , 0CH , SITU5 //左移按鈕 LCALL S4_DEAL JMP WAITSITU5: CJNE A , 0FH , SITU6 //右移按鈕 LCALL S5_DEAL JMP WAITSITU6: JNB T_SET_SWI , C_CHECK //數(shù)字鍵 LCALL S6_T_DEAL JMP WAITC_CHECK:MOV A , C_CHOOSE JZ WAIT LCALL S6_C_DEAL// JMP WAITWAIT: MOVX A , DPTR ANL A , 0FH CJNE A , K_STORE , NEXT_COL SJMP WAITNEXT_COL: CLR D_SHOW_SWI POP ACC RL A INC R3 CJNE R3 , 04H , STA_CHECKRETURN: RET//計(jì)算按鍵鍵值，存于M_K_VALUEK_D_DEAL: CPL A ANL A , 0FH MOV M_K_VALUE , 00HROW: CJNE A , 01H , RRIGHT SJMP CAL_K_VALUE RRIGHT: RR A INC M_K_VALUE SJMP ROWCAL_K_VALUE: MOV A , R3 MOV B , 04H MUL AB ADD A , M_K_VALUE MOV M_K_VALUE , A RET//處理鬧鐘選擇開關(guān)按下S1_DEAL: CLR T_SET_SWI CLR D_SHOW_SWI INC C_CHOOSE MOV L_R_BUTTON , 00H MOV A , C_CHOOSE CJNE A , 06H , S1_RET MOV C_CHOOSE , 00HS1_RET: RET//處理鬧鐘開、關(guān)設(shè)置開關(guān)按下S3_DEAL:MOV A , C_CHOOSE JZ S3_RET MOV R4 , A MOV A , 80HGET_S: RL A DJNZ R4 , GET_S XRL C_STATUS , AS3_RET: RET//處理左移按鈕按下S4_DEAL: JNB T_SET_SWI , S4_C INC L_R_BUTTON MOV A , L_R_BUTTON CJNE A , 02H , S4_JF INC L_R_BUTTON RETS4_JF: CJNE A , 05H , S4_ST INC L_R_BUTTON RET/*S4_JT: CJNE A , 0AH , S4_TT INC L_R_BUTTON RETS4_TT: CJNE A , 0DH , S4_ST INC L_R_BUTTON RET*/S4_ST: CJNE A , 10H , S4_RET MOV L_R_BUTTON , 00H RETS4_C: MOV A , C_CHOOSE JZ S4_RET INC L_R_BUTTON MOV A , L_R_BUTTON CJNE A , 02H , S4_JF1 INC L_R_BUTTON RETS4_JF1: CJNE A , 05H , S4_RET MOV L_R_BUTTON , 00HS4_RET: RET//右移按鈕按下處理S5_DEAL:JNB T_SET_SWI , S5_C DEC L_R_BUTTON MOV A , L_R_BUTTON CJNE A , 02H , S5_JF D