/*********************************************************************************************
             MSP430系列單片機讀寫EEPROM--24WC02的C語言軟件包
               廣東萬山自動化儀表有限公司  陳平
24WC02有寫操作保護性延時，并允許頁讀256字節(jié)，頁寫16字節(jié)。當(dāng)頁寫超過2字節(jié)時，要注意頁地址的轉(zhuǎn)換。
*************************************************************************************************/
#define sla  0xa0         //24wc02器件地址
//==SDA 接P2.2 ；SCL接 P2.3===WP接 P2.4=電源接P6.7====
#define SDA_1  (P2OUT |= 0x04)
#define SDA_0  (P2OUT &= ~0x04)
#define SCL_1  (P2OUT |=0x08)
#define SCL_0  (P2OUT &=~0x08)
#define WP_1   (P2OUT |= 0x10)      //禁 止寫
#define WP_0   (P2OUT &= ~0x10)     //寫允許
#define ee_on  (P6OUT ^= 0x80)      //24WC02供電
#define ee_off (P6OUT &=~0x80)      //24WC02斷電
//定義信息存儲器中的參數(shù)
#pragma memory= no_init           //請修改相應(yīng)的連接文件*.xcl 在Information memory 中添加如下語句： -Z(CODE)NO_INIT=1000-10FF   


unsigned int pass;  

#pragma memory= default
/*******************************************************************
                     起動總線函數(shù)               
函數(shù)原型: void  Start_I2c();  
功能:       啟動I2C總線,即發(fā)送I2C起始條件.
  
********************************************************************/
void Start_I2c(void)
{
  SDA_1;   /*發(fā)送起始條件的數(shù)據(jù)信號*/
  _NOP();
  SCL_1;
  _NOP();    /*起始條件建立時間大于4.7us,延時*/
  _NOP();
  _NOP();
  _NOP();
  _NOP();    
  SDA_0;   /*發(fā)送起始信號*/
  _NOP();    /* 起始條件鎖定時間大于4μs*/
  _NOP();
  _NOP();
  _NOP();
  _NOP();       
  SCL_0;   /*鉗住I2C總線，準(zhǔn)備發(fā)送或接收數(shù)據(jù) */
  _NOP();
  _NOP();
}




/*******************************************************************
                      結(jié)束總線函數(shù)               
函數(shù)原型: void  Stop_I2c();  
功能:       結(jié)束I2C總線,即發(fā)送I2C結(jié)束條件.
  
********************************************************************/
void Stop_I2c(void)
{
  SDA_0;  /*發(fā)送結(jié)束條件的數(shù)據(jù)信號*/
  _NOP();   /*發(fā)送結(jié)束條件的時鐘信號*/
  SCL_1;  /*結(jié)束條件建立時間大于4μs*/
  _NOP();
  _NOP();
  _NOP();
  _NOP();
  _NOP();
  SDA_1;  /*發(fā)送I2C總線結(jié)束信號*/
  _NOP();
  _NOP();
  _NOP();
  _NOP();
}
/*******************************************************************
                 字節(jié)數(shù)據(jù)傳送函數(shù)               
函數(shù)原型: void  SendByte(uchar c);
功能:  將數(shù)據(jù)c發(fā)送出去,可以是地址,也可以是數(shù)據(jù),發(fā)完后等待應(yīng)答,并對
     此狀態(tài)位進行操作.(不應(yīng)答或非應(yīng)答都使ack=0 假)     
     發(fā)送數(shù)據(jù)正常，ack=1; ack=0表示被控器無應(yīng)答或損壞。
********************************************************************/
void  SendByte(unsigned char  c)
{
 unsigned char  BitCnt;
 
 for(BitCnt=0;BitCnt<8;BitCnt++)  /*要傳送的數(shù)據(jù)長度為8位*/
    {
     if((c<<BitCnt)&0x80) SDA_1;   /*判斷發(fā)送位*/
       else  SDA_0;                
     _NOP();
     SCL_1;               /*置時鐘線為高，通知被控器開始接收數(shù)據(jù)位*/
      _NOP(); 
      _NOP();               /*保證時鐘高電平周期大于4μs*/
      _NOP();
      _NOP();
      _NOP();         
      SCL_0; 
    }
    
    _NOP();
    _NOP();
    SDA_1;               /*8位發(fā)送完后釋放數(shù)據(jù)線，準(zhǔn)備接收應(yīng)答位*/
    _NOP();
    _NOP();   
    SCL_1;
    _NOP();
    _NOP();
    _NOP();
    if(TestAck()) ack_0;     
       else ack_1;        /*判斷是否接收到應(yīng)答信號*/
    SCL_0;
    _NOP();
    _NOP();
}
/*******************************************************************
                 字節(jié)數(shù)據(jù)傳送函數(shù)               
函數(shù)原型: uchar  RcvByte();
功能:  用來接收從器件傳來的數(shù)據(jù),并判斷總線錯誤(不發(fā)應(yīng)答信號)，
     發(fā)完后請用應(yīng)答函數(shù)。  
********************************************************************/	
unsigned char  RcvByte(void)
{
  unsigned char  retc;
  unsigned char BitCnt;
  
  retc=0; 
  SDA_1;             /*置數(shù)據(jù)線為輸入方式*/
  for(BitCnt=0;BitCnt<8;BitCnt++)
      {
        _NOP();           
        SCL_0;       /*置時鐘線為低，準(zhǔn)備接收數(shù)據(jù)位*/
        _NOP();
        _NOP();         /*時鐘低電平周期大于4.7μs*/
        _NOP();
        _NOP();
        _NOP();
        SCL_1;       /*置時鐘線為高使數(shù)據(jù)線上數(shù)據(jù)有效*/
        _NOP();
        _NOP();
        retc=retc<<1;
        if(TestAck()) retc=retc+1; /*讀數(shù)據(jù)位,接收的數(shù)據(jù)位放入retc中 */
        _NOP();
        _NOP(); 
      }
  SCL_0;    
  _NOP();
  _NOP();
  return(retc);
}

/********************************************************************
                     應(yīng)答子函數(shù)
原型:  void Ack_I2c(bit a);
 
功能:主控器進行應(yīng)答信號,(可以是應(yīng)答或非應(yīng)答信號)
********************************************************************/
void Ack_I2c(unsigned char a)
{
  
  if(a==0) SDA_0;     /*在此發(fā)出應(yīng)答或非應(yīng)答信號 */
        else  SDA_1;
  _NOP();
  _NOP();
  _NOP();      
  SCL_1;
    _NOP();
    _NOP();              /*時鐘低電平周期大于4μs*/
    _NOP();
    _NOP();
    _NOP();  
 SCL_0;                /*清時鐘線，鉗住I2C總線以便繼續(xù)接收*/
    _NOP();
    _NOP();    
}

//====
unsigned char TestAck(void)
{
 unsigned char a;
 P2DIR &= ~0x04;  //P2.2設(shè)為輸入
 a=P2IN &0x04;
 P2DIR |= 0x04;  //P2.2恢復(fù)為輸出
 return(a); 
}
/*******************************************************************
                    向有子地址器件發(fā)送多字節(jié)數(shù)據(jù)函數(shù)               
函數(shù)原型: bit  ISendStr(uchar sla,uchar suba,ucahr *s,uchar no);  
功能:     從啟動總線到發(fā)送地址，子地址,數(shù)據(jù)，結(jié)束總線的全過程,從器件
          地址sla，子地址suba，發(fā)送內(nèi)容是s指向的內(nèi)容，發(fā)送no個字節(jié)。
           如果返回1表示操作成功，否則操作有誤。
注意：    使用前必須已結(jié)束總線。
********************************************************************/
unsigned char ISendStr(unsigned char suba,unsigned char *s,unsigned char no)
{
   unsigned i;
   Start_I2c();               /*啟動總線*/
   SendByte(sla);            /*發(fā)送器件地址*/
     if(ack==0)return(0);
   SendByte(suba);            /*發(fā)送器件子地址*/
     if(ack==0)return(0);

   for(i=0;i<no;i++)
    {   
     SendByte(*s);               /*發(fā)送數(shù)據(jù)*/
       if(ack==0)return(0);
     s++;
    } 
 Stop_I2c();                 /*結(jié)束總線*/ 
  return(1);
}
/*******************************************************************
                    向有子地址器件讀取多字節(jié)數(shù)據(jù)函數(shù)               
函數(shù)原型: bit  ISendStr(uchar sla,uchar suba,ucahr *s,uchar no);  
功能:     從啟動總線到發(fā)送地址，子地址,讀數(shù)據(jù)，結(jié)束總線的全過程,從器件
          地址sla，子地址suba，讀出的內(nèi)容放入s指向的存儲區(qū)，讀no個字節(jié)。
           如果返回1表示操作成功，否則操作有誤。
注意：    使用前必須已結(jié)束總線。
********************************************************************/
unsigned char  IRcvStr(unsigned char suba1,unsigned char *s1,unsigned char no1)
{
   unsigned char i;
   Start_I2c();               /*啟動總線*/
   SendByte(sla);            /*發(fā)送器件地址*/
     if(ack==0)return(0);
   SendByte(suba1);            /*發(fā)送器件子地址*/
     if(ack==0)return(0);
   Start_I2c();
   SendByte(sla+1);          //D0=1為讀命令
      if(ack==0)return(0);

   for(i=0;i<no1-1;i++)
    {   
     *s1=RcvByte();               /*發(fā)送數(shù)據(jù)*/
      Ack_I2c(0);                /*發(fā)送就答位*/  
     s1++;
    } 
   *s1=RcvByte();
    Ack_I2c(1);                 /*發(fā)送非應(yīng)位*/
 Stop_I2c();                    /*結(jié)束總線*/ 
  return(1);
}
/******************************************************************************************************
當(dāng)使用flash系列單片機時，可將24WC02中的數(shù)據(jù)拷貝到MSP430單片機內(nèi)部的非易失性flash memory（信息存儲器）中。
EEprom數(shù)據(jù)拷貝到cpu非易失性flash memory,入口參數(shù)指明目標(biāo)是segmetn=0時是segment A 否則是 segment B.
********************************************************************************************************/
void DataCopy(unsigned char segment)
{
unsigned char * pram;
unsigned char  byte;
unsigned char i;
if (segment) segment=1;      //限制segment為0和1。
pram=(unsigned char *)&pass+segment*128; 
EraseRam(segment);
 repeat:
    Start_I2c();               /*啟動總線*/
    SendByte(sla);             /*發(fā)送器件地址*/
    if(ack==0)  goto repeat;
    SendByte(segment*128);               /*發(fā)送器件子地址*/
    if(ack==0)  goto repeat;
    Start_I2c();
    SendByte(sla+1);           //D0=1為讀命令
    if(ack==0)  goto repeat;
    //---- 
 _DINT();  
 while (FCTL3 & BUSY);         //檢查忙標(biāo)志
 FCTL3=FWKEY;                  //解鎖
 FCTL1=FWKEY+WRT;              //寫允許
 while (FCTL3 & BUSY);         //檢查忙標(biāo)志
 //----
 for (i=0;i<128;i++)
    {
     byte=RcvByte();               /*接收數(shù)據(jù)*/
     Ack_I2c(0);                   /*發(fā)送就答位*/  
     *pram++=byte;     
     while (FCTL3 & BUSY);            //檢查忙標(biāo)志 
     }
 //---------------
 byte=RcvByte();               /*接收一次無用數(shù)據(jù)，以滿足時序要求*/
 Ack_I2c(1);                   /*發(fā)送非應(yīng)位*/
 Stop_I2c();                    /*結(jié)束總線*/ 
 FCTL1=FWKEY;
 FCTL3 ^=(FXKEY+LOCK);       //加鎖
 //  
 _EINT();       //開全局中斷
}
//--------------------------------------------------
//===信息存儲器的擦除,seg=0時，擦除A段，否則擦除B段.
//--------------------------------------------------
void EraseRam(unsigned char seg)
{ 
unsigned int *pe;
if (seg)    pe=(unsigned int *)0x10f0;  //segment B
else   pe=(unsigned int *)0x1000;    //segment A
 _DINT();  
 while (FCTL3 & BUSY);            //檢查忙標(biāo)志
 FCTL3=FWKEY;                     //解鎖
 while (FCTL3 & BUSY);            //檢查忙標(biāo)志
 FCTL1=FWKEY+ERASE;               //所有段擦除允許
 *pe=0;
 while (FCTL3 & BUSY);            //檢查忙標(biāo)志
 FCTL3 ^=(FXKEY+LOCK);            //加鎖
 while (FCTL3 & BUSY);            //檢查忙標(biāo)志 
  _EINT();       //開全局中斷
}
//==============================================================
感謝：
     利爾達電子公司的銷售助理 章榴媚 小姐！
     周立功單片機有限公司！