ADDA系列PCF8591的驱动程序-EDA365

单片机 > 单片机程序设计 > 详情

ADDA系列PCF8591的驱动程序

发布时间：

/*************************此部分为I2C总线的驱动程序*************************************/

#include
#include
#include

#define NOP() _nop_() /* 定义空指令 */
#define _Nop() _nop_() /*定义空指令*/

sbit     SCL=P2^0;       //I2C 时钟
sbit     SDA=P2^1;       //I2C 数据
bit ack;                 /*应答标志位*/

/*******************************************************************
                     起动总线函数
函数原型: void Start_I2c();
功能:     启动I2C总线,即发送I2C起始条件.
********************************************************************/
void Start_I2c()
{
SDA=1;         /*发送起始条件的数据信号*/
_Nop();
SCL=1;
_Nop();        /*起始条件建立时间大于4.7us,延时*/
_Nop();
_Nop();
_Nop();
_Nop();
SDA=0;         /*发送起始信号*/
_Nop();        /* 起始条件锁定时间大于4μs*/
_Nop();
_Nop();
_Nop();
_Nop();
SCL=0;       /*钳住I2C总线，准备发送或接收数据 */
_Nop();
_Nop();
}

/*******************************************************************
                      结束总线函数
函数原型: void Stop_I2c();
功能:     结束I2C总线,即发送I2C结束条件.
********************************************************************/
void Stop_I2c()
{
SDA=0;      /*发送结束条件的数据信号*/
_Nop();       /*发送结束条件的时钟信号*/
SCL=1;      /*结束条件建立时间大于4μs*/
_Nop();
_Nop();
_Nop();
_Nop();
_Nop();
SDA=1;      /*发送I2C总线结束信号*/
_Nop();
_Nop();
_Nop();
_Nop();
}

/*******************************************************************
                 字节数据发送函数
函数原型: void SendByte(UCHAR c);
功能:     将数据c发送出去,可以是地址,也可以是数据,发完后等待应答,并对
          此状态位进行操作.(不应答或非应答都使ack=0)
           发送数据正常，ack=1; ack=0表示被控器无应答或损坏。
********************************************************************/
void SendByte(unsigned char c)
{
unsigned char BitCnt;

for(BitCnt=0;BitCnt<8;BitCnt++) /*要传送的数据长度为8位*/
    {
     if((c<        else SDA=0;
     _Nop();
     SCL=1;               /*置时钟线为高，通知被控器开始接收数据位*/
      _Nop();
      _Nop();             /*保证时钟高电平周期大于4μs*/
      _Nop();
      _Nop();
      _Nop();
     SCL=0;
    }

    _Nop();
    _Nop();
    SDA=1;                /*8位发送完后释放数据线，准备接收应答位*/
    _Nop();
    _Nop();
    SCL=1;
    _Nop();
    _Nop();
    _Nop();
    if(SDA==1)ack=0;
       else ack=1;        /*判断是否接收到应答信号*/
    SCL=0;
    _Nop();
    _Nop();
}

/*******************************************************************
                 字节数据接收函数
函数原型: UCHAR RcvByte();
功能:        用来接收从器件传来的数据,并判断总线错误(不发应答信号)，
          发完后请用应答函数应答从机。
********************************************************************/
unsigned char   RcvByte()
{
unsigned char retc;
unsigned char BitCnt;

retc=0;
SDA=1;                     /*置数据线为输入方式*/
for(BitCnt=0;BitCnt<8;BitCnt++)
      {
        _Nop();
        SCL=0;                  /*置时钟线为低，准备接收数据位*/
        _Nop();
        _Nop();                 /*时钟低电平周期大于4.7μs*/
        _Nop();
        _Nop();
        _Nop();
        SCL=1;                  /*置时钟线为高使数据线上数据有效*/
        _Nop();
        _Nop();
        retc=retc<<1;
        if(SDA==1)retc=retc+1; /*读数据位,接收的数据位放入retc中 */
        _Nop();
        _Nop();
      }
SCL=0;
_Nop();
_Nop();
return(retc);
}

/********************************************************************
                     应答子函数
函数原型: void Ack_I2c(bit a);
功能:      主控器进行应答信号(可以是应答或非应答信号，由位参数a决定)
********************************************************************/
void Ack_I2c(bit a)
{

if(a==0)SDA=0;              /*在此发出应答或非应答信号 */
else SDA=1;
_Nop();
_Nop();
_Nop();
SCL=1;
_Nop();
_Nop();                    /*时钟低电平周期大于4μs*/
_Nop();
_Nop();
_Nop();
SCL=0;                     /*清时钟线，钳住I2C总线以便继续接收*/
_Nop();
_Nop();
}

#include
#include

#define PCF8591 0x90 //PCF8591 地址

//else IO
sbit    LS138A=P2^2;
sbit    LS138B=P2^3;
sbit    LS138C=P2^4;

//此表为 LED 的字模, 共阴数码管 0-9 -
unsigned char code Disp_Tab[] = {0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};

unsigned char AD_CHANNEL;
unsigned long xdata LedOut[8];
unsigned int D[32];

/*******************************************************************
DAC 变换, 转化函数
*******************************************************************/
bit DACconversion(unsigned char sla,unsigned char c, unsigned char Val)
{
   Start_I2c();              //启动总线
   SendByte(sla);            //发送器件地址
   if(ack==0)return(0);
   SendByte(c);              //发送控制字节
   if(ack==0)return(0);
   SendByte(Val);            //发送DAC的数值
   if(ack==0)return(0);
   Stop_I2c();               //结束总线
   return(1);
}

/*******************************************************************
ADC发送字节[命令]数据函数
*******************************************************************/
bit ISendByte(unsigned char sla,unsigned char c)
{
   Start_I2c();              //启动总线
   SendByte(sla);            //发送器件地址
   if(ack==0)return(0);
   SendByte(c);              //发送数据
   if(ack==0)return(0);
   Stop_I2c();               //结束总线
   return(1);
}

/*******************************************************************
ADC读字节数据函数
*******************************************************************/
unsigned char IRcvByte(unsigned char sla)
{ unsigned char c;

   Start_I2c();          //启动总线
   SendByte(sla+1);      //发送器件地址，地址加一的原因是地址字的最后一位0为写，1为读
   if(ack==0)return(0);
   c=RcvByte();          //读取数据0

   Ack_I2c(1);           //发送非就答位
   Stop_I2c();           //结束总线
   return(c);
}

//******************************************************************/
main()
{ char i,j;

while(1)
{/********以下AD-DA处理*************/
   switch(AD_CHANNEL)
   {
     case 0: ISendByte(PCF8591,0x41);
             D[0]=IRcvByte(PCF8591)*2; //ADC0 模数转换1，乘以2的原因是把结果00~0xff换算成0~510，除以100就是实际采样值了
    break;

case 1: ISendByte(PCF8591,0x42);
             D[1]=IRcvByte(PCF8591)*2; //ADC1 模数转换2
    break;

case 2: ISendByte(PCF8591,0x43);
D[2]=IRcvByte(PCF8591)*2; //ADC2 模数转换3
break;

case 3: ISendByte(PCF8591,0x40);
D[3]=IRcvByte(PCF8591)*2; //ADC3 模数转换4
break;

case 4: DACconversion(PCF8591,0x40, D[4]/4); //DAC   数模转换
          break;
   }

       // D[4]=400; //数字--->>模拟输出
     D[4]=D[3];
   if(++AD_CHANNEL>4) AD_CHANNEL=0;

/********以下将AD的值送到LED数码管显示*************/

LedOut[0]=Disp_Tab[D[1]%10000/1000];
     LedOut[1]=Disp_Tab[D[1]%1000/100];
     LedOut[2]=Disp_Tab[D[1]%100/10]|0x80;
     LedOut[3]=Disp_Tab[D[1]%10];

LedOut[4]=Disp_Tab[D[0]%10000/1000];
     LedOut[5]=Disp_Tab[D[0]%1000/100];
     LedOut[6]=Disp_Tab[D[0]%100/10]|0x80;
     LedOut[7]=Disp_Tab[D[0]%10];


for( i=0; i<8; i++)
{ P1 = LedOut[i];

   switch(i)   //使用switch 语句控制138译码器也可以是用查表的方式学员可以试着自己修改
      {
   case 0:LS138A=0; LS138B=0; LS138C=0; break;
         case 1:LS138A=1; LS138B=0; LS138C=0; break;
         case 2:LS138A=0; LS138B=1; LS138C=0; break;
         case 3:LS138A=1; LS138B=1; LS138C=0; break;
   case 4:LS138A=0; LS138B=0; LS138C=1; break;
   case 5:LS138A=1; LS138B=0; LS138C=1; break;
   case 6:LS138A=0; LS138B=1; LS138C=1; break;
   case 7:LS138A=1; LS138B=1; LS138C=1; break;

      }

      for (j = 0 ; j<90 ;j++) { ;}    //扫描间隔时间
   }