iic_master.c

Small RTOSv1.12.x 下dp-51例子, 包括完整的原程序和说明

/*********************************************************************************************************
**                                             Small RTOS(51)
**                                   The Real-Time Kernel(For Keil c51)
**
**                                  (c) Copyright 2002-2003, chenmingji
**                                           All Rights Reserved
**
**                                                  V1.12.1
**
**
**--------------文件信息--------------------------------------------------------------------------------
**文   件   名: IIC_Master.c
**创   建   人: 陈明计
**最后修改日期:  2002年12月3日
**描        述: Small RTOS IIC总线主器件驱动程序源文件，也可以在不使用
**              Small RTOS的情况下使用（标准51CPU12MHz时100KHz IIc总线
**              仿真）
**--------------历史版本信息----------------------------------------------------------------------------
** 创建人: 陈明计
** 版  本: V1.00
** 日　期: 2003年2月28日
** 描　述: 原始版本
**
**------------------------------------------------------------------------------------------------------
** 修改人:
** 版  本:
** 日　期:
** 描　述:
**
**--------------当前版本修订------------------------------------------------------------------------------
** 修改人: 
** 日　期:
** 描　述:
**
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
#include "config.h"


/*********************************************************************************************************
** 函数名称: IICRead
** 功能描述: 从IIC总线读取数据
** 输　入: Ret:存储读取的数据
**         Addr:IIC从器件地址
**         Nbyte:读取的字节数目
** 输　出: TRUE:成功
**         FALSE:失败
** 全局变量: 无
** 调用模块: 无
********************************************************************************************************/
        uint8 IICRead(uint8 OS_SEM_MEM_SEL *Ret,uint8 Addr,uint8 NByte)
{
    uint8 i;
    
    Addr = Addr | 0x01;
    if (IICStart() == FALSE)
    {
        return FALSE;
    }

    if(IICSend(Addr) == FALSE)
    {
        return FALSE;
    }
    i = NByte - 1;
    if (i != 0)
    {
        do
        {
            *Ret++ = IICReceive();
            IIC_ACK();
        } while (--i != 0);
    }
    *Ret = IICReceive();
    IIC_NO_ACK();
    IICStop();
    return TRUE;    
}

/*********************************************************************************************************
** 函数名称: IICWrite
** 功能描述: 往IIC总线写数据
** 输　入: Addr:IIC从器件地址
**         Data:存储将要写的数据
**         Nbyte:写的字节数目
** 输　出: TRUE:成功
**         FALSE:失败
** 全局变量: 无
** 调用模块: 无
********************************************************************************************************/
        uint8 IICWrite(uint8 Addr,uint8 OS_SEM_MEM_SEL *Data,uint8 NByte)
{
    uint8 i;

    Addr = Addr & 0xfe;
    if (IICStart() == FALSE)
    {
        return FALSE;
    }
    if (IICSend(Addr) == FALSE)
    {
        return FALSE;
    }
    i = NByte;
    do
    {
        if (IICSend(*Data++) == FALSE)
        {
            return FALSE;
        }
    } while (--i !=0 );
    IICStop();
    return TRUE;
}

/*********************************************************************************************************
** 函数名称: IICInit
** 功能描述: IIC总线初始化
** 输　入: 无
** 输　出: 无
** 全局变量: 无
** 调用模块: 无
********************************************************************************************************/
        void IICInit(void)
{
    SCL = 0;
    IICStop();
}
 
/*********************************************************************************************************
** 函数名称: IICStart
** 功能描述: 发送IIC启动信号
** 输　入: 无
** 输　出: TRUE:成功
**         FALSE:失败
** 全局变量: 无
** 调用模块: 无
********************************************************************************************************/
        uint8 IICStart(void)
{
    SDA = 1;
    SCL = 1;
    if (SDA == 1)
    {
        SDA = 0;
        _nop_();
        SCL = 0;
        SDA = 1;
        return TRUE;
    }
    else
    {
        return FALSE;
    }
}

/*********************************************************************************************************
** 函数名称: IICStop
** 功能描述: 发送IIC结束信号
** 输　入: 无
** 输　出: 无
** 全局变量: 无
** 调用模块: 无
********************************************************************************************************/
        void IICStop(void)
{
    SDA = 0;
    _nop_();
    _nop_();
    SCL = 1;
    SDA = 1;
    _nop_();
    _nop_();
    _nop_();
    SCL = 0;
}

/*********************************************************************************************************
** 函数名称: IIC_ACK
** 功能描述: 发送IIC应答信号
** 输　入: 无
** 输　出: 无
** 全局变量: 无
** 调用模块: 无
********************************************************************************************************/
        void IIC_ACK(void)
{
    SDA = 0;
    _nop_();
    _nop_();
    SCL = 1;
    _nop_();
    _nop_();
    _nop_();
    _nop_();
    SCL = 0;
}

/*********************************************************************************************************
** 函数名称: IIC_NO_ACK
** 功能描述: 发送IIC无应答信号
** 输　入: 无
** 输　出: 无
** 全局变量: 无
** 调用模块: 无
********************************************************************************************************/
        void IIC_NO_ACK(void)
{
    SDA = 1;
    _nop_();
    _nop_();
    SCL = 1;
    _nop_();
    _nop_();
    _nop_();
    _nop_();
    SCL = 0;
    return;
}

/*********************************************************************************************************
** 函数名称: IICSend
** 功能描述: 发送一个字节
** 输　入: IIC_data:数据
** 输　出: TRUE:成功
**         FALSE:失败
** 全局变量: 无
** 调用模块: 无
********************************************************************************************************/
        uint8 IICSend(uint8 IIC_data)
{
    uint8 i;
    
    for (i = 0; i < 8; i++)
    {
        IIC_data = IIC_data << 1;
        F0 = SDA = CY;
        SCL = 1;
        if (F0 != SDA)
        {
            SCL = 0;
            return FALSE;
        }
        _nop_();
        _nop_();
        SCL = 0;
    }
    SDA = 1;
    _nop_();
    _nop_();
    SCL = 1;
    _nop_();
    _nop_();
    if (SDA == 1)
    {
        SCL = 0;
        return FALSE;
    }
    else
    {
        SCL = 0;
        return TRUE;
    }
}

/*********************************************************************************************************
** 函数名称: IICReceive
** 功能描述: 读取一个字节
** 输　入: 无
** 输　出: 读取的字节
** 全局变量: 无
** 调用模块: 无
********************************************************************************************************/
        uint8 IICReceive(void)
{
    uint8 i,r;
    
    r = 0;
    SDA = 1;
    for (i = 0; i < 8; i++)
    {
        r = r * 2;
        SCL = 1;
        _nop_();
        _nop_();
        if (SDA == 1)
        {
            r++;
        }
        SCL = 0;
    }
    return r;
}

/*********************************************************************************************/
/*                                 End of File                                               */
/*********************************************************************************************/