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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 51单片机水温控制LCD显示加VB上位机温度曲线绘制
返回列表 发新帖
查看: 10249|回复: 16
打印 上一主题 下一主题
收起左侧

51单片机水温控制LCD显示加VB上位机温度曲线绘制

  [复制链接]
跳转到指定楼层
楼主
ID:190881 发表于 2017-4-18 17:12 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
实现功能，1L水由1KW电炉加热，要求水温在一定范围内人工设定，并能随着环境温度改变自动调节，以维持设定的温度不变。
矩阵键盘输入设定温度，LCD1602显示温度值，VB上位机绘制温度曲线


  1. /*******************************************************************************
  2. * 实验名                           :温度显示实验
  3. * 使用的IO             :
  4. * 实验效果       :1602显示温度
  5. *        注意                                         ：
  6. *******************************************************************************/

  8. #include<reg51.h>
  9. #include "uart.h"
  10. #include"lcd.h"
  11. #include "juzhen.h"
  12. #include"temp.h"
  13. void LcdDisplay(int);
  14. void show_zi();
  15. /*******************************************************************************
  16. * 函数名         : main
  17. * 函数功能                   : 主函数
  18. * 输入           : 无
  19. * 输出                  : 无
  20. *******************************************************************************/
  21. extern int key_value;

  23. void main()
  24. {
  25.         UsartConfiguration();
  26.         LcdInit();                         //初始化LCD
  27.         show_zi();
  28.         while(1)
  29.         {
  30.                 LcdDisplay(Ds18b20ReadTemp());
  31.                 //Delay1ms(1000);//1s钟刷一次
  32.                 key_touch();
  33.                 LcdDisplay_input();
  34.                 compare_temp();
  35.         }
  36. }

  38. /*******************************************************************************
  39. * 函数名         : LcdDisplay()
  40. * 函数功能                   : LCD显示读取到的温度
  41. * 输入           : v
  42. * 输出                  : 无
  43. *******************************************************************************/
  44. unsigned char dates[] = {0, 0, 0, 0, 0}; //定义数组
  45. void LcdDisplay(int temp)          //lcd显示
  46. {
  47.    
  48.   
  49.         float tp;
  50.         
  51. //        if(temp< 0)                                //当温度值为负数
  52. //  {
  53. //          LcdWriteCom(0x80);                //写地址 80表示初始地址
  54. //    LcdWriteData('-');                  //显示负
  55. //                //因为读取的温度是实际温度的补码，所以减1，再取反求出原码
  56. //                temp=temp-1;
  57. //                temp=~temp;
  58. //                tp=temp;
  59. //                temp=tp*0.0625*100+0.5;        
  60. //                //留两个小数点就*100，+0.5是四舍五入，因为C语言浮点数转换为整型的时候把小数点
  61. //                //后面的数自动去掉，不管是否大于0.5，而+0.5之后大于0.5的就是进1了，小于0.5的就
  62. //                //算加上0.5，还是在小数点后面。
  63. //
  64. //  }
  65. //  else
  66.   //{                        
  67.           LcdWriteCom(0x85);                //写地址 80表示初始地址
  68.     LcdWriteData('+');                 //显示正
  69.                 tp=temp;//因为数据处理有小数点所以将温度赋给一个浮点型变量
  70.                 //如果温度是正的那么，那么正数的原码就是补码它本身
  71.                 temp=tp*0.0625*100+0.5;        
  72.                 //留两个小数点就*100，+0.5是四舍五入，因为C语言浮点数转换为整型的时候把小数点
  73.                 //后面的数自动去掉，不管是否大于0.5，而+0.5之后大于0.5的就是进1了，小于0.5的就
  74.                 //算加上0.5，还是在小数点后面。
  75. //}
  76.         dates[0] = temp / 10000;
  77.   dates[1] = temp % 10000 / 1000;
  78.   dates[2] = temp % 1000 / 100;
  79.   dates[3] = temp % 100 / 10;
  80.   dates[4] = temp % 10;

  82.         LcdWriteCom(0x86);                  //写地址 80表示初始地址
  83.   LcdWriteData('0'+dates[0]); //百位


  86.   LcdWriteCom(0x87);                 //写地址 80表示初始地址
  87.   LcdWriteData('0'+dates[1]); //十位
  88.   SBUF = '0'+dates[1];        //将接收到的数据放入到发送寄存器
  89.         while (!TI);                            //等待发送数据完成
  90.         TI = 0;

  92.         LcdWriteCom(0x88);                //写地址 80表示初始地址
  93.   LcdWriteData('0'+dates[2]); //个位
  94.   SBUF = '0'+dates[2];        //将接收到的数据放入到发送寄存器
  95.         while (!TI);                            //等待发送数据完成
  96.         TI = 0;

  98.         LcdWriteCom(0x89);                //写地址 80表示初始地址
  99.   LcdWriteData('.');                 //显示 ‘.’

  101.         LcdWriteCom(0x8A);                 //写地址 80表示初始地址
  102.   LcdWriteData('0'+dates[3]); //显示小数点  

  104.         LcdWriteCom(0x8B);                 //写地址 80表示初始地址
  105.   LcdWriteData('0'+dates[4]); //显示小数点  

  107.         LcdWriteCom(0x8C);                //写地址 80表示初始地址
  108.   LcdWriteData('C');   
  109. }
  110. void show_zi()
  111. {
  112.          char temp[6]={"Temp:"};
  113.         char temp2[6]={"Hope:"};
  114.         int i;
  115.         for(i=0;i<6;i++)
  116.         {
  117.                 LcdWriteCom(0x80+i);                //写地址 80表示初始地址
  118.                   LcdWriteData(temp[i]);        
  119.         }
  120.    for(i=0;i<6;i++)
  121.         {
  122.                 LcdWriteCom(0xC0+i);                //写地址 80表示初始地址
  123.                   LcdWriteData(temp2[i]);        
  124.         }
  125. }

复制代码

上位机源码和下位机源码：
DS18B20单片机程序.rar (68.87 KB, 下载次数: 226)
vb6.0打开: 上位机.rar (5.12 MB, 下载次数: 310)

评分

参与人数 1黑币 +1 收起 理由
201730645473 + 1 共享资料的黑币奖励！

查看全部评分

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

使用道具 举报

沙发
ID:219308 发表于 2017-7-13 09:28 | 只看该作者
多谢楼主分享
回复

使用道具 举报

板凳
ID:165117 发表于 2017-7-13 11:43 | 只看该作者
多谢楼主分享
回复

使用道具 举报

地板
ID:195950 发表于 2017-7-30 15:42 来自手机 | 只看该作者
学习了
回复

使用道具 举报

5#
ID:224161 发表于 2017-8-3 15:16 | 只看该作者
让我拿来学学上位机
回复

使用道具 举报

6#
ID:241242 发表于 2017-12-8 09:11 | 只看该作者
非常棒啊， 学习
回复

使用道具 举报

7#
ID:241772 发表于 2018-4-16 22:49 | 只看该作者
多谢楼主分享
回复

使用道具 举报

8#
ID:241772 发表于 2018-4-19 19:05 | 只看该作者
楼主，没办法下载上位机资料了~~可以再上传一次吗
回复

使用道具 举报

9#
ID:312223 发表于 2018-8-26 21:59 | 只看该作者
源码里面并没有看到与上位机通信部分啊  即无串口部分程序
回复

使用道具 举报

10#
ID:387700 发表于 2018-8-28 23:09 | 只看该作者
看上去不错
回复

使用道具 举报

11#
ID:324759 发表于 2019-11-25 10:05 | 只看该作者
非常想学习，谢谢楼主分享。
回复

使用道具 举报

12#
ID:224370 发表于 2020-3-22 11:45 | 只看该作者
多谢楼主分享
回复

使用道具 举报

13#
ID:720209 发表于 2020-4-8 14:36 | 只看该作者

多谢楼主分享
回复

使用道具 举报

14#
ID:783123 发表于 2021-5-15 12:49 | 只看该作者
非常感谢楼主，求这部分VB资料有么，如何快速搞定vb这快
回复

使用道具 举报

15#
ID:249808 发表于 2021-8-11 19:14 | 只看该作者
哪来的上位机源码呀！就一个51单片机的源码！
回复

使用道具 举报

16#
ID:328014 发表于 2021-8-11 21:37 | 只看该作者
LGH850 发表于 2021-8-11 19:14
哪来的上位机源码呀！就一个51单片机的源码！

用vb6.0打开 工程1.vbp
回复

使用道具 举报

17#
ID:1085081 发表于 2023-12-9 21:16 | 只看该作者
非常棒啊， 学习了 多谢
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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