【正文】 EY_3,J5 MOV A,WORD_4 CJNE A,KEY_4,J5 MOV A,WORD_5 CJNE A,KEY_5,J5 MOV A,WORD_6 CJNE A,KEY_6,J5 SETB LED_YELLOW CLR LED_GREEN 。開鎖指示燈A1: MOV LED_BIT_1,05H 。PASS MOV LED_BIT_2,05H MOV LED_BIT_3,10H MOV LED_BIT_4,0FH MOV LED_BIT_5,0CH MOV LED_BIT_6,0CH LCALL BCD LCALL DISP MOV CNT_ERROR,00H MOV KEY_CNT,00H LCALL DLY_1S LJMP A0 ENTER_KEY: LCALL ALARM_1 LCALL FALSE LJMP A1 J5: CLR LED_RED 。密碼錯(cuò)誤 INC CNT_ERROR LCALL ERROR LCALL ALARM_2 LJMP START J4: LCALL ALARM_1 LCALL FALSE LJMP START J3: INC KEY_CNT 。按下數(shù)字鍵 MOV A,KEY_CNT JNB LED_GREEN,NUM_ON CJNE A,07H,K1 LCALL ALARM_1 LCALL FALSE LJMP W10 NUM_ON: LCALL ALARM_1 LCALL FALSE LJMP A1 W10: LCALL DLY_S 。等待按鍵抬起 MOV A,P1 CJNE A,0FH,W11 LJMP START W11:MOV A,P1 CJNE A,0F0H,W12 LJMP START W12:SJMP W10 LJMP START K1: LCALL SHIFTL ；屏幕顯示內(nèi)容移動(dòng) LCALL BCD LCALL DISP W20:LCALL DLY_S 。等待按鍵抬起 MOV A,P1 CJNE A,0FH,W21 LJMP A0 W21:MOV A,P1 CJNE A,0F0H,W22 LJMP A0 W22:SJMP W20 LJMP A0 更改密碼的過程：SET_P：CLR LED_GREEN ；更改系統(tǒng)狀態(tài)及屏幕顯示內(nèi)容 SETB LED_YELLOW SETB LED_RED MOV LED_BIT_1,0CH 。led燈全滅 MOV LED_BIT_2,0CH MOV LED_BIT_3,0CH MOV LED_BIT_4,0CH MOV LED_BIT_5,0CH MOV LED_BIT_6,0CH LCALL BCD LCALL DISP*************鍵盤掃描（重復(fù)過程）********************A0_SET: NOPLSCAN_SET: MOV P1,0F0H 。掃描行碼 L1_SET: JNB ,L2_SET LCALL DLY_S JNB ,L2_SET MOV LINE,00H LJMP RSCAN_SET L2_SET: JNB ,L3_SET LCALL DLY_S JNB ,L3_SET MOV LINE,01H LJMP RSCAN_SET L3_SET: JNB ,L4_SET LCALL DLY_S JNB ,L4_SET MOV LINE,02H LJMP RSCAN_SET L4_SET: JNB ,A0_SET LCALL DLY_S JNB ,A0_SET MOV LINE,03HRSCAN_SET: MOV P1,0FH 。掃描列碼 C1_SET: JNB ,C2_SET MOV ROW,00H LJMP CALCU_SET C2_SET: JNB ,C3_SET MOV ROW,01H LJMP CALCU_SET C3_SET: JNB ,C4_SET MOV ROW,02H LJMP CALCU_SET C4_SET: JNB ,C1_SET MOV ROW,03H LJMP CALCU_SETCALCU_SET: MOV A,LINE 。計(jì)算鍵值 MOV B,04H MUL AB ADD A,ROW MOV VAL,A。**************************************。鍵盤處理。處理方法：先用減法(VAL10)判斷是否是09的數(shù)字，再判斷是否是enter鍵，再修改密碼。*****************************************CLR CMOV VAL,ASUBB A,10JC NUMBER_SET_ZHONGZHUAN 。是否是數(shù)字鍵AJMP LOCK_ZHONGZHUANNUMBER_SET_ZHONGZHUAN:LJMP NUMBER_SETLOCK_ZHONGZHUAN:MOV A VAL CINE A ,0DH NEX0 。是否是lock鍵 W00_LOCK_SET: LCALL DLY_S MOV A,P1 CJNE A,0FH,W01_LOCK_SET LJMP FIRST W01_LOCK_SET: MOV A,P1 CJNE A,0F0H,W02_LOCK_SET LJMP FIRST W02_LOCK_SET: SJMP W00_LOCK_SET LJMP FIRSTNEX0: MOV A,VAL CJNE A,0AH,NEXT1 。是否為CLR鍵 MOV R1,KEY_CNT_SET CJNE R1,00H,CLR_SET LCALL ALARM_1 LCALL FALSE LJMP SET_PCLR_SET:LCALL SHIFTR_SETP DEC WORD_ADRESS DEC KEY_CNT_SET LCALL BCD LCALL DISP 。等待按鍵抬起 W00_CLR: LCALL DLY_S MOV A,P1 CJNE A,0FH,W01_CLR LJMP A0_SET W01_CLR: MOV A,P1 CJNE A,0F0H,W02_CLR LJMP A0_SET W02_CLR: SJMP W00_CLR NEXT1:CJNE A,0BH,NEXT 。判斷是否為ENTER鍵 MOV R1,KEY_CNT_SET CJNE R1,06H,NEXT INC SET_TIMES MOV A,SET_TIMES CJNE A,02H,TIMES1 LCALLDLY_1S MOV A,WORD_6 。比較密碼 CJNE A,KEY_1,J_RSET MOV A,WORD_5 CJNE A,KEY_2,J_RSET MOV A,WORD_4 CJNE A,KEY_3,J_RSET MOV A,WORD_3 CJNE A,KEY_4,J_RSET MOV A,WORD_2 CJNE A,KEY_5,J_RSET MOV A,WORD_1 CJNE A,KEY_6,J_RSET。向24C01C中寫數(shù)據(jù),數(shù)據(jù)存放在24C01C中4CH開始的16個(gè)字節(jié)中 MOV SLA,0A0H 。24C01C地址字,寫操作 MOV SUBA,00H 。目標(biāo)地址 MOV NUMBYTE,6 。字節(jié)數(shù) LCALL IWRNBYTE 。寫數(shù)據(jù) 。***************************************************。 MOV KEY_CNT_SET,00h LCALL DLY_1S 。加延時(shí)程序!!!!!!!! LJMP FIRST TIMES1:MOV R0,WORD_1SET；用戶第一次的新密碼暫時(shí)存儲(chǔ)在內(nèi)部 MOV WORD_1 , @R0 MOV R0,WORD_2SET MOV WORD_2 , @R0 MOV R0,WORD_3SET MOV WORD_3 , @R0 MOV R0,WORD_4SET MOV WORD_4 , @R0 MOV R0,WORD_5SET MOV WORD_5 , @R0 MOV R0,WORD_6SET MOV WORD_6 , @R0 LCALLDLY_1S 。加延時(shí)程序!!!!!!!! MOVKEY_CNT_SET,00h LJMP SET_PJ_RSET: MOV SET_TIMES,00H MOV KEY_CNT_SET,00h MOV WORD_ADRESS,4CH LJMP SET_P NEXT: LCALL ALARM_1 LCALL FALSE。 LCALL DLY_1S MOV KEY_CNT_SET,00H MOV SET_TIMES,00H MOV WORD_ADRESS,4CH LJMP SET_P。和10比大小，相等則判斷數(shù)字個(gè)數(shù)，不等則報(bào)警NUMBER_SET：INC KEY_CNT_SET 。按下數(shù)字鍵 MOV A,KEY_CNT_SET CJNE A,07H,K1_SET CLR LED_RED LCALL ALARM_1 LCALL FALSE LCALL DLY_1S MOV WORD_ADRESS,4CH MOV SET_TIMES,00H MOV KEY_CNT_SET,00H。 LJMP SET_P LCALL BCD LCALL DISP 。等待按鍵抬起 W10_SET:LCALL DLY_S MOV A,P1 CJNE A,0FH,W11_SET LJMP SET_P W11_SET:MOV A,P1 CJNE A,0F0H,W12_SET LJMP SET_P W12_SET:SJMP W10_SET LJMP SET_P K1_SET: MOV A,VAL MOV R0,WORD_ADRESS MOV @R0,A INC WORD_ADRESS LCALL SHIFTL_SETP LCALL BCD LCALL DISP 。等待按鍵抬起 W20_SET:LCALL DLY_S MOV A,P1 CJNE A,0FH,W21_SET LJMP A0_SET W21_SET: MOV A,P1 CJNE A,0F0H,W22_SET LJMP A0_SET W22_SET: SJMP W20_SET LJMP A0_SET 。****************************************************************。向器件指定子地址寫N個(gè)數(shù)據(jù)。入口參數(shù):器件子地址SLA,子地址SUBA,發(fā)送數(shù)據(jù)緩沖區(qū)MTD,發(fā)送字節(jié)數(shù)NUMBYTE。****************************************************************IWRNBYTE:MOV R3,NUMBYTE LCALL START_I2C 。啟動(dòng)總線 MOV A,SLA LCALL WRBYTE 。發(fā)送器件地址字 LCALL CACK JNB ACK,RETWRN 。無應(yīng)答則退出 MOV A,SUBA 。指定子地址 LCALL WRBYTE LCALL CACK MOV R1,MTDWRDA: MOV A,@R1 LCALL WRBYTE 。開始寫入數(shù)據(jù) LCALL CACK JNB ACK,IWRNBYTE INC R1 DJNZ R3,WRDA 。判斷是否寫完RETWRN:LCALL STOP RET。****************************************************************。從器件指定子地址讀取N個(gè)數(shù)據(jù)。入口參數(shù):器件地址字SLA,子地址SUBA,接收數(shù)據(jù)緩存區(qū)MRD,接收字節(jié)數(shù)NUMBYTE。****************************************************************IRDNBYTE:MOV R3,NUMBYTE LCALL START_I2C MOV A,SLA LCALL WRBYTE 。