【導讀】完成時間：2021年5月24日

　　

【正文】 T2T3T4T5D7D8D9D10J1J2J3J4J574LS273M1M2M3M4M5220V220V220V220V220V 附錄二 程序清單 。初始化 ORG 00H MOV DPTR, TAB MOV WADD, 0A0H MOV RADD, 0A1H MOV R4, 6 START0: ACALL STA MOV A, WADD ACALL WRBYT ACALL CACK JB F0, START0 MOV A, 00H ACALL WRBYT ACALL ACK JB F0, START0 ACALL TOP NOP ACALL STA MOV A, RADD MAIN2: ACALL WRBYT ACALL CACK JB F0, MAIN2 MOV R1, CODEAD CSONG1: ACALL RDBYT MOV @R1, A DJNZ R4, CSONG2 ACALL MNACK ACALL STOP AJMP CSH CSONG2: ACALL ACK INC R1 AJMP CSONG1 CSH: 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 DEL10MS LOOP: MOV A, CODECW CJNE A, 3, START AJMP CSH START: ACALL JSSJ INC CODEWS MOV A, @R0 INC R0 CJNE A,12,LOOP 。確認鍵 DEC CODEWS MOV R0, CODEST MOV R1, CODEAD MIMAPD: MOV A, @R0 MOV CODEBJ, @R1 INC R0 INC R1 CJNE A,CODEBJ,LOOP1 。密碼比較 AJMP LOOP2 LOOP1: MOV R0, CODEST MOV CODEWS, 0 INC CODECW AJMP LOOP LOOP2: DJNZ CODEWS, MIMAPD CLR 。密碼正確亮燈指示 MOV R0, JDCP JD: ACALL JSSJ MOV A,@R0 CJNE A,1,LOOP3 。鍵 1 修改密碼 MOV R0, CODEAD MMXG: ACALL JSSJ MOV A, @R0 INC R0 INC CODEWS CJNE A, 12,MMXG 。密碼修改確認鍵 DEC CODEWS MOV R0, CODEAD CSMM: ACALL STA MOV A, WADD ACALL WRBYT ACALL CACK JB F0, CSMM MOV A, 00H ACALL WRBYT ACALL CACK JB F0, CSMM CSONG: 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, 16 JD0: ACALL JSSJ MOV A,@R0 CJNE A, 1, JD1 MOV JDBH, 01H JD1: CJNE A, 2, JD2 MOV JDBH, 02H JD2: CJNE A, 3, JD3 MOV JDBH, 04H JD3: CJNE A, 4,JD4 MOV JDBH, 08 JD4: CJNE A, 5, JD5 MOV JDBH, 10H JD5: CJNE A, 6, JD6 MOV JDBH, 20H JD6: CJNE A, 7, JD7 MOV JDBH, 40H JD7: CJNE A, 8, JD8 MOV JDBH, 80H JD8: CJNE A, 11, JD9 JNB , JDON1 CLR LED1 JDON1: JNB , JDON2 CLR LED2 JDON2: JNB , JDON3 CLR LED3 JDON3: JNB , JDON4 CLR LED4 JDON4: JNB , JDON5 CLR LED5 JDON5: JNB , JDON6 CLR LED6 JDON6: JNB , JDON7 CLR LED7 JDON7: JNB , JD9 CLR LED8 JD9: CJNE A, 12, JD10 JNB , JDOFF1 SETB LED1 JDOFF1: JNB , JDOFF2 SETB LED2 JDOFF2: JNB , JDOFF3 SETB LED3 JDOFF3: JNB , JDOFF4 SETB LED4 JDOFF4: JNB , JDOFF5 SETB LED5 JDOFF5: JNB , JDOFF6 SETB LED6 JD10: DJNZ R7, JD11 ACALL DEL 100MS ACALL DEL 100MS AJMP CSH JD11: AJMP JD0 。接收數(shù)據(jù)子程序 JSSJ: ACALL READPSW ACALL REDAJCQ ACALL DISP RET 。 8870 初始化 M8870: 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 。讀 8870 狀態(tài)寄存器 READPSW: CLR CK SETB RSO SETB RW SETB CK MOV A, P2 JNB , READPSW RET 。設置為接收模式 RE8870: CLR CK SETB RSO CLR RW MOV P2, 4DH SETB CK RET 。讀 8870 接收數(shù)據(jù)寄存器 REDAJCQ: CLR CK CLR RSO SETB RW SETB CK MOV A, P2 ANL A, 0F0H SWAP A MOV @R0, A RET 。啟動 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