【正文】 字節(jié)）。使用寄存器：A,B, 3區(qū)工作寄存器。使用內(nèi)存單元: 24H28H。輸入: BCD存在24H，25H（低位在25H）。輸出: 十六進(jìn)制數(shù)存在27H，28H（低位在28H）。===========================================BCDHEX: LCALL WATCHDOG MOV A,BCDH XCH A,BCDL MOV BCDH,A MOV R1,HEXH MOV R0,BCDL MOV R7,02H 。2字節(jié) MOV A,R1 MOV R6,A MOV A,R7 MOV R3,A CLR ASC10: MOV @R1,A INC R1 DJNZ R3,SC10 MOV A,R7 MOV R3,ASC13: LCALL SC11 MOV A,@R0 ANL A,0F0H SWAP A LCALL SC12 LCALL SC11 MOV A,@R0 ANL A,0FH LCALL SC12 DEC R0 DJNZ R3,SC13 MOV A,HEXH XCH A,HEXL MOV HEXH,A RETSC11: MOV A,R7 MOV R4,A MOV A,R6 MOV R1,A CLR C MOV R2,00HSC14: MOV A,@R1 MOV B,0AH PUSH PSW MUL AB POP PSW ADDC A,R2 MOV @R1,A MOV R2,B INC R1 DJNZ R4,SC14 RETSC12: MOV R5,A MOV A,R6 MOV R1,A MOV A,R7 MOV R4,A MOV A,R5 ADD A,@R1 MOV @R1,A INC R1 DEC R4 MOV A,R4 JNZ SC15 LJMP SC16SC15: MOV A,@R1 ADDC A,00H MOV @R1,A INC R1 DJNZ R4,SC15SC16: RET。 ============================。24C01存儲器I2C總線讀寫程序。 ============================RDDATA: MOV R1,30H 。讀出數(shù)據(jù)寫入內(nèi)部RAM的起始地址 MOV R2,0 。讀出24C01的起始地址 MOV R3,3 。讀出數(shù)據(jù)的個(gè)數(shù)（3個(gè)字節(jié)）LOOP: MOV Address,R2 。送24C01單元地址 LCALL I2C_READ 。讀出數(shù)據(jù) MOV @R1,A 。存讀出的數(shù)據(jù) INC R1 。指向下一個(gè)內(nèi)部RAM單元 INC R2 。指向下一個(gè)24C01的單元 DJNZ R3,LOOP 。沒有讀完則轉(zhuǎn)移 RET WRDATA: MOV R1,30H 。要存儲的數(shù)據(jù)在內(nèi)部RAM中的起始地址 MOV A,@R1 MOV R2,0 。寫入單元的起始地址 MOV R3,3 。寫入數(shù)據(jù)的個(gè)數(shù)（3個(gè)字節(jié)）LOOP1: MOV Address,R2 。傳送寫入的地址 MOV I2CData,A 。傳送需要寫入的數(shù)據(jù) LCALL I2C_WRITE 。寫入數(shù)據(jù) INC R1 。指向下一個(gè)內(nèi)部RAM單元 INC R2 。指向下一個(gè)24C01單元 MOV A,@R1 DJNZ R3,LOOP1 。沒有寫完則轉(zhuǎn)移 RET。==============================================。寫一個(gè)字節(jié) Address地址 I2CDatata寫入的數(shù)據(jù)。==============================================I2C_WRITE: LCALL I2C_START MOV A,10100000B LCALL I2C_SEND8BIT LCALL I2C_ACK JC I2C_WRITE 。=1，表示無確認(rèn)，再次發(fā)送 MOV A, Address LCALL I2C_SEND8BIT LCALL I2C_ACK MOV A,I2CData LCALL I2C_SEND8BIT LCALL I2C_ACK LCALL I2C_STOP RET。=========================================。讀一個(gè)字節(jié) Address地址 Data讀出的數(shù)據(jù)。=========================================I2C_READ: LCALL I2C_START MOV A,10100000B LCALL I2C_SEND8BIT LCALL I2C_ACK JC I2C_READ 。=1，表示無確認(rèn)，再次發(fā)送 MOV A, Address LCALL I2C_SEND8BIT LCALL I2C_ACKI2C_READ_B: LCALL I2C_START MOV A,10100001B LCALL I2C_SEND8BIT LCALL I2C_ACK JC I2C_READ_B LCALL I2C_RECEIVE8BIT MOV I2CData,A LCALL I2C_ACK LCALL I2C_STOP RET。==========================。發(fā)送開始信號。==========================I2C_START: SETB SCL SETB SDA NOP NOP CLR SDA NOP NOP CLR SCL RET。=========================。發(fā)送結(jié)束信號。=========================I2C_STOP: CLR SDA NOP NOP SETB SCL NOP NOP SETB SDA RET。==========================。發(fā)送接收確認(rèn)信號。使用寄存器：Cy。出口參數(shù)：Cy中為ACK信號。==========================I2C_ACk: SETB SDA SETB SCL NOP NOP JB SDA,I2C_ACK0 CLR C SJMP I2C_ACK_ENDI2C_ACK0: SETB CI2C_ACK_END: CLR SCL RET。===========================。發(fā)送八位數(shù)據(jù)。使用寄存器：A，B 和 Cy。入口參數(shù)：A中為發(fā)送的數(shù)據(jù)。===========================I2C_SEND8BIT: MOV B,08HI2C_SEND8BIT_A: RLC A MOV SDA,C SETB SCL NOP NOP CLR SCL DJNZ B,I2C_SEND8BIT_A RET。=============================。接收八位數(shù)據(jù)。使用寄存器：A，B 和 Cy。出口參數(shù)：A中為接收的數(shù)據(jù)。=============================I2C_RECEIVE8BIT: MOV B,08H CLR A SETB SDAI2C_RECEIVE8IT_A: SETB SCL NOP NOP MOV C,SDA RLC A CLR SCL DJNZ B,I2C_RECEIVE8IT_A RET。=============================。外部中斷0中斷服務(wù)程序（鍵盤）。=============================INTER0: PUSH PSW 。保護(hù)現(xiàn)場 PUSH DPH PUSH DPL PUSH ACC LCALL WATCHDOG LCALL DELAY 。調(diào)用延時(shí)子程序 MOV A,0FFH 。讀P1口前置1 MOV P1,A MOV A,P1 CJNE A,0FFH,INTLP 。判斷是否誤讀 SJMP INTOUT 。誤讀則退出中斷INTLP: JNB ,SETKEY 。按下設(shè)置鍵,則轉(zhuǎn) JNB ,ADDKEY 。按下“加1鍵”，則 JNB ,SUBKEY 。按下“減1鍵”，則 JNB ,LFTKEY 。按下“左移位鍵”，則轉(zhuǎn) JNB ,RGTKEY 。按下“右移位鍵”，則轉(zhuǎn) JNB ,ENTKEY 。按下“確認(rèn)鍵”，則轉(zhuǎn) SJMP INTOUT 。轉(zhuǎn)退出中斷SETKEY: SETB SETING 。置設(shè)置狀態(tài)標(biāo)志 SJMP INTOUT 。轉(zhuǎn)退出中斷ADDKEY:SETB ADDING 。置加1狀態(tài)標(biāo)志 SJMP INTOUTSUBKEY: SETB SUBING 。置減1狀態(tài)標(biāo)志 SJMP INTOUTLFTKEY: SETB LFTING 。置左移位狀態(tài)標(biāo)志 SJMP INTOUTRGTKEY: SETB RGTING 。置右移位狀態(tài)標(biāo)志 SJMP INTOUTENTKEY: SETB ENTING 。置確認(rèn)狀態(tài)標(biāo)志 SJMP INTOUTINTOUT: POP ACC ?；謴?fù)現(xiàn)場 POP DPL POP DPH POP PSW RETI 。中斷返回。=============================。延時(shí)子程序(20ms)。使用寄存器:R6,R7。=============================DELAY: MOV R6,10DLP1: MOV R7,250DLP2: NOP NOP DJNZ R7,DLP2 DJNZ R6,DLP1 RET。=============================。定時(shí)器0中斷服務(wù)程序（顯示）。使用寄存器：A、R0、DPTR。=============================TT0: PUSH PSW 。保護(hù)現(xiàn)場 PUSH DPH PUSH DPL PUSH ACC LCALL WATCHDOG CLR TR0 。停止T0定時(shí) MOV TH0,9EH 。重裝T0定時(shí)初值 MOV TL0,58H SETB TR0 。啟動(dòng)T0定時(shí) JB SETING,FPLAY 。設(shè)置狀態(tài)標(biāo)志為1,則轉(zhuǎn)閃爍顯示 MOV A,BAIWEI CJNE A,00H,NPLAY 。判斷百位是否為零 MOV DPTR,LEDH MOV A,0 。熄滅百位無效零 MOVX @DPTR,A MOV A,SHIWEI CJNE A,00H,NPLAY 。判斷十位是否為零 MOV DPTR,LEDM MOV A,0 。熄滅十位無效零 MOVX @DPTR,A MOV A,GEWEI 。顯示個(gè)位 MOV DPTR,LEDTAB 。取段碼表首地址 MOVC A,@A+DPTR 。查表 MOV DPTR,LEDL 。取數(shù)碼管地址 MOVX @DPTR,A 。送顯示 LJMP OUTT0 。轉(zhuǎn)退出NPLAY: MOV A,GEWEI 。顯示個(gè)位 MOV DPTR,LEDTAB MOVC A,@A+DPTR MOV DPTR,LEDL MOVX @DPTR,A MOV A,SHIWEI 。顯示十位 MOV DPTR,LEDTAB MOVC A,@A+DPTR MOV DPTR,LEDM MOVX @DPTR,A MOV A,BAIWEI 。顯示百位 CJNE A,00H,NPL1 。百位為0則熄滅百位數(shù)碼管 SJMP NPL2NPL1: MOV DPTR,LEDTAB 。取段碼表首地址 MOVC A,@A+DPTR 。查表NPL2: MO