找回密码
 注册
关于网站域名变更的通知
查看: 703|回复: 5
打印 上一主题 下一主题

51单片机智能电热水器仿真及源码

  [复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2018-11-30 13:42 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

EDA365欢迎您登录!

您需要 登录 才可以下载或查看,没有帐号?注册

x
51单片机智能电热水器仿真及源码4 ^( s- U& q; Y- o* b7 N. }5 s

/ g4 i" s1 ]# ]8 E

# L1 ~: A4 w9 ~% o2 ]源程序:
0 L6 Y' J& c8 [( i# v% o% N$ T#include "reg52.h"% Q3 f+ P7 R9 V$ @
#include "lcd.h"
+ [: w. _/ T8 H8 c#include "DS18B20.h"
$ u; A) B0 o8 z( q9 T, o4 A#include "ds1302.h"
% y' e; z* i* |+ {; N" T#include "key.h"
' R$ k3 ^* F, ?: h4 V1 l& o7 Q6 Q3 i4 X( M1 Q% W( B# E8 `
void main(void); {9 O7 d. [5 y: Y" m
{+ z+ |" N, {! L  b5 I6 d: Y$ H
        LCD_Initialise();
0 Y/ b4 |' F: e, S! O5 U        F_memset(LCD_Line_1,' ',16);3 U7 a  f# x2 B9 \5 _
        F_memset(LCD_Line_2,' ',16);
7 o; h0 j. x4 P0 L* y3 A+ O        DS1302_Init();
9 V( ^9 @. C) A9 @: b- F  DS1302_Write_Time();
. c0 j+ B" v) P        Add_temp_io = 0;4 T0 Y! N- e/ X/ _6 }
        for(;;)) V6 _" ?% n' C: ]7 Z1 u6 c
        {' ]9 a0 G. a3 M8 }8 `( D, o) l5 p
                ds18b20_temp = ReadTemperature()*0.625;" Y) E3 V* k9 r* T
                DS1302_Read_Time();* y$ S. ?7 x. w! V- Y
6 J) e7 t* {: E' R
                //加水功能块( M2 [  C2 C: i& u2 ?
                if((!WaterLow_key)||((time_buf1[4]>=18)&&time_buf1[4]<=23))
# ^. Z: d# h! c# r1 e0 ?; G7 s                {
- X8 q5 i; @+ h) z1 l6 u                        WaterLed = 0;
2 y5 h9 H( x" O8 d: `                }
. M. S; T7 w, {& V) N1 [) o+ ]4 p                if(!WaterHigh_key)
2 |* s* w* a2 `" N! a/ d' M7 L  U                {
& w9 |3 r" v. v, h! N8 f/ c% a# M                        WaterLed = 1;3 p9 m! F; Z, O1 T) o8 H
                }
* t. H5 |( p8 k" e  W) X7 n
) J" @: f+ e5 b$ n/ \) q8 K                if(ds18b20_temp<ds18b20_temp_set-10)( Q* s# X5 w! e
                {$ I/ t! m4 k/ d, a
                        Add_temp_io = 1;* x" k+ U- z4 f' e8 i
                }; W, I1 I+ s( k  E! W
                else
8 x- ~( w! h, k5 G1 r6 l: T                {5 v) }; r$ ~3 S8 _7 I  u( a
                        Add_temp_io = 0;# j% r, {3 A2 Q% D2 H% N8 C# A
                }
5 d" S  A6 K7 C4 f" N3 n# u2 [. c( [- x3 P0 `

2 {( K7 h# Z. p7 z4 a
7 \) Z% c" B" s+ B& U% Q…………限于本文篇幅 余下代码请从论坛下载附件…………
" F- ]1 t6 v0 s! b" W1 W" f( t  |8 x2 R+ j) ?$ i2 Q. h2 a: |0 D
游客,如果您要查看本帖隐藏内容请回复
( e9 l$ ?8 |/ h6 p

, {7 ?; v2 ?; ~; p& X% _" ~

该用户从未签到

2#
发表于 2018-11-30 14:07 | 只看该作者
分享是心得,回帖是美德

该用户从未签到

3#
发表于 2021-4-9 10:00 | 只看该作者
正在找,谢谢啦!!!
  • TA的每日心情
    开心
    2024-6-17 15:04
  • 签到天数: 1 天

    [LV.1]初来乍到

    4#
    发表于 2021-4-24 15:59 | 只看该作者
    谢谢分享 刚好学习学习

    该用户从未签到

    6#
    发表于 2023-11-16 20:05 | 只看该作者
    谢谢楼主了
    8 `5 z9 b- k- t4 f* a
    您需要登录后才可以回帖 登录 | 注册

    本版积分规则

    关闭

    推荐内容上一条 /1 下一条

    EDA365公众号

    关于我们|手机版|EDA365电子论坛网 ( 粤ICP备18020198号-1 )

    GMT+8, 2025-8-23 23:35 , Processed in 0.125000 second(s), 26 queries , Gzip On.

    深圳市墨知创新科技有限公司

    地址:深圳市南山区科技生态园2栋A座805 电话:19926409050

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