单片机LCD1602温度计实验 Proteus仿真加源程序

Demyar

单片机LCD1602温度计实验 Proteus仿真加源程序
4 H" x8 U6 D! j6 J& S; y! U

单片机源程序：
//--------------------------------------------------------------------------------------------
//程序名：  LCD_TEMP09-1.c
# N6 \/ D& A- U! H; o, E% v//程序功能：LCD温度计
//--------------------------------------------------------------------------------------------
#include <reg51.h>   
/ }. {" A$ J( i1 s1 u#include<intrins.h>                             //包含_nop_()函数定义的头文件
sbit RS=P2^5;                                   // 引脚定义  
sbit RW=P2^6;                                                           
. h/ M9 n) e! _sbit EN=P2^7;      
1 E5 t1 P7 G4 i. r( \0 z: b8 g" Jsbit busy=P0^7;                                 // "忙"标志位      
$ N. s; j# b, \1 J#define LCD P0                                  //命令或数据线
sbit DQ=P2^0;
6 I8 L  {# K; S3 U  
9 [/ a1 R4 K8 Z: z6 P//代码表
. @9 s1 n% G$ G( I( Munsigned char code TAB1[]={ 0x0c,0x12,0x12,0x0c,
                            0x00,0x00,0x00,0x00,
                          };
1 U* B8 z% y* I0 @2 ^//字符表
unsigned char code TAB2[]={"DS18B20  OK"};  
unsigned char code Error[]={"Error!Check!"};     //说明没有检测到DS18B20
! w( K4 E- u, @, sunsigned char code digit[10]={"0123456789"};     //定义字符数组显示数字
unsigned char code TEMP[]={"TEMP:"};             //说明显示的是温度
unsigned char fuhao;

5 m* J' O2 k' _! j) N. G
//------------------------------------  延时函数  -------------------------------------------
# b$ ]4 i7 C% t& Z; l
, p- \; ^3 A3 H9 w# ?. M. C
void delay(unsigned int t)                      //延时若干微秒
. Q) b0 e  O; B0 Y. m' u {
4 ^( s) @( ]( x6 `; O   while(t--);
}

7 K1 R, @+ G2 }; \- O" h% u
//---------------------------------- 判断液晶显示器是否忙函数 ----------------------------------

1 I! L; V$ f( A$ |: Z; r6 O% c) D
! p" B1 i3 F, _) u( k& DCHECK_BF()                                      //判断是否忙碌
% @- b3 m6 r+ Y6 P/ }5 w  A{
% f" z$ b% E. }& S' z) r% h  do
: Z  m* P) k7 `; R: Z7 K   {
    LCD=0xff;   
- _, V) y3 X& Z, t5 F    RS=0;                                       // RS=0，选择指令寄存器
    RW=1;                                       // RW=1，选择读模式
    EN=0;                                       // 执行显示命令
0 y9 a6 m  s9 R- C    EN=1;                                       // 允许读/写
& Q9 f3 O2 o& a9 ?* g0 e! U   }  
  while(busy);                                  //busy为高电平表示忙,循环等待
}


. F& F( `6 V, f+ W( {//--------------------------------------  写命令函数  -----------------------------------

% V4 P4 k9 i4 Q& x
WR_COMM()                                       //写命令
$ z1 @0 A3 K- f! H0 w# }" m3 u9 P{
  RS=0;                                         // RS=0，选择指令寄存器
+ v& A  D+ e$ J* q2 [3 t: w" f  RW=0;                                         // RW=0，选择写模式
  T* t, R  m- ]+ t  EN=0;                                         // 执行显示命令
  CHECK_BF();                                   // 等待
5 e: T. s  \1 M/ E( ^8 }/ y  EN=1;                                         // E=1，允许读/写LCD
}


//-------------------------------------- 写数据函数 -------------------------------------
# B& h8 p# E1 w& S1 |
; ~4 x* m) r) [3 w" N
$ G( A0 U) E% v" y& N0 f* f( D7 wWR_DATA()                                       //写数据
{
  RS=1;                                         // RS=1，选择数据寄存器
: z/ w! {% b4 S# u* C+ {2 W1 J2 u6 T  RW=0;                                         //准备写入数据
2 e7 j5 t3 i. I$ g2 _  EN=0;                                         //执行显示命令
  CHECK_BF();                                   //判断液晶模块是否忙
2 H- W0 {: _. H7 r/ f* v: U/ i3 [" w- {  z  EN=1;                                         // E=1，允许读/写LCD
& i* F, N6 o* |9 A}
# e- b& ?$ W- c5 t# ^/ e6 b
- ^% ^6 B, P( w7 f3 H1 J  i) |
- r3 g7 r% C% c+ W( b1 P5 E//--------------------------------------- 初始化函数   ----------------------------------
1 \4 j  I& v5 U
4 ]' I+ r8 G3 q7 O( J- V
: X, D/ f  p. HINIT_LCD()                                       //初始化
1 V1 Q4 A  ]/ x1 e2 g9 K" K, r6 ] {
   unsigned char i=200;
    {
      while(--i);
( d6 i8 e9 \  ?2 ^1 k      LCD=0x01;                                 //清屏并光标复位
      WR_COMM();                                //写入命令
      LCD=0x38;                                 //设置显示模式:8位2行5x7点阵
      WR_COMM();
      LCD=0x0c;                                 //开显示屏
- y  w8 x( j- R/ x5 z* P" D          WR_COMM();
      LCD=0x06;                                 //文字不动，光标自动右移
      WR_COMM();                                //写入命令
    }
}


) i7 ?3 j! p4 t4 i1 b( N/ z+ M         
//--------------------------------  显示温度标记字符C函数 ----------------------------

& o0 }4 H+ @9 h5 A2 [ TEMP_BJ()                                       //显示字符C
     {           
           LCD=0xce;                                  //写入显示起始地址                 
* `4 o& ?2 c8 Q5 o- _       WR_COMM();                                 //写入命令
2 _3 r" y  t$ S7 @/ s6 ]$ \( H3 d       LCD=('C' );
           WR_DATA();                                 //送出                        
* h5 j4 B" ]5 s8 \- s7 S5 c9 X        }        
      
' O: u0 }8 k  S& ?$ [//----------------------------------- 自定义温度标志符函数 --------------------------------
  STORE_DATA()
    {
       unsigned char i;
           LCD=0x40;                                      // 指定CG RAM起始地址                 
: A0 t% y/ ~* R       WR_COMM();                                     //写入命令                  
6 r8 F/ }4 f+ X. `       for(i=0;i<9;i++)                                
        {
. D* \1 ?% d: C+ C9 p          LCD=TAB1;                                //提取字符
5 @5 A, H# d5 \' W  c) F          WR_DATA();                                  //送出
        }         
9 V7 h4 v& n8 w1 V. _. m           LCD=0xcd;                                      //写入显示起始地址
           WR_COMM();                                     //写入命令
0 P& F! {9 L' G8 A- G6 Q& @       LCD=0x00;                                      //CGRAM内第0号图形
% e/ R% N& U$ Y! c1 u       WR_DATA();                                           //写入数据                           
" T# u4 R" g8 ~     
           TEMP_BJ();
         
9 m1 L+ @: r8 _$ x, D2 @1 x  }
                 
: s; L# [" \, h: r  c) S$ k
  `" X2 |) n" o+ i' V  q3 X
//------------------------------------------- DS18B20初始化函数 --------------------------------------

' F4 u; O. Q$ ]" j- Z
3 j% f& a/ k+ n# ]4 Q) abit INIT_1820(void)
9 U9 W; ?: q  G% P+ y {
   bit flag;                                         //flag为标志符
   DQ = 1;                                           //DQ复位
   delay(3);                                         //稍作延时
   DQ = 0;                                           //将数据线从高拉低，保持480~960us
2 ~# `  X6 q# m  d% @   delay(80);
   DQ = 1;                                           //释放数据线
- f  Q$ ~7 J2 E  A- U" @) H6 I   delay(10);
   flag=DQ;                                          //DQ=0表示存在      
   delay(25);
   return (flag);                                    //返回检测标志
1 D( h1 {, M; U% c7 K' i5 i' Y% O}
# Q7 D3 ^8 m) V- L: s6 W* s, |

; j% t1 _. a; ^( b0 r7 d, X//------------------------------------------  读出DS18B20函数 ----------------------------------------
" K% `; H. l9 h
! v' G* x, I! }' y3 M% x- v
unsigned char READ_1820(void)
{
   unsigned char i=0;
   unsigned char dat;                               //储存读出的一个字节数据
   for (i=0;i<8;i++)
   {
0 C$ S* g/ ~% N& {& v     DQ =1;                                          //将数据线拉高
3 m1 t. u+ z% x' _/ T5 H! M     DQ = 0;                                         //将数据线从高拉低，启动读时序
2 o+ U! U. O% S0 T8 M4 G     dat>>=1;  
8 k* ~% v% z& m0 {+ [     DQ = 1;                                         //将数据线拉高,为输出电平作准备
     _nop_();
         if(DQ==1)
) x) P. G$ \' r& P" p( A     dat|=0x80;                                      //读数据，存入dat
+ _4 N, C' E- |6 I     else
     dat|=0x00;                                      //读数据，存入dat
: O0 r) V  g- ]1 j     delay(3);
. q5 e* E6 H% u# N5 s# U+ |0 g        }                     
# i# d) G3 U1 p7 h/ t/ V& x   return(dat);                                       //返回读出的十进制数据
% Q! ^+ Z4 D  B, _1 ^0 o}


0 {2 C& T; I0 t- Z: ?* v5 i9 ^5 O! z//--------------------------------------------- 写入DS18B20函数 ---------------------------------------------
6 g2 S" N) k2 w/ y  ^7 j
; G( D& L( |2 [% b1 T( H, a
WRITE_1820(unsigned char dat)
{
0 I# {. G- P% u; e   unsigned char i=0;
, Q/ w& Z& E! s   for (i=0; i<8; i++)
7 m% P; t$ i* v" b6 h& o" W' \    {
, q* Y/ `7 z* L" ^/ x      DQ =1;                                       // 先将数据线拉高
3 U, E6 K5 C4 F- b      DQ=0;                                        //数据线从高拉低，开始写入      
4 ?+ u2 {* |0 G% R0 E      DQ=dat&0x01;                                 //利用与运算取出要写的某位二进制数据,                  
/ T2 e2 e$ C3 a' S4 a      delay(3);
      DQ=1;                                        //释放数据线      
      _nop_();         
, ?) }1 v6 [# M7 u0 l  Q& k( h      dat>>=1;                                     //将dat中的各二进制位数据右移1位
" g) T2 q* w- @   }
      delay(3);
}
8 S4 I9 F' ^. @9 i5 \6 [, m//---------------------------------------- 显示错误信息函数 ------------------------------------------

+ B& P/ _! x, v6 P8 j0 R& G. y9 B
void DISP_ERR(void)
+ ~; q  O- T) C, a  {
      unsigned char i;
  
9 |& ~/ L# a& R% L      LCD=0x80;                                    //写显示地在第1行第1列
! H% o& B3 D9 l; e, Y3 ]6 M      WR_COMM();
      i = 0;                                       //从第一个字符开始显示
     while(Error != '\0')                       //写到结束标志
      {      
- U# O; @! d1 e; w2 H        LCD=(Error);                            //将字符常量写入LCD
. e# \; z5 Q2 m        WR_DATA();
* X; T; Z1 S- f( N            i++;                                       //指向下一个字符
        delay(1000);                               //延时
6 K( G& x' ]# C7 L          }
     while(1);                                      //循环，等待查明原因   
) P% }7 V9 ^- i* N% z0 e  }
) a5 t5 y$ A1 T1 o- N
2 r' {% j' u& ?9 X* b7 E
//-------------------------------------- 显示温度的小数点 ------------------------------------------
  
' R' |3 T: ^; |1 a  t. A( [9 Gvoid DISP_D(void)
{         
$ l" d. V  c- _1 ?* i   
' L4 j4 a0 I# v' h- z+ E: z" h  LCD=0xc9;                                       //写显示地址在第2行第10列
0 }" P. Q* `' a9 o, c) {  WR_COMM();
  LCD=('.');
1 C' K' N) o; }0 y  WR_DATA();   
  delay(200);                                     //延时一点时间
}
; a/ p3 p- n5 c

//------------------------------------------ 显示TEMP字符函数 ------------------------------------------------
! w; P& H) h0 a" H. \2 @$ Z
  U" u' w9 ^, p' O   void DISP_TEMP(void)  
, g* C+ ?' N! o! A9 M/ o  
/ p7 z9 }6 x" T# `  }    {
           unsigned char i;
6 p& c/ y2 [: h) L3 y+ r5 M           LCD=0xc0;                                  //写入显示起始地址                 
       WR_COMM();                                 //写入命令
; j+ w7 U' P* k( F8 P7 k  f       for(i=0;i<5;i++)                                
        {
         LCD=TEMP;                             //提取字符
         WR_DATA();                               //送出
        }                                                         
    }
; ~: a7 t8 H- j! z   
//------------------------------------------- 显示菜单函数 --------------------------------------------
9 |  D* y* h, L  h DISP_EXP( )
     {
9 s, B, C) U2 V. a& U# U2 o2 A           unsigned char i;
+ ~/ q* |' r1 P$ l' u           LCD=0x83;                                    //写入显示起始地址                 
       WR_COMM();                                   //写入命令
* z; N3 }, w+ ]       for(i=0;i<11;i++)                                
        {
- i$ ~5 E  T4 U3 B4 M3 x& T# M; f! }         LCD=TAB2;                                //提取字符
         WR_DATA();                                  //送出
1 Q* ^7 g* ~! Q7 a) x        }                           
# k& \5 `- @) a3 ~6 {- [/ d0 L) o          DISP_TEMP();
          DISP_D();
8 f8 @. h0 Z' h0 t, {; @( M& ?        }
# x' S2 D9 E. e2 ^3 k   
//---------------------------------------------- 读温度函数 -----------------------------------------
5 b$ Q' z2 g& x) m

' x( O8 s/ O. u# n9 d4 m4 hRE_TEMP()
, |6 R, u7 v$ S4 d2 p5 a* |( U {
   unsigned char time;
; R, q: n" u) z/ D6 f0 _8 V" m   INIT_1820();                                      //将DS18B20初始化
/ o( h* _( `- z3 @   WRITE_1820(0xCC);                                 // 跳过读序号列号的操作
" k9 g7 w9 H9 }- X' {; \   WRITE_1820(0x44);                                 // 启动温度转换   
4 y- L/ P- W, S' v; ?0 A/ v. A. S   for(time=0;time<100;time++);         
   INIT_1820();                                      //将DS18B20初始化
   WRITE_1820(0xCC);                                 //跳过读序号列号的操作
   WRITE_1820(0xBE);                                 //读取温度的低位和高位
}

//------------------------------------------ 显示温度正负的符号 ---------------------------------------
9 d. |9 M$ d$ E6 g. g   
- j6 j& h  D, K8 P  n+ w! u3 rvoid DISP_ZF(unsigned char fuhao)
{
  unsigned char show;   
show=fuhao;      
1 b, c2 G2 W3 l  LCD=0xc5;                                         //写显示地址在第2行第10列
1 j* B3 G+ J8 M, a" `  WR_COMM();
) P. @- R0 L4 X/ f7 G7 \  LCD=(show);                                       //将小数点的字符常量写入LCD
  WR_DATA();
' J1 F0 O0 {7 B: v& ~. s9 D  delay(200);                                       //延时一点时间
}
! f, \( X' Q# q1 [
//---------------------------------------- 显示温度的整数部分函数 ----------------------------------------
# i( J1 ^) x8 F* F( n; G" ?; W8 H
# Q. Z# b' Y4 Q  r
1 w5 \* Y6 Z; o# `9 Cvoid DISP_TEMP1(unsigned char x)
: K6 {) \: T" X{
- |5 b% H0 t7 M3 o9 ?  unsigned char j,k,l;                              //j,k,l分别储存温度的百位、十位和个位
7 ?4 c) F* f& F; j  j=x/100;                                          //取百位
  k=(x%100)/10;                                     //取十位
  l=x%10;                                           //取个位
& P3 k3 H( j0 I  LCD=0xc6;                                         //写显示地址在第2行第7列
  WR_COMM();
# F  T$ \: H0 N" I4 c5 C# s  LCD=(digit[j]);
  WR_DATA();
* h$ x7 j" }2 i' G$ {$ O0 j  LCD=0xc7;
  WR_COMM();
3 z; {2 Z8 `+ z; ?2 ^  LCD=(digit[k]);
  WR_DATA();
  LCD=0xc8;
8 S$ m2 d' B8 w+ T5 C  WR_COMM();
* v5 Q, h; r3 o) Q. c7 T5 q! P  LCD=(digit[l]);
  WR_DATA();
  delay(200);                                       //延时一点时间
}

5 U2 U* z: d) L+ X
//---------------------------------------- 显示温度的小数数部分函数 -----------------------------------------

3 W) {  U( o% I) S
! a9 M3 Q/ `) _( W; dvoid DISP_TEMP2(unsigned char x)
0 X9 O3 ?- @( t! d{
( I* Q, m1 o4 D+ s( s   LCD=0xca;                                         //写显示地址在第2行第11列
   WR_COMM();
   LCD=(digit[x]);
   WR_DATA();                                        //将小数部分写入LCD
   delay(200);                                       //延时一点时间
, a; C! s  v" Z" J }
9 I% P! x$ R! d9 G- R; j
, z8 w, ?& r- \4 d- t( m
8 `6 Y/ |! y# s* G3 i- h//----------------------------------------  温度数据转换显示函数 -------------------------------------------
( ~% a& h0 S  v   
void CONV_TEMP(void)  
{
   unsigned char TL;                                  //储存温度低位
8 M$ U! X* N- K0 t& Q$ l0 j" g, D   unsigned char TH;                                  //储存温度高位
. k" h4 J: O% h. m8 b/ B   unsigned char TN;                                  //储存整数部分
   unsigned char TD;                                  //储存小数部分

0 ^" I" ]* X" Z* a% r- g. P, m   while(1)                                           //不断检测显示温度
; `6 B1 _7 j5 }+ p% G7 L) k    {
      RE_TEMP();                                      //读温度函数
6 h3 @4 q7 k$ Q //-------------------
          TL=READ_1820();                                 //先读温度值低位
      TH=READ_1820();                                 //接着读温度值高位
3 a" Y, ]3 s, d0 G; E6 }

        if(TH>=0xf8)
         {
# [- f+ _6 k7 ~# |( w3 T3 A0 V           DISP_ZF('-');
  n4 ^* P7 s, H7 E8 ]1 n           if(TL==0)
            {
              TH=(~TH+1)&0x03;
              TN=TH*16+TL/16;
              TD=(TL%16)*10/16;
' F8 K' W3 D( _9 z7 }* S" ]              goto loopshow;
+ B. L8 n% q& @, c( B5 I            }
   
           TH=~TH&0x03;
& i8 t! I  ^+ v) e) S           TL=~TL+1;
! Y7 G5 L4 e2 @           TN=TH*16+TL/16;
" H) Y/ d3 B1 x1 N0 X           TD=(TL%16)*10/16;
           goto loopshow;
        }
0 o$ \2 C# N) u2 W2 O          DISP_ZF('+');
          TN=TH*16+TL/16;                             //计算温度值整数部分           
& \' j" M2 M" X  [) w          TD=(TL%16)*10/16;                           //计算温度的小数部分
& T$ R9 A) r- O4 D# t) S9 D          loopshow:                  
//------------------------
        DISP_TEMP1(TN);                                  //显示温度的整数部分
    DISP_TEMP2(TD);                                 //显示温度的小数部分           
( }6 W2 Y) e% _6 M    delay(100);   
  }
+ Y' Q/ N1 i  v) N }
//---------------------------------------- 主函数 ----------------------------------------------   


5 t1 H( \: Z) |% c% ]% `void main(void)
{   
8 |! V) [( G: `   INIT_LCD();                                       //LCD初始化函数
# m) ^3 U" e  r9 Q3 Q6 D   delay(100);   
  G1 G* m$ h* R" v7 j& K! z% N   if(INIT_1820()==1)                                //DS18B20初始化函数
   DISP_ERR();                                       //显示错误信息函数
   STORE_DATA();                                     //自定义温度标志符函数
" \+ Q$ A) \! c( T# H$ {+ D   DISP_EXP();                                       //显示菜单函数
   CONV_TEMP();                                      //温度数据转换显示函数
. ?- }: e6 @7 x" X0 k

( y# z6 O0 W) n. D! E/ a9 }

9 O9 a* |9 i- J3 J6 H; Z( Q…………限于本文篇幅 余下代码请下载附件…………

. A1 R  ?- X4 i4 \0 l8 V
* n5 b. j9 }2 x* s7 h) `1 U# a3 B

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

& \7 G. f( B9 |# D& y: e
- ?% B1 {# e9 I3 h' A
/ P/ o4 r# a' ]

cat12620

谢谢分享

EC小白

1111111111111111111111111
! w9 i; a/ T2 p* m/ n2 Q+ J1 o

Memory00

看一下余下代码      
4 {$ W3 f, E; p8 y' \- y