#include <t89c51rd2.h>
#include "24xx.h"

sbit SDA = P0^6;
sbit SCL = P0^7;

enum eepromtype EepromType;

void  IICDelay(uchar DelayCount);
void  IICStart(void);
void  IICStop(void);
bit   IICRecAck(void);
void  IICNoAck(void);
void  IICAck(void);
uchar IICReceiveByte(void);
void  IICSendByte(uchar sendbyte);

/***********************************************************************************
輸入：
 	DataBuff	:為讀寫(xiě)數(shù)據(jù)輸入／輸出緩沖區(qū)的首址
 	ByteQuantity	:為要讀寫(xiě)數(shù)據(jù)的字節(jié)數(shù)量
	Address 	:為EEPROM的片內(nèi)地址
 	ControlByte 	:為EEPROM的控制字節(jié)，具體形式為(1)(0)(1)(0)(A2)(A1)(A0)(R/W),其中R/W=1,
 			 表示讀操作,R/W=0為寫(xiě)操作,A2,A1,A0為EEPROM的頁(yè)選或片選地址;
 	EepromType	:為枚舉變量,需為M2401至M24256中的一種,分別對(duì)應(yīng)24C01至24C256;
輸出： 
 	函數(shù)返回值為一個(gè)位變量，若返回1表示此次操作失效，0表示操作成功;
說(shuō)明： 	
 	ERRORCOUNT為允許最大次數(shù)，若出現(xiàn)ERRORCOUNT次操作失效后，則函數(shù)中止操作，并返回1
 	SDA和SCL由用戶自定義，這里暫定義為P0^0和P0^1;
 	其余的用戶不用管，只要把只子程序放在你的程序中并調(diào)用它就可以了;
***********************************************************************************/
bit IICReadWrite(uchar *DataBuff,	/*DataBuff為讀寫(xiě)數(shù)據(jù)輸入/輸出緩沖區(qū)*/
   uchar ByteQuantity,	/*為要讀寫(xiě)數(shù)據(jù)的字節(jié)*/
   uint16 Address,	/*為EEPROM的片內(nèi)地*/
   uchar ControlByte,	/**/
   enum eepromtype EepromType)	
{
	uchar data j,i=ERRORCOUNT;
	bit errorflag=1;
	while(i--)
	{
		IICStart();
		IICSendByte(ControlByte&0xfe);
		if(IICRecAck())
		{
			IICStop();
			continue;
		}
		if(EepromType>M2416)
		{
			IICSendByte((uchar)(Address>>8));
			if(IICRecAck())
			{
				IICStop();
				continue;
			}
		}
		IICSendByte((uchar)Address);
		if(IICRecAck())
		{
			IICStop();
			continue;
		}
		if(!(ControlByte&0x01))	//寫(xiě)數(shù)據(jù)
		{
			j=ByteQuantity;
			errorflag=0; //********clr errorflag
			while(j--)
			{
				IICSendByte(*DataBuff++);
				if(!IICRecAck())
					continue;
				errorflag=1;
				break;
			}
			if(errorflag==1) continue;
			break;
		}
		else			//讀數(shù)據(jù)
		{
			IICStart();
			IICSendByte(ControlByte);
			if(IICRecAck())
			{
				IICStop();
				continue;
			}
			while(--ByteQuantity)
			{
				*DataBuff++=IICReceiveByte();
				IICAck();
			}
			*DataBuff=IICReceiveByte(); //read last byte data
			IICNoAck();
			errorflag=0;
			break;
		}
	}
	IICStop();
	if(!(ControlByte&0x01)) //如果寫(xiě)數(shù)據(jù)則延時(shí)
	{
		IICDelay(255);
		IICDelay(255);
		IICDelay(255);
		IICDelay(255);
	}
	return(errorflag);
}


/*****************以下是對(duì)IIC總線的操作子程序***/
/*****************啟動(dòng)總線**********************/
void IICStart(void)
{
	SCL=0; //
	SDA=1;
	SCL=1;
	_nop_();
	_nop_();
	_nop_();
	SDA=0;
	_nop_();
	_nop_();
	_nop_();
	_nop_();
	SCL=0;
	SDA=1; //
}

/*****************停止IIC總線****************/
void IICStop(void)
{
	SCL=0;
	SDA=0;
	SCL=1;
	_nop_();
	_nop_();
	_nop_();
	SDA=1;
	_nop_();
	_nop_();
	_nop_();
	SCL=0;
}

/**************檢查應(yīng)答位*******************/
bit IICRecAck(void)
{
	SCL=0;
	SDA=1;
	SCL=1;
	_nop_();
	_nop_();
	_nop_();
	_nop_();
	CY=SDA; //因?yàn)榉祷刂悼偸欠旁贑Y中的
	SCL=0;
	return(CY);
}

/***************對(duì)IIC總線產(chǎn)生應(yīng)答*******************/
void IICACK(void)
{
	SDA=0;
	SCL=1;
	_nop_();
	_nop_();
	_nop_();
	_nop_();
	SCL=0;
	_nop_();
	SDA=1;
}

/*****************不對(duì)IIC總線產(chǎn)生應(yīng)答***************/
void IICNoAck(void)
{
	SDA=1;
	SCL=1;
	_nop_();
	_nop_();
	_nop_();
	_nop_();
	SCL=0;
}

/*******************向IIC總線寫(xiě)數(shù)據(jù)*********************/
void IICSendByte(uchar sendbyte)
{
	uchar data j=8;
	for(;j>0;j--)
	{
		SCL=0;
		_nop_();
		_nop_();
		_nop_();
		sendbyte<<=1; //無(wú)論C51怎樣實(shí)現(xiàn)這個(gè)操作，始終會(huì)使CY=sendbyte^7;
		SDA=CY;
		SCL=1;
	}
	SCL=0;
}

/**********************從IIC總線上讀數(shù)據(jù)子程序**********/
uchar IICReceiveByte(void)
{
	register receivebyte,i=8;
	SCL=0;
	while(i--)
	{
		SCL=1;
		receivebyte=(receivebyte<<1)|SDA;
		SCL=0;
	}
	return(receivebyte);
}

/***************一個(gè)簡(jiǎn)單延時(shí)程序************************/
void IICDelay(uchar IICDelayCount)
{
	while(IICDelayCount--);
}