/***********************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>

#include <intrins.h>

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

sbit I2C_SCL = P3^7;

sbit I2C_SDA = P3^6;

bit I2CAddressing(unsigned char addr);

extern void LcdInit();

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

void main ()

{

    bit ack;

    unsigned char str[10];

    LcdInit();        //初始化液晶

    ack = I2CAddressing(0x50); //查询地址为0x50的器件

    str[0] = '5';              //将地址和应答值转换为字符串

    str[1] = '0';

    str[2] = ':';

    str[3] = (unsigned char)ack + '0';

    str[4] = '\0';

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

    ack = I2CAddressing(0x62); //查询地址为0x62的器件

    str[0] = '6';              //将地址和应答值转换为字符串

    str[1] = '2';

    str[2] = ':';

    str[3] = (unsigned char)ack + '0';

    str[4] = '\0';

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

    while(1)

    {}

}

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

    I2CDelay();

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

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

    return ack;    //返回从机应答值

}

bit I2CAddressing(unsigned char addr) //I2C寻址函数，即检查地址为addr的器件是否存在，返回值为其应答值，即应答则表示存在，非应答则表示不存在

{

    bit ack;

    I2CStart();  //产生起始位，即启动一次总线操作

    ack = I2CWrite(addr<<1);  //器件地址需左移一位，因寻址命令的最低位为读写位，用于表示之后的操作是读或写

    I2CStop();   //不需进行后续读写，而直接停止本次总线操作

    return ack;

}