51单片机用PCF8591做个简易电压表制作 附程序

用很简单的方法制作一个51单片机电压表，能测量30V以下的直流电压，没有精确的电压表，无法测定其精度，但是用普通的万用表测试比较之后发现其精度还是不错的，其精度主要是看其供给的参考电压的精度，AD转换的位数，还有分压电阻的精度。但是用于普通的电压测量还是不错的。 可以自行调整分压电阻的大小和改动电压算法参数可以直接适应其他量程的电压测量 源代码： #include<reg52.h>    //包含单片机寄存器的头文件 #include <intrins.h> #define ulong unsigned long #define uchar unsigned char #define uint unsigned int #define LCD1602_PORT P2          //用LED1602_PORT表示P2总线接口 #define  PCF8591 0x90    //PCF8591 地址 #define  NOP()   _nop_()   /* 定义空指令 */ #define  _Nop()  _nop_()   /*定义空指令*/ // 位定义 sbit SCL=P1^0;       //I2C  时钟 sbit SDA=P1^1;       //I2C  数据 sbit LCD1602_RS = P0^5;      //定义1602液晶显示屏的数据/命令选择端,数据/命令(H/L) sbit LCD1602_RW = P0^6;      //定义1602液晶显示屏的读/写选择端,读/写(H/L) sbit LCD1602_EN = P0^7;      //定义1602液晶显示屏的使能端 bit ack;                 /*应答标志位*/ // 变量定义 uchar AD_CHANNEL; ulong xdata  LedOut[8];      //单片机内部存取器 ulong  v,a,ss; uchar date; // 函数申明 extern bit ack;        //起动总线函数 extern void Start_I2c();    //结束总线函数   extern void Stop_I2c();        //应答子函数 extern void Ack_I2c(bit a);        //字节数据发送函数 extern void  SendByte(uchar  c);    //有子地址发送多字节数据函数                extern bit ISendStr(uchar sla,uchar suba,uchar *s,uchar no) ;    //无子地址发送多字节数据函数    extern bit ISendStrExt(uchar sla,uchar *s,uchar no);    //无子地址读字节数据函数                extern uchar RcvByte(); void LCD1602_delay_ms(uint n); void LCD1602_write_com(uchar com); void LCD1602_write_data(ulong dat); void LCD1602_write_word(uchar *s); void Init_LCD1602(); bit ISendByte(uchar sla,uchar c); uchar IRcvByte(uchar sla); //MS延时函数(12M晶振下测试) void delay_ms(uint n)    {     unsigned int  i,j;     for(i=0;i<n;i++)         for(j=0;j<123;j++); } //写指令 void LCD1602_write_com(uchar com) {     LCD1602_RS = 0;         //1602液晶显示屏的数据/命令选择端置0,数据/命令(H/L)，此时选择写命令操作     delay_ms(1);     LCD1602_EN = 1;         //使能，也就是打开液晶接收数据命令的通道     LCD1602_PORT = com;     //把命令送给P2口     delay_ms(1);     LCD1602_EN = 0; } //写数据 void LCD1602_write_data(ulong dat) {     LCD1602_RS = 1;         //1602液晶显示屏的数据/命令选择端置0,数据/命令(H/L)，此时选择写数据操作     delay_ms(1);        LCD1602_PORT = dat;     //把数据送给P2口     LCD1602_EN = 1;     delay_ms(1);     LCD1602_EN = 0; } //连续写字符 void LCD1602_write_word(uchar *s) {     while(*s>0)     {         LCD1602_write_data(*s);         s++;     } } //1602初始化函数 void Init_LCD1602()                     {     LCD1602_EN = 0;     LCD1602_RW = 0;                        //设置为写状态     LCD1602_write_com(0x38);            //显示模式设定     LCD1602_write_com(0x0c);            //开关显示、光标有无设置、光标闪烁设置     LCD1602_write_com(0x06);            //写一个字符后指针加一     LCD1602_write_com(0x01);            //清屏指令 } /*******************************************************************                      起动总线函数                函数原型: 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(uchar  c) { uchar  BitCnt; for(BitCnt=0;BitCnt<8;BitCnt++)  /*要传送的数据长度为8位*/     {      if((c<<BitCnt)&0x80)SDA=1;   /*判断发送位*/        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(); 功能:        用来接收从器件传来的数据,并判断总线错误(不发应答信号)，           发完后请用应答函数应答从机。   ********************************************************************/    uchar   RcvByte() {   uchar  retc;   uchar  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();    } /******************************************************************* ADC发送字节[命令]数据函数                *******************************************************************/ bit ISendByte(uchar sla,uchar c) {    Start_I2c();              //启动总线    SendByte(sla);            //发送器件地址    if(ack==0)return(0);    SendByte(c);              //发送数据    if(ack==0)return(0);    Stop_I2c();               //结束总线    return(1); } /******************************************************************* ADC读字节数据函数                *******************************************************************/ uchar IRcvByte(uchar sla) {      uchar c;    Start_I2c();          //启动总线    SendByte(sla+1);      //发送器件地址    if(ack==0)return(0);    c=RcvByte();          //读取数据0    Ack_I2c(1);           //发送非就答位    Stop_I2c();           //结束总线    return(c); } //    字符显示函数 void Display() {     LCD1602_write_com(0x80);            //指针设置，指向1602液晶第一行第一列     LCD1602_write_word("Voltage: ");     LCD1602_write_com(0x80+0x0e);            //指针设置，指向1602液晶第一行第一列     LCD1602_write_word(" V"); } //实时电压显示函数 void Display_Voltage() {     ss=(v*a);     ss=((ss*6)/100);     LCD1602_write_com(0x80+0x09);    //1602液晶屏命令操作，表示起始显示位置为第二行第7列        LCD1602_write_data(ss%10000000/1000000 + 0x30);     LCD1602_write_data(ss%1000000/100000 + 0x30);     LCD1602_write_data('.');     LCD1602_write_data(ss%100000/10000 + 0x30);     LCD1602_write_data(ss%10000/1000 + 0x30); //    LCD1602_write_data(ss%1000/100 + 0x30); //    LCD1602_write_data('.'); //    LCD1602_write_data(ss%100/10 + 0x30); //    LCD1602_write_data(ss%10/1 + 0x30); } //******************************************************************/ main() {       Init_LCD1602(); //初始化LCD1602     Display();     a=50000000/255;         while(1)     {         ISendByte(PCF8591,0x41);         v=IRcvByte(PCF8591);               Display_Voltage();              }       } 复制代码

电压表

评分

参与人数 10	黑币 +153	收起 理由
huangyuxin	+ 15
294	+ 4
ZB0717226	+ 5	很给力！
jinmei1314	+ 5	很给力！
vvv64	+ 5	共享资料的黑币奖励！
炫神	+ 5	很给力！
自知	+ 5	很给力！
qjzyx	+ 6	赞一个！
darkly5251	+ 3	很给力！
admin	+ 100	共享资料的黑币奖励！

查看全部评分