I2c程序 51系列及 AVR系列

#define uchar unsigned char
#define uint unsigned int
#include "reg51.h"
#include "intrins.h"

sbit Scl=P3^3; //串行时钟
sbit Sda=P3^4; //串行数据

/*发送起始条件*/
void Start(void) /*起始条件*/
{
Sda=1;
Scl=1;
_nop_ ();
_nop_ ();
_nop_ ();
_nop_ ();
Sda=0;
_nop_ ();
_nop_ ();
_nop_ ();
_nop_ ();
}
void Stop(void) /*停止条件*/
{
Sda=0;
Scl=1;
_nop_ ();
_nop_ ();
_nop_ ();
_nop_ ();
Sda=1;
_nop_ ();
_nop_ ();
_nop_ ();
_nop_ ();
}
void Ack(void) /*应答位*/
{
Sda=0;
_nop_ ();
_nop_ ();
_nop_ ();
_nop_ ();
Scl=1;
_nop_ ();
_nop_ ();
_nop_ ();
_nop_ ();
Scl=0;
}
void NoAck(void) /*反向应答位*/
{
Sda=1;
_nop_ ();
_nop_ ();
_nop_ ();
_nop_ ();
Scl=1;
_nop_ ();
_nop_ ();
_nop_ ();
_nop_ ();
Scl=0;
}
void Send(uchar Data) /*发送数据子程序,Data为要求发送的数据*/
{
uchar BitCounter=8; /*位数控制*/
uchar temp; /*中间变量控制*/
do
{
temp=Data;
Scl=0;
_nop_ ();
_nop_ ();
_nop_ ();
_nop_ ();
if((temp&0x80)==0x80)/* 如果最高位是1*/
Sda=1;
else
Sda=0;
Scl=1;
temp=Data<1; /*RLC*/
Data=temp;
BitCounter--;
}while(BitCounter);
Scl=0;
}
uchar Read(void) /*读一个字节的数据,并返回该字节值*/
{
uchar temp=0;
uchar temp1=0;
uchar BitCounter=8;
Sda=1;
do{
Scl=0;
_nop_ ();
_nop_ ();
_nop_ ();
_nop_ ();
Scl=1;
_nop_ ();
_nop_ ();
_nop_ ();
_nop_ ();
if(Sda) /*如果Sda=1;*/
temp=temp|0x01; /*temp的最低位置1*/
else
temp=temp&0xfe; /*否则temp的最低位清0*/
if(BitCounter-1)
{ temp1=temp<1;
temp=temp1;
}
BitCounter--;
}while(BitCounter);
return(temp);
}
////////////////////////////////////////////////
void WrToROM(uchar Data[],uchar Address,uchar Num)
{
uchar i=0;
uchar *PData;
PData=Data;
Start();
Send(0xa0);
Ack();
Send(Address);
Ack();
for(i=0;i{
Send(*(PData+i));
Ack();
}
Stop();
}
void RdFromROM(uchar Data[],uchar Address,uchar Num)
{
uchar i=0;
uchar *PData;
PData=Data;
for(i=0;i{
Start();
Send(0xa0);
Ack();
Send(Address+i);
Ack();
Start();
Send(0xa1);
Ack();
*(PData+i)=Read();
Scl=0;
NoAck();
Stop();
}
}

/////////////////////////////////END of IIC/////////////////////////////////
////////////////////start of DS1621/////////////////////////////////
void delay_ms(unsigned char temp)
{
while(temp--);
}
void temp_config(unsigned char temp)
{

Start();
Send(0x90);
Ack();
Send(0xac);
Ack();
Send(temp);
Ack();
Stop();
delay_ms(110);
}

void init_temp()
{
Scl=1; //串行时钟
Sda=1;
Start();
Send(0x90);
Ack();
Send(0xee);
Ack();
Stop();
temp_config(8);
}

void read_temp() ////// Returns degrees F (0-255)
{
unsigned char datah,datal;

////温度数据读入开始
Start(); //
Send(0x90);
Ack();
Send(0xaa);
Ack();
Start();
Send(0x91);
Ack();
datah=Read();
Ack();
datal=Read();
Stop();
///温度数据读入结束
if((datah&0x80)!=0)
{
word1[3]=-;
datah=datah-1;
datah=~datah;
word1[4]=datah/100+48;
word1[5]=((datah/10)%10)+48;
word1[6]=datah%10+48;
word1[7]=C;

}
else
{
word1[3]=+;
word1[4]=datah/100+48;
word1[5]=((datah/10)%10)+48;
word1[6]=datah%10+48;
word1[7]=C;

}

}

AVR

void Start() //I2C总线的开始条件
{Set_SDA(1); //SDA=1;
Set_SCL(1); //SCL=1;
delay(100); //等待时钟信号变高
Set_SDA(0); //SDA=0;
delay(100);
Set_SCL(0); // SCL=0;
}

void Stop() //I2C总线结束条件
{Set_SDA(0); //SDA=0;
delay(100);
Set_SCL(1); //SCL=1;
delay(100); //等待时钟信号变低
Set_SDA(1); //SDA=1;
delay(100);
Set_SCL(0); //SCL=0;
}

void Ack() //I2C总线应答
{Set_SDA(0); //SDA=0;
delay(50);
Set_SCL(1); //SCL=1;
delay(100);
Set_SCL(0); //SCL=0;
delay(50);
Set_SDA(1); //SDA=1;
}

void Nack() //I2C总线应答非
{Set_SDA(1); //SDA=1;
delay(50);
Set_SCL(1); //SCL=1;
delay(100);
Set_SCL(0); //SCL=0;
delay(50);
Set_SDA(0); //SDA=0;
}

void Check_Ack() //I2C总线应答检查
{Set_SDA(1); //SDA=1;
Set_SCL(1); //SCL=1;
Ack_Flag=0; //清除应答标志;
DDRA&=0xbf; //设置SDA为输入
if(!((PINA & 0x40)>>6))
{delay(50);
Set_SCL(0); //SCL=0;
delay(100);}
else
{Ack_Flag=1; //收到应答;
delay(50);
Set_SCL(0); //SCL=0;
delay(100);}
DDRA |=0xff; //重新设置SDA为输出
}

void Write_Bit0() //写1bit数据：0
{Set_SDA(0); //SDA=0;
Set_SCL(1); //SCL=1;
delay(100);
Set_SCL(0); //SCL=0;
}