汇编AT24C02 一个字节程序段

;定义引脚 SDA BIT P3.3 SCL BIT P3.2 ORG 0000H MAIN: MOV 30H,#25H ;存想存的数字 MOV 31H,#34H MOV R1,30HLL: MOV B,R1 CALL W24C02 ;写入24c02 CALL R24C02 ;读出24c02 CALL DISPLAY ;显示数字 INC R1 JMP LL ;* 显示 *DISPLAY: MOV A,32H ANL A,#0F0H SWAP A MOV DPTR,#TAB1 MOVC A,A+DPTR MOV P0,A CLR P1.0 CALL DELAY ;显示延时 SETB P1.0 ANL 32H,#0FH MOV A,32H MOV DPTR,#TAB1 MOVC A,A+DPTR MOV P0,A CLR P1.1 CALL DELAY ;显示延时 RETTAB1: DB 0C0H,0F9H,0A4H,0B0H,099H,092H,082H,0F8H,080H,090H RETDELAY: MOV R7,#14H ;延迟子程序DLY: MOV R6,#0F8HDLY1: DJNZ R6 ,DLY1 DJNZ R7 ,DLY RET ;* 写入24c02*W24C02: CALL START ;写入AT24C02的程序段 MOV A,#0A0H CALL WBYTE CALL ACK MOV A,#0 CALL WBYTE CALL ACK MOV A,B CALL WBYTE CALL ACK CALL STOP CALL S005 RETS005: MOV R7,#10 ;延时程序段S0051: MOV R6,#248 DJNZ R6,$ DJNZ R7,S0051 RET ; * 读24c02*R24C02: CALL START ;读AT24c02程序段 MOV A,#0A0HCALL WBYTECALL ACKMOV A,#0CALL WBYTECALL ACKCALL STARTMOV A,#0A1HCALL WBYTECALL ACKCALL RBYTE CALL NACK CALL STOP RET ; *WBYTE: MOV R7,#8 ;写程序段WLOOP: RLC A JC WLOOP2 CLR SDA SETB SCL NOP NOP NOP NOP CLR SCL DJNZ R7,WLOOP RETWLOOP2: SETB SDA SETB SCLNOPNOPNOPNOPCLR SCLCLR SDADJNZ R7,WLOOPRET;*RBYTE: MOV R7,#8 ;读02程序段RLOOP: SETB SDA SETB SCL MOV C,SDA MOV A,32H RLC A MOV 32H,A CLR SCL DJNZ R7,RLOOP RET ;*START: SETB SDA ;复位程序段 SETB SCL NOP NOP NOP NOP CLR SDA NOP NOP NOP CLR SCL NOP RETSTOP: CLR SDA SETB SCL NOP NOP NOP NOP SETB SDA NOP NOP NOP NOP CLR SCL NOP NOP RET ; *ACK: CLR SDA ;响应程序段 应答程序 NOP SETB SCL NOP NOP NOP NOP CLR SCL NOP NOP RE