发新帖我要提问
返回列表
打印
[Kinetis]

I2C模拟驱动

[复制链接]
741|4
手机看帖
扫描二维码
随时随地手机跟帖
跳转到指定楼层
楼主
ccw1986|  楼主 | 2016-1-22 21:02 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
模拟, I2c, TE, AC, ck
复制
*******************************************************************************

*

* 

*

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



#include "sw_iic.h"



//----I2C Variables -------------------------------------------------------

byte ak1=NACK;

byte ak2=NACK;

byte ak3=NACK;

//-------------------------------------------------------------------------



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

*        Function:         Delay

*        Parameters: 16-bit delay value

*        Return:                none

*

*        Simple delay loop.

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

void SwIIC_Delay(byte count) 

{

        byte i;

        for (i=0; i<count; i++)

        {

    //asm nop;           

        }

}



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

*        Function:         Wait

*        Parameters: 8-bit delay value

*        Return:                none

*

*        Simple delay loop. Little longer than delay function.

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

void SwIIC_Wait(byte loop)

{

 while(--loop); 

 {                     

    //asm nop;      

 }

}



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

*        Function:         SwIIC_Init

*        Parameters: none

*        Return:                none

*

*        Function initialize sw IIC interface

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

void SwIIC_Init(void)

{

  SCL_D = P_IN;

  SDA_D = P_IN;

  SS_D = P_OUT; 

  SCL_PU = PU_ON;

  SDA_PU = PU_ON;

  SS=1;                 

}



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

*        Function:         IIC_DATA_0                 

*        Parameters: none

*        Return:                none

*

*        Physical layer of IIC - Write '0' on bus   

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

void IIC_DATA_0(void)

{

  word i = 0; 

  

  SDA = 0; 

  SDA_D = P_OUT;

  SwIIC_Wait(SDA_HOLD); 

  SCL_D = P_IN; 

  while((!SCL) && (i++ < MAX_IIC_TIMEOUT));

  SwIIC_Wait(SCL_HOLD); 

  SCL = 0; 

  SCL_D = P_OUT;

  SwIIC_Wait(SCL_HOLD);

}



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

*        Function:         IIC_DATA_1               

*        Parameters: none

*        Return:                none

*

*        Physical layer of IIC - Write '1' on bus   

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

void IIC_DATA_1(void)

{

  word i = 0;

  

  SDA_D = P_IN;

  SwIIC_Wait(SDA_HOLD);

  SCL_D = P_IN; 

  while((!SCL) && (i++ < MAX_IIC_TIMEOUT));

  SwIIC_Wait(SCL_HOLD); 

  SCL = 0; 

  SCL_D = P_OUT;

  SwIIC_Wait(SCL_HOLD);

}



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

*        Function:         IIC_GetBit                       

*        Parameters: none

*        Return:                value of bit on bus

*

*        Physical layer of IIC - Read a bit from bus IIC 

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

byte IIC_GetBit(void)

{

  byte level;

  word i = 0;



  SDA_D = P_IN;

  SwIIC_Wait(SDA_HOLD);

  SCL_D = P_IN; 

  while((!SCL) && (i++ < MAX_IIC_TIMEOUT));

  SwIIC_Wait(SCL_HOLD);

  level = SDA;

  SCL = 0; 

  SCL_D = P_OUT;

  SwIIC_Wait(SCL_HOLD);

  return level;  

}


使用特权

评论回复 赏

相关下载

相关帖子

沙发
ccw1986|  楼主 | 2016-1-22 21:03 | 只看该作者
复制
/**************************************************************

*        Function:         IIC_START                   

*        Parameters: none

*        Return:                none

*

*        Physical layer of IIC - Set up START condition on bus

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

void IIC_START(void)

{

  SDA = 0; 

  SDA_D = P_OUT;

  SwIIC_Wait(SDA_HOLD);

  SCL = 0; 

  SCL_D = P_OUT;

  SwIIC_Wait(SCL_HOLD);

}



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

*        Function:         IIC_REPEAT_START              

*        Parameters: none

*        Return:                none

*

*        Physical layer of IIC - Set up REPEAT_START condition on bus

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

void IIC_REPEAT_START(void)

{

  word i = 0;

  

  SDA_D = P_IN;

  SwIIC_Wait(SDA_HOLD);

  SCL_D = P_IN; 

  while((!SCL) && (i++ < MAX_IIC_TIMEOUT));

  SwIIC_Wait(SCL_HOLD); 

  IIC_START();

}



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

*        Function:         IIC_STOP                       

*        Parameters: none

*        Return:                none

*

*        Physical layer of IIC - Set up STOP condition on bus

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

void IIC_STOP(void)

{

  word i = 0;

  

  SDA = 0; 

  SDA_D = P_OUT;

  SwIIC_Wait(SDA_HOLD); 

  SCL_D = P_IN; 

  while((!SCL) && (i++ < MAX_IIC_TIMEOUT));

  SwIIC_Wait(SCL_HOLD); 

  SDA_D = P_IN;

  SwIIC_Wait(SDA_HOLD);

}



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

*        Function:         SwIIC_SendAddressWrite          

*        Parameters: tx_byte

*        Return:                none

*

*        Send device address on bus with write flag 

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

void SwIIC_SendAddressWrite(byte tx_byte)

{

  byte k;

 

  tx_byte <<= 1;    

  tx_byte &= 0xfe;  

 

  for(k=8;k>0;k--)    

  {                                

    if (tx_byte & 0x80)            

      IIC_DATA_1();                

    else 

      IIC_DATA_0();

    tx_byte <<= 1;

  } 

  ak1=IIC_GetBit(); 

}

   



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

*        Function:         SwIIC_SendAddressRead           

*        Parameters: tx_byte

*        Return:                none

*

*        Send device address on bus with read flag 

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

void SwIIC_SendAddressRead(byte tx_byte)

{

  byte k;           

 

  tx_byte <<= 1;      

  tx_byte |= 0x01;    

                                           

  for(k=8;k>0;k--)    

  {                                                                    

    if (tx_byte & 0x80)                                                

      IIC_DATA_1();

    else 

      IIC_DATA_0();

    tx_byte <<= 1;

  }

  ak3=IIC_GetBit(); 

}

   

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

*        Function:         SwIIC_SendRegister               

*        Parameters: tx_byte

*        Return:                none

*

*        Send device internal register address on bus  

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

void SwIIC_SendRegister(byte tx_byte)

{

  byte k;

      

  for(k=8;k>0;k--)    

  {         

    if (tx_byte & 0x80) 

      IIC_DATA_1();

    else 

      IIC_DATA_0();

    tx_byte <<= 1;

  }

  ak2=IIC_GetBit(); 

}

使用特权

评论回复 赏
板凳
ccw1986|  楼主 | 2016-1-22 21:04 | 只看该作者
复制
/**************************************************************

*        Function:         IIC_ReadByte                    

*        Parameters: ack

*        Return:                val

*

*        Read a byte from IIC bus  

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

byte IIC_ReadByte(byte ack)      

{                                  

byte i, val;



  for(i=8; i>0; i--)

  {

    val <<= 1;

    val |= IIC_GetBit();

  }

  

  if (ack == IIC_ACK)            

    IIC_DATA_0();                

  else

    IIC_DATA_1();                

                                                                      

  return val;  

}



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

*        Function:         IIC_SendByte                     

*        Parameters: tx_byte

*        Return:                none

*

*        Write a byte to IIC bus  

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

void IIC_SendByte(byte tx_byte)

{

  byte k;      

 

  for(k=8;k>0;k--)    

  {         

    if (tx_byte & 0x80) 

      IIC_DATA_1();

    else 

      IIC_DATA_0();

    tx_byte <<= 1;

  }

  ak3=IIC_GetBit(); 

}



byte IIC_SendByteM(byte tx_byte)

{

  byte k;      

 

  for(k=8;k>0;k--)    

  {         

    if (tx_byte & 0x80) 

      IIC_DATA_1();

    else 

      IIC_DATA_0();

    tx_byte <<= 1;

  }

  

  ak3=IIC_GetBit(); 

  

  return(ak3);

}



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

*        Function:         SwIIC_ReadByte                   

*        Parameters: RegAdd

*        Return:                none

*

*        Complete data transfer - read a byte from device register 

* Note: Secured routine through check of acknowledge

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

byte SwIIC_ReadByte(byte RegAdd)                        

{  

      byte temp;

      ak1=NACK;

      ak2=NACK;

      ak3=NACK;

     

      while(!(ak3==ACK))

      {   

        IIC_START();

        SwIIC_Delay(START_DELAY);                 

        SwIIC_SendAddressWrite(ION_ADDR); 

        SwIIC_Delay(ADDRESS_DELAY);  

          if(!ak1)                                   

          { 

          SwIIC_SendRegister(RegAdd); 

              if(!ak2)                               

              {      

              IIC_REPEAT_START(); 

              SwIIC_Delay(START_DELAY);           

              SwIIC_SendAddressRead(ION_ADDR);

              if(!ak3) temp=IIC_ReadByte(IIC_NACK);  

              }

          }

      IIC_STOP();

      ak1=NACK;

      ak2=NACK;

      }  

    return(temp);    

}



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

*        Function:         SwIIC_WriteByte                  

*        Parameters: RegAdd, RegVal

*        Return:                none

*

*        Complete data transfer - write a byte to device (ION) register

* Note: Secured routine through check of acknowledge 

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

void SwIIC_WriteByte(byte RegAdd, byte RegVal)                      

{     

              

      ak1=NACK;

      ak2=NACK;

      ak3=NACK;

      

      while(ak3)

      { 

        IIC_START();

        SwIIC_Delay(START_DELAY);  

        SwIIC_SendAddressWrite(ION_ADDR); 

        SwIIC_Delay(ADDRESS_DELAY);   

          if(!ak1)                                 

          {

              SwIIC_SendRegister(RegAdd); 

              SwIIC_Delay(ADDRESS_DELAY);

              if(!ak2)                             

              {

              IIC_SendByte(RegVal);

              }

          }

        IIC_STOP();

        ak1=NACK;

        ak2=NACK;

      }           

}



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

*        Function:         SwIIC_MultiRead                  

*        Parameters: RegAdd, *buff (data), cnt - length

*        Return:                none

*

*        Complete data transfer - multiple write a bytes to device (ION) registers 

* Note: Secured routine through check of acknowledge

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

void SwIIC_MultiReadBytes(byte RegAdd, byte *buff, byte cnt)        

{  

  byte i;

  

  i=0; 

  ak1=NACK;

  ak2=NACK; 

  ak3=NACK;

    

      while(!(ak3==ACK))

      {          

       IIC_START();

       SwIIC_Delay(START_DELAY);                 

       SwIIC_SendAddressWrite(ION_ADDR); 

       SwIIC_Delay(ADDRESS_DELAY);

       if(!ak1) 

       { 

        SwIIC_SendRegister(RegAdd);

        if(!ak2)      

        {

         IIC_REPEAT_START();

         SwIIC_SendAddressRead(ION_ADDR);

         SwIIC_Delay(ADDRESS_DELAY);

         if(!ak3)

         {

          for(i=0;i<(cnt - 1);i++)

          {

           *buff++ = IIC_ReadByte(IIC_ACK);

          }

          *buff++ = IIC_ReadByte(IIC_NACK);

         }

        }

       }

       IIC_STOP();

       ak1=NACK;

       ak2=NACK; 

      }

}



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

*        Function:         SwIIC_MultiWrite                

*        Parameters: RegAdd, *buff (data), cnt - length

*        Return:                none

*

*        Complete data transfer - multiple write a bytes into device (ION) registers 

* Note: Secured routine through check of acknowledge

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

void SwIIC_MultiWriteBytes(byte RegAdd, byte *buff, byte cnt) 

{  

  byte i,j,ak[32];

  

  i=0; 

  ak1=NACK;

  ak2=NACK; 

  ak3=NACK;

  for(j=0;j<32;j++) ak[j]=NACK;

    

      while(!(ak[cnt+2]==ACK))

      {                                                   

        IIC_START();

        SwIIC_Delay(START_DELAY);                       

        SwIIC_SendAddressWrite(ION_ADDR); 

        SwIIC_Delay(ADDRESS_DELAY);

          if(!ak1)                                 

          {              

              SwIIC_SendRegister(RegAdd);      

              SwIIC_Delay(ADDRESS_DELAY); 

              ak[2]=ak2; 

              while((!ak[i+2])&&(i<cnt))      

              {

                ak[i+3]=IIC_SendByteM(*(buff++));

                i++;

              } 

          }

        IIC_STOP();

        ak1=NACK;

        for (j=0;j<(cnt-1);j++) ak[j+2]=NACK;

      }

}

使用特权

评论回复 赏
地板
ccw1986|  楼主 | 2016-1-22 21:05 | 只看该作者
复制
***************************************************************************//*!

*

* [url=home.php?mod=space&uid=288409]@file[/url]      sw_iic.h

*

* [url=home.php?mod=space&uid=187600]@author[/url]    R20246

* 

* [url=home.php?mod=space&uid=895143]@version[/url]   2.0.0.1

* 

* [url=home.php?mod=space&uid=212281]@date[/url]      FEB-14-2008

* 

* [url=home.php?mod=space&uid=247401]@brief[/url]     ION (MMA7455L) - Ion MMA7455L in Measure mode (using SPI or IIC) 

*

*******************************************************************************

*

* 

*

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

#ifndef SW_IIC_H

#define SW_IIC_H



#include "derivative.h"



#define ION_ADDR 0x1D /* ION address is 1D */



#define SCL     PTCD_PTCD3        

#define SCL_D   PTCDD_PTCDD3  

#define SCL_PU  PTCPE_PTCPE3  

#define SDA     PTCD_PTCD2        

#define SDA_D   PTCDD_PTCDD2  

#define SDA_PU  PTCPE_PTCPE2 

#define SS      PTBD_PTBD3       

#define SS_D    PTBDD_PTBDD3       

#define SS_PU   PTBPE_PTBPE3      



#define P_OUT   1

#define P_IN    0

#define PU_ON   1

#define PU_OFF  0



#define ACK 0

#define NACK 1



#define IIC_ACK  0

#define IIC_NACK 1



#define START_DELAY 1

#define ADDRESS_DELAY 1



#define SDA_HOLD 5          //20MHz Bus Clock: 1  => IIC 110kHz

#define SCL_HOLD 5          //                 5  => IIC  70kHz



#define MAX_IIC_TIMEOUT 0x9F00



// FUNCTION DECLARATION

void SwIIC_Delay(byte); 

void SwIIC_Wait(byte);

void IIC_DATA_0(void);

void IIC_DATA_1(void);

byte IIC_GetBit(void);

void IIC_START(void);

void IIC_REPEAT_START(void);

void IIC_STOP(void);

byte IIC_ReadByte(byte ack); 

void IIC_SendByte(byte tx_byte);

byte IIC_SendByteM(byte tx_byte);

void SwIIC_Init(void); 

void SwIIC_SendAddressWrite(byte tx_byte);

void SwIIC_SendAddressRead(byte tx_byte);

void SwIIC_SendRegister(byte tx_byte);

byte SwIIC_ReadByte(byte RegAdd);

void SwIIC_WriteByte(byte RegAdd, byte RegVal);

void SwIIC_MultiReadBytes(byte num, byte *buff, byte cnt);

void SwIIC_MultiWriteBytes(byte num, byte *buff, byte cnt);

  

#endif //SW_IIC_H

使用特权

评论回复 赏
5楼
neeringstu| | 2016-1-23 20:51 | 只看该作者
这个需要保存啊，也可以用于其他单片机之类的吗
KL系列的iic不是挺好用的吗，为啥还要模拟

使用特权

评论回复 赏
返回列表
发新帖 我要提问
高级模式
B Color Image Link Quote Code 收费 Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

ccw1986

84

主题

925

帖子

6

粉丝