IIC读写AT24C02代码2——串口命令控制多页读写

/*-----------------------------------------------
IIC编程 1
编写：Louis
邮箱：kaly.liu@163.com
日期：2015.06.01
修改：通过串口命令R/W，控制EEPROM的读R写W。并从串口提示。
改进：增加对页读写功能
晶振：11.0592MHZ
NOTE：*通过实测发现，AT24C02可以连续写入16BYTE字节，而且地址要连续的两个页。就是0~15,16~31，。。。
------------------------------------------------*/
#include <REG52.H>

#include<string.h>
#include"uart.h"
#include "iic.h"

sbit WP=P1^0;
sbit LED7=P1^7;

unsigned char idata temp[8];
unsigned char rxnum;
unsigned char flag2;
unsigned char EEPROM_WR_FLAG=0;

code const char str1[] = "The string is 来自单片机!\r\n";
code const char str2[] = "Author: louis \r\n";

//const  限定一个变量不允许被改变。在一定程度上提高程序安全性和可靠性
//code 存储区间为 程序存储区
/***************函数声明*******************/
void InitUART(void);
void SendOneByte(uint8);
void SendrStr(uint8 *ptr);

void main(void)
{
unsigned char Control,*p1,*p2;
unsigned char buf1[]="The first page!!The second page!The third page!!"; /* 发送缓冲区 */
unsigned char idata buf2[49]; /* 接收缓冲区 */

unsigned char Length;
unsigned int addr ,i=0; /* 24Cxx片内地址 */
WP=0;
//    P4SW|= 0x10;
LED7=1;
InitUART();

while(str2[i]!='\0')
{
SendOneByte(str2[i++]);
}
SendrStr(str1);

ES =1;
EA =1;

p1=buf1;
p2=buf2;

addr=0; ////片内地址 AT24C02为0～255 ， 32page*8byte = 256个字节/////
Length=48; ////// 读写长度 //////
enumer=AT2402; /// 读写AT24C02////

while(1){
if(EEPROM_WR_FLAG=='W'){
Control=0xae; ///  1010 1110 写操作///
RW24xx(p1,Length,addr,Control,enumer); // 写操作 //
for(i=0;i<10000;i++);
//要加入延时···才可正确的读取数据！
//在STOP和START之间有个 write cycle,一般有个最大值Twr.这是设备内部进行写入数据需要的时间，所以此处的延迟需要 大于这个 最大值Twr。
// Delay(1000);//1:6.18us; 2:8.36us 3:10.55us △=2.18us
EEPROM_WR_FLAG=0;
}

if(EEPROM_WR_FLAG=='R'){
Control=0xaf; ///读操作///
RW24xx(p2,Length,addr,Control,enumer);// 读
EEPROM_WR_FLAG=0;
SendrStr(p2);
SendrStr("\r\n");

}

}//while

}

/****************中断服务函数***************/
void UART_ISR(void) interrupt 4
{
uint8 RX_Data;
//只响应"接收"中断，"发送"中断来了就直接抹掉
if(RI)
{
RI = 0;	//串口中断标志不能自己清除，需要手动清除
RX_Data=SBUF;
EEPROM_WR_FLAG = RX_Data;
SendOneByte(EEPROM_WR_FLAG);
SendrStr(":\r\n");
}
else
TI = 0;		//串口发中断是发送完缓冲区数据之后产生
}

/*-----------------------------------------------

编写：刘宗铭
邮箱：kaly.liu@163.com
日期：2015.05
修改：无

------------------------------------------------*/

#include<reg52.h> //包含头文件，一般情况不需要改动，头文件包含特殊功能寄存器的定义

/*******************************************************************
请提前计算一下所选晶振能达到的最高速度，波特率不能超过最高速度
(1) 波特率加倍(SMOD=1)：  Max_Baud = FOSC/12/16
(2) 波特率不加倍(SMOD=0)：Max_Baud = FOSC/12/32
例如：22.1184MHz晶振，波特率加倍时，最大波特率=22118400/12/16=115200
*******************************************************************/
#define FOSC	11059200		//振荡频率
#define BAUD	9600			//波特率
#define SMOD	1			//是否波特率加倍
#if SMOD
#define TC_VAL	(256-FOSC/16/12/BAUD)
#else
#define TC_VAL	(256-FOSC/32/12/BAUD)
#endif

typedef unsigned char uint8;
typedef unsigned int uint16;

/****************串口初始化函数*************/
void InitUART(void)
{
TMOD = 0x20;    //定时器1，模式2工作模式
SCON = 0x50;    //串口工作模式1，允许REN   /* SCON: 模式 1,  8-bit UART, 使能接收         */
TH1 = TC_VAL;
TL1 = TH1;
PCON = 0x80; 	//发送速率加倍
ES = 1;
EA = 1;
TR1 = 1;
}
/**************串口发送字符函数*************/
void SendOneByte(uint8 c)
{
ES = 0;			//禁止中断，让串口安心工作啊
SBUF = c;
while(!TI);		//等待发送完毕
TI = 0;			//清TI中断
ES = 1;			//打开中断
}
/**************串口发送字符串函数*************/

/**************串口发送字符串函数*************/
void SendrStr(const uint8 *ptr)
{

for(;*ptr!='\0';ptr++)
{
SendOneByte(*ptr);
}
}

/*-----------------------------------------------

编写：<span style="font-family: Arial, Helvetica, sans-serif;">Louis </span>

邮箱：kaly.liu@163.com
日期：2015.05
修改：添加多页读写功能
器件的型号 我用的是AT24C02   32PAGE*8BYTE = 2Kbit
------------------------------------------------*/
#include <intrins.h>
#include<reg52.h>

#define  ERROR 10     //允许ERROR的最大次数

sbit     SDA=P1^2;
sbit     SCL=P1^1;

enum  eepromtype {AT2401,AT2402,AT2404,AT2408,AT2416,AT2432,AT2464,AT24128,AT24256};/*器件的型号 我用的是AT24C02*/
enum  eepromtype enumer;   //定义一个枚举变量

/* * * * * * * * 一个简单延时程序 * * * * * * * * * * * * */
void Delay(unsigned char DelayCount)
{ while(DelayCount--);		  //判断 + 执行 2个机器周期
}
/* * * * * 以下是对IIC总线的操作子程序 * * * * */
/* * * * * * 启动总线 * * * * */
void Start(void)
{ SCL=0; /* SCL处于高电平时,SDA从高电平转向低电平表示 */
SDA=1; /* 一个"开始"状态,该状态必须在其他命令之前执行 */
Delay(2);
SCL=1;
Delay(2);
SDA=0;
Delay(2);
SCL=0;
SDA=1;
Delay(2);
}

/* * * * * 停止IIC总线 * * * * */
void Stop(void)
{ SCL=0; /*SCL处于高电平时,SDA从低电平转向高电平 */
SDA=0; /*表示一个"停止"状态,该状态终止所有通讯 */
Delay(2);
SCL=1;
Delay(2); /* 空操作 */
SDA=1;
Delay(2);
SCL=0;
Delay(1000);
}

/* * * * * 检查应答位 * * * * */
bit RecAck(void)
{ SCL=0;
SDA=1;
Delay(20);
SCL=1;
Delay(2);
Delay(2);
CY=SDA;     /* 因为返回值总是放在CY中的 */
SCL=0;
Delay(20);
return(CY);
}

/* * * * *对IIC总线产生应答 * * * * */
void Ack(void)
{ SDA=0; /* EEPROM通过在收到每个地址或数据之后, */
SCL=1; /* 置SDA低电平的方式确认表示收到读SDA口状态 */
Delay(2);
SCL=0;
Delay(2);
SDA=1;
}

/* * * * * * * * * 不对IIC总线产生应答 * * * * */
void NoAck(void)
{ SDA=1;
SCL=1;
Delay(2);
SCL=0;
}

/* * * * * * * * * 向IIC总线写数据 * * * * */
void Send(unsigned char sendbyte)
{ unsigned char data j=8;
for(;j>0;j--)
{ SCL=0;
sendbyte <<= 1; /* 使CY=sendbyte^7; */
SDA=CY; /* CY 进位标志位 */
Delay(2);
SCL=1;
Delay(20);
}
SCL=0;
Delay(2);
}

/* * * * * * * * * 从IIC总线上读数据子程序 * * * * */
unsigned char Receive(void)
{ register receivebyte,i=8;
SCL=0;
while(i--)
{ SCL=1;
receivebyte = (receivebyte <<1 ) | SDA;
Delay(2);
SCL=0;
//  receivebyte = (receivebyte <<1 ) | SDA;	  //不能放在这里啊，放这里接受数据出错··！！
Delay(2);
}
return(receivebyte);
}

/* －－－－－  AT24C01～AT24C256 的读写程序 －－－－－－ */
bit   RW24xx(unsigned char *DataBuff,unsigned char Length,unsigned int Addr,
unsigned char Control,enum eepromtype enumer)
{

unsigned char data j,i=ERROR;
unsigned int k;
bit errorflag=1;  /*   出错标志   */
while(i--)
{ Start();  /*   启动总线   */
Send(Control & 0xfe); /*   向IIC总线写数据，器件地址 */
if(RecAck()) continue; /*   如写不正确结束本次循环   */
if(enumer > AT2416)
{ Send((unsigned char)(Addr >> 8));//把整型数据转换为字符型数据：弃高取低，只取低8位.如果容量大于32K位，使用16位地址寻址，写入高八位地址
if(RecAck())  continue;
}
Send((unsigned char)Addr); /*   向IIC总线写数据   */
if(RecAck())  continue; /*   如写不正确结束本次循环   */
if(!(Control & 0x01))   //判断是读器件还是写器件 如果是写 0 就进去执行
{ j=Length;
errorflag=0;         /* 清错误特征位 */
while(j--)
{
//******************此段判断页***多页读写功能***********************//
if(Addr%16==0)
{
Stop();
for(k=0;k<10000;k++);
Start();               /*启动总线*/
Send(Control & 0xfe);             /*发送器件地址*/
if(RecAck())  continue; /*   如写不正确结束本次循环   */

if(enumer > AT2416)
{
Send((unsigned char)(Addr >> 8));//把整型数据转换为字符型数据：弃高取低，只取低8位.
//如果容量大于32K位，使用16位地址寻址，写入高八位地址
if(RecAck())  continue; /*   如写不正确结束本次循环   */
}
Send((unsigned char)Addr);            /*发送器件子地址*/
if(RecAck())  continue; /*   如写不正确结束本次循环   */
}
Addr++;
//********************此段判断页***多页读写功能**************************//

/*发送数据*/
Send(*DataBuff++); /*   向IIC总线写数据   */
if(!RecAck()) continue; /*   如写正确结束本次循环   */
errorflag=1;
break;
}
if(errorflag==1) continue;
//		 SendOneByte('O');
break;
}
else
{ Start();  /*   启动总线   */
Send(Control); /*   向IIC总线写数据   */
if(RecAck()) continue;//器件没应答结束本次本层循环
while(--Length)  /*   字节长为0结束   */
{ *DataBuff ++= Receive();
Ack();   /*   对IIC总线产生应答   */
}
*DataBuff=Receive(); /* 读最后一个字节 */
NoAck();  /*   不对IIC总线产生应答   */
errorflag=0;
break;
}
}
Stop();  /*   停止IIC总线   */
if(!(Control & 0x01))
{
Delay(255);
Delay(255);
Delay(255);
Delay(255);
}
return(errorflag);
}