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

Demyar

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

* x3 A) }- e( I0 R! L5 |4 \3 t" l
单片机源程序：
//--------------------------------------------------------------------------------------------
5 @* y5 P7 I: P2 |//程序名：  LCD_TEMP09-1.c
% n/ ?- q7 f. K8 l* H; Q4 g//程序功能：LCD温度计
//--------------------------------------------------------------------------------------------
#include <reg51.h>   
#include<intrins.h>                             //包含_nop_()函数定义的头文件
sbit RS=P2^5;                                   // 引脚定义  
) u5 U4 w0 v+ E/ Esbit RW=P2^6;                                                           
; P( @, p9 i9 n# m: t. Bsbit EN=P2^7;      
sbit busy=P0^7;                                 // "忙"标志位      
7 y! \  _8 E! q4 l0 e# f4 A5 K#define LCD P0                                  //命令或数据线
/ b' B  o  K( B2 I' Esbit DQ=P2^0;
& v3 r% y7 [5 U. n4 e4 y; A  
2 F2 e9 f6 q  g; D, q) \//代码表
) e. t) g: d0 ~7 W5 S0 G* S. cunsigned char code TAB1[]={ 0x0c,0x12,0x12,0x0c,
                            0x00,0x00,0x00,0x00,
5 H9 f! ^/ V/ I2 a1 E                          };
+ r' U5 j: a' s8 z8 ]0 y//字符表
unsigned char code TAB2[]={"DS18B20  OK"};  
unsigned char code Error[]={"Error!Check!"};     //说明没有检测到DS18B20
$ F( K! O% ~* k) D4 uunsigned char code digit[10]={"0123456789"};     //定义字符数组显示数字
unsigned char code TEMP[]={"TEMP:"};             //说明显示的是温度
unsigned char fuhao;


//------------------------------------  延时函数  -------------------------------------------


void delay(unsigned int t)                      //延时若干微秒
& {( v- X: g6 J6 o {
! S* }; o% m1 F5 ?   while(t--);
}


7 c( \0 p  H: r9 A) Y5 x5 P9 s! F//---------------------------------- 判断液晶显示器是否忙函数 ----------------------------------
; Z9 B/ j4 Z9 u$ K0 z8 P% N
: e' P1 r! S5 z3 B- C* x
CHECK_BF()                                      //判断是否忙碌
{
7 x+ \' R& W! @- N. m* t  do
   {
/ J1 \( G6 N( ]6 m) ^    LCD=0xff;   
2 U8 W$ N4 T# b) K* f$ A    RS=0;                                       // RS=0，选择指令寄存器
1 v2 s; I% Z2 N+ O8 [6 X4 Z& w: J    RW=1;                                       // RW=1，选择读模式
9 y; K0 B; y9 ~8 W2 i* I( I7 W    EN=0;                                       // 执行显示命令
: L- `% A" ]% E5 R- q; [, d3 x    EN=1;                                       // 允许读/写
   }  
  while(busy);                                  //busy为高电平表示忙,循环等待
}
! R( V% Z  y( y7 Q
1 @) N: [( N; [, I! ~# ^
+ }8 N9 M( d. J! @  S$ p//--------------------------------------  写命令函数  -----------------------------------


9 r- A( i; k9 s8 P& X3 P# O. sWR_COMM()                                       //写命令
{
1 ~9 {1 h- [- X7 I8 D. l5 A  RS=0;                                         // RS=0，选择指令寄存器
1 ~0 t- ^0 _% y# z/ u: D  RW=0;                                         // RW=0，选择写模式
  EN=0;                                         // 执行显示命令
  CHECK_BF();                                   // 等待
  EN=1;                                         // E=1，允许读/写LCD
}
! R9 W( G, Z* \  r8 s4 @
# F3 \4 N- h* k& l: g
1 v! b! S+ }4 x//-------------------------------------- 写数据函数 -------------------------------------
, V. S( E, A; p( V

WR_DATA()                                       //写数据
- M4 S$ V' d- i6 e  V* X{
  RS=1;                                         // RS=1，选择数据寄存器
: x5 z9 w  r2 j. g9 q% b5 o; ?  RW=0;                                         //准备写入数据
; @) `/ j" _6 s, n4 y2 Q" H1 ]  EN=0;                                         //执行显示命令
- r' ?* P6 O% d. N  CHECK_BF();                                   //判断液晶模块是否忙
& {: y" r! P; Q/ Y1 I4 ^+ i9 M  EN=1;                                         // E=1，允许读/写LCD
' u% k0 p3 |) l/ {9 S}


//--------------------------------------- 初始化函数   ----------------------------------
' [5 b6 E5 p2 v0 F: u

INIT_LCD()                                       //初始化
{
" X4 x' D# z& }7 n+ \- h+ W   unsigned char i=200;
    {
$ W( [! N2 T( y      while(--i);
3 N8 N8 Q* X9 t9 A0 P; |+ D      LCD=0x01;                                 //清屏并光标复位
      WR_COMM();                                //写入命令
) V' I3 U4 ^, X; E      LCD=0x38;                                 //设置显示模式:8位2行5x7点阵
      WR_COMM();
8 u: O" k8 P$ |4 F5 i. H* ?      LCD=0x0c;                                 //开显示屏
          WR_COMM();
      LCD=0x06;                                 //文字不动，光标自动右移
      WR_COMM();                                //写入命令
" M/ N! N. [, a! G. k    }
/ ?) L& F/ o4 Y }

2 x* Y9 T- i, {0 L$ Y
         
6 Y3 o1 W. I5 n  @, i! Y, N2 N//--------------------------------  显示温度标记字符C函数 ----------------------------
" H6 q0 N' x( h! K
TEMP_BJ()                                       //显示字符C
7 F$ m5 l: L8 c0 F' r. U6 C     {           
/ k- g/ {9 w0 d1 ?4 ]           LCD=0xce;                                  //写入显示起始地址                 
0 @1 I- U% H8 h" a; W/ L       WR_COMM();                                 //写入命令
8 \9 c- K1 {4 j# p- ?4 z       LCD=('C' );
& H  j  ~, u* k8 Q2 C5 s/ R1 r5 z           WR_DATA();                                 //送出                        
7 @' D( u3 o# _        }        
. U9 C5 t* F8 h0 M      
//----------------------------------- 自定义温度标志符函数 --------------------------------
# c  v  G! P' @0 J$ [) Y/ b  STORE_DATA()
    {
' R: s0 x6 x! {* ?% |       unsigned char i;
           LCD=0x40;                                      // 指定CG RAM起始地址                 
       WR_COMM();                                     //写入命令                  
       for(i=0;i<9;i++)                                
# Y( Q; \3 r' T' s        {
          LCD=TAB1;                                //提取字符
          WR_DATA();                                  //送出
8 u7 y: b5 @* m" q* s/ G" t        }         
0 y- X# k" A1 [           LCD=0xcd;                                      //写入显示起始地址
           WR_COMM();                                     //写入命令
       LCD=0x00;                                      //CGRAM内第0号图形
& B: v. x2 r" E' h2 W       WR_DATA();                                           //写入数据                           
0 P( R4 S/ O, e3 j     
           TEMP_BJ();
" q3 ^7 g0 I, l3 U- P% |         
( ~. P4 \* c- m# I6 h  }
6 @. j! C+ d2 d                 
" ^& p+ M3 S+ q, B: c4 [

//------------------------------------------- DS18B20初始化函数 --------------------------------------
7 t4 O$ S6 ?5 b" m) z9 D6 D2 u

bit INIT_1820(void)
! j- R! z. o( m. ~& c6 J% O {
   bit flag;                                         //flag为标志符
2 p- z; Z/ A0 |6 m. t+ O' L. A+ v1 N$ J   DQ = 1;                                           //DQ复位
   delay(3);                                         //稍作延时
7 s; ]8 e4 q& P  _   DQ = 0;                                           //将数据线从高拉低，保持480~960us
   delay(80);
   DQ = 1;                                           //释放数据线
( V2 A+ s, u' ]   delay(10);
   flag=DQ;                                          //DQ=0表示存在      
   delay(25);
$ ]5 l0 r4 h& g$ J* q0 i   return (flag);                                    //返回检测标志
9 ~  F) G( h7 `. _( e: \}
/ {5 Z4 C4 S5 f" N

) R2 g) d0 Q* F% L! c, x//------------------------------------------  读出DS18B20函数 ----------------------------------------

9 H1 M, k" O3 u6 z+ Z% ^
unsigned char READ_1820(void)
{
   unsigned char i=0;
   unsigned char dat;                               //储存读出的一个字节数据
   for (i=0;i<8;i++)
   {
     DQ =1;                                          //将数据线拉高
# g! d1 o& m& u' `! q8 x     DQ = 0;                                         //将数据线从高拉低，启动读时序
" x2 m3 Y% ]" A; Y$ y     dat>>=1;  
3 Q4 T( ]" ~# c3 ~6 B6 k     DQ = 1;                                         //将数据线拉高,为输出电平作准备
     _nop_();
         if(DQ==1)
     dat|=0x80;                                      //读数据，存入dat
1 s* L: w/ R: l! g     else
* ?; ~9 e: |- m* O$ O9 B     dat|=0x00;                                      //读数据，存入dat
8 @0 t: O* Y% K( X6 G     delay(3);
4 o: o. d5 O& A* J4 B        }                     
; v7 g0 _6 ^5 a) w1 H  _& d# C   return(dat);                                       //返回读出的十进制数据
}
# Z( k" R7 d  u& S& o+ N

//--------------------------------------------- 写入DS18B20函数 ---------------------------------------------
8 N9 x& H/ Q: ]$ R8 y* Q2 n3 R
0 F: B' P" N7 x) V5 n
! s$ i' `+ G2 aWRITE_1820(unsigned char dat)
{
5 a& E# j8 V( r% B   unsigned char i=0;
   for (i=0; i<8; i++)
    {
' X/ r/ ]; y* \      DQ =1;                                       // 先将数据线拉高
0 n. l: B9 G$ ]9 S      DQ=0;                                        //数据线从高拉低，开始写入      
  S8 Y* C; D+ m/ a; Z      DQ=dat&0x01;                                 //利用与运算取出要写的某位二进制数据,                  
      delay(3);
& H* C3 J' `& F      DQ=1;                                        //释放数据线      
+ ^6 r! w* S; o6 N/ m9 u& q      _nop_();         
      dat>>=1;                                     //将dat中的各二进制位数据右移1位
   }
) k5 H& X" |* j+ s0 s      delay(3);
! v5 ]. p) g; ^7 } }
4 Z* I$ f% Y3 ]& S- }) W# z3 L# @7 I//---------------------------------------- 显示错误信息函数 ------------------------------------------
6 Z. l1 p& J8 `! h: J7 k
7 @0 G- W$ d% N) g
void DISP_ERR(void)
8 Y( g: y* z9 h% J0 Z9 Y  {
) @! B' ^. @  v2 t8 B7 p# {/ s      unsigned char i;
  
1 z9 l; b& b6 S* M. I$ V      LCD=0x80;                                    //写显示地在第1行第1列
      WR_COMM();
      i = 0;                                       //从第一个字符开始显示
; Z! O/ j- D/ \6 d     while(Error != '\0')                       //写到结束标志
      {      
        LCD=(Error);                            //将字符常量写入LCD
        WR_DATA();
            i++;                                       //指向下一个字符
- f1 M7 E! v( ?" h8 U3 i        delay(1000);                               //延时
  w0 Q. z' x; O1 |8 Q          }
5 l3 o; m" J$ Z5 Z     while(1);                                      //循环，等待查明原因   
& ^2 ^) w, t4 C3 a  }

6 K+ W; A$ c. F- m; @3 i3 V
" c: W( s# y, ?' S& h2 V: r! t& a//-------------------------------------- 显示温度的小数点 ------------------------------------------
  
void DISP_D(void)
, N/ Q2 H1 Y# k4 e4 s{         
   
  LCD=0xc9;                                       //写显示地址在第2行第10列
  WR_COMM();
  LCD=('.');
$ n& T. U& Z. X) Q+ U, T0 V' M  WR_DATA();   
  delay(200);                                     //延时一点时间
" D0 d) s! D% N}
5 w# b( \& K7 F4 n4 W

//------------------------------------------ 显示TEMP字符函数 ------------------------------------------------
+ c% U* J' ]$ M2 v9 [/ Z
   void DISP_TEMP(void)  
& L) m# V" `% v, A/ b  
    {
+ e1 ]3 H  v1 @9 G9 L           unsigned char i;
% t( ~4 f( J5 C6 W           LCD=0xc0;                                  //写入显示起始地址                 
       WR_COMM();                                 //写入命令
7 [$ \) c" P! ?  S, b' z       for(i=0;i<5;i++)                                
$ V  h9 z1 z7 d* l4 i+ ~        {
         LCD=TEMP;                             //提取字符
1 N8 T7 c, f3 k3 m         WR_DATA();                               //送出
        }                                                         
    }
- r; I! c7 Q4 c- I& e" }   
+ |  P9 k( q- o+ }) F! } //------------------------------------------- 显示菜单函数 --------------------------------------------
" u0 P7 K; P# S7 f: T! |! B DISP_EXP( )
     {
3 G( m! O* b+ V' i           unsigned char i;
# Z( q# @$ [7 V- N$ z0 ^           LCD=0x83;                                    //写入显示起始地址                 
5 x, p+ [+ h5 }+ N! _- g       WR_COMM();                                   //写入命令
, _: Q; K( r$ k8 F% G       for(i=0;i<11;i++)                                
0 G. Z! ~+ x7 A- c* L) ]" `, d        {
         LCD=TAB2;                                //提取字符
/ S, ?3 [1 g: H8 l! M" \         WR_DATA();                                  //送出
        }                           
          DISP_TEMP();
8 D7 z* K: H% V# ?" B4 L: K          DISP_D();
        }
   
2 R3 E( c* K  L //---------------------------------------------- 读温度函数 -----------------------------------------
3 C3 k3 |4 x# C8 t: q- ~
8 m. D0 L, D  ^
6 A: |( S3 `7 c4 t) s( pRE_TEMP()
2 {: n' [! g  m {
# W  {/ d3 o4 k( M- i7 X! m( \   unsigned char time;
* W& L" [! J+ G) A   INIT_1820();                                      //将DS18B20初始化
' _( y# B, {' L0 k/ G3 n2 ~. K   WRITE_1820(0xCC);                                 // 跳过读序号列号的操作
. T7 K) Z7 U  Z6 I   WRITE_1820(0x44);                                 // 启动温度转换   
7 L' q/ Q3 L" M3 Z   for(time=0;time<100;time++);         
0 Z" ^5 `: w- f1 R! L   INIT_1820();                                      //将DS18B20初始化
   WRITE_1820(0xCC);                                 //跳过读序号列号的操作
   WRITE_1820(0xBE);                                 //读取温度的低位和高位
}

' ~5 Z! J+ g3 q- e8 A) I, J9 P( b- x//------------------------------------------ 显示温度正负的符号 ---------------------------------------
   
void DISP_ZF(unsigned char fuhao)
{
  unsigned char show;   
8 n$ S! E' l8 ]( \( ?show=fuhao;      
  LCD=0xc5;                                         //写显示地址在第2行第10列
7 g+ h0 O! b. ]! k& n0 t$ D, O  WR_COMM();
  LCD=(show);                                       //将小数点的字符常量写入LCD
) X, U4 q5 p) N: H% Y  WR_DATA();
' p& @6 l% E# s  delay(200);                                       //延时一点时间
}

//---------------------------------------- 显示温度的整数部分函数 ----------------------------------------


void DISP_TEMP1(unsigned char x)
{
% I1 _6 ?7 z& ?# |( x( B: E  unsigned char j,k,l;                              //j,k,l分别储存温度的百位、十位和个位
1 J8 Y4 X: ~. x- ?: y& G, Y0 r  j=x/100;                                          //取百位
! ^' s1 j) N4 W! d7 c* q& R  k=(x%100)/10;                                     //取十位
  l=x%10;                                           //取个位
  LCD=0xc6;                                         //写显示地址在第2行第7列
$ n7 [2 l, b% e+ F6 b% D1 m( C  WR_COMM();
  LCD=(digit[j]);
, A& V* C% B+ G6 K+ z4 M: i  WR_DATA();
  LCD=0xc7;
; a# H* A/ L$ s  WR_COMM();
/ Z' E+ l# k% x9 c) _0 J  LCD=(digit[k]);
  WR_DATA();
  LCD=0xc8;
& [/ V# O( C2 m) V, N7 S3 `  WR_COMM();
: @- K# f/ m5 v0 K  LCD=(digit[l]);
. z2 S; n; t  B: @  WR_DATA();
  delay(200);                                       //延时一点时间
# R# g! h5 x4 O% z  _( V. R2 }8 t}


% T3 A7 F* o* I- a7 N7 c9 n//---------------------------------------- 显示温度的小数数部分函数 -----------------------------------------


0 l) r8 |# H4 R2 P. e% qvoid DISP_TEMP2(unsigned char x)
% e; [+ J( P0 ~* u1 o0 f! X: c{
   LCD=0xca;                                         //写显示地址在第2行第11列
7 Q9 y# Y. [: E   WR_COMM();
   LCD=(digit[x]);
) Y% Q2 O' z" ^3 R   WR_DATA();                                        //将小数部分写入LCD
$ c$ Q5 F$ x1 A5 {( M$ ?   delay(200);                                       //延时一点时间
8 e% c/ z4 b! L0 {. O2 L& `& I/ d }


6 Y( C& V  f* Q$ I0 `% l, I//----------------------------------------  温度数据转换显示函数 -------------------------------------------
7 _# o7 u6 l2 C' W% j7 Y   
void CONV_TEMP(void)  
{
   unsigned char TL;                                  //储存温度低位
   unsigned char TH;                                  //储存温度高位
   unsigned char TN;                                  //储存整数部分
2 l/ b* {; `0 T! ~, M! P0 S$ m   unsigned char TD;                                  //储存小数部分

  I& ?' y8 C0 J! `7 b   while(1)                                           //不断检测显示温度
    {
- G9 h6 a* E% Y: M- R8 N' a      RE_TEMP();                                      //读温度函数
; T; `: a4 r+ W; M //-------------------
( |2 e& p7 _2 \          TL=READ_1820();                                 //先读温度值低位
      TH=READ_1820();                                 //接着读温度值高位
0 h# g$ C4 S0 ^; R2 D) \

+ q# [% a: Y* |" X$ t' ~, R7 Q9 P$ l2 B        if(TH>=0xf8)
" A6 F: }' P6 M. D7 O; r         {
% {" q' s, t* N- i" y! b1 D9 D           DISP_ZF('-');
           if(TL==0)
1 n7 E! d+ W3 Z( |6 s4 }            {
              TH=(~TH+1)&0x03;
9 ]7 T) N2 c! ]( k              TN=TH*16+TL/16;
* o* V( t6 ~3 Q! g$ y              TD=(TL%16)*10/16;
/ \! Z7 N; y0 ~1 S              goto loopshow;
            }
   
+ \$ s- I% O5 \8 u           TH=~TH&0x03;
8 R, ]+ r1 z7 U# j           TL=~TL+1;
           TN=TH*16+TL/16;
; f3 h1 Y4 K' I$ j7 N+ u           TD=(TL%16)*10/16;
           goto loopshow;
        }
          DISP_ZF('+');
" M, S4 F% ~4 w3 i& U8 y          TN=TH*16+TL/16;                             //计算温度值整数部分           
/ W& U" {" n0 r* ^; \          TD=(TL%16)*10/16;                           //计算温度的小数部分
) ^  h# _: a' s6 L1 V7 l          loopshow:                  
//------------------------
        DISP_TEMP1(TN);                                  //显示温度的整数部分
; L0 \9 g2 w1 a    DISP_TEMP2(TD);                                 //显示温度的小数部分           
    delay(100);   
; g# O) T& |/ [- ]0 f  }
}
2 ]( `- \1 t% F7 M  ]* R! C& h0 S //---------------------------------------- 主函数 ----------------------------------------------   

: R6 L7 X. I$ m! E. G* a6 H
9 E, S& k4 ]6 s9 a% ]9 Rvoid main(void)
{   
   INIT_LCD();                                       //LCD初始化函数
% p4 f: G( H: U9 _% \; k% B   delay(100);   
  O8 J/ k& Z+ V5 H7 `   if(INIT_1820()==1)                                //DS18B20初始化函数
   DISP_ERR();                                       //显示错误信息函数
' R1 m7 A8 _5 J7 `; \% |2 ]) {   STORE_DATA();                                     //自定义温度标志符函数
& [* l" C" r! v( _" k3 P   DISP_EXP();                                       //显示菜单函数
   CONV_TEMP();                                      //温度数据转换显示函数

! s) e/ L2 }6 `- m& p" g
3 M* I6 c9 O! Z1 w6 J" Y

…………限于本文篇幅 余下代码请下载附件…………
2 l: l6 ]! |7 l6 x) M/ w+ a

4 D# Y& u8 ~: U0 T* W* G

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

cat12620

谢谢分享

EC小白

1111111111111111111111111
: s. |% G6 N1 R+ t/ s( T/ ~5 e

Memory00

看一下余下代码      
: C4 Z! E; h/ u. r4 \. B  l/ x