pcf8591.c

89S52单片机做的A/D,D/A的实验的源程序PCF8591 D/A CONVERTER */ /* */ /* LCD1602显示 */ /* 参考电压接至5V电源 */ /* 最小输出电

	delayNOP();
	SDA = 0;
    SCL = 0;  
}
//-------------------------------------------------------------------
// 函数名称： check_ACK
// 函数功能： 主机应答位检查子程序，迫使数据传输过程结束
//-------------------------------------------------------------------
void check_ACK(void)
{ 	    
    SDA = 1;        // 将p1.1设置成输入，必须先向端口写1
	SCL = 1;
	F0 = 0;
	delayNOP();   
	if(SDA == 1)    // 若SDA=1表明非应答，置位非应答标志F0
    F0 = 1;
   	SCL = 0;
}
//-------------------------------------------------------------------
// 函数名称： IICSendByte
// 入口参数： ch
// 函数功能： 发送一个字节
//-------------------------------------------------------------------
void IICSendByte(uchar ch)
 
{
  	unsigned char idata n=8;     // 向SDA上发送一位数据字节，共八位

	while(n--)
	{ 
	if((ch&0x80) == 0x80)    // 若要发送的数据最高位为1则发送位1
	   {
	 		SDA = 1;    // 传送位1
			SCL = 1;
		    delayNOP();
		//	SDA = 0;	
			SCL = 0; 
	   }
		else
		{  
			SDA = 0;    // 否则传送位0
			SCL = 1;
			delayNOP();
		  	SCL = 0;
		}
		ch = ch<<1;    // 数据左移一位
	}
}
//-------------------------------------------------------------------
// 函数名称： IICreceiveByte
// 返回接收的数据
// 函数功能： 接收一字节子程序
//-------------------------------------------------------------------
uchar IICreceiveByte(void)
{
	uchar idata n=8;     // 从SDA线上读取一上数据字节，共八位
	uchar tdata=0;
	while(n--)
	{
	   SDA = 1;
	   SCL = 1;
	   tdata =tdata<<1;		    //左移一位
	   	if(SDA == 1)
		  tdata = tdata|0x01;   // 若接收到的位为1，则数据的最后一位置1
		else 
		  tdata = tdata&0xfe;   // 否则数据的最后一位置0
	   SCL = 0;
	 }

	 return(tdata);
}
//-------------------------------------------------------------------
// 函数名称： DAC_PCF8591
// 入口参数： slave_add从机地址,n要发送的数据个数
// 函数功能： 发送n位数据子程序
//-------------------------------------------------------------------
void DAC_PCF8591(uchar controlbyte,uchar w_data)
{    
	
	iic_start();                    // 启动I2C
	delayNOP();

	IICSendByte(PCF8591_WRITE);     // 发送地址位
	check_ACK();                    // 检查应答位
    if(F0 == 1)
	 { 
		SystemError = 1;
		return;                     // 若非应答，置错误标志位
     }
    IICSendByte(controlbyte&0x77);	//Control byte 
	check_ACK();                    //检查应答位
    if(F0 == 1)
	 { 
		SystemError = 1;
		return;                    // 若非应答，置错误标志位
	 }
    IICSendByte(w_data);	       //data byte
	check_ACK();                  // 检查应答位
    if(F0 == 1)
	 { 
		SystemError = 1;
    	return;   // 若非应答表明器件错误或已坏，置错误标志位SystemError
	 }
	iic_stop();         // 全部发完则停止
	delayNOP();
	delayNOP();
	delayNOP();
	delayNOP();	
}
//-------------------------------------------------------------------
// 函数名称： ADC_PCF8591
// 入口参数： controlbyte控制字
// 函数功能： 连续读入4路通道的A/D转换结果到receivebuf
//-------------------------------------------------------------------
void ADC_PCF8591(uchar controlbyte)
{ 
    uchar idata receive_da,i=0;

	iic_start();

	IICSendByte(PCF8591_WRITE);	//控制字
	check_ACK();
	if(F0 == 1)
	{
		SystemError = 1;
		return;
	}

	IICSendByte(controlbyte);	//控制字
	check_ACK();
	if(F0 == 1)
	{
		SystemError = 1;
		return;
	}

    iic_start();                //重新发送开始命令
   	IICSendByte(PCF8591_READ);	//控制字
	check_ACK();
	if(F0 == 1)
	{
		SystemError = 1;
		return;
	}
	 
    IICreceiveByte();   //空读一次，调整读顺序
    slave_ACK();        //收到一个字节后发送一个应答位

	while(i<4)
	{  
	  receive_da=IICreceiveByte();
	  receivebuf[i++]=receive_da;
	  slave_ACK();       //收到一个字节后发送一个应答位
	}
	slave_NOACK();       //收到最后一个字节后发送一个非应答位
	iic_stop();
}
//-------------------------------------------------------------------
// 函数名称： main
// 函数功能： 主程序
//-------------------------------------------------------------------
main()
{
    uchar i,l;
    delay(10);                 //延时
    lcd_init();                //初始化LCD             
        
    lcd_pos(0);                //设置显示位置为第一行的第1个字符
     i = 0;
    while(dis4[i] != '\0')
     {                         //显示字符
       lcd_wdat(dis4[i]);
       i++;
     }

    lcd_pos(0x40);             //设置显示位置为第二行第1个字符
     i = 0;
    while(dis5[i] != '\0')
     {
       lcd_wdat(dis5[i]);      //显示字符
       i++;
     }
	
  while(1)
  {
	iicInit();	              //I2C总线初始化
    ADC_PCF8591(0x04);

	if(SystemError == 1)	  //有错误，重新来
	  {
	  	iicInit();				  //I2C总线初始化
	    ADC_PCF8591(0x04);
	   }   
	
	for(l=0;l<4;l++)	
	 {
	  show_value(receivebuf[0]); //显示通道0       
	    lcd_pos(0x02);             
        lcd_wdat(dis[2]);        //整数位显示
        lcd_pos(0x04);             
        lcd_wdat(dis[1]);        //第一位小数显示 
        lcd_pos(0x05);             
        lcd_wdat(dis[0]);        //第二位小数显示

      show_value(receivebuf[1]); //显示通道1	 
	    lcd_pos(0x0b);             
        lcd_wdat(dis[2]);        //整数位显示
        lcd_pos(0x0d);             
        lcd_wdat(dis[1]);        //第一位小数显示 
        lcd_pos(0x0e);             
        lcd_wdat(dis[0]);        //第二位小数显示

	  show_value(receivebuf[2]); //显示通道2         	 
	    lcd_pos(0x42);             
        lcd_wdat(dis[2]);        //整数位显示
        lcd_pos(0x44);             
        lcd_wdat(dis[1]);        //第一位小数显示 
        lcd_pos(0x45);             
        lcd_wdat(dis[0]);        //第二位小数显示

      show_value(receivebuf[3]); //显示通道3	 
	    lcd_pos(0x4b);             
        lcd_wdat(dis[2]);        //整数位显示
        lcd_pos(0x4d);              
        lcd_wdat(dis[1]);        //第一位小数显示 
        lcd_pos(0x4e);             
        lcd_wdat(dis[0]);        //第二位小数显示

	  iicInit();	       	      //I2C总线初始化  
      DAC_PCF8591(0x40,receivebuf[0]); //D/A输出

	   	if(SystemError == 1)	  //有错误，重新来
	    {
	  	 iicInit();				  //I2C总线初始化
		 DAC_PCF8591(0x40,receivebuf[0]); //D/A输出
	    }	        

      //delay(50);                       //延时
	 }

   }
}