iicmoni.c

该程序是pic单片机程序

#include "pic.h"

#define uchar   unsigned char
#define nop()  asm("nop")
#define SCL  TRISC3
#define SDA  TRISC4

void start_i2c();
void stop_i2c();
void send_byte(uchar c);
uchar receive_byte();
void I_send_str(uchar sla,uchar suba,uchar *s,uchar no);
void delay_250ms();
void i2c_error ();

uchar code[]={0x00,0x01,0x03,0x07,0x0f,0x1f,0x3f,0x7f,0xff};
uchar no,ack,c,data;


void main(void)
{
  uchar i;
  TRISC=0Xff;     //C口设为输入 RC3为SCL线，RC4为SDA线。
  PORTC=0X00;     
  TRISD=0X00;     //D口为输出，显示IC24LC02中读出的内容
  PORTD=0X00;     //初始显示全亮

  I_send_str(0xa0,0x00,code,9); //页写入code数组到24LC02,器件地址为0Xa0,子地址为0X00，共9个数。
  
  delay_250ms();
  

  ///////////开始读出到D口进行显示,根据Random read时序图。
  while (1)
   {
     for (i=0x00;i<0x09;i++)
      {
       start_i2c();
       send_byte(0xa0);      //发送器件地址，即DEVICE ADDRESS。
         if (ack==0) i2c_error(); //如果24LC02无应答。则进入I2C ERROR错误指示。
       send_byte(i);         //发送字地址，即WORD ADDRESS。D口显示数组。
         if (ack==0) i2c_error();
       start_i2c();          //重新启动总线。
       send_byte(0xa1);      //发送读命令和器件地址DEVICE ADDRESS。
         if (ack==0) i2c_error();
       data=receive_byte();
       stop_i2c();
       PORTD=data;
       delay_250ms();
      }
   }
}


/*******************************************************************
起动总线函数
函数原型： void start_i2c();
Function: start on the I2C bus 
*******************************************************************/
void start_i2c()
{
  SDA=1;       //发送启始条件的数据信号
  nop();
  SCL=1;
  nop();nop();nop();nop();nop(); //24LC02要求建立时间大于4，7S
  SDA=0;                      //发送起始信号
  nop();nop();nop();nop();nop();
  SCL=0;                      //钳住I2C总线，准备发送数据或接收数据
  nop();nop();
}


/*******************************************************************
停止总线函数
函数原型： void stop_i2c();
Function: stop the I2C bus
*******************************************************************/
void stop_i2c()
{
  
  SDA=0; //发送结束条件的数据信号
  nop();
  SCL=1;
  nop();nop();nop();nop();nop();
  SDA=1;
  nop();nop();nop();nop();
}

/*=================================================================
字节数据传送函数
函数原型： void send_byte(uchar c);
Function: 将数据C发送出去，可以是地址，也可以是数据，发完后等待回应，并对此状态
          位进行操作（不应答或非应答都使ack=0 ），发送数据正常，ack=1;ack=0
          表示被控器无应答或损坏。
==================================================================*/
void send_byte(uchar c)
{
  uchar bit_count;
  for (bit_count=0;bit_count<8;bit_count++)
   {
    if ((c<<bit_count)&0x80) {SDA=1;}
    else {SDA=0;}
    nop();
    SCL=1;
    nop();nop();nop();nop();nop();
    SCL=0;
   }
   nop();nop();
   SDA=1;
   nop();nop();
   SCL=1;
   nop();nop();nop();
   if (RC4==1) ack=0;
   else ack=1; //用ASK=1为有应答信号
   SCL=0;
   nop();nop();
} 

/*==================================================================
字节数据接收函数
函数原型：uchar receive_byte();
FUNCTION: 用来接收从器件传来的数据，并判断总线错误（不发应答信号），
          发完后请用应答函数。
===================================================================*/
uchar receive_byte()
{
   uchar retc,bit_count;
   retc=0;
   SDA=1;
   for (bit_count=0;bit_count<8;bit_count++)
   {
      nop();
      SCL=0;
      nop();nop();nop();nop();nop();
      SCL=1;
      nop();nop();
      retc=retc<<1;
      if (RC4==1)  retc=retc+1;
      nop();nop();
    }
    SCL=0;
    nop();nop();
    return (retc);
}


/*================================================================
向有子地址器件发送多字节数据函数
函数原型： bit I_send_str(uchar sla,uchar suba,uchar *s,uchar no);
Function: 从启动总线到发送地址，数据，结束总线的全过程，从器件地址sla。如果
          返回1表示操作成功，否则操作有误。
=================================================================*/
void I_send_str(uchar sla,uchar suba,uchar *s,uchar no)
{
   uchar i;
   start_i2c();
   send_byte(sla);
   if (ack==0)  i2c_error();
   send_byte(suba);
   if (ack==0)  i2c_error();
   for (i=0;i<no;i++)
    {
      send_byte(*s);
      if (ack==0)  i2c_error();
      s++;
    }
   stop_i2c();
  // return(1);
}

/*****************************************************************
延时函数
函数原型： void delay_250ms();
FUNCTION: 延明250ms
*****************************************************************/
void delay_250ms()
{
  unsigned int d=24999;
  while (--d);
}

/*****************************************************************
总线错误函数
函数原型：　void i2c_error();
Function: 通过RD7闪动8次表示总线操作失败一次报警。
*****************************************************************/
void i2c_error ()
{
  uchar i;
  for (i=0;i<8;i++)
  {
    RD7=0;
    delay_250ms();
    RD7=1;
    delay_250ms();
  }
  
}
/**********END**************/