pic16f877a对24c01的读写程序

＃i ncludeIC.h>
＃i nclude
#define uchar  unsigned char
#define uint   unsigned int

static volatile unsigned char aCC @ 0x20;            //发收数据暂存器

static volatile bit acc0     @ (unsigned)&acc*8+0;   //接收
static volatile bit acc7     @ (unsigned)&acc*8+7;   //发送
static volatile unsigned char err @ 0x21;            //
static volatile bit err0     @ (unsigned)&err*8+0;
static volatile bit err3     @ (unsigned)&err*8+3;
static volatile bit err6     @ (unsigned)&err*8+6;
static volatile bit err7     @ (unsigned)&err*8+7;   //应答位暂存位

void  Cack();        //应答位检查
void  Mnack();       //发送非应答位
void  Mack();        //发送应答位
void  Stop();        //停止IC总线
void  Sta();        //启动IC总线
void  Wrbyt (uchar x) ;     //写一字节
      uchar Rdbyt( );      //读一字节
void  Rdnbyt ();       //读n个数据
void  Wrnbyt(uchar SLAwtemp );   //写n个数据
void initial();       //I/O初始化子程序
void LED ();      //
void delay(uint a);
void delay1();

#define  SCL  RB4 //4  ;24C01-6
#define  SDA  RB5 //5  ;24C01-5
#define  SCLIO  TRISB4 //4
#define  SDAIO  TRISB5 //5
#define  SLAW   0x0A0//寻址字节写
#define  SLAR   0x0A1//寻址字节读
uchar numer=1;  //数码管数据暂存区

unsigned char sun[10] ={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90};

//////////////24C01/////////////////
//--------应答位检查---------
void  Cack()
{ 
SCL=1;
SDAIO=1;//输入1
SCLIO=0;
delay1();
err7=SDA;//c=1错误ERR
SCL=0;
}
///--------发送非应答位---------- 
void  Mnack()
{
 SDA=1;
 SCLIO=0;
 SDAIO=0;//输出
 SCL=1;
 delay1();
 SCL=0;
 SDA=0;
}
//-------发送应答位---------------
void  Mack()
{
SDA=0;
SCLIO=0;
SDAIO=0;//输出
SCL=1;
delay1();
SCL=0;
SDA=1;
}
//--------停止IC总线---------------
void  Stop()
{
 SDAIO=0;//输出
 SCLIO=0;
 SDA=0;
 delay1();
 SCL=1;
 delay1();
 SDA=1;
 delay1();
}
//--------;启动IC总线-------------
void  Sta()
{ 
SDAIO=0;//输出
SCLIO=0;
SDA=1;
delay1();
SCL=1;
delay1();
SDA=0;
delay1();
SCL=0;
}
//--------写一字节------------------------ 
void  Wrbyt(uchar x) 
{
uchar i;
acc=x;
SCLIO=0;
SDAIO=0;
for(i=8;i>0;i--)
{
 SDA=acc7;
 SCL=1;
 delay1();
 SCL=0;
 SDA=0; 
 acc=acc<<1;
 }
}
//---------读一字节-----------------
uchar   Rdbyt( )
{
uchar i;
SCLIO=0;
SDAIO=1;//;输入
for(i=8;i>0;i--)
 {
 acc=acc<<1;//接收数据左移寄存器 
 SCL=1;
 delay1();
 acc0=SDA;
 SCL=0;
 delay1();
 }
 return(acc); 
} 
////---------读n个数据----------------
void  Rdnbyt () //传送数据个
{
 Sta(); //启动IC总线 
 delay1();
 numer = Rdbyt();///读一字节
 delay1();
 Stop(); //停止IC总线
}
//---------写n个数据---------------
void  Wrnbyt(uchar SLAwtemp )
{

 err7=1;
 if(err7==1)///c=1E0,ERR
 {
 Sta(); //启动IC总线
 delay1();
 Wrbyt(SLAwtemp); //写一字节 
 delay1();
 Cack();//应答位检查-
 }
 delay1();
 while(err7==1);
 Stop(); //停止IC总线
}

//*************************************//
//系统 各I/O初始化子程序
void initial()
{
 TRISC=0;
 TRISA=0;
 TRISB1=1;
 TRISB2=1;
}

//LED

void LED ()
{
PORTA=0X1f;
PORTC=sun[numer];
}

void delay(uint a)
{
uint b=100;
while(a--)
{
 while(b--);
}
}

void delay1()
{
NOP();
NOP();
NOP();
NOP();
}

void main()
{
initial();//系统 各I/O初始化子程序
LED();
delay(100);
Wrnbyt (SLAW);//寻址字节写#0A0
delay1();
Wrnbyt (0x05);//写地址0x05
delay1();
Wrnbyt (0x06);//写数据0x06
delay1();
Wrnbyt (SLAR);//寻址字节读#0A1
delay1();
Wrnbyt (0x05);//读地址0x05
delay1();
Rdnbyt (); //读数据
delay(5);
while(1)
{LED();}
}