【正文】 。密碼上限CODEWS EQU 23H 。密碼位數(shù)CODEBJ EQU 24H 。密碼比較CODECW EQU 25H 。密碼錯(cuò)誤次數(shù)CODEST EQU 30H 。密碼暫存首位地址CODEAD EQU 40H 。密碼首位地址JDCP EQU 50H 。家電產(chǎn)品。初始化 ORG 00H MOV DPTR,TAB MOV WADD,0A0H MOV RADD,0A1H MOV R4,6START0: ACALL STA MOV A,WADD ACALL WRBYT ACALL CACK JB F0,START0 MOV A,00H ACALL WRBYT ACALL CACK JB F0,START0 ACALL STOP NOP ACALL STA MOV A,RADDMAIN2: ACALL WRBYT ACALL CACK JB F0,MAIN2 MOV R1,CODEADCSONG1: ACALL RDBYT MOV @R1,A DJNZ R4,CSONG2 ACALL MNACK ACALL STOP AJMP CSHCSONG2: ACALL MACK INC R1 AJMP CSONG1CSH: MOV R0,CODEST MOV R2,00H MOV R3,00H MOV CODECW,0 MOV CODESX,32 MOV CODEWS,0 MOV CODEXX,6 SETB ZHENL SETB ZHAIJI。主程序 MAIN: JB ZHENL,MAIN INC R2 CLR TESTLED CLR SPEAKER JNB ZHENL,$ SETB TESTLED SETB SPEAKER MOV A,R2 CJNE A,32,MAIN MOV R2,00H INC R3 MOV A,R3 CJNE A,2,MAIN MOV R3,00H MOV R2,00H CLR ZHAIJI CLR TESTLED ACALL M8880 ACALL DEL100MS ACALL RE8880 ACALL DEL10MSLOOP: MOV A,CODECW CJNE A,3,START AJMP CSHSTART: ACALL JSSJ INC CODEWS MOV A,@R0 INC R0 CJNE A,12,LOOP 。確認(rèn)鍵 DEC CODEWS MOV R0,CODEST MOV R1,CODEADMIMAPD: MOV A,@R0 MOV CODEBJ,@R1 INC R0 INC R1 CJNE A,CODEBJ,LOOP1 。密碼比較 AJMP LOOP2LOOP1: MOV R0,CODEST MOV CODEWS,0 INC CODECW AJMP LOOPLOOP2: DJNZ CODEWS,MIMAPD CLR 。密碼正確亮燈指示 MOV R0,JDCPJD: ACALL JSSJ MOV A,@R0 CJNE A,1,LOOP3 。鍵 1 修改密碼。 MOV R0,CODEADMMXG: ACALL JSSJ MOV A,@R0 INC R0 INC CODEWS CJNE A,12,MMXG 。密碼修改確認(rèn)鍵 DEC CODEWS MOV R0,CODEADCSMM: ACALL STA MOV A,WADD ACALL WRBYT ACALL CACK JB F0,CSMM MOV A,00H ACALL WRBYT ACALL CACK JB F0,CSMMCSONG: MOV A,@R0 ACALL WRBYT ACALL CACK JB F0,CSONG INC R0 DJNZ CODEWS,CSONG ACALL STOP AJMP LOOP4。LOOP3: CJNE A,2,JD 。鍵 2 家電控制LOOP4: MOV R0,JDCP MOV R7,16JD0: ACALL JSSJ MOV A,@R0 CJNE A,1,JD1 MOV JDBH,01HJD1: CJNE A,2,JD2 MOV JDBH,02HJD2: CJNE A,3,JD3 MOV JDBH,04HJD3: CJNE A,4,JD4 MOV JDBH,08JD4: CJNE A,5,JD5 MOV JDBH,10HJD5: CJNE A,6,JD6 MOV JDBH,20HJD6: CJNE A,7,JD7 MOV JDBH,40HJD7: CJNE A,8,JD8 MOV JDBH,80HJD8: CJNE A,11,JD9 JNB ,JDON1 CLR LED1JDON1: JNB ,JDON2 CLR LED2JDON2: JNB ,JDON3 CLR LED3JDON3: JNB ,JDON4 CLR LED4JDON4: JNB ,JDON5 CLR LED5JDON5: JNB ,JDON6 CLR LED6JDON6: JNB ,JDON7 CLR LED7JDON7: JNB ,JD9 CLR LED8JD9: CJNE A,12,JD10 JNB ,JDOFF1 SETB LED1JDOFF1: JNB ,JDOFF2 SETB LED2JDOFF2: JNB ,JDOFF3 SETB LED3JDOFF3: JNB ,JDOFF4 SETB LED4JDOFF4: JNB ,JDOFF5 SETB LED5JDOFF5: JNB ,JDOFF6 SETB LED6JDOFF6: JNB ,JDOFF7 SETB LED7JDOFF7: JNB ,JD10 SETB LED8JD10: DJNZ R7,JD11 ACALL DEL100MS ACALL DEL100MS AJMP CSHJD11: AJMP JD0。接收數(shù)據(jù)子程序JSSJ: ACALL READPSW ACALL REDAJCQ ACALL DISP RET。 8880 初始化 M8880: MOV P2,0FFH CLR CK SETB CK MOV P2,0DH CLR CK SETB CK MOV P2,0DH CLR CK SETB CK MOV P2,8DH CLR CK SETB CK MOV P2,0DH CLR CK SETB CK RET。讀 8880 狀態(tài)寄存器READPSW: CLR CK SETB RSO SETB RW SETB CK MOV A,P2 JNB , READPSW RET。設(shè)置為接收模式RE8880: CLR CK SETB RSO CLR RW MOV P2,4DH SETB CK RET。讀 8880 接收數(shù)據(jù)寄存器REDAJCQ: CLR CK CLR RSO SETB RW SETB CK MOV A,P2 ANL A,0F0H SWAP A MOV @R0,A RET。啟動(dòng) I2C 總線子程序STA: SETB SDA SETB SCL NOP NOP NOP NOP CLR SDA NOP NOP NOP NOP CLR SCL RET。停止 I2C 總線子程序STOP: CLR SDA SETB SCL NOP NOP NOP NOP SETB SDA NOP NOP NOP NOP CLR SDA CLR SCL RET。發(fā)送應(yīng)答位信號(hào)子程序MACK: CLR SDA SETB SCL NOP NOP NOP NOP CLR SCL SETB SDA RET。發(fā)送非應(yīng)答位信號(hào)子程序MNACK: SETB SDA SETB SCL NOP NOP NOP NOP CLR SCL