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++) { ;} //扫描间隔时刻
}

P1 = 0;

}
}