8051学习笔记——IIC与EEPROM实验

main.c

 #include <reg51.h>
 #include "iic.h"
 #define  AT24C02 0xa0  //AT24C02 地址

 sbit    LS138A=P2^;      //译码器端
 sbit    LS138B=P2^;
 sbit    LS138C=P2^; 

 sbit    K1 = P1^;     //保存
 sbit    K2 = P1^;     //读取
 sbit    K3 = P1^;     //+数据
 sbit    K4 = P1^;   //-数据

 void delay(unsigned int i);

 //此表为 LED 的字模, 共阴数码管 0-9
 unsigned char code Disp_Tab[] = {0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x40}; 

 unsigned char Count1;
 unsigned long D[], LedOut[],LedNumVal;
 unsigned int idata USEC;   //表示这个变量类型是unsigned int，地址在idata区，也就是内部RAM地址的128～255内

 void  system_ini()
 {
     TMOD|= 0x11;    //mode 1
     TH1 = 0xfe;     //0.5ms
     TL1 = 0x0c;
     TR1 = ;
     IE = 0x8A;
 }

 void main()
 {
     unsigned char i;
     unsigned char pDat[];

        system_ini();
        while()
        {
          //========================IIC 读取
         if(K2 == )       //第二个按钮读取数据
         {
               IRcvStr(AT24C02,,&pDat[], );
               for (i=; i<; i++)
               {
                 D[+i]=pDat[i*+]+pDat[i*+]*0x100;
                 Count1 = D[];
                }
          }

        //========================IIC 保存
            if(K1 == )    //第一个按钮保存数据
            {
             D[]= Count1;
              for (i=; i<; i++)
              {
                    pDat[i*+]=D[+i];
                    pDat[i*+]=D[+i]>>;
              }
              ISendStr(AT24C02,  , &pDat[], );
               D[] = ;
            }

       /********以下将2402中保存的数据送到LED数码管显示*************/
         LedNumVal=Count1;
           LedOut[]=Disp_Tab[LedNumVal%/];
           LedOut[]=Disp_Tab[LedNumVal%/];
           LedOut[]=Disp_Tab[LedNumVal%/]|0x80;
           LedOut[]=Disp_Tab[LedNumVal%]; 

         for(i=; i<; i++)
           {
             P0 =  LedOut[i];

             switch(i)
              {
                 case :LS138A=; LS138B=; LS138C=; break;
                 case :LS138A=; LS138B=; LS138C=; break;
                 case :LS138A=; LS138B=; LS138C=; break;
                 case :LS138A=; LS138B=; LS138C=; break;
                 case :LS138A=; LS138B=; LS138C=; break;
              }
             delay();
           }
    }
 }

 void delay(unsigned int i)
 {
     char j;
     for(i; i > ; i--)
         for(j = ; j > ; j--);
 }

 void T1zd(void) interrupt    //3 为定时器1的中断号  1 定时器0的中断号 0 外部中断1 2 外部中断2  4 串口中断
 {
     TH1 = 0xfe; //12M
     TL1 = 0x0c;
        if(USEC++==)
        {
         USEC = ;
         if(!K3) Count1++;     //改变数据
         if(!K4)    Count1--;
     }
 }

iic.h

 #include <reg51.h>
 #include <intrins.h>
 #define _NOP() _nop_()
 sbit    SCL = P2^;
 sbit    SDA = P2^;
 bit ack;

 void Start_IIC()
 {
     SDA = ;
     _NOP();
     SCL = ;
     _NOP();_NOP();_NOP();_NOP();_NOP();
     SDA = ;
     _NOP();_NOP();_NOP();_NOP();_NOP();
     SCL = ;
     _NOP();_NOP();
 }

 void Stop_IIC()
 {
     SDA = ;
     _NOP();
     SCL = ;
     _NOP();_NOP();_NOP();_NOP();_NOP();
     SDA = ;
     _NOP();_NOP();_NOP();_NOP();_NOP();
 }

 void Send_Byte(unsigned char byte)
 {
     int i;
     for(i = ;i < ;i++)
     {
         if((byte << i) & 0x80)    SDA = ;
         else    SDA = ;
         SCL = ;
         _NOP();_NOP();_NOP();_NOP();_NOP();
         SCL = ;
     }

     SCL = ;      //准备接受应答位
     _NOP();_NOP();

     if(SDA == )    ack = ;
     else    ack = ;

     SCL = ;
     _NOP();_NOP();
 }

 unsigned char Rcv_Byte()
 {
     unsigned char byte;
     int i;
     byte = ;

     for(i = ;i < ;i++)
     {
         SCL = ;
         _NOP();_NOP();_NOP();_NOP();_NOP();
         SCL = ;
         _NOP();_NOP();_NOP();_NOP();_NOP();
         byte <<= ;
         if(SDA == )    byte++;
     }
     SCL = ;
     _NOP();_NOP();
     return byte;
 }

 void Ack_IIC(bit a)
 {

   if(a==)    SDA=;              /*在此发出应答或非应答信号 */
   else    SDA=;
   _NOP();_NOP();_NOP();
   SCL=;
   _NOP();_NOP();_NOP();_NOP();_NOP();
   SCL=;                     /*清时钟线，钳住I2C总线以便继续接收*/
   _NOP();_NOP();
 }

 //AT2402的功能函数
 /*******************************************************************
                     向有子地址器件发送多字节数据函数
 函数原型: bit  ISendStr(UCHAR sla,UCHAR suba,ucahr *s,UCHAR no);
 功能:     从启动总线到发送地址，子地址,数据，结束总线的全过程,从器件
           地址sla，子地址suba，发送内容是s指向的内容，发送no个字节。
           如果返回1表示操作成功，否则操作有误。
 注意：    使用前必须已结束总线。
 ********************************************************************/
 bit ISendStr(unsigned char  sla,unsigned char  suba,unsigned char  *s,unsigned char  no)
 {
    unsigned char i;

    Start_IIC();               /*启动总线*/
    Send_Byte(sla);             /*发送器件地址*/
    if(ack==)    return();
    Send_Byte(suba);            /*发送器件字地址，存储单元的地址*/
    if(ack==)    return();

    for(i=;i<no;i++)
    {
      Send_Byte(*s);            /*发送数据*/
      if(ack==)return();
      s++;
    }
    Stop_IIC();                /*结束总线*/ 

    return();
 }

 /*******************************************************************
                     向有子地址器件读取多字节数据函数
 函数原型: bit  RecndStr(UCHAR sla,UCHAR suba,ucahr *s,UCHAR no);
 功能:     从启动总线到发送地址，子地址,读数据，结束总线的全过程,从器件
           地址sla，子地址suba，读出的内容放入s指向的存储区，读no个字节。
            如果返回1表示操作成功，否则操作有误。
 注意：    使用前必须已结束总线。
 ********************************************************************/
 bit IRcvStr(unsigned char  sla,unsigned char suba,unsigned char  *s,unsigned char  no)
 {
     unsigned char i;

     Start_IIC();                  /*启动总线*/
     Send_Byte(sla);                /*发送器件地址*/
     if(ack==)    return();
     Send_Byte(suba);               /*发送器件子地址*/
     if(ack==)    return();

     Start_IIC();                 /*重新启动总线*/
     Send_Byte(sla+);
     if(ack==)    return();
     for(i=;i<no-;i++)
     {
         *s=Rcv_Byte();               /*发送数据*/
           Ack_IIC();                  /*发送就答位*/
          s++;
        }
        *s=Rcv_Byte();
        Ack_IIC();                   /*发送非应答位*/
        Stop_IIC();                   /*结束总线*/
        return ;
 }