基于51单片机的数字温度报警器源程序

helendcany

基于51单片机的数字温度报警器源程序

7 _* x7 I9 J" P/ e/ F/ ^
#include<reg51.h>
; M  z$ o2 p$ Q0 E- H# |typedef unsigned char uchar;
typedef unsigned int  uint;
uchar i;
sbit RS=P2^7;
$ i! U1 z: s$ P2 B( [% _" n$ }sbit RW=P2^6;
sbit E=P2^5;
5 P9 G( V& A' d2 isbit D1=P1^0;
- p. I! D1 X  Q$ s* Qsbit D2=P1^1;
3 g7 L1 `! x3 R% t1 j8 hsbit k1=P2^1;//加按键
sbit k2=P2^2;//减按键
sbit k3=P2^0;//设置按键
$ U1 r% W$ V4 M8 P1 @- Wuint th=360;//设定 高温
! C! p  r7 T9 E1 d( R* }9 cuint tl=350;//设定 低温
. }" y2 U1 a- I- Y. W! f* Muint ta;//实际温度
uchar code t0[]="WD=  .          ";
9 Z( P( ~0 b" ?! N7 |& auchar code t1[]="TH=  .  TL=  .  ";
uchar code wendu[]="0123456789";        //利用一个温度表解决温度显示乱码
) G# l# U- R( x9 R# U+ Q; esbit DQ=P2^3;//定义DS18B20总线IO
+ M' l; E4 ]- K. V) x9 Yuchar position;//设置的位置
" T' @- o* m: x- A, W6 {+ c! n//延时子函数
: F7 v9 S( v/ g( n5 avoid delay(uint z)
{
        uint x,y;
        for(x=100;x>1;x--)
9 S6 }; ~8 d$ c# U2 ~3 s                for(y=z;y>1;y--);
" }' Z' v3 ^- x5 ^8 Z$ W1 A+ v1 z}
0 {; V, Y# V) m/ q" t//LCD1602液晶写命令子函数
void write_com(uchar com)
* n8 F% F" P$ Z; {; G' }" L{
3 t1 \  Q. T2 }8 ]5 [9 M& O) e        RS=0;
  [# b5 x% L8 Y% ~        P0=com;                                       
        delay(5);
        E=1;
        delay(5);
        E=0;
}
4 `) S6 S% Z; u8 j3 `8 n* s' \% u/ d$ X//LCD1602液晶写数据子函数
9 r( ?! C4 f& V; f! V$ B4 zvoid write_date(uchar date)
/ M6 x+ r3 n4 Z{
' D2 J/ a8 W" u  {1 b        RS=1;
        P0=date;
, r* h2 c7 }9 N( P        delay(5);
5 ?: o2 M! `: P* S7 `7 U        E=1;
2 e5 B! [; c1 D4 K& Z! w        delay(5);
        E=0;
  G: M9 _% K& I# f/ {5 h  ]}
8 |- U0 @5 k3 u' i; M( |//LCD1602液晶初始化子函数
6 r* O5 k; Q  q( Y- b7 Uvoid LCD1602_init()
{
        E=0;
$ T0 I+ e6 x2 U        RW=0;
4 C: M. p* V, o) C, `" V# a        write_com(0x38);
  [* B" p+ ^1 H# J  @' o' J& W        write_com(0x01);
        write_com(0x0c);
        write_com(0x06);
        write_com(0x80);        
        for(i=0;i<16;i++)
& f4 W! n8 S4 H: n& L; o: z        {
  e( K3 M( }3 U& ]                write_date(t0);
                delay(0);
        }
        write_com(0x80+0x40);
        for(i=0;i<16;i++)
" ~* x& u* |) n2 M; ~        {
                write_date(t1);
                delay(0);
        }
}
//延时子函数
: v& V2 R0 T# c4 B0 R* ]/ |$ @void tmpDelay(int num)
: D. a0 r* e0 d{
  I) M& c& Z# }& Z3 X; A# ?9 l        while(num--);
}        
1 E5 l' Q1 O; a) s- q8 x9 x//DS18B20温度传感器初始化子函数
7 }6 q8 ?8 ?" ?, D/ q. @void DS18B20_init()
  H, J6 ]) U6 _* h! h! U/ V{
        uchar x=0;
0 F1 z5 _0 G! t, Z" H        DQ=1;    //DQ复位
% `$ j0 Y( M* y! V' z1 U0 C        tmpDelay(8);  //稍做延时
        DQ=0;    //单片机将DQ拉低
; ?0 W, G5 a7 ^$ |        tmpDelay(80); //精确延时 大于 480us
        DQ=1;    //拉高总线
6 u5 a0 m' P- u; O3 `        tmpDelay(14);
8 x4 ?! C( j! V+ w: p/ V) N6 `        x=DQ;      //稍做延时后 如果x=0则初始化成功 x=1则初始化失败
/ h  i7 k) c3 [2 ^, W6 [% [4 @        tmpDelay(20);
}
//DS18B20温度传感器读一个字节子函数
% @8 t5 I3 [. @9 W; S3 Zuchar ReadOneChar()
{
% x+ f- g, f, E8 ~; a1 D        uchar i=0;
: Y0 @1 W4 N2 _        uchar dat=0;
        for(i=8;i>0;i--)
; N( ~5 m$ ^# l( x        {
# E) n1 j, m6 o/ t! i                DQ=0; // 给脉冲信号
4 i# A6 A1 _# u  @  J                dat>>=1;
                DQ=1; // 给脉冲信号
                if(DQ)
% ?7 k/ _1 }; l0 u2 x; M                        dat|=0x80;
# c% G; i# u4 ^                tmpDelay(4);
        }
$ i9 p9 ?* q0 {; A: T5 B+ u        return(dat);
5 `6 l! Z+ I  U* ~  R( {}
% M( @' p- q8 t6 q. Q//DS18B20温度传感器写一个字节子函数
void WriteOneChar(uchar dat)
9 u$ J9 N5 ?9 u" M{
" `7 j* P1 l' l        uchar i=0;
8 u5 J* u' A& q: t/ P, h0 s        for(i=8;i>0;i--)
        {
. x  _3 w  ^7 u9 E2 D* |7 Q5 F                DQ=0;
; ?5 U6 J4 [; F# A                DQ=dat&0x01;
                tmpDelay(5);
- @6 A- k* C/ o- o# B0 l                DQ=1;
                dat>>=1;
6 o) }$ s7 S4 k5 k        }
! r4 Y* W- _- A! C' Y* t5 l}
//读取温度子函数
uint Readtemp()
9 [$ q7 ?6 I, `  Q{
        uchar a=0;
$ l( y2 A' c3 m& w9 z$ W9 v! M        uchar b=0;
  W) r+ ?# m, b% y1 w% V        uint t=0;
        float tt=0;        
+ w- Q0 q( \9 \        DS18B20_init();
        WriteOneChar(0xCC); // 跳过读序号列号的操作
& g6 u. f) K; [; `) F. @: R        WriteOneChar(0x44); // 启动温度转换
        DS18B20_init();
        WriteOneChar(0xCC); //跳过读序号列号的操作
9 k# {. j! O9 L1 q. d0 V4 v        WriteOneChar(0xBE); //读取温度寄存器
        a=ReadOneChar();   //连续读两个字节数据   //读低8位
1 m1 K  _6 g% y1 i8 X        b=ReadOneChar();                          //读高8位
        t=b;
        t<<=8;
8 j4 R% m9 R! l( b6 I6 A0 U        t=t|a; //两字节合成一个整型变量。
        tt=t*0.0625;  //得到真实十进制温度值，因为DS18B20可以精确到0.0625度，所以读回数据的最低位代表的是0.0625度
        t=tt*10+0.5; //放大十倍，这样做的目的将小数点后第一位也转换为可显示数字，同时进行一个四舍五入操作。
4 Z* `0 b. V6 z& H7 m. r        return(t);
}
//LCD1602液晶显示子函数
void display()
{
           uint shi,ge,xiaoshu;            //这里的num,shi,ge,xiaoshu 必须用unsigned int无符号整数来表示，用unshigned char  字符型则显示错误
6 }3 _: j1 n" G, j" n1 |0 x& u        shi=th/100;                  //显示 最高温度 Th
( I0 G7 `7 I. D" l# h        ge=th/10%10;
        xiaoshu=th%10;
6 M6 d2 U5 q' {- c+ y7 U/ B        write_com(0x80+0x40+3);
        write_date(wendu[shi]);
. @, M: t; K4 @5 m        write_com(0x80+0x40+4);
. g; F/ U) e8 r+ Z" `( C% w) y        write_date(wendu[ge]);                                       
        write_com(0x80+0x40+6);
        write_date(wendu[xiaoshu]);
6 C7 ^  M9 C& ?& S        shi=tl/100;          //显示 最低文帝 Tl  
        ge=tl/10%10;
        xiaoshu=tl%10;
        write_com(0x80+0x40+11);
- O& k# d' D& G! C. W: v4 M7 c        write_date(wendu[shi]);
$ j# S% A$ E) a+ u) r        write_com(0x80+0x40+12);
        write_date(wendu[ge]);                                                
        write_com(0x80+0x40+14);
' v, g! x+ Z1 @, P' b) F* w        write_date(wendu[xiaoshu]);
' Y7 f0 S. j: Q: q% Y! G# w9 C( }}
//报警子函数
void temp_check()
4 z2 w8 A. o+ ?{
        uint shi,ge,xiaoshu;            //这里的num,shi,ge,xiaoshu 必须用unsigned int无符号整数来表示，用unshigned char  字符型则显示错误
        ta=Readtemp();
        if(ta>th)
! v' Q4 v+ S$ P        {
* t: u  K$ v9 X) F( d                D1=0;
" U0 ?" C; Q) b4 e  I                D2=1;
. @6 R, ~" b& \! Y& O        }
3 t: |% ]/ r  s' ~& ^7 n$ i        else if(ta<tl)
; B9 h5 ~" }. }' Z0 L  t% F        {
) Q$ [5 v. e3 e  u+ W- m                D1=1;
: B3 }8 K4 d  L                D2=0;
        }
        else
9 }, I7 v$ H6 f. K: A        {
                D1=1;
5 @/ q- ^) \) H                D2=1;
        }
        shi=ta/100;         //显示 实际温度  
        ge=ta/10%10;
        xiaoshu=ta%10;
        write_com(0x80+3);
        write_date(wendu[shi]);
        write_com(0x80+4);
        write_date(wendu[ge]);                                                
        write_com(0x80+6);
6 \8 ]7 J8 J# m/ @1 n. H1 m        write_date(wendu[xiaoshu]);
}
1 b: i* V7 ?0 ]* `) V# T//按键扫描子函数
void key()
{        
2 R3 G* y. Z7 b& T        if(k3==0)                 //set 按键 按下
& G0 v' Q" ~) e        {
' f8 M! S+ N2 J( M! n; O- n                delay(1);
- D* U- {+ n: _- b8 }1 N; J* @                if(k3==0)
                {                                                        //设置位置设定
                        position++;
; l: p5 u! e9 G. ^/ F5 t                        if(position>2)
                                position=0;
                        if(position==0)                  // 无设置位置
5 ?6 `+ U( k$ z2 M1 \+ G; U                        {
                                write_com(0x80+0x40+7);
                                write_date(' ');
1 m; R# ]/ }. }1 @/ h                                write_com(0x80+0x40+15);
                                write_date(' ');
                        }
# _* G! E# y# L" b" [6 @* c                        if(position==1)                //设置TH 在th后显示< 标识当前位置
: \- m1 f) }( A; j# W                        {
                                write_com(0x80+0x40+7);
                                write_date('<');
9 J. @; z+ g9 Q5 }' M                                write_com(0x80+0x40+15);
                                write_date(' ');                  
( Z* s0 D5 @. x7 t" ^* Y) w                        }
& L4 M! f( I3 G8 q                        if(position==2)          //设置Tl   在tl后显示< 标识当前位置
                        {
                                write_com(0x80+0x40+7);
                                write_date(' ');
( z& L* f' X3 X' F% M/ h                                write_com(0x80+0x40+15);
5 Q7 C* y2 h3 y1 T7 F/ d0 j                                write_date('<');                  
0 y& ^- a# v# H) j, u% O* y9 w                        }
! Z, G/ X3 @) ?, J  H                        while(k3==0);        
                }        
' V$ @0 ~& U. _        }        
& s" @% Y- p) e( y! g4 j        if(k1==0)
        {
                delay(1);
                if(k1==0)
& M! S- |! e7 }. E                {
4 U; G; _! A( C                        if(position==1)
! {- I( t3 s  a: ^' e0 D                        {
                                th+=5;
                                if(th>1000)
                                        th=990;
9 ?$ P2 e. m3 }- n3 S0 F0 D. j+ i- x                        }
8 e% L4 Q6 s% B                        if(position==2)
                        {
, @' F! L5 q( h/ A                                tl+=5;                          //tl>th时  是个错误，这里避免此情况发生
3 I0 P% h# h& B6 G; r& Z4 V# i                                if(tl>=th)
8 X! n* Y; b0 U                                        tl=th-5;
" J+ p7 v( v' f1 i5 ^4 o. t                        }        
' k( g. E2 Z2 b/ ?0 Q3 a, W9 T                        display();
, w$ i# g. _1 X% P6 J1 I& c                }        
                while(k1==0);
        }
        if(k2==0)
, l4 `& E/ W6 o( q9 U8 e& h: |: f1 q        {
' ~. C6 S; A: Q% C: G, N9 x$ _% O                delay(1);
                if(k2==0)
3 d. L  L0 \0 _) ^: L7 K                {
                        if(position==1)
4 M* u- z; j/ O& g2 K# k7 v0 _5 m                        {
                                th-=5;                         //th<tl时  是个错误，这里避免此情况发生
                                if(th<=tl)
. p0 J1 b0 A. k4 f9 f2 Z; P                                        th=tl+5;
) C. l, D3 _# ]. q                        }
$ b( N0 O9 O* b- _+ x/ J                        if(position==2)
                        {        
/ z# |" _( W' B9 Z                                if(tl<10)
                                        tl=10;
                                else
$ V8 q; \* ~9 ^+ s* C2 B/ Q                                        tl-=5;
. p2 g; v, A5 N) U+ F: i0 D" G2 Q                        }        
                        display();
                }        
6 r8 |6 o5 v  J9 k$ O1 l                while(k2==0);
        }
# e  S) c  O/ b' k}
1 k" X& y; a7 r0 f: g//主函数
void main()
. I: ]. S0 q4 }2 l& d9 w{         
        uint i;
0 e% p. A# E# i- s9 e        LCD1602_init();
- u. V1 ]3 o" b/ {1 D        display();
0 k" b# `2 P9 Z4 f- [" L5 a        while(1)
! v) g4 f3 X: K, k& d5 S        {        
0 E, e" ]( m! p4 l# D- i7 U5 d8 @; i; M/ C                delay(1);
% d. l  x, D. e# [3 p3 q                if((++i)>500) //500ms 检测一次温度
                {
                         temp_check();
  A7 I8 _1 [9 N; q8 y                         i=0;
                }               
                key();               
        }
}

" A# Y& U/ _* C8 k$ ]/ \& O. K
( ~! u. O% ], _, `/ ?/ C1 k( }下载：
5 {7 Z( E4 O8 b

游客，如果您要查看本帖隐藏内容请回复

' W/ y8 a6 l1 l2 b  e

sunygd

看看楼主的代码