Master.asm
;/*------------------------------------------------------------------*/
;/* --- STC MCU International Limited -------------------------------*/
;/* --- STC 1T Series MCU Simulate I2C Master Demo ------------------*/
;/* --- Mobile: (86)13922805190 -------------------------------------*/
;/* --- Fax: 86-755-82944243 ----------------------------------------*/
;/* --- Tel: 86-755-82948412 ----------------------------------------*/
;/* --- Web: www.STCMCU.com -----------------------------------------*/
;/* If you want to use the program or the program referenced in the */
;/* article, please specify in which data and procedures from STC */
;/*------------------------------------------------------------------*/
SCL BIT P1.
SDA BIT P1.
;----------------------------
ORG
MOV TMOD,#20H ;初始化串口为(9600,n,8,1)
MOV SCON,#5AH
;-18432000/12/32/9600
MOV TH1,A
MOV TL1,A
SETB TR1
MAIN:
CALL UART_RXDATA ;接收下一个串口数据
MOV R0,A ;临时保存到R0
;读取I2C设备IDATA 80H的数据
CALL I2C_START ;开始读取
MOV A,#01H
CALL I2C_TXBYTE ;发送地址数据+读信号
CALL I2C_RXACK ;接收ACK
CALL I2C_RXBYTE ;接收数据
SETB C
CALL I2C_TXACK ;发送NAK
CALL I2C_STOP ;读取完成
CALL UART_TXDATA ;将读到的数据发送到串口
;将R0的数据写入I2C设备IDATA 80H
CALL I2C_START ;开始写
MOV A,#00H
CALL I2C_TXBYTE ;发送地址数据+写信号
CALL I2C_RXACK ;接收ACK
MOV A,R0
CALL I2C_TXBYTE ;写数据
CALL I2C_RXACK ;接收ACK
CALL I2C_STOP ;写完成
JMP MAIN
;----------------------------
;等待串口数据
;----------------------------
UART_RXDATA:
JNB RI,$ ;等待接收完成标志
CLR RI ;清除标志
MOV A,SBUF ;保存数据
RET
;----------------------------
;发送串口数据
;----------------------------
UART_TXDATA:
JNB TI,$ ;等待上一个数据发送完成
CLR TI ;清除标志
MOV SBUF,A ;发送数据
RET
;----------------------------
;发送I2C起始信号
;----------------------------
I2C_START:
CLR SDA ;数据线下降沿
CALL I2C_DELAY ;延时
CLR SCL ;时钟->低
CALL I2C_DELAY ;延时
RET
;----------------------------
;发送I2C停止信号
;----------------------------
I2C_STOP:
CLR SDA
SETB SCL ;时钟->高
CALL I2C_DELAY ;延时
SETB SDA ;数据线上升沿
CALL I2C_DELAY ;延时
RET
;----------------------------
;发送ACK/NAK信号
;----------------------------
I2C_TXACK:
MOV SDA,C ;送ACK数据
SETB SCL ;时钟->高
CALL I2C_DELAY ;延时
CLR SCL ;时钟->低
CALL I2C_DELAY ;延时
SETB SDA ;发送完成
RET
;----------------------------
;接收ACK/NAK信号
;----------------------------
I2C_RXACK:
SETB SDA ;准备读数据
SETB SCL ;时钟->高
CALL I2C_DELAY ;延时
MOV C,SDA ;读取ACK信号
CLR SCL ;时钟->低
CALL I2C_DELAY ;延时
RET
;----------------------------
;接收一字节数据
;----------------------------
I2C_TXBYTE:
;8位计数
TXNEXT:
RLC A ;移出数据位
MOV SDA,C ;数据送数据口
SETB SCL ;时钟->高
CALL I2C_DELAY ;延时
CLR SCL ;时钟->低
CALL I2C_DELAY ;延时
DJNZ R7,TXNEXT ;送下一位
RET
;----------------------------
;发送一字节数据
;----------------------------
I2C_RXBYTE:
;8位计数
RXNEXT:
SETB SCL ;时钟->高
CALL I2C_DELAY ;延时
MOV C,SDA
RLC A
CLR SCL ;时钟->低
CALL I2C_DELAY ;延时
DJNZ R7,RXNEXT ;收下一位
RET
;----------------------------
;2 6(200K) 1(400K) [18'432'000/400'000=46]
DJNZ R0,$
;----------------------------
END
Slave.asm
;/*------------------------------------------------------------------*/
;/* --- STC MCU International Limited -------------------------------*/
;/* --- STC 1T Series MCU Simulate I2C Slave Demo -------------------*/
;/* --- Mobile: (86)13922805190 -------------------------------------*/
;/* --- Fax: 86-755-82944243 ----------------------------------------*/
;/* --- Tel: 86-755-82948412 ----------------------------------------*/
;/* --- Web: www.STCMCU.com -----------------------------------------*/
;/* If you want to use the program or the program referenced in the */
;/* article, please specify in which data and procedures from STC */
;/*------------------------------------------------------------------*/
SCL BIT P1.
SDA BIT P1.
;----------------------------
ORG
RESET:
SETB SCL
SETB SDA
CALL I2C_WAITSTART ;等待起始信号
CALL I2C_RXBYTE ;接收地址数据
CLR C
CALL I2C_TXACK ;回应ACK
SETB C ;读/写 IDATA[80H - FFH]
RRC A ;读/写位->C
MOV R0,A ;地址送入R0
JC READDATA ;C=1(读) C=0(写)
WRITEDATA:
CALL I2C_RXBYTE ;接收数据
MOV @R0,A ;写入IDATA
INC R0 ;地址+1
CLR C
CALL I2C_TXACK ;回应ACK
CALL I2C_WAITSTOP ;等待停止信号
JMP RESET
READDATA:
MOV A,@R0
INC R0
CALL I2C_TXBYTE ;发送IDATA数据
CALL I2C_RXACK ;接收ACK
CALL I2C_WAITSTOP ;等待停止信号
JMP RESET
;----------------------------
;等待起始信号
;----------------------------
I2C_WAITSTART:
JNB SCL,$ ;等待时钟->高
JB SDA,$ ;等待数据线下降沿
JB SCL,$ ;等待时钟->低
RET
;----------------------------
;等待结束信号
;----------------------------
I2C_WAITSTOP:
JNB SCL,$ ;等待时钟->高
JNB SDA,$ ;等待数据线上升沿
RET
;----------------------------
;发送ACK/NAK信号
;----------------------------
I2C_TXACK:
MOV SDA,C ;送ACK数据
JNB SCL,$ ;等待时钟->高
JB SCL,$ ;等待时钟->低
SETB SDA ;发送完成
RET
;----------------------------
;接收ACK/NAK信号
;----------------------------
I2C_RXACK:
SETB SDA ;准备读数据
JNB SCL,$ ;等待时钟->高
MOV C,SDA ;读取ACK信号
JB SCL,$ ;等待时钟->低
RET
;----------------------------
;接收一字节数据
;----------------------------
I2C_RXBYTE:
;8位计数
RXNEXT:
JNB SCL,$ ;等待时钟->高
MOV C,SDA ;读取数据口
RLC A ;保存数据
JB SCL,$ ;等待时钟->低
DJNZ R7,RXNEXT ;收下一位
RET
;----------------------------
;发送一字节数据
;----------------------------
I2C_TXBYTE:
;8位计数
TXNEXT:
RLC A ;移出数据位
MOV SDA,C ;数据送数据口
JNB SCL,$ ;等待时钟->高
JB SCL,$ ;等待时钟->低
DJNZ R7,TXNEXT ;送下一位
RET
;----------------------------
END
另外Slave.asm
SCL BIT P1.
SDA BIT P1.
;----------------------------
ORG
MAIN:
MOV TMOD,#20H;设T1工作方式2
MOV TH1,#0FDH;赋记数初值
MOV TL1,#0FDH;赋记数值
SETB TR1;启动定时器T1
MOV PCON,#80H;设SMOD=1
MOV SCON,#0D0H;置串行口方式3,允许接收
;
RESET:
SETB SCL
SETB SDA
CALL I2C_WAITSTART ;等待起始信号
CALL I2C_RXBYTE ;接收地址数据
CLR C
CALL I2C_TXACK ;回应ACK
SETB C ;读/写 IDATA[80H - FFH]
RRC A ;读/写位->C
MOV R0,A ;地址送入R0
JC READDATA ;C=1(读) C=0(写)
WRITEDATA:
CALL I2C_RXBYTE ;接收数据
MOV @R0,A ;写入IDATA
INC R0 ;地址+1
CLR C
CALL I2C_TXACK ;回应ACK
CALL I2C_WAITSTOP ;等待停止信号
JMP RESET
READDATA:
MOV A,@R0
INC R0
CALL I2C_TXBYTE ;发送IDATA数据
CALL I2C_RXACK ;接收ACK
CALL I2C_WAITSTOP ;等待停止信号
; DJNZ R2,RX;
JMP RESET
;RX:
; MOV C,P;
; MOV TB8,C;
; MOV SBUF,A;发送数据
; JNB TI,$;
; CLR TI;
; MOV R2,#8;
; RET
;----------------------------
;等待起始信号
;----------------------------
I2C_WAITSTART:
JNB SCL,$ ;等待时钟->高
JB SDA,$ ;等待数据线下降沿
JB SCL,$ ;等待时钟->低
RET
;----------------------------
;等待结束信号
;----------------------------
I2C_WAITSTOP:
JNB SCL,$ ;等待时钟->高
JNB SDA,$ ;等待数据线上升沿
RET
;----------------------------
;发送ACK/NAK信号
;----------------------------
I2C_TXACK:
MOV SDA,C ;送ACK数据
JNB SCL,$ ;等待时钟->高
JB SCL,$ ;等待时钟->低
SETB SDA ;发送完成
RET
;----------------------------
;接收ACK/NAK信号
;----------------------------
I2C_RXACK:
SETB SDA ;准备读数据
JNB SCL,$ ;等待时钟->高
MOV C,SDA ;读取ACK信号
JB SCL,$ ;等待时钟->低
RET
;----------------------------
;接收一字节数据
;----------------------------
I2C_RXBYTE:
;8位计数
RXNEXT:
JNB SCL,$ ;等待时钟->高
MOV C,SDA ;读取数据口
RLC A ;保存数据
MOV SBUF,A;发送数据
JNB TI,$;
CLR TI;
JB SCL,$ ;等待时钟->低
DJNZ R7,RXNEXT ;收下一位
RET
;----------------------------
;发送一字节数据
;----------------------------
I2C_TXBYTE:
;8位计数
TXNEXT:
RLC A ;移出数据位
MOV SDA,C ;数据送数据口
JNB SCL,$ ;等待时钟->高
JB SCL,$ ;等待时钟->低
DJNZ R7,TXNEXT ;送下一位
RET
;----------------------------
END