I2C总线(主)C51源程序

#define ROMADDRESS 0xA0

sfr IIC_CON = 0xA0;
sbit WP = IIC_CON^5;

sfr IIC_INTER = 0x90;
sbit SCL = IIC_INTER^6;
sbit SDA = IIC_INTER^7;

bit ack; /*应答标志位*/

void DelayMs(unsigned char i)
{
unsigned int count;
for(i;i!=0;i--)for(count=6;count!=0;count--);
}
/***********************************************************************/
/*名称: IIC_Start()
/*说明: 启动I2C总线,即发送I2C起始条件.
/*输入: 无
/*输出: 无
/***********************************************************************/
void IIC_Start(void)
{
SCL=1; DelayMs(1);
SDA=1; DelayMs(1);
SDA=0; DelayMs(1); /*发送起始信号*/
SCL=0; DelayMs(1); /*钳住I2C总线，准备发送或接收数据 */

}
/***********************************************************************/
/*名称: IIC_Stop()
/*说明: 结束I2C总线,即发送I2C结束条件.
/*输入: 无
/*输出: 无
/***********************************************************************/
void IIC_Stop(void)
{
SCL=1; DelayMs(1); /*发送结束条件的时钟信号*/
SDA=0; DelayMs(1);
SDA=1; DelayMs(1); /*发送I2C总线结束信号*/
SCL=0; DelayMs(1);

}
/***********************************************************************/
/*名称: IIC_DataSend()
/*说明: 将数据c发送出去,可以是地址,也可以是数据,发完后等待应答,并对
此状态位进行操作.(不应答或非应答都使ack=0)
ack=1表示发送数据正常; ack=0表示被控器无应答或损坏。
/*输入: cmd 要输入的指令数据
/*输出: 无
/***********************************************************************/
void IIC_DataSend(unsigned char byte)
{
unsigned char BitCnt;

for(BitCnt=0;BitCnt<8;bitcnt++)>
{
if(byte&0x80)
SDA=1; /*判断发送位*/
else
SDA=0;
DelayMs(1);
SCL=1; DelayMs(1); /*置时钟线为高，通知被控器开始发送数据位*/
SCL=0; DelayMs(1);
byte = byte<>
}
SDA=0; DelayMs(1); /*8位发送完后释放数据线，准备接收应答位*/
SCL=1; DelayMs(1);
if(SDA==1)
ack=0;
else
ack=1; /*判断是否接收到应答信号*/
SCL=0; DelayMs(1);
}

/***********************************************************************/
/*名称: IIC_DataRcv()
/*说明: 用来接收从器件传来的数据,并判断总线错误(不发应答信号)，
发完后请用应答函数应答从机。
/*输入: 无
/*输出: 从器件传来的数据
/***********************************************************************/
unsigned char IIC_DataRcv(void)
{
unsigned char BitCnt,Result = 0;

SDA=1; /*置数据线为输入方式*/
for(BitCnt=0;BitCnt<>
{
SCL=0; DelayMs(1); /*置时钟线为低，准备接收数据位*/
SCL=1; DelayMs(1); /*置时钟线为高使数据线上数据有效*/
Result <=>
if(SDA)
Result++; /*读数据位,接收的数据位放入Result中 */
}
SCL=0; DelayMs(1);
return Result;
}

/***********************************************************************/
/*名称: IIC_Ack()
/*说明: 主控器进行应答信号(可以是应答或非应答信号，由位参数a决定)
/*输入: 应答信号
/*输出: 无
/***********************************************************************/
void IIC_Ack(bit a)
{
if(a)
SDA=1; /*在此发出应答或非应答信号 */
else
SDA=0;
Delay(20);
SCL=1; DelayMs(1); /*时钟低电平周期大于4μs*/
SCL=0; DelayMs(1); /*清时钟线，钳住I2C总线以便继续接收*/

}

/***********************************************************************/
/*名称: IIC_StrWrite()
/*说明: 向有子地址器件发送多字节数据程序
/*输入: addrh 存储器子地址高8位
/* addrl 存储器子地址低8位
/* *str 数据指针
/* length 数据长度
/*输出: 写入是否成功
/***********************************************************************/
bit IIC_ByteWrite(unsigned char addrh,unsigned char addrl,unsigned char byte)
{
WP = 0;
IIC_Start(); /*启动总线*/
IIC_DataSend(ROMADDRESS); /*发送器件地址*/
if(ack==0)return(0);
IIC_DataSend(addrh); /*发送存储器子地址高8位*/
if(ack==0)return(0);
IIC_DataSend(addrl); /*发送存储器子地址低8位*/
if(ack==0)return(0);
IIC_DataSend(byte); /*发送数据*/
if(ack==0)return(0);
IIC_Stop(); /*结束总线*/
DelayMs(100);
WP = 1;
return(1);
}

/***********************************************************************/
/*名称: IIC_StrWrite()
/*说明: 向有子地址器件发送多字节数据程序
/*输入: addrh 存储器子地址高8位
/* addrl 存储器子地址低8位
/* *str 数据指针
/* length 数据长度
/*输出: 写入是否成功
/***********************************************************************/
bit IIC_StrWrite(unsigned char addrh,unsigned char addrl,unsigned char *str,unsigned char length)
{
unsigned char i;

WP = 0;
IIC_Start(); /*启动总线*/
IIC_DataSend(ROMADDRESS); /*发送器件地址*/
if(ack==0)return(0);
IIC_DataSend(addrh); /*发送存储器子地址高8位*/
if(ack==0)return(0);
IIC_DataSend(addrl); /*发送存储器子地址低8位*/
if(ack==0)return(0);

for(i=0;i<>
{
IIC_DataSend(*(str++)); /*发送数据*/
if(ack==0)return(0);
}
IIC_Stop(); /*结束总线*/
DelayMs(100);
WP = 1;
return(1);
}

/***********************************************************************/
/*名称: IIC_ByteRead()
/*说明: 向有子地址器件读取单字节数据程序
/*输入: addrh 存储器子地址高8位
/* addrl 存储器子地址低8位
/*输出: 读取的数据
/***********************************************************************/
bit IIC_ByteRead(unsigned char addrh,unsigned char addrl,unsigned char byte)
{
IIC_Start(); /*启动总线*/
IIC_DataSend(ROMADDRESS); /*发送器件地址*/
if(ack==0)return(0);
IIC_DataSend(addrh); /*发送存储器子地址高8位*/
if(ack==0)return(0);
IIC_DataSend(addrl); /*发送存储器子地址低8位*/
if(ack==0)return(0);

IIC_Start(); /*重新启动总线*/
IIC_DataSend(ROMADDRESS+1); /*设置读*/
if(ack==0)return(0);
byte = IIC_DataRcv(); /*读取数据*/
IIC_Ack(1); /*发送非应位*/
IIC_Stop(); /*结束总线*/
DelayMs(100);
return(1);
}

/***********************************************************************/
/*名称: IIC_StrRead()
/*说明: 向有子地址器件发送多字节数据程序
/*输入: addrh 存储器子地址高8位
/* addrl 存储器子地址低8位
/*输出: 读取是否成功
/***********************************************************************/
bit IIC_StrRead(unsigned char addrh,unsigned char addrl,unsigned char *str,unsigned char length)
{
unsigned char i;

IIC_Start(); /*启动总线*/
IIC_DataSend(ROMADDRESS); /*发送器件地址*/
if(ack==0)return(0);
IIC_DataSend(addrh); /*发送存储器子地址高8位*/
if(ack==0)return(0);
IIC_DataSend(addrl); /*发送存储器子地址低8位*/
if(ack==0)return(0);

IIC_Start(); /*重新启动总线*/
IIC_DataSend(ROMADDRESS+1); /*设置读*/
if(ack==0)return(0);
for(i=0;i<>
{
*(str++) = IIC_DataRcv(); /*读取数据*/
IIC_Ack(0); /*发送就答位*/
}
*str=IIC_DataRcv(); /*读取数据*/
IIC_Ack(1); /*发送非应位*/
IIC_Stop(); /*结束总线*/
DelayMs(100);
return(1);
}