找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 9694|回复: 13
收起左侧

基于89C51+PCF8591 5V简易电压表仿真与源码设计 LCD1602显示结果

  [复制链接]
ID:273715 发表于 2018-4-14 20:41 | 显示全部楼层 |阅读模式
作品由小皮提供:

传感器 MQ -2

采集器 PCF8591

处理器 STC89c51

显示器 LCD1602

按键调整加减报警值 初始值为50%
基于89C51+LCD1602+PCF8591 5V简易电压表仿真原理图如下(proteus仿真工程文件可到本帖附件中下载)
0.png

单片机源程序如下:
  1. #include<reg52.h>   
  2. #include <intrins.h>

  3. #define ulong unsigned long
  4. #define uchar unsigned char
  5. #define uint unsigned int
  6. #define LCD1602_PORT P1               
  7. #define  PCF8591 0x90   
  8. #define  NOP()   _nop_()   
  9. #define  _Nop()  _nop_()  


  10. sbit SCL=P2^1;      
  11. sbit SDA=P2^0;      
  12. sbit LCD1602_RS = P2^5;         
  13. sbit LCD1602_RW = P2^4;         
  14. sbit LCD1602_EN = P2^3;        
  15. bit ack;     
  16. sbit key1= P0^4;
  17. sbit key2 = P0^5;
  18. sbit buzz = P2^6;
  19. void delay_ms(uint n)        
  20. {
  21.         unsigned int  i,j;
  22.         for(i=0;i<n;i++)
  23.                 for(j=0;j<123;j++);
  24. }


  25.             /*应答标志位*/

  26. // 变量定义
  27. uchar AD_CHANNEL;
  28. ulong xdata  LedOut[8];          //单片机内部存取器
  29. ulong  f,a,cj,v;

  30. uchar date;

  31. // 函数申明
  32. extern bit ack;                //起动总线函数
  33. extern void Start_I2c();        //结束总线函数  
  34. extern void Stop_I2c();                //应答子函数
  35. extern void Ack_I2c(bit a);                //字节数据发送函数
  36. extern void  SendByte(uchar  c);        //有子地址发送多字节数据函数               
  37. extern bit ISendStr(uchar sla,uchar suba,uchar *s,uchar no) ;        //无子地址发送多字节数据函数   
  38. extern bit ISendStrExt(uchar sla,uchar *s,uchar no);        //无子地址读字节数据函数               
  39. extern uchar RcvByte();

  40. void LCD1602_delay_ms(uint n);
  41. void LCD1602_write_com(uchar com);
  42. void LCD1602_write_data(ulong dat);
  43. void LCD1602_write_word(uchar *s);
  44. void Init_LCD1602();

  45. bit ISendByte(uchar sla,uchar c);
  46. uchar IRcvByte(uchar sla);

  47. //MS延时函数(12M晶振下测试)

  48. //写指令
  49. void LCD1602_write_com(uchar com)
  50. {
  51.         LCD1602_RS = 0;                 //1602液晶显示屏的数据/命令选择端置0,数据/命令(H/L),此时选择写命令操作
  52.         delay_ms(1);
  53.         LCD1602_EN = 1;                 //使能,也就是打开液晶接收数据命令的通道
  54.         LCD1602_PORT = com;         //把命令送给P2口
  55.         delay_ms(1);
  56.         LCD1602_EN = 0;
  57. }

  58. //写数据
  59. void LCD1602_write_data(ulong dat)
  60. {
  61.         LCD1602_RS = 1;                 //1602液晶显示屏的数据/命令选择端置0,数据/命令(H/L),此时选择写数据操作
  62.         delay_ms(1);        
  63.         LCD1602_PORT = dat;         //把数据送给P2口
  64.         LCD1602_EN = 1;
  65.         delay_ms(1);
  66.         LCD1602_EN = 0;
  67. }

  68. //连续写字符
  69. void LCD1602_write_word(uchar *s)
  70. {
  71.         while(*s>0)
  72.         {
  73.                 LCD1602_write_data(*s);
  74.                 s++;
  75.         }
  76. }

  77. //1602初始化函数
  78. void Init_LCD1602()                                       
  79. {
  80.         LCD1602_EN = 0;
  81.         LCD1602_RW = 0;                                                //设置为写状态
  82.         LCD1602_write_com(0x38);                        //显示模式设定
  83.         LCD1602_write_com(0x0c);                        //开关显示、光标有无设置、光标闪烁设置
  84.         LCD1602_write_com(0x06);                        //写一个字符后指针加一
  85.         LCD1602_write_com(0x01);                        //清屏指令
  86. }
  87. /*******************************************************************
  88.                      起动总线函数               
  89. 函数原型: void  Start_I2c();  
  90. 功能:     启动I2C总线,即发送I2C起始条件.  
  91. ********************************************************************/
  92. void Start_I2c()
  93. {
  94.   SDA=1;         /*发送起始条件的数据信号*/
  95.   _Nop();
  96.   SCL=1;
  97.   _Nop();        /*起始条件建立时间大于4.7us,延时*/
  98.   _Nop();
  99.   _Nop();
  100.   _Nop();
  101.   _Nop();   
  102.   SDA=0;         /*发送起始信号*/
  103.   _Nop();        /* 起始条件锁定时间大于4μs*/
  104.   _Nop();
  105.   _Nop();
  106.   _Nop();
  107.   _Nop();      
  108.   SCL=0;       /*钳住I2C总线,准备发送或接收数据 */
  109.   _Nop();
  110.   _Nop();
  111. }

  112. /*******************************************************************
  113.                       结束总线函数               
  114. 函数原型: void  Stop_I2c();  
  115. 功能:     结束I2C总线,即发送I2C结束条件.  
  116. ********************************************************************/
  117. void Stop_I2c()
  118. {
  119.   SDA=0;      /*发送结束条件的数据信号*/
  120.   _Nop();       /*发送结束条件的时钟信号*/
  121.   SCL=1;      /*结束条件建立时间大于4μs*/
  122.   _Nop();
  123.   _Nop();
  124.   _Nop();
  125.   _Nop();
  126.   _Nop();
  127.   SDA=1;      /*发送I2C总线结束信号*/
  128.   _Nop();
  129.   _Nop();
  130.   _Nop();
  131.   _Nop();
  132. }

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

  143. for(BitCnt=0;BitCnt<8;BitCnt++)  /*要传送的数据长度为8位*/
  144.     {
  145.      if((c<<BitCnt)&0x80)SDA=1;   /*判断发送位*/
  146.        else  SDA=0;               
  147.      _Nop();
  148.      SCL=1;               /*置时钟线为高,通知被控器开始接收数据位*/
  149.       _Nop();
  150.       _Nop();             /*保证时钟高电平周期大于4μs*/
  151.       _Nop();
  152.       _Nop();
  153.       _Nop();         
  154.      SCL=0;
  155.     }
  156.    
  157.     _Nop();
  158.     _Nop();
  159.     SDA=1;                /*8位发送完后释放数据线,准备接收应答位*/
  160.     _Nop();
  161.     _Nop();   
  162.     SCL=1;
  163.     _Nop();
  164.     _Nop();
  165.     _Nop();
  166.     if(SDA==1)ack=0;     
  167.        else ack=1;        /*判断是否接收到应答信号*/
  168.     SCL=0;
  169.     _Nop();
  170.     _Nop();
  171. }

  172. /*******************************************************************
  173.                  字节数据接收函数               
  174. 函数原型: UCHAR  RcvByte();
  175. 功能:        用来接收从器件传来的数据,并判断总线错误(不发应答信号),
  176.           发完后请用应答函数应答从机。  
  177. ********************************************************************/   
  178. uchar   RcvByte()
  179. {
  180.   uchar  retc;
  181.   uchar  BitCnt;
  182.   
  183.   retc=0;
  184.   SDA=1;                     /*置数据线为输入方式*/
  185.   for(BitCnt=0;BitCnt<8;BitCnt++)
  186.       {
  187.         _Nop();           
  188.         SCL=0;                  /*置时钟线为低,准备接收数据位*/
  189.         _Nop();
  190.         _Nop();                 /*时钟低电平周期大于4.7μs*/
  191.         _Nop();
  192.         _Nop();
  193.         _Nop();
  194.         SCL=1;                  /*置时钟线为高使数据线上数据有效*/
  195.         _Nop();
  196.         _Nop();
  197.         retc=retc<<1;
  198.         if(SDA==1)retc=retc+1;  /*读数据位,接收的数据位放入retc中 */
  199.         _Nop();
  200.         _Nop();
  201.       }
  202.   SCL=0;   
  203.   _Nop();
  204.   _Nop();
  205.   return(retc);
  206. }

  207. /********************************************************************
  208.                      应答子函数
  209. 函数原型:  void Ack_I2c(bit a);
  210. 功能:      主控器进行应答信号(可以是应答或非应答信号,由位参数a决定)
  211. ********************************************************************/
  212. void Ack_I2c(bit a)
  213. {
  214.   if(a==0)SDA=0;              /*在此发出应答或非应答信号 */
  215.   else SDA=1;
  216.   _Nop();
  217.   _Nop();
  218.   _Nop();      
  219.   SCL=1;
  220.   _Nop();
  221.   _Nop();                    /*时钟低电平周期大于4μs*/
  222.   _Nop();
  223.   _Nop();
  224.   _Nop();  
  225.   SCL=0;                     /*清时钟线,钳住I2C总线以便继续接收*/
  226.   _Nop();
  227.   _Nop();   
  228. }


  229. /*******************************************************************
  230. ADC发送字节[命令]数据函数               
  231. *******************************************************************/
  232. bit ISendByte(uchar sla,uchar c)
  233. {
  234.    Start_I2c();              //启动总线
  235.    SendByte(sla);            //发送器件地址
  236.    if(ack==0)return(0);
  237.    SendByte(c);              //发送数据
  238.    if(ack==0)return(0);
  239.    Stop_I2c();               //结束总线
  240.    return(1);
  241. }

  242. /*******************************************************************
  243. ADC读字节数据函数               
  244. *******************************************************************/
  245. uchar IRcvByte(uchar sla)
  246. {  
  247.    uchar c;
  248.    Start_I2c();          //启动总线
  249.    SendByte(sla+1);      //发送器件地址
  250.    if(ack==0)return(0);
  251.    c=RcvByte();          //读取数据0
  252.    Ack_I2c(1);           //发送非就答位
  253.    Stop_I2c();           //结束总线
  254.    return(c);
  255. }

  256. ……………………

  257. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码
0.png

所有资料51hei提供下载:
基于89C51 LCD1602 PCF8591 5V简易电压表 带仿真.zip (101.93 KB, 下载次数: 372)

评分

参与人数 3黑币 +60 收起 理由
守护下的天空 + 5 。。。。。非常好
I_robot_china + 5 绝世好帖!
admin + 50 共享资料的黑币奖励!

查看全部评分

回复

使用道具 举报

ID:308366 发表于 2018-4-15 08:27 来自手机 | 显示全部楼层
。这个很有用
回复

使用道具 举报

ID:359573 发表于 2018-6-26 18:47 | 显示全部楼层
赞一个!
回复

使用道具 举报

ID:273035 发表于 2019-1-8 08:58 来自手机 | 显示全部楼层
感恩感恩感恩
回复

使用道具 举报

ID:472756 发表于 2019-1-25 15:25 | 显示全部楼层
感谢感谢
回复

使用道具 举报

ID:589328 发表于 2019-7-24 08:48 | 显示全部楼层
真是好帖
回复

使用道具 举报

ID:669787 发表于 2019-12-21 14:18 | 显示全部楼层
很有用,帮助很大
回复

使用道具 举报

ID:665863 发表于 2019-12-22 00:09 | 显示全部楼层
为什么右边的屏不亮的?
回复

使用道具 举报

ID:669787 发表于 2019-12-23 11:02 | 显示全部楼层
四路的要怎么写
回复

使用道具 举报

ID:677091 发表于 2019-12-30 08:49 | 显示全部楼层
可以正好用
回复

使用道具 举报

ID:733837 发表于 2020-5-4 16:14 | 显示全部楼层
为啥显示不能打开啊
回复

使用道具 举报

ID:229772 发表于 2020-5-8 12:56 | 显示全部楼层
直接在你的8591通道0输入3V电压时显示2.3左右,完全不准。
回复

使用道具 举报

ID:849268 发表于 2020-11-25 21:53 | 显示全部楼层
单片机非常好,万能永久无敌
回复

使用道具 举报

ID:852817 发表于 2020-12-2 04:09 来自手机 | 显示全部楼层
非常nice
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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