7.2任务十三可调速加热控制器 SCI EQU P30 SDA QU P31 DJNZ R5, I2CW AGAIN 连续写N个字节 ;写24C02子程序 CLR SDA;SDA位置0,准备送停止信号 I 2C WRITE ACALL DELAY;延时以满足传输速率要求 SETB SDA SETB SCL 发送停止信号 SETB SCL ACALL DELAY CLR SDA 发开始信号 SETB MOV A R3 发器件地址 RET ACALL SEND 调发送单字节子SEND 程序 MOV RO. #08H MOV A. R4 送片内字节地址 I 2CW LOOP ACALL SEND CLR SCL;开始[信号之后的]写地址操作 I 2CW AGAIN: SCL清’0 MOV A,@R1 RLC ACALL SEND Mov SDA. C INO RI7.2 任务十三 可调速加热控制器 SCL EQU P30 SDA EQU P31 ;写24C02子程序 I2C_WRITE: SETB SDA SETB SCL CLR SDA ;发开始信号 MOV A,R3 ;发器件地址 ACALL SEND ;调发送单字节子 程序 MOV A,R4 ;送片内字节地址 ACALL SEND I2CW_AGAIN: MOV A,@R1 ACALL SEND INC R1 DJNZ R5,I2CW_AGAIN ;连续写N个字节 CLR SDA ;SDA位置0，准备送停止信号 ACALL DELAY ;延时以满足传输速率要求 SETB SCL ;发送停止信号 ACALL DELAY SETB SDA RET SEND: MOV R0,#08H I2CW_LOOP: CLR SCL ; 开 始[ 信 号 之 后的 ] 写 地址 操 作 SCL清'0' RLC A MOV SDA,C