SETB　SCL

　　NOP

　　NOP

　　MOV　C, SDA

　　MOV　I2C_ERROR, C

　　CLR　SCL

　　NOP

　　RET

　　;*******發送1字節數據，待送數據在A中******

　　I2C_SEND_1BYTE:

　　MOV　R0, #8

　　SEND100: RLC　A

　　MOV　SDA,　C

　　NOP

　　SETB　SCL

　　NOP

　　NOP

　　CLR　SCL

　　DJNZ　R0, SEND100

　　RET

　　;*******接收1字節數據，接收數據放在A中*****

　　I2C_RECEIVE_1BYTE:

　　MOV　R0,　#8

　　RECV100:　SETB　SDA

　　NOP

　　SETB　SCL

　　NOP

　　NOP

　　NOP

　　MOV　C,　SDA

　　CLR　SCL

　　RLC　A

　　DJNZ　R0,　RECV100

　　RET

　　;*******通過I2C總線向某一寄存器寫入一個字節數據*********

　　I2C_WRITE:　ACALL　I2C_START　;發啟動信號

　　MOV　A， # DeviceaddressW ;調7113地址+寫

　　ACALL　I2C_SEND_1BYTE　;發送7113地址及“寫”命令

　　ACALL　CHECK_ACK　;檢查7113的應答信號

　　JNB　I2C_ERROR, WR200　;應答正確，繼續

　　WR100:　ACALL　I2C_STOP　;應答不對，返回

　　RET

　　WR200:　MOV　A, Subaddress　;調寄存器地址

　　ACALL　I2C_SEND_1BYTE　;發送寄存器地址

　　ACALL　CHECK_ACK　;檢查7113的應答信號

　　JB　I2C_ERROR, WR100　;應答不對，返回

　　MOV　A, DATA_I2C　;調準備寫入的數據

　　ACALL　I2C_SEND_1BYTE　;發送數據字節

　　ACALL　CHECK_ACK

　　JB　I2C_ERROR, WR100

　　ACALL　I2C_STOP　;發停止信號