comram.c

这是一个单片机的项目

/****************************************************************************************
File: ComRam.c
Description:用来读写公共RAM的IIC程序。
Author: [e-mail] [e-mail]
Date:   September,2007
****************************************************************************************/
#include<string.h>
#include <SM89516A.h>
#include<intrins.h>
#include"SerialPort.h"

#define uchar unsigned char
#define uint  unsigned int

#define WRITE 0xa0
#define READ  0xa1 
#define DELAY 5

/*端口位定义*/
sbit SCL=P0^0;            /*模拟I2C时钟控制位*/
sbit SDA=P0^1;            /*模拟I2C数据传送位*/

bit  AckCom;          /*应答标志位*/


/****************************************************************************************
功能:ComStart,起动总线函数.
描述:启动I2C总线,即发送I2C起始条件.
参数:无
返回:无
****************************************************************************************/
void ComStart()
{
  SDA=1;   /*发送起始条件的数据信号*/
  Delay(DELAY);

  SCL=1;    /*起始条件建立时间大于4.7us,延时*/
  Delay(DELAY);   

  SDA=0;   /*发送起始信号*/ /* 起始条件锁定时间大于4μs*/
  Delay(DELAY);   
    
  SCL=0;   /*钳住I2C总线，准备发送或接收数据 */
  Delay(DELAY);
}

/****************************************************************************************
功能:ComStop,结束总线函数.
描述:结束I2C总线,即发送I2C结束条件.
参数:无
返回:无
****************************************************************************************/
void ComStop()
{
  SDA=0;  /*发送结束条件的数据信号*/
  Delay(DELAY); 

  SCL=1;  /*结束条件建立时间大于4μs*/
  Delay(DELAY);

  SDA=1;  /*发送I2C总线结束信号*/
  Delay(DELAY);
}

/****************************************************************************************
功能:ComSendByte,字节数据传送函数.
描述:将数据c发送出去,可以是地址,也可以是数据,发完后等待应答,并对此状态位进行操作.(不应答
     或者非应答都使ack=0 假)发送数据正常，ack=1; ack=0表示被控器无应答或损坏。
参数:c---需要发送的字符。
返回:无
****************************************************************************************/
void ComSendByte(uchar c)
{
    uchar BitCnt;
 
    for(BitCnt=0;BitCnt<8;BitCnt++)  //要传送的数据长度为8位
    {
      if((c<<BitCnt)&0x80)  //判断发送位*/
	     SDA=1;   
      else  
		 SDA=0;       
         
      Delay(DELAY);
      SCL=1;            //置时钟线为高，通知被控器开始接收数据位保证时钟高电平周期大于4μ

      Delay(DELAY);       
      SCL=0; 
    }
    
    Delay(DELAY);
    SDA=1;             //8位发送完后释放数据线，准备接收应答位
    Delay(DELAY);

    SCL=1;
    Delay(DELAY);

    if(SDA==1)        //判断是否接收到应答信号
	   AckCom=0;     
    else 
	   AckCom=1;        

    SCL=0;
    Delay(DELAY);
}

/****************************************************************************************
功能:ComRcvByte,字节数据传送函数。
描述:用来接收从器件传来的数据,并判断总线错误(不发应答信号)，发完后请用应答函数。
参数:无
返回:无
****************************************************************************************/
uchar ComRcvByte()
{
  uchar retc;
  uchar BitCnt;
  
  retc=0; 
  SDA=1;             //置数据线为输入方式

  for(BitCnt=0;BitCnt<8;BitCnt++)
  {
     Delay(DELAY);           
     SCL=0;          //置时钟线为低，准备接收数据位,时钟低电平周期大于4.7μs
     Delay(DELAY);

     SCL=1;          //置时钟线为高使数据线上数据有效
     Delay(DELAY);

     retc=retc<<1;

     if(SDA==1)
	    retc=retc+1; //读数据位,接收的数据位放入retc中
     Delay(DELAY);
  }

  SCL=0;    
  Delay(DELAY);

  return(retc);
}

/****************************************************************************************
功能:ComAck,应答子函数。
描述:主控器进行应答信号,(可以是应答或非应答信号)。
参数:a---应答与否，a==1应答，a==0不应答。
返回:无
****************************************************************************************/
void ComAck(bit a)
{
  
  if(a==0)         //在此发出应答或非应答信号
     SDA=0;     
  else 
	 SDA=1;

  Delay(DELAY);     

  SCL=1;           //时钟低电平周期大于4μs
  Delay(DELAY);  

  SCL=0;           //清时钟线，钳住I2C总线以便继续接收
  Delay(DELAY);   
}
 
/****************************************************************************************
功能:ComWriteOneByte,向有子地址器件发送字节数据函数。
描述:从启动总线到发送地址，数据，结束总线的全过程,从器件地址sla.如果返回1表示操作成功，否
     则操作有误，使用前必须已结束总线。
参数:sla---器件地址；c---发送的字符。
返回:无
****************************************************************************************/
bit ComWriteOneByte(uint sla,uchar c)
{
   ComStart();             //启动总线

   ComSendByte(WRITE);       
   if(AckCom==0)return(0);   //发送器件地址 
  
   ComSendByte(sla>>8);      
   if(AckCom==0)return(0);   //高address

   ComSendByte(sla);         
   if(AckCom==0)return(0);   //low address 

   ComSendByte(c);           
   if(AckCom==0)return(0);   //发送数据
   
   ComStop();              //结束总线 
   return(1);
}

/****************************************************************************************
功能:ComWriteBytes,向有子地址器件发送多字节数据函数。
描述:从启动总线到发送地址，子地址,数据，结束总线的全过程,从器件地址sla，子地址suba，发送
     内容是s指向的内容，发送no个字节。 如果返回1表示操作成功，否则操作有误。使用前必须已
	 结束总线。
参数:suba---子地址，s---指向发送的内容，no---发送字符个数。
返回:写成功则返回1，否则返回0.
****************************************************************************************/
bit ComWriteBytes(uint suba,uchar *s,uchar no)
{
   uchar i;

   ComStart();      
            
   ComSendByte(WRITE);    
   if(AckCom==0)return(0);

   ComSendByte(suba>>8);  
   if(AckCom==0)return(0);

   ComSendByte(suba);     
   if(AckCom==0)return(0);
   
   for(i=0;i<no;i++)
    {   
       ComSendByte(*s);   
	   if(AckCom==0)return(0);	              
       s++;
    } 

  ComStop();                
  return(1);
}

/****************************************************************************************
功能:ComReadOneByte,向无子地址器件读字节数据函数。
描述:从启动总线到发送地址，读数据，结束总线的全过程,从器件地址sla，返回值在c.如果返回1表
     示操作成功，否则操作有误。使用前必须已结束总线。
参数:sla---器件地址。
返回:返回读取的字符。
****************************************************************************************/
uchar ComReadOneByte(uint sla)
{
   uchar x;
   ComStart();               //启动总线

   ComSendByte(WRITE);   
   if(AckCom==0)return(0);    //发送器件地址

   ComSendByte(sla>>8);  
   if(AckCom==0)return(0);    //高address 

   ComSendByte(sla);     
   if(AckCom==0)return(0);    //low address
   
  ComStart();

  ComSendByte(READ);     
  if(AckCom==0)return(0);  
   
  x=ComRcvByte();
  return x;

}

/****************************************************************************************
功能:ComReadBytes,向有子地址器件读取多字节数据函数。
描述:从启动总线到发送地址，子地址,读数据，结束总线的全过程,从器件地址sla，子地址suba，读
     出的内容放入s指向的存储区，读no个字节。使用前必须已结束总线。
参数:suba---子地址，s---指向发送的内容，no---发送字符个数。
返回:如果返回1表示操作成功，否则操作有误。
****************************************************************************************/
bit ComReadBytes(uint suba,uchar *s,uchar no)
{
   uchar i;

   ComStart();            
   
   ComSendByte(WRITE);     
   if(AckCom==0)return(0);
	 
   ComSendByte(suba>>8);   
   if(AckCom==0)return(0);   
	 
   ComSendByte(suba);      
   if(AckCom==0)return(0);
    
   ComStart();

   ComSendByte(READ);      
   if(AckCom==0)return(0);
    
   for(i=0;i<no-1;i++)
   {   
      *s=ComRcvByte();             
      ComAck(0);                  
      s++;
   } 

    *s=ComRcvByte();
    ComAck(1);     
            
   ComStop();                  
   return(1);
}