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

Demyar

单片机LCD1602温度计实验 Proteus仿真加源程序
$ n" I; Z+ A2 v( j3 _

单片机源程序：
//--------------------------------------------------------------------------------------------
/ }  k5 H5 S' B/ @- j7 b//程序名：  LCD_TEMP09-1.c
% m; O7 |( h( E2 J//程序功能：LCD温度计
. c" x) u* V% h  K/ s//--------------------------------------------------------------------------------------------
) y: }% D1 S6 ]0 S#include <reg51.h>   
& `& U1 q" d* S+ s7 F4 ]8 r#include<intrins.h>                             //包含_nop_()函数定义的头文件
# Y$ ]5 [3 H, @8 e6 N6 Zsbit RS=P2^5;                                   // 引脚定义  
, f2 Z7 ~/ F- M- F( u+ Msbit RW=P2^6;                                                           
sbit EN=P2^7;      
sbit busy=P0^7;                                 // "忙"标志位      
. e  C# @7 Y: q5 I9 l( t9 L& w7 Z#define LCD P0                                  //命令或数据线
sbit DQ=P2^0;
) Y% N) o  D/ G$ W/ R& R  
' l& V4 I/ c9 W1 V& D7 ?//代码表
4 v6 ~$ P. Z5 [. O" zunsigned char code TAB1[]={ 0x0c,0x12,0x12,0x0c,
                            0x00,0x00,0x00,0x00,
                          };
; Q+ O8 e6 n! L//字符表
* h4 y  s9 I" {unsigned char code TAB2[]={"DS18B20  OK"};  
+ \9 {' M7 b( d7 c  Aunsigned char code Error[]={"Error!Check!"};     //说明没有检测到DS18B20
1 N! |* d1 n( g9 Iunsigned char code digit[10]={"0123456789"};     //定义字符数组显示数字
unsigned char code TEMP[]={"TEMP:"};             //说明显示的是温度
unsigned char fuhao;

; L6 X; w& E; e
//------------------------------------  延时函数  -------------------------------------------
5 y; R0 v3 T$ W5 G5 V2 y

! F8 A# G3 B* Pvoid delay(unsigned int t)                      //延时若干微秒
{
   while(t--);
}
# G$ E6 ?7 x8 ^

" M/ q4 a) Y: J/ k: p9 T( h" |//---------------------------------- 判断液晶显示器是否忙函数 ----------------------------------
5 p. a0 m$ ~% z9 b' |

7 |) _. {. q/ z1 b+ [' {7 NCHECK_BF()                                      //判断是否忙碌
{
& I5 y; b& w1 U  t; G  do
& T. q" B- E0 [. G   {
3 Z3 d6 ]7 o$ o6 I" ?. Q2 {0 |    LCD=0xff;   
! `, M3 S, z: O9 `- P( O+ V    RS=0;                                       // RS=0，选择指令寄存器
; a8 |+ P1 G7 l! A    RW=1;                                       // RW=1，选择读模式
' \  t4 k. q! H& H3 @+ H    EN=0;                                       // 执行显示命令
    EN=1;                                       // 允许读/写
   }  
) \) F  r; K' ?, f* y/ G1 I% ?  while(busy);                                  //busy为高电平表示忙,循环等待
}


/ Z( M1 o  |$ t6 ^' L0 S//--------------------------------------  写命令函数  -----------------------------------


% b# s) f$ P+ P* c( x" x# Q+ ?2 k& tWR_COMM()                                       //写命令
, C: {0 ?. G/ y4 B* L3 ^& v6 k{
/ t! i* T/ P3 l6 H. {; |) S# `  RS=0;                                         // RS=0，选择指令寄存器
. s. M% h# M+ X! K2 A5 `: c  RW=0;                                         // RW=0，选择写模式
  EN=0;                                         // 执行显示命令
  CHECK_BF();                                   // 等待
  EN=1;                                         // E=1，允许读/写LCD
. t5 P- C3 e% m}
+ \( b0 t. W! B- \' ]+ E- Z+ s
" S1 f8 P" `1 w5 ]" o
% j3 L1 F" o$ F/ E) ^' b& W/ d//-------------------------------------- 写数据函数 -------------------------------------
% R/ p9 E% P7 K. M/ z7 x- `* Z3 B

WR_DATA()                                       //写数据
6 ^/ _9 I# e7 x* Q  j4 y/ W2 y8 `{
  RS=1;                                         // RS=1，选择数据寄存器
0 r2 ]8 z: Y) V% a" }6 E  RW=0;                                         //准备写入数据
2 A4 U4 X) p* X4 V4 d  EN=0;                                         //执行显示命令
  CHECK_BF();                                   //判断液晶模块是否忙
2 a+ R8 Z' ?  m9 j  EN=1;                                         // E=1，允许读/写LCD
& Z6 a2 V+ {. q( ^# D}
: G9 ?( P9 ?1 r

/ u1 ]  \- M9 l) U! K6 ?& Q//--------------------------------------- 初始化函数   ----------------------------------

" f# p. X3 y* N' D1 C( A" z$ Q, M4 o
/ d2 P( y% }/ ?, m' r" RINIT_LCD()                                       //初始化
7 N( j$ F8 H6 M- Y* A( ` {
   unsigned char i=200;
! P: J: c4 Q* G  \+ F4 V6 E. \2 J' ^    {
      while(--i);
4 y' r% S$ u3 b- [      LCD=0x01;                                 //清屏并光标复位
      WR_COMM();                                //写入命令
/ R1 ~( h1 ]8 j# P; F7 [2 \) c- x, S( L9 @      LCD=0x38;                                 //设置显示模式:8位2行5x7点阵
      WR_COMM();
      LCD=0x0c;                                 //开显示屏
$ G8 c6 h( z& Q5 H3 l          WR_COMM();
" z2 \9 Y! V* W3 q' a      LCD=0x06;                                 //文字不动，光标自动右移
+ ?, C7 y; H$ q* z      WR_COMM();                                //写入命令
4 [; T- q5 A- J) [    }
3 u- H: t5 t9 u  l }

( G. y- P" {9 e
         
//--------------------------------  显示温度标记字符C函数 ----------------------------

4 ^8 q$ \( o6 G( C  G) l0 G TEMP_BJ()                                       //显示字符C
( w6 N  v% X) R7 X3 j     {           
+ L; }# s! h& ~7 o+ T" K$ E+ {0 l           LCD=0xce;                                  //写入显示起始地址                 
& M6 e; b8 x5 i" Z9 ^' c       WR_COMM();                                 //写入命令
       LCD=('C' );
           WR_DATA();                                 //送出                        
, ~6 E9 h9 p. B        }        
5 O' i' ~. |4 s" c4 Z( o      
  Z1 g7 [0 j, s  |//----------------------------------- 自定义温度标志符函数 --------------------------------
  STORE_DATA()
    {
! D: W" k( H9 ^2 @0 K; K; J       unsigned char i;
* K& U: ?! D3 H* o$ z           LCD=0x40;                                      // 指定CG RAM起始地址                 
       WR_COMM();                                     //写入命令                  
       for(i=0;i<9;i++)                                
        {
          LCD=TAB1;                                //提取字符
5 X1 p7 B2 U- b6 {0 z          WR_DATA();                                  //送出
        }         
           LCD=0xcd;                                      //写入显示起始地址
           WR_COMM();                                     //写入命令
       LCD=0x00;                                      //CGRAM内第0号图形
  T+ v! }+ r& q! Q) ?3 d0 W" q/ A       WR_DATA();                                           //写入数据                           
     
) ?) a& w# G  O& f) o' H' @           TEMP_BJ();
         
  }
                 
' G7 I) @/ h+ Y+ B& [0 I( M
) Z7 V8 C2 k; q; _, k
! J  d/ [9 A  z" O6 R; ?//------------------------------------------- DS18B20初始化函数 --------------------------------------

' Z  U  i6 f) y* t. E" L
% `% L& Y9 a7 a! Bbit INIT_1820(void)
{
   bit flag;                                         //flag为标志符
   DQ = 1;                                           //DQ复位
0 f9 c( q5 P1 m* e' G: T, p1 P   delay(3);                                         //稍作延时
   DQ = 0;                                           //将数据线从高拉低，保持480~960us
   delay(80);
   DQ = 1;                                           //释放数据线
   delay(10);
   flag=DQ;                                          //DQ=0表示存在      
   delay(25);
8 D! v/ F* w% ~# z   return (flag);                                    //返回检测标志
7 C' _  E7 X( I8 ]; f9 n}
( S2 _/ t) S5 [$ w
, x7 E' t7 ~8 l, l! r
//------------------------------------------  读出DS18B20函数 ----------------------------------------

8 p% B; J9 A+ r$ j; ~
" I4 `. v: L- f3 aunsigned char READ_1820(void)
7 p5 |+ M$ Y$ Z$ ]& D{
   unsigned char i=0;
" X2 L( V* M1 N" |8 d$ b, u. f; {   unsigned char dat;                               //储存读出的一个字节数据
' O- {8 c( @7 }' a: O+ L. q   for (i=0;i<8;i++)
! J3 I& |6 L" c  H9 T! s; u   {
6 D- h# _! U. `- `     DQ =1;                                          //将数据线拉高
8 _) V8 e7 u! T4 o     DQ = 0;                                         //将数据线从高拉低，启动读时序
     dat>>=1;  
     DQ = 1;                                         //将数据线拉高,为输出电平作准备
     _nop_();
         if(DQ==1)
8 _! n% f  }/ ?( O% f8 e0 H$ W8 h     dat|=0x80;                                      //读数据，存入dat
     else
     dat|=0x00;                                      //读数据，存入dat
4 Y" a: D+ Q$ X3 j; I* F( v& R     delay(3);
1 b7 k9 Q9 a- x4 I. s        }                     
   return(dat);                                       //返回读出的十进制数据
}
3 Y0 |0 p5 _* ]5 S

9 {% n1 Q) u6 g6 S: d, J0 p//--------------------------------------------- 写入DS18B20函数 ---------------------------------------------
8 g1 ]3 _) u1 \" e! o# _
3 ^2 C% A$ j; V' v$ U8 o
' J* L5 B) Z0 _- Y7 b3 vWRITE_1820(unsigned char dat)
{
" K/ d) H2 \8 }/ e% @   unsigned char i=0;
   for (i=0; i<8; i++)
" n  T$ Z6 f/ a  p    {
# g: }/ t3 x$ ?! h6 h' |: Z& n. F      DQ =1;                                       // 先将数据线拉高
# g% b3 t$ A% ?      DQ=0;                                        //数据线从高拉低，开始写入      
      DQ=dat&0x01;                                 //利用与运算取出要写的某位二进制数据,                  
9 V2 K. x% i# K% K1 l      delay(3);
      DQ=1;                                        //释放数据线      
      _nop_();         
8 `8 F& c% S( D+ T' V* [7 [      dat>>=1;                                     //将dat中的各二进制位数据右移1位
" b3 F4 L2 G( j  V8 X   }
/ Y5 n+ B, V3 }' o      delay(3);
}
//---------------------------------------- 显示错误信息函数 ------------------------------------------
9 i  c' [2 t& x! _
5 G& c- x6 n* y$ u
void DISP_ERR(void)
  {
      unsigned char i;
# r! l/ v" w/ m- c% m' A  
      LCD=0x80;                                    //写显示地在第1行第1列
      WR_COMM();
* Z' d$ [  l5 u/ l' [      i = 0;                                       //从第一个字符开始显示
     while(Error != '\0')                       //写到结束标志
: d! V& f# o% b/ u; F1 E      {      
        LCD=(Error);                            //将字符常量写入LCD
' @" ~# p, i$ p0 L( X        WR_DATA();
! D$ R% i& g; O) t2 i# J, e6 Q' D            i++;                                       //指向下一个字符
        delay(1000);                               //延时
: b. w+ Y! G: Y/ R9 _, Z( n- n# H          }
     while(1);                                      //循环，等待查明原因   
4 d6 X5 m" A: o/ [' ^. L  }


4 b: b* M; R# v//-------------------------------------- 显示温度的小数点 ------------------------------------------
* ^. p. p/ E' j3 G7 o% V1 ]$ f  
, d; H" @7 z! W' @) D2 `. Mvoid DISP_D(void)
3 f8 i4 a6 H/ Q' x4 F{         
5 F! d( Z) t1 A% \- G; T1 \   
  LCD=0xc9;                                       //写显示地址在第2行第10列
  WR_COMM();
: e$ X0 r6 z+ P& P& J  LCD=('.');
  WR_DATA();   
  delay(200);                                     //延时一点时间
}
9 h+ j/ V- U$ h7 J6 h; i/ {

//------------------------------------------ 显示TEMP字符函数 ------------------------------------------------

   void DISP_TEMP(void)  
  
    {
           unsigned char i;
           LCD=0xc0;                                  //写入显示起始地址                 
$ S1 ~7 W& Y8 H; t' q       WR_COMM();                                 //写入命令
# ^8 i& b. h4 A       for(i=0;i<5;i++)                                
        {
         LCD=TEMP;                             //提取字符
         WR_DATA();                               //送出
        }                                                         
    }
& N+ k$ u& H% U5 e+ c2 p8 P   
//------------------------------------------- 显示菜单函数 --------------------------------------------
" J% r- d' W: |/ F+ j DISP_EXP( )
     {
           unsigned char i;
. F6 h5 ~5 V/ G' D# z           LCD=0x83;                                    //写入显示起始地址                 
. F% h$ t. I1 _8 j) g  ^       WR_COMM();                                   //写入命令
       for(i=0;i<11;i++)                                
        {
' H! O( W" e6 H! r6 f, U3 j1 _1 `6 |         LCD=TAB2;                                //提取字符
         WR_DATA();                                  //送出
$ @7 i0 X7 P' u! c        }                           
          DISP_TEMP();
$ _' l, ^5 D4 N% J8 Y          DISP_D();
        }
' D0 C+ O$ c( K- t1 k7 v; J   
$ `2 r4 y" f! W, |4 z //---------------------------------------------- 读温度函数 -----------------------------------------
- h. W! k+ x" h0 {

RE_TEMP()
{
9 L3 Y, p) T) n% {3 u9 k8 M. }+ ?   unsigned char time;
, q2 i- |$ v) @) h1 j$ _7 T0 T   INIT_1820();                                      //将DS18B20初始化
   WRITE_1820(0xCC);                                 // 跳过读序号列号的操作
2 k! T9 C4 F9 d% U+ J   WRITE_1820(0x44);                                 // 启动温度转换   
   for(time=0;time<100;time++);         
5 Y$ q3 O5 _- V+ H% s4 @   INIT_1820();                                      //将DS18B20初始化
   WRITE_1820(0xCC);                                 //跳过读序号列号的操作
   WRITE_1820(0xBE);                                 //读取温度的低位和高位
9 h- O* N, g& z! O4 D) I' M }

+ G7 [, L% {. i$ T' Y; o6 @$ ^, k6 |//------------------------------------------ 显示温度正负的符号 ---------------------------------------
, k8 b' W% @5 E0 u   
void DISP_ZF(unsigned char fuhao)
{
  unsigned char show;   
5 Z3 y, R) A; oshow=fuhao;      
  LCD=0xc5;                                         //写显示地址在第2行第10列
  WR_COMM();
  LCD=(show);                                       //将小数点的字符常量写入LCD
  WR_DATA();
/ ~3 `4 ^6 l! b0 q# o4 B% F  delay(200);                                       //延时一点时间
}

0 {) K! H3 ?( }9 w( V- Y//---------------------------------------- 显示温度的整数部分函数 ----------------------------------------
' a9 h9 u) @8 {- S, Z: ~% |4 S
: G5 K" g4 T0 F& T* s" E  `3 Q8 z
void DISP_TEMP1(unsigned char x)
* I5 R1 Q' `, d# x2 e; W{
  unsigned char j,k,l;                              //j,k,l分别储存温度的百位、十位和个位
  j=x/100;                                          //取百位
  y/ _  B. T6 Q. R3 s, x  k=(x%100)/10;                                     //取十位
' d& b$ R  |: |4 @* M+ P  l=x%10;                                           //取个位
5 u% E) H3 [. f: N% O  LCD=0xc6;                                         //写显示地址在第2行第7列
# ]0 |3 t' j1 a' [% Z, i  WR_COMM();
  LCD=(digit[j]);
  WR_DATA();
$ z; m0 r- v! Y# r4 f  LCD=0xc7;
  WR_COMM();
- L- P4 U& q$ G' O1 q# g5 S  LCD=(digit[k]);
  WR_DATA();
  LCD=0xc8;
. f6 S* F/ g, P9 E  WR_COMM();
8 t2 `) z8 N" a3 h) w  LCD=(digit[l]);
# g8 e) s' N* l  WR_DATA();
  delay(200);                                       //延时一点时间
}


+ X- d! w% V& L2 v" |1 E/ f* }//---------------------------------------- 显示温度的小数数部分函数 -----------------------------------------
6 N. C, l: w4 T7 Q+ l
" C+ e7 W. p5 o
void DISP_TEMP2(unsigned char x)
* z! r" O. F3 c4 G/ }' {8 a! B+ a{
   LCD=0xca;                                         //写显示地址在第2行第11列
3 ~. l! ]1 V& I# y; O+ E   WR_COMM();
   LCD=(digit[x]);
9 f2 S% c/ m, J8 S   WR_DATA();                                        //将小数部分写入LCD
   delay(200);                                       //延时一点时间
" J) y: e) M4 M* p }

3 c1 r7 G: x- j  z" L/ I
3 C. U/ r) G8 p" Y- L5 r: a# ~//----------------------------------------  温度数据转换显示函数 -------------------------------------------
   
" h6 c: [/ s& t' {+ Q  F" Qvoid CONV_TEMP(void)  
{
  }( M& d5 l7 g! x" j% J4 b/ ?   unsigned char TL;                                  //储存温度低位
" Y6 p: f# x7 L+ ^3 K* ^   unsigned char TH;                                  //储存温度高位
6 p6 V3 U- V( j1 a, v   unsigned char TN;                                  //储存整数部分
   unsigned char TD;                                  //储存小数部分
4 Q' l. h, u! D
% h( o. F" P% Y   while(1)                                           //不断检测显示温度
3 I( ?+ r" c# E3 t    {
% y9 D) E+ ], l      RE_TEMP();                                      //读温度函数
+ `# s7 v3 s: M  J0 b( n  X //-------------------
          TL=READ_1820();                                 //先读温度值低位
5 H* h4 p# m5 N# H$ t  Z2 N      TH=READ_1820();                                 //接着读温度值高位
% U0 k3 R! x5 Y
7 s, @/ K' o* p0 B
/ ^% t( p% m4 s8 Y        if(TH>=0xf8)
         {
% X; b. R2 V, h           DISP_ZF('-');
# I4 W1 g" H- {* v" t           if(TL==0)
- |% F/ s9 g( ~9 k9 e5 {- N            {
: }' Y: {7 U0 i" n' }' p" j              TH=(~TH+1)&0x03;
! n1 g. ]3 T7 U: ?7 U, ^( T              TN=TH*16+TL/16;
% i* k+ o) D# D: d              TD=(TL%16)*10/16;
, Q! V) M4 b. M0 c; K# |" e              goto loopshow;
            }
   
           TH=~TH&0x03;
           TL=~TL+1;
           TN=TH*16+TL/16;
           TD=(TL%16)*10/16;
           goto loopshow;
3 a3 K$ L5 ?5 l        }
          DISP_ZF('+');
          TN=TH*16+TL/16;                             //计算温度值整数部分           
8 Z1 r; N7 x7 e% T0 s          TD=(TL%16)*10/16;                           //计算温度的小数部分
          loopshow:                  
//------------------------
- |0 w1 W5 G) a( W' v, T1 s' C        DISP_TEMP1(TN);                                  //显示温度的整数部分
- o& A3 U/ W& l) B' R    DISP_TEMP2(TD);                                 //显示温度的小数部分           
2 d% S0 j3 l& H. Z* [    delay(100);   
  }
$ m  D7 d% t% ?7 v3 u }
. x+ ^- D: ~! b' o" b& s' ?2 r; v //---------------------------------------- 主函数 ----------------------------------------------   
7 G* X. C. X- ^2 E

7 n7 E3 o$ z4 {' w% avoid main(void)
{   
# h! e! F% n1 Y5 z0 j   INIT_LCD();                                       //LCD初始化函数
   delay(100);   
; o, k# S4 N& P7 `   if(INIT_1820()==1)                                //DS18B20初始化函数
   DISP_ERR();                                       //显示错误信息函数
   STORE_DATA();                                     //自定义温度标志符函数
& \$ k) m# U' z9 `) n7 L   DISP_EXP();                                       //显示菜单函数
" y" W' j3 N" N8 J  |   CONV_TEMP();                                      //温度数据转换显示函数




…………限于本文篇幅 余下代码请下载附件…………

6 i' |% I1 O) L  }# V9 S; `3 r8 L/ J

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

. W7 V2 l# q1 k, s- e/ F! @

cat12620

谢谢分享

EC小白

1111111111111111111111111

Memory00

看一下余下代码      
  ^/ p' Z2 k4 R4 W