设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 基于89C51+PCF8591 5V简易电压表仿真与源码设计 LCD1602 ...
返回列表 发新帖
查看: 11033|回复: 13
打印 上一主题 下一主题
收起左侧

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

  [复制链接]
跳转到指定楼层
楼主
ID:273715 发表于 2018-4-14 20:41 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
作品由小皮提供：

传感器 MQ -2

采集器 PCF8591

处理器 STC89c51

显示器 LCD1602

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


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

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


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


  30.             /*应答标志位*/

  32. // 变量定义
  33. uchar AD_CHANNEL;
  34. ulong xdata  LedOut[8];          //单片机内部存取器
  35. ulong  f,a,cj,v;

  37. uchar date;

  39. // 函数申明
  40. extern bit ack;                //起动总线函数
  41. extern void Start_I2c();        //结束总线函数  
  42. extern void Stop_I2c();                //应答子函数
  43. extern void Ack_I2c(bit a);                //字节数据发送函数
  44. extern void  SendByte(uchar  c);        //有子地址发送多字节数据函数               
  45. extern bit ISendStr(uchar sla,uchar suba,uchar *s,uchar no) ;        //无子地址发送多字节数据函数   
  46. extern bit ISendStrExt(uchar sla,uchar *s,uchar no);        //无子地址读字节数据函数               
  47. extern uchar RcvByte();

  49. void LCD1602_delay_ms(uint n);
  50. void LCD1602_write_com(uchar com);
  51. void LCD1602_write_data(ulong dat);
  52. void LCD1602_write_word(uchar *s);
  53. void Init_LCD1602();

  55. bit ISendByte(uchar sla,uchar c);
  56. uchar IRcvByte(uchar sla);

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

  60. //写指令
  61. void LCD1602_write_com(uchar com)
  62. {
  63.         LCD1602_RS = 0;                 //1602液晶显示屏的数据/命令选择端置0,数据/命令(H/L)，此时选择写命令操作
  64.         delay_ms(1);
  65.         LCD1602_EN = 1;                 //使能，也就是打开液晶接收数据命令的通道
  66.         LCD1602_PORT = com;         //把命令送给P2口
  67.         delay_ms(1);
  68.         LCD1602_EN = 0;
  69. }

  71. //写数据
  72. void LCD1602_write_data(ulong dat)
  73. {
  74.         LCD1602_RS = 1;                 //1602液晶显示屏的数据/命令选择端置0,数据/命令(H/L)，此时选择写数据操作
  75.         delay_ms(1);        
  76.         LCD1602_PORT = dat;         //把数据送给P2口
  77.         LCD1602_EN = 1;
  78.         delay_ms(1);
  79.         LCD1602_EN = 0;
  80. }

  82. //连续写字符
  83. void LCD1602_write_word(uchar *s)
  84. {
  85.         while(*s>0)
  86.         {
  87.                 LCD1602_write_data(*s);
  88.                 s++;
  89.         }
  90. }

  92. //1602初始化函数
  93. void Init_LCD1602()                                       
  94. {
  95.         LCD1602_EN = 0;
  96.         LCD1602_RW = 0;                                                //设置为写状态
  97.         LCD1602_write_com(0x38);                        //显示模式设定
  98.         LCD1602_write_com(0x0c);                        //开关显示、光标有无设置、光标闪烁设置
  99.         LCD1602_write_com(0x06);                        //写一个字符后指针加一
  100.         LCD1602_write_com(0x01);                        //清屏指令
  101. }
  102. /*******************************************************************
  103.                      起动总线函数               
  104. 函数原型: void  Start_I2c();  
  105. 功能:     启动I2C总线,即发送I2C起始条件.  
  106. ********************************************************************/
  107. void Start_I2c()
  108. {
  109.   SDA=1;         /*发送起始条件的数据信号*/
  110.   _Nop();
  111.   SCL=1;
  112.   _Nop();        /*起始条件建立时间大于4.7us,延时*/
  113.   _Nop();
  114.   _Nop();
  115.   _Nop();
  116.   _Nop();   
  117.   SDA=0;         /*发送起始信号*/
  118.   _Nop();        /* 起始条件锁定时间大于4μs*/
  119.   _Nop();
  120.   _Nop();
  121.   _Nop();
  122.   _Nop();      
  123.   SCL=0;       /*钳住I2C总线，准备发送或接收数据 */
  124.   _Nop();
  125.   _Nop();
  126. }

  128. /*******************************************************************
  129.                       结束总线函数               
  130. 函数原型: void  Stop_I2c();  
  131. 功能:     结束I2C总线,即发送I2C结束条件.  
  132. ********************************************************************/
  133. void Stop_I2c()
  134. {
  135.   SDA=0;      /*发送结束条件的数据信号*/
  136.   _Nop();       /*发送结束条件的时钟信号*/
  137.   SCL=1;      /*结束条件建立时间大于4μs*/
  138.   _Nop();
  139.   _Nop();
  140.   _Nop();
  141.   _Nop();
  142.   _Nop();
  143.   SDA=1;      /*发送I2C总线结束信号*/
  144.   _Nop();
  145.   _Nop();
  146.   _Nop();
  147.   _Nop();
  148. }

  150. /*******************************************************************
  151.                  字节数据发送函数               
  152. 函数原型: void  SendByte(UCHAR c);
  153. 功能:     将数据c发送出去,可以是地址,也可以是数据,发完后等待应答,并对
  154.           此状态位进行操作.(不应答或非应答都使ack=0)     
  155.            发送数据正常，ack=1; ack=0表示被控器无应答或损坏。
  156. ********************************************************************/
  157. void  SendByte(uchar  c)
  158. {
  159. uchar  BitCnt;

  161. for(BitCnt=0;BitCnt<8;BitCnt++)  /*要传送的数据长度为8位*/
  162.     {
  163.      if((c<<BitCnt)&0x80)SDA=1;   /*判断发送位*/
  164.        else  SDA=0;               
  165.      _Nop();
  166.      SCL=1;               /*置时钟线为高，通知被控器开始接收数据位*/
  167.       _Nop();
  168.       _Nop();             /*保证时钟高电平周期大于4μs*/
  169.       _Nop();
  170.       _Nop();
  171.       _Nop();         
  172.      SCL=0;
  173.     }
  174.    
  175.     _Nop();
  176.     _Nop();
  177.     SDA=1;                /*8位发送完后释放数据线，准备接收应答位*/
  178.     _Nop();
  179.     _Nop();   
  180.     SCL=1;
  181.     _Nop();
  182.     _Nop();
  183.     _Nop();
  184.     if(SDA==1)ack=0;     
  185.        else ack=1;        /*判断是否接收到应答信号*/
  186.     SCL=0;
  187.     _Nop();
  188.     _Nop();
  189. }

  191. /*******************************************************************
  192.                  字节数据接收函数               
  193. 函数原型: UCHAR  RcvByte();
  194. 功能:        用来接收从器件传来的数据,并判断总线错误(不发应答信号)，
  195.           发完后请用应答函数应答从机。  
  196. ********************************************************************/   
  197. uchar   RcvByte()
  198. {
  199.   uchar  retc;
  200.   uchar  BitCnt;
  201.   
  202.   retc=0;
  203.   SDA=1;                     /*置数据线为输入方式*/
  204.   for(BitCnt=0;BitCnt<8;BitCnt++)
  205.       {
  206.         _Nop();           
  207.         SCL=0;                  /*置时钟线为低，准备接收数据位*/
  208.         _Nop();
  209.         _Nop();                 /*时钟低电平周期大于4.7μs*/
  210.         _Nop();
  211.         _Nop();
  212.         _Nop();
  213.         SCL=1;                  /*置时钟线为高使数据线上数据有效*/
  214.         _Nop();
  215.         _Nop();
  216.         retc=retc<<1;
  217.         if(SDA==1)retc=retc+1;  /*读数据位,接收的数据位放入retc中 */
  218.         _Nop();
  219.         _Nop();
  220.       }
  221.   SCL=0;   
  222.   _Nop();
  223.   _Nop();
  224.   return(retc);
  225. }

  227. /********************************************************************
  228.                      应答子函数
  229. 函数原型:  void Ack_I2c(bit a);
  230. 功能:      主控器进行应答信号(可以是应答或非应答信号，由位参数a决定)
  231. ********************************************************************/
  232. void Ack_I2c(bit a)
  233. {
  234.   if(a==0)SDA=0;              /*在此发出应答或非应答信号 */
  235.   else SDA=1;
  236.   _Nop();
  237.   _Nop();
  238.   _Nop();      
  239.   SCL=1;
  240.   _Nop();
  241.   _Nop();                    /*时钟低电平周期大于4μs*/
  242.   _Nop();
  243.   _Nop();
  244.   _Nop();  
  245.   SCL=0;                     /*清时钟线，钳住I2C总线以便继续接收*/
  246.   _Nop();
  247.   _Nop();   
  248. }


  251. /*******************************************************************
  252. ADC发送字节[命令]数据函数               
  253. *******************************************************************/
  254. bit ISendByte(uchar sla,uchar c)
  255. {
  256.    Start_I2c();              //启动总线
  257.    SendByte(sla);            //发送器件地址
  258.    if(ack==0)return(0);
  259.    SendByte(c);              //发送数据
  260.    if(ack==0)return(0);
  261.    Stop_I2c();               //结束总线
  262.    return(1);
  263. }

  265. /*******************************************************************
  266. ADC读字节数据函数               
  267. *******************************************************************/
  268. uchar IRcvByte(uchar sla)
  269. {  
  270.    uchar c;
  271.    Start_I2c();          //启动总线
  272.    SendByte(sla+1);      //发送器件地址
  273.    if(ack==0)return(0);
  274.    c=RcvByte();          //读取数据0
  275.    Ack_I2c(1);           //发送非就答位
  276.    Stop_I2c();           //结束总线
  277.    return(c);
  278. }

  280. ……………………

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


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


51单片机, 电压表, PCF8591, LCD1602, LCD1602

评分

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

查看全部评分

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

相关帖子
回复

使用道具 举报

沙发
ID:308366 发表于 2018-4-15 08:27 来自手机 | 只看该作者
。这个很有用
回复

使用道具 举报

板凳
ID:359573 发表于 2018-6-26 18:47 | 只看该作者
赞一个！
回复

使用道具 举报

地板
ID:273035 发表于 2019-1-8 08:58 来自手机 | 只看该作者
感恩感恩感恩
回复

使用道具 举报

5#
ID:472756 发表于 2019-1-25 15:25 | 只看该作者
感谢感谢
回复

使用道具 举报

6#
ID:589328 发表于 2019-7-24 08:48 | 只看该作者
真是好帖
回复

使用道具 举报

7#
ID:669787 发表于 2019-12-21 14:18 | 只看该作者
很有用，帮助很大
回复

使用道具 举报

8#
ID:665863 发表于 2019-12-22 00:09 | 只看该作者
为什么右边的屏不亮的？
回复

使用道具 举报

9#
ID:669787 发表于 2019-12-23 11:02 | 只看该作者
四路的要怎么写
回复

使用道具 举报

10#
ID:677091 发表于 2019-12-30 08:49 | 只看该作者
可以正好用
回复

使用道具 举报

11#
ID:733837 发表于 2020-5-4 16:14 | 只看该作者
为啥显示不能打开啊
回复

使用道具 举报

12#
ID:229772 发表于 2020-5-8 12:56 | 只看该作者
直接在你的8591通道0输入3V电压时显示2.3左右，完全不准。
回复

使用道具 举报

13#
ID:849268 发表于 2020-11-25 21:53 | 只看该作者
单片机非常好，万能永久无敌
回复

使用道具 举报

14#
ID:852817 发表于 2020-12-2 04:09 来自手机 | 只看该作者
非常nice
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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