/*************************I2C.c文件程序源代码***************************/

#include <reg52.h>

#include <intrins.h>

#define I2CDelay()  {_nop_();_nop_();_nop_();_nop_();}

sbit I2C_SCL = P3^7;

sbit I2C_SDA = P3^6;

void I2CStart()  //产生总线起始信号

{

    I2C_SDA = 1; //首先确保SDA、SCL都是高电平

    I2C_SCL = 1;

    I2CDelay();

    I2C_SDA = 0; //先拉低SDA

    I2CDelay();

    I2C_SCL = 0; //再拉低SCL

}

void I2CStop()   //产生总线停止信号

{

    I2C_SCL = 0; //首先确保SDA、SCL都是低电平

    I2C_SDA = 0;

    I2CDelay();

    I2C_SCL = 1; //先拉高SCL

    I2CDelay();

    I2C_SDA = 1; //再拉高SDA

    I2CDelay();

}

bit I2CWrite(unsigned char dat) //I2C总线写操作，待写入字节dat，返回值为应答状态

{

    bit ack;  //用于暂存应答位的值

    unsigned char mask;  //用于探测字节内某一位值的掩码变量

    for (mask=0x80; mask!=0; mask>>=1) //从高位到低位依次进行

    {

        if ((mask&dat) == 0)  //该位的值输出到SDA上

            I2C_SDA = 0;

        else

            I2C_SDA = 1;

        I2CDelay();

        I2C_SCL = 1;          //拉高SCL

        I2CDelay();

        I2C_SCL = 0;          //再拉低SCL，完成一个位周期

    }

    I2C_SDA = 1;   //8位数据发送完后，主机释放SDA，以检测从机应答

    I2CDelay();

    I2C_SCL = 1;   //拉高SCL

    ack = I2C_SDA; //读取此时的SDA值，即为从机的应答值

    I2CDelay();

    I2C_SCL = 0;   //再拉低SCL完成应答位，并保持住总线

    return (~ack); //应答值取反以符合通常的逻辑：0=不存在或忙或写入失败，1=存在且空闲或写入成功

}

unsigned char I2CReadNAK() //I2C总线读操作，并发送非应答信号，返回值为读到的字节

{

    unsigned char mask;

    unsigned char dat;

    I2C_SDA = 1;  //首先确保主机释放SDA

    for (mask=0x80; mask!=0; mask>>=1) //从高位到低位依次进行

    {

        I2CDelay();

        I2C_SCL = 1;      //拉高SCL

        if(I2C_SDA == 0)  //读取SDA的值

            dat &= ~mask; //为0时，dat中对应位清零

        else

            dat |= mask;  //为1时，dat中对应位置1

        I2CDelay();

        I2C_SCL = 0;      //再拉低SCL，以使从机发送出下一位

    }

    I2C_SDA = 1;   //8位数据发送完后，拉高SDA，发送非应答信号

    I2CDelay();

    I2C_SCL = 1;   //拉高SCL

    I2CDelay();

    I2C_SCL = 0;   //再拉低SCL完成非应答位，并保持住总线

    return dat;

}

unsigned char I2CReadACK() //I2C总线读操作，并发送应答信号，返回值为读到的字节

{

    unsigned char mask;

    unsigned char dat;

    I2C_SDA = 1;  //首先确保主机释放SDA

    for (mask=0x80; mask!=0; mask>>=1) //从高位到低位依次进行

    {

        I2CDelay();

        I2C_SCL = 1;      //拉高SCL

        if(I2C_SDA == 0)  //读取SDA的值

            dat &= ~mask; //为0时，dat中对应位清零

        else

            dat |= mask;  //为1时，dat中对应位置1

        I2CDelay();

        I2C_SCL = 0;      //再拉低SCL，以使从机发送出下一位

    }

    I2C_SDA = 0;   //8位数据发送完后，拉低SDA，发送应答信号

    I2CDelay();

    I2C_SCL = 1;   //拉高SCL

    I2CDelay();

    I2C_SCL = 0;   //再拉低SCL完成应答位，并保持住总线

    return dat;

}

/***********************lcd1602.c文件程序源代码*************************/

#include <reg52.h>

#define LCD1602_DB   P0

sbit LCD1602_RS = P1^0;

sbit LCD1602_RW = P1^1;

sbit LCD1602_E  = P1^5;

void LcdWaitReady()  //等待液晶准备好

{

    unsigned char sta;

    LCD1602_DB = 0xFF;

    LCD1602_RS = 0;

    LCD1602_RW = 1;

    do

    {

        LCD1602_E = 1;

        sta = LCD1602_DB; //读取状态字

        LCD1602_E = 0;

    } while (sta & 0x80); //bit7等于1表示液晶正忙，重复检测直到其等于0为止

}

void LcdWriteCmd(unsigned char cmd)  //写入命令函数

{

    LcdWaitReady();

    LCD1602_RS = 0;

    LCD1602_RW = 0;

    LCD1602_DB = cmd;

    LCD1602_E  = 1;

    LCD1602_E  = 0;

}

void LcdWriteDat(unsigned char dat)  //写入数据函数

{

    LcdWaitReady();

    LCD1602_RS = 1;

    LCD1602_RW = 0;

    LCD1602_DB = dat;

    LCD1602_E  = 1;

    LCD1602_E  = 0;

}

void LcdShowStr(unsigned char x, unsigned char y, const unsigned char *str)  //显示字符串，屏幕起始坐标(x,y)，字符串指针str

{

    unsigned char addr;

    //由输入的显示坐标计算显示RAM的地址

    if (y == 0)

        addr = 0x00 + x; //第一行字符地址从0x00起始

    else

        addr = 0x40 + x; //第二行字符地址从0x40起始

    //由起始显示RAM地址连续写入字符串

    LcdWriteCmd(addr | 0x80); //写入起始地址

    while (*str != '\0')      //连续写入字符串数据，直到检测到结束符

    {

        LcdWriteDat(*str);

        str++;

    }

}

void LcdInit()  //液晶初始化函数

{

    LcdWriteCmd(0x38);  //16*2显示，5*7点阵，8位数据接口

    LcdWriteCmd(0x0C);  //显示器开，光标关闭

    LcdWriteCmd(0x06);  //文字不动，地址自动+1

    LcdWriteCmd(0x01);  //清屏

}

/************************main.c文件程序源代码**************************/

#include <reg52.h>

extern void LcdInit();

extern void LcdShowStr(unsigned char x, unsigned char y, const unsigned char *str);

extern void I2CStart();

extern void I2CStop();

extern unsigned char I2CReadACK();

extern unsigned char I2CReadNAK();

extern bit I2CWrite(unsigned char dat);

unsigned char E2ReadByte(unsigned char addr);

void E2WriteByte(unsigned char addr, unsigned char dat);

void main ()

{

    unsigned char dat;

    unsigned char str[10];

    LcdInit();   //初始化液晶

    dat = E2ReadByte(0x02);    //读取指定地址上的一个字节

    str[0] = (dat/100) + '0';  //转换为十进制字符串格式

    str[1] = (dat/10%10) + '0';

    str[2] = (dat%10) + '0';

    str[3] = '\0';

    LcdShowStr(0, 0, str);     //显示在液晶上

    dat++;                     //将其数值+1

    E2WriteByte(0x02, dat);    //再写回到对应的地址上

    while(1)

    {}

}

unsigned char E2ReadByte(unsigned char addr) //读取EEPROM中的一个字节，字节地址addr

{

    unsigned char dat;

    I2CStart();

    I2CWrite(0x50<<1); //寻址器件，后续为写操作

    I2CWrite(addr);    //写入存储地址

    I2CStart();        //发送重复启动信号

    I2CWrite((0x50<<1)|0x01); //寻址器件，后续为读操作

    dat = I2CReadNAK();       //读取一个字节数据

    I2CStop();

    return dat;

}

void E2WriteByte(unsigned char addr, unsigned char dat) //向EEPROM中写入一个字节，字节地址addr

{

    I2CStart();

    I2CWrite(0x50<<1); //寻址器件，后续为写操作

    I2CWrite(addr);    //写入存储地址

    I2CWrite(dat);     //写入一个字节数据

    I2CStop();

}

/***********************************************************************/