#include <reg52.h>          /*頭文件的包含*/
#include <intrins.h>

#define  uchar unsigned char /*宏定義*/
#define  uint  unsigned int

#define  _Nop()  _nop_()        /*定義空指令*/

/* 常,變量定義區 */
 
                                                 /*端口位定義*/
sbit SDA=P1^1;          /*模擬I2C數據傳送位*/
sbit SCL=P1^0;            /*模擬I2C時鐘控制位*/
                                                 /*狀態標志*/
bit ack;	         /*應答標志位*/

void delay()
{
 unsigned char i,j,k;
  for(i=0;i<10;i++)
  {
   for(j=0;j<20;j++)
   {
    for(k=0;k<248;k++);
   }
  } 
}


/*******************************************************************
                     起動總線函數               
函數原型: void  Start_I2c();  
功能:       啟動I2C總線,即發送I2C起始條件.
  
********************************************************************/
void Start_I2c()
{
  SDA=1;   /*發送起始條件的數據信號*/
  _Nop();
  SCL=1;
  _Nop();    /*起始條件建立時間大于4.7us,延時*/
  _Nop();
  _Nop();
  _Nop();
  _Nop();    
  SDA=0;   /*發送起始信號*/
  _Nop();    /* 起始條件鎖定時間大于4μs*/
  _Nop();
  _Nop();
  _Nop();
  _Nop();       
  SCL=0;   /*鉗住I2C總線，準備發送或接收數據 */
  _Nop();
  _Nop();
}




/*******************************************************************
                      結束總線函數               
函數原型: void  Stop_I2c();  
功能:       結束I2C總線,即發送I2C結束條件.
  
********************************************************************/
void Stop_I2c()
{
  SDA=0;  /*發送結束條件的數據信號*/
  _Nop();   /*發送結束條件的時鐘信號*/
  SCL=1;  /*結束條件建立時間大于4μs*/
  _Nop();
  _Nop();
  _Nop();
  _Nop();
  _Nop();
  SDA=1;  /*發送I2C總線結束信號*/
  _Nop();
  _Nop();
  _Nop();
  _Nop();
}




/*******************************************************************
                 字節數據傳送函數               
函數原型: void  SendByte(uchar c);
功能:  將數據c發送出去,可以是地址,也可以是數據,發完后等待應答,并對
     此狀態位進行操作.(不應答或非應答都使ack=0 假)     
     發送數據正常，ack=1; ack=0表示被控器無應答或損壞。
********************************************************************/
void  SendByte(uchar c)
{
 uchar BitCnt;
 
 for(BitCnt=0;BitCnt<8;BitCnt++)  /*要傳送的數據長度為8位*/
    {
     if((c<<BitCnt)&0x80)SDA=1;   /*判斷發送位*/
       else  SDA=0;                
     _Nop();
     SCL=1;               /*置時鐘線為高，通知被控器開始接收數據位*/
      _Nop(); 
      _Nop();               /*保證時鐘高電平周期大于4μs*/
      _Nop();
      _Nop();
      _Nop();         
     SCL=0; 
    }
    
    _Nop();
    _Nop();
    SDA=1;               /*8位發送完后釋放數據線，準備接收應答位*/
    _Nop();
    _Nop();   
    SCL=1;
    _Nop();
    _Nop();
    _Nop();
    if(SDA==1)ack=0;     
       else ack=1;        /*判斷是否接收到應答信號*/ //正常SDA由接收端拉低//
    SCL=0;
    _Nop();
    _Nop();
}






/*******************************************************************
                 字節數據傳送函數               
函數原型: uchar  RcvByte();
功能:  用來接收從器件傳來的數據,并判斷總線錯誤(不發應答信號)，
     發完后請用應答函數。  
********************************************************************/	
uchar  RcvByte()
{
  uchar retc;
  uchar BitCnt;
  
  retc=0; 
  SDA=1;             /*置數據線為輸入方式*/  
  for(BitCnt=0;BitCnt<8;BitCnt++)
      {
        _Nop();           
        SCL=0;       /*置時鐘線為低，準備接收數據位*/
        _Nop();
        _Nop();         /*時鐘低電平周期大于4.7μs*/
        _Nop();
        _Nop();
        _Nop();
        SCL=1;       /*置時鐘線為高使數據線上數據有效*/
        _Nop();
        _Nop();
        retc=retc<<1;
        if(SDA==1)retc=retc+1; /*讀數據位,接收的數據位放入retc中 */
        _Nop();
        _Nop(); 
      }
  SCL=0;    
  _Nop();
  _Nop();
  return(retc);
}




/********************************************************************
                     應答子函數
原型:  void Ack_I2c(bit a);
 
功能:主控器進行應答信號,(可以是應答或非應答信號)
********************************************************************/
void Ack_I2c(bit a)
{
  
  if(a==0)SDA=0;     /*在此發出應答或非應答信號 */
        else SDA=1;
  _Nop();
  _Nop();
  _Nop();      
  SCL=1;
    _Nop();
    _Nop();              /*時鐘低電平周期大于4μs*/
    _Nop();
    _Nop();
    _Nop();  
 SCL=0;                /*清時鐘線，鉗住I2C總線以便繼續接收*/
    _Nop();
    _Nop();    
}


void main()
{
 unsigned char  s=0;
 for(t=8;t>0;t--)
 {
  *r1=i;
  r1++;
  i++;
 }
 SCL=0;
 Stop_I2c();


 Start_I2c();
 s=0xa0;
 SendByte(s);
 while(ack==0)
 {
  P2=0x00;
  P0=0xc0;
 }
 s=0x00;
 SendByte(s);
 while(ack==0)
 {
  P2=0x00;
  P0=0xf9;
 }

  r1=0x30;
 for(t=0;t<8;t++)
 {
  s=*r1;
  SendByte(s);
  while(ack==0)
 {
  P2=0x00;
  P0=0xc0;
 }
  r1++;
 }
 Stop_I2c();

 while(1)
 {
 for(t=0;t<10;t++)
  {p2_7=0;
   P0=table[t];
   delay();
   p2_6=0;
   P0=table[t];
   delay();
   p2_5=0;
   P0=table[t];
   delay();
   p2_4=0;
   P0=table[t];
   delay();
  }
 }
}