找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 934|回复: 0
打印 上一主题 下一主题
收起左侧

51单片机AD电压采集仿真程序 PCF8591模拟量采集 用8*8点阵翻页显示

[复制链接]
跳转到指定楼层
楼主
包含程序及仿真,pcf8951驱动程序,不仅可以检测电压,还能检测光照强度以及温度,很适合小白


仿真原理图如下(proteus仿真工程文件可到本帖附件中下载)


单片机源程序如下:
  1.                               
  2. #include <reg52.h>
  3. #include <I2C.H>
  4. #define uchar unsigned char
  5. #define uint unsigned int


  6. #define  PCF8591 0x90    //PCF8591 地址

  7. unsigned char code tab[]={0xfe,0xfd,0xfb,0xf7,
  8. 0xef,0xdf,0xbf,0x7f};
  9. unsigned char code graph[11][8]={
  10. {0x0,0x18,0x24,0x24,0x24,0x24,0x24,0x18},//0
  11. {0x0,0x8,0x18,0x8,0x8,0x8,0x8,0x8},//1
  12. {0x0,0x18,0x24,0x24,0x8,0x10,0x20,0x3C},//2
  13. {0x0,0x18,0x24,0x4,0x8,0x24,0x24,0x18},//3
  14. {0x0,0x8,0x8,0x18,0x28,0x3C,0x8,0x8},//4
  15. {0x0,0x3C,0x20,0x38,0x4,0x4,0x24,0x18},//5
  16. {0x0,0x18,0x24,0x20,0x38,0x24,0x24,0x18},//6
  17. {0x0,0x3C,0x24,0x4,0x8,0x10,0x10,0x10},//7
  18. {0x0,0x18,0x24,0x24,0x18,0x24,0x24,0x18},//8
  19. {0x0,0x18,0x24,0x24,0x1C,0x4,0x24,0x18},//9
  20. {0x4C,0xD2,0x52,0x52,0x52,0x52,0x52,0xEC},//10
  21. };

  22. unsigned char count;
  23. unsigned char cnta;

  24. unsigned char AD_CHANNEL;
  25. unsigned int  D[4];

  26. void delay11(unsigned int cnt)
  27. {
  28. while(--cnt);
  29. }



  30.                  

  31. /*******************************************************************
  32. ADC发送字节[命令]数据函数               
  33. *******************************************************************/
  34. bit ISendByte(unsigned char sla,unsigned char c)
  35. {
  36.    Start_I2c();              //启动总线
  37.    SendByte(sla);            //发送器件地址
  38.    if(ack==0)return(0);
  39.    SendByte(c);              //发送数据
  40.    if(ack==0)return(0);
  41.    Stop_I2c();               //结束总线
  42.    return(1);
  43. }

  44. /*******************************************************************
  45. ADC读字节数据函数               
  46. *******************************************************************/
  47. unsigned char IRcvByte(unsigned char sla)
  48. {  unsigned char c;

  49.    Start_I2c();          //启动总线
  50.    SendByte(sla+1);      //发送器件地址
  51.    if(ack==0)return(0);
  52.    c=RcvByte();          //读取数据0

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

  57. //******************************************************************/
  58. main()
  59. { unsigned char jj,kk,ll,bb,cc,dd;
  60. double Data; //
  61. double V;         //转化成的电压值

  62. while(1)
  63. {  
  64.          ISendByte(PCF8591,0x40);
  65.          Data=IRcvByte(PCF8591);  //ADC0 模数转换1
  66.                  V=Data*5/256;
  67.                  D[0]=V*100;   

  68.         for(bb=0;bb<10;bb++){
  69.                 for(jj=0;jj<8;jj++)   //共要扫描八行  
  70.                 {
  71.                 P1=graph[D[0]/100][jj];   //送字模数据
  72.                         P2=tab[jj];
  73.                     delay11(200);   //选中第一行
  74.                         P2=0xff;
  75.                         delay11(500);
  76.               }
  77.            delay11(500);}

  78.                     for(bb=0;bb<10;bb++){
  79.                 for(jj=0;jj<8;jj++)   //共要扫描八行  
  80.                 {
  81.                 P1=0x06;
  82.                         P2=0x7f;
  83.                         delay11(500);
  84.                         P2=0xbf;
  85.                         delay11(500);
  86.               }
  87.            delay11(500);}



  88.                  for(cc=0;cc<10;cc++){
  89.                 for(kk=0;kk<8;kk++)   //共要扫描八行  
  90.                 {
  91.                 P1=graph[D[0]%100/10][kk];   //送字模数据
  92.                         P2=tab[kk];
  93.                     delay11(200);   //选中第一行
  94.                         P2=0xff;
  95.                         delay11(500);
  96.               }
  97.            delay11(500);}  

  98.                 for(dd=0;dd<10;dd++)
  99.                 {
  100.                  for(ll=0;ll<8;ll++)   //共要扫描八行  
  101.                 {
  102.                 P1=graph[D[0]%10][ll];   //送字模数据
  103.                         P2=tab[ll];
  104.                     delay11(200);   //选中第一行
  105.                         P2=0xff;
  106.                         delay11(500);
  107.               }
  108.            delay11(500);}
  109.    

  110.    }


  111. }  
复制代码
注意现在用的8*8一次只能显示一个字符 所以需要翻页显示 不太直观  大家可以改为数码管或者 多点阵显示
Keil代码与Proteus8.13仿真下载:
仿真程序.7z (79.42 KB, 下载次数: 22)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励!

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶 踩
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表