51单片机用LCD1602液晶显示年月日，及时间时钟设计代码

relchhiclty · 发表于 2019-1-18 13:48

EDA365欢迎您登录！

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

x

51单片机用LCD1602液晶显示年月日，及时间时钟设计代码

8 B% a8 Q0 N4 E
#include<reg52.h>
: r! k$ ]% J" ~: N/ p$ J7 o0 o# h5 g#define uchar unsigned char 5 a3 d3 A% G0 r5 s0 F
#define uint unsigned int9 s8 I6 x) |: @/ \" S
sbit dula=P2^6;# w3 {, Q- `% P" {( P2 [$ `
sbit wela=P2^7;
5 P0 ^# T9 A( o+ c: o% vsbit rs=P3^5;, z: M3 o# i3 e- V
sbit lcden=P3^4;
( D4 H9 u' G( g$ R# d! S9 {sbit s1=P3^0;' b: _( ^9 g) m- Q$ u  N
sbit s2=P3^1;( v% p$ _- ^' W/ w0 ^2 x! ?
sbit s3=P3^2;: ]( M$ D% Y: B0 p6 [# P, s
sbit rd=P3^7;
+ c2 D5 }) E1 g0 m  l/ yuchar count,s1num;. A3 _+ M: a$ M8 G0 e& v
char miao,shi,fen;) |: K0 x, K5 ^/ Z
uchar code table[]="  2007-7-30 MON";! F; l: `  ]; n- l
uchar code table1[]=" 00:00:00";
' q  n$ H* B! R6 i- ]7 ^! n4 nvoid delay(uint z)
+ ~5 a8 w1 d0 d7 L3 E/ N+ o{% p% P0 Q% @7 u3 T
      uint x,y;
9 z- R3 L& d! @/ w       for(x=z;x>0;x--)
8 |( j9 E% |; u7 b8 v# t. Y             for(y=110;y>0;y--);
1 i& v5 Q! }% M}; G& `% @: L" Y1 u3 R6 l. F
0 n+ h8 X6 s# j3 C: Q
void write_com(uchar com)/ \5 J1 s% c, H; G. S
{
! C8 L7 ~0 I; S: n# p- U7 s2 q       rs=0;
5 h. T, h1 ~$ \7 w0 f# k% [       lcden=0;, w- o. ~; k% {# G( t3 F
      P0=com;) Z$ b! e+ P8 L( k7 U& i
      delay(5);. m0 @' ~1 c' j# Z
      lcden=1;
, K5 b7 q* @8 u* ~       delay(5);
( @$ n+ Q. a' |       lcden=0;
6 F4 d9 k& r' v) G}% h; y- a# Q: E$ `4 ?2 \. s8 C

- b3 z- v0 M+ E$ m1 Nvoid write_date(uchar date): Q5 r" U% I/ y& I
{
' E3 @1 C8 Q" o4 ~6 c       rs=1;
0 C3 W/ p, l& e/ G/ n- N       lcden=0;8 ?2 P7 @! ]" a7 q/ Q9 I9 o5 N# \
      P0=date;8 n5 A( Y* j' j3 A; y
      delay(5);7 ^0 ]( Z" T- a9 y! H
      lcden=1;
" q# n2 c2 D; V4 p       delay(5);. L) l) x& M& _' }
      lcden=0;
+ E1 I& V9 U# n! T* x3 f}5 P: R8 n: T& h7 m& f

7 [3 N% G2 I% Bvoid init()
5 q+ x8 Q3 j. \) ]7 u{
9 [$ x4 N: p7 D       uchar num;" L: G0 o- ]" H$ x4 `: Q+ l
      dula=0;! ~6 ~" q* @, o- A2 }
      wela=0;7 u7 B+ h% }  k; e, P% H
      lcden=0;
! y' _% G3 T: v//       fen=59;
: B1 T3 b) i. w6 Q//       miao=53;
2 l7 o7 L' j" x. X//       shi=23;! v) L9 e+ s* a! o' J
      write_com(0x38);6 ]' l8 v% H% m- I; I! V9 ^$ w/ X
      write_com(0x0c);  _! |- u, z. Z& I3 J- L5 \
      write_com(0x06);
6 L7 k1 [, s  c: g       write_com(0x01);- d! D8 f6 _: C; F  b' X, Q
      write_com(0x80);+ ?/ |/ s% A. L, U% T( x- W
      for(num=0;num<15;num++)/ B+ e+ ]9 j. B( R* G6 C' n! J
            {# M) `  B" L& \: ~5 F& g2 f' C
                     write_date(table[num]);  K7 _, D# v7 P, v$ E
                     delay(5);( c: A7 B4 X5 |% b; t: E
            }. j$ G& o8 ^2 G0 b+ l5 o
      write_com(0x80+0x40);
; G: ]. I5 c9 o$ Y- y- [6 E       for(num=0;num<12;num++)9 F# E" K! o- u" C6 J0 O
            {
8 g) |0 L, }" O& l& A/ B. s$ Z8 u                      write_date(table1[num]);
. J* {, W$ i6 I( O2 Y                      delay(5);
, a3 }" L' O; l# h4 E             }6 n" k- g/ f+ V
      TMOD=0x01;: H& M8 K% R* j9 }
      TH0=(65536-50000)/256;% B8 _4 o6 \8 ^) ?$ }
      TL0=(65536-50000)%256;1 G! c. B3 m3 {3 D, k1 c
      EA=1;
# X; C* O* D5 F- M( N( u       ET0=1;
- x# [4 j0 M$ ]+ n       TR0=1;( h8 J0 \4 B9 d! r. o2 D  {0 ]
}

5 J" d. j" O: ]$ w8 p5 T0 ]void write_sfm(uchar add,uchar date)4 w' r; {" h0 _0 C4 J0 ^* F7 S
{5 w4 H2 u, }5 |& t
      uchar shi,ge;
1 P# d0 P. [6 X% R% o" L9 R7 \       shi=date/10;
+ P; A/ h( g- Y       ge=date%10;
" r6 m# i# x3 s$ m       write_com(0x80+0x40+add);+ }( k- Z0 X; p
      write_date(0x30+shi);. W9 v0 ^1 r; O  M  j% D
      write_date(0x30+ge);
& M, h4 m' @9 X; F4 j* L7 [; H}; I- t4 R4 h) Z8 K" |: d/ G+ L
# h& q4 |4 _$ a3 n" @
void keyscan()+ b+ s# M+ J" w- j8 Y2 |' I
{5 y! a$ _$ [; }# E
      rd=0;( O6 |3 ]" V' b6 H' \2 \
      if(s1==0)       & |3 \* k2 G; D5 t3 l) X, S' O
      {  A7 q5 m% Y( X+ u% O# z
            delay(5);: N4 f* v+ J! v* ?- |, F8 M
            if(s1==0)6 S4 ?$ o. F: d4 X- P( q
            {       s1num++;
! [4 M6 p# m$ `3 o                      while(!s1);
0 P% E1 E5 q$ X7 ]6 Y                      if(s1num==1)
$ q* q  ^8 K( r+ r: B! o( C                      {
9 F" j* M1 w" j" w1 X' C/ _                               TR0=0;
$ N4 g) M( M) }' j                               write_com(0x80+0x40+10);
, A4 O8 N2 {" r* ~6 S# q) [                               write_com(0x0f);
1 y, y& \4 D8 ]2 y, _$ T) m                      }
1 f2 j4 q6 }6 G; o0 b7 W       }
1 @8 J( C: a0 h' t' u  E                      if(s1num==2)
) o* b5 G, m5 j3 ]( H+ u                      {
9 |% B. M! Q$ _                               write_com(0x80+0x40+7);
6 @% h5 _+ l; ^+ z& f2 z+ N0 D                      }" m0 \( a! |7 m
                     if(s1num==3)  @5 [6 ^; t1 T) I" }
                     {( U) [3 Q# Y; A* X; w0 `
                              write_com(0x80+0x40+4);
* e' C7 e7 F5 O) a+ g; y! _                      }
/ X% Y, m0 w! q& J                      if(s1num==4)$ B2 K( b" Q8 P& q9 \% x
                     {; |+ [% @" \7 ?- V: U; i
                              s1num=0;
0 `' E7 i3 ~1 |5 D5 A) d. g2 w                               write_com(0x0c);$ Q2 l! q3 K! n- L* G
                              TR0=1;) P& L- U. J' [9 {4 e, n7 X! a, F
                     }
" e, \2 R+ [( q( W1 |, y& G
& X3 A1 E$ d9 n$ C. g% h
" F" [. K  ~( X2 n9 E             }
. |! w3 j( ^. |             if(s1num!=0)2 I9 z& o: T7 r
            {
2 _7 m2 C# G0 C& F                      if(s2==0)
5 X# X6 v. x' C9 U% d3 ~" M                      {9 l4 |5 m- M  E
                              delay(5);0 o; ~0 k+ l/ w3 p" }8 g: M
                              if(s2==0)
$ S6 J1 U" D# n# K4 B# `6 ?% e1 h                               {
( q$ e+ T, I8 C7 e                                     while(!s2);
8 Q8 _1 e+ q# n7 b" R- l% q                                     if(s1num==1)* ^& k# j6 }( m) Q6 R
                                    {
& u6 s! |6 t* M9 v+ y% B/ ?                                              miao++;; q1 y' g9 p) |5 r1 w: o
                                             if(miao==60)+ U; i. \  ]' Y5 S5 _
                                                      miao=0;
% f% u8 g; v5 n/ S1 A/ c8 W% q                                              write_sfm(10,miao);
% C0 G3 ?2 S7 O; `+ ~) q                                              write_com(0x80+0x40+10);0 I2 q) n3 D: k
                                             3 P: k% @6 a* _
                                             5 l6 j- v$ e8 m: o: B& X
                                    }
3 c& _- [* ^$ p: o, j) q2 f5 J                                     if(s1num==2)1 p( ?) q. k5 J# Y
                                    {
. p3 j8 F. x7 K5 K                                              fen++;
  |* @% o, H9 }6 w' Y8 M6 |2 x                                              if(fen==60)
% p$ t& L: Z$ X+ J4 {  d                                                       fen=0;7 C/ W) \2 l% K& |2 V  L9 x  O$ o% m
                                             write_sfm(7,fen);
+ i* C* L  }9 b! w8 o                                              write_com(0x80+0x40+7);1 ?5 `  ~; L. _" Y' y! i% a
                                    }
0 O$ }  M" n7 S& ]                                     if(s1num==3)
8 s/ a) Z1 j" P: w& V4 P                                     {
, ~2 F9 p' l- o                                              shi++;
: A0 x+ d- o& ]& w8 r                                              if(shi==24)8 C; |( ^4 L* a, L
                                                      shi=0;, m; `) ~/ ^* u# \2 d& u8 h
                                             write_sfm(4,shi);: a" I4 m2 p7 Z4 {' c
                                             write_com(0x80+0x40+4);
( y: W+ f( a  r% L. `& U) ]5 d  W                                     }* q9 {2 I% U: |. e0 i
                              }
. R! @! [/ x% u& s* n2 O. ]                      }; P% S( T& N( w4 W$ \2 v
                     if(s3==0)
! \+ `# n) }* E; w                      {
% @7 B& m: n- M% `2 n; E                               delay(5);
8 P  G' z6 }# G5 ?* U# c% p! {  d                               if(s3==0)
* h% ]. k7 }4 A2 s6 B                               {7 T6 F2 ^! s3 h0 _9 r% J- [
                                    while(!s3);1 Y, e8 _' D4 ^
                                    if(s1num==1)1 z& ^) x$ d7 G: v3 t  w
                                    {
7 o8 o5 ]  e( K, Q+ |# `+ F                                     /*       if(miao==0)8 n6 \2 G0 i; n/ }+ a7 Z) R
                                             {
2 ?+ T5 d5 y4 p" ]1 {8 S# E4 l7 R                                                       miao=59;
% l( v1 X/ X4 F8 G% l) J                                                       write_sfm(10,miao);
/ a  q2 c2 J7 h# O6 L/ T                                                       write_com(0x80+0x40+10);
                                             }*/
1 F" J: a: w/ {6 W& M$ r                                              miao--;; k- ]* ?" Q- M
                                             if(miao==-1)
, q; Q, H1 p4 v6 a& A                                                       miao=59;0 H- v. a8 C, x5 U# \
                                             write_sfm(10,miao);
5 C4 V$ K8 L* [9 t# e                                              write_com(0x80+0x40+10);' b1 m$ g' N6 c, p5 {
                                    }. e6 e" R3 S) a; w( l4 O& V
                                    if(s1num==2)
: C* R+ |: }+ V& p- e                                     {: o1 s. ^0 }3 J& s& e2 B- H, m. F
                                             fen--;1 U% ]1 h6 n; i( `6 t( S* ]
                                             if(fen==-1)# i9 X' W6 `+ ]9 B! f5 I
                                                      fen=59;7 k) Q. a6 x( O
                                             write_sfm(7,fen);
! s# i. X" m% I% g6 q                                              write_com(0x80+0x40+7);3 M, @& @1 Q6 q- p( }" ?
                                    }
5 K" f, e3 c- L' x- _1 Q                                     if(s1num==3)
# T) E' Y6 a: G                                     {1 A% a6 E$ A. b/ O% ~3 ], V2 p
                                             shi--;' I  E& d, [( e
                                             if(shi==-1): V, K5 @& d# b$ C) m
                                                      shi=23;' N2 U  t; \+ d" [& M" J; x; ~) M3 S
                                             write_sfm(4,shi);2 u" C. A3 V& e- Y8 M3 i
                                             write_com(0x80+0x40+4);% Q1 c, m+ Y& T6 ?; G. M
                                    }
; L* i4 ?  }. A( a! ^, K                               }
2 D+ B' ]5 F: H: _7 A- L                      }  `1 I: H8 n$ g1 a7 t' J
            }4 R. F! i, x; a8 }$ R4 {; h
}7 {) ?) C- W7 E: z' I5 L
void main()
5 u6 \8 }6 q7 T0 C* a2 i" F{
) d, Y( U: e* ^  f       init();
/ ^) V  ?3 P. D3 g8 w       while(1)
8 E8 ?1 C" {: Y+ ]6 j' d7 \2 ^+ S       {0 ^  D' K3 P* k3 @, b3 G. e
            keyscan();" N7 g# A/ L% K: Z
            # P- N% E- G: @+ g. `
      }& v2 n+ a& m( B& W$ N- ^
//       while(1);2 Q, J  v" ]/ C
}
# F; l2 A5 @% }0 d5 j. W: {3 G3 h# @; ?7 T$ G2 }
void timer0() interrupt 1
3 ^" X' o0 }# l' w{
9 q! V# Y- w6 R" q# N  a7 F: {       TH0=(65536-50000)/256;. W( D! n# F; t7 f: N: q& u% H! H
      TL0=(65536-50000)%256;
6 T& k, f' J# j       count++;* R; \- B6 x8 f! d/ F
if(count==18)) ?7 {2 j- D! G2 U7 c6 n- f
            {
+ ]2 u% a5 u4 S: x! D4 o- w) Q                      count=0;% ^8 [+ Y) `* h* r
                     miao++;9 n4 P. t9 O5 w% w/ w$ n4 J# W
                     if(miao==60)
3 x" I3 }: q% v) Y, x; g/ N                      {
! X/ R6 t6 w; P( Y8 S7 |7 f0 |& v                               miao=0;
! U- k/ F" l+ a: f# s9 v                               fen++;9 g2 \' N' D" L( Z! i: J9 Y" P
                              if(fen==60)! V, G/ A7 g$ T4 R# ~2 I+ Q
                              {; V+ o  N& o2 A
                                    fen=0;
! _: j, z  ?6 i8 X5 Q) X! c                                     shi++;- z8 M! j$ d8 h7 D2 y( e( j
                                    if(shi==24)
9 \% N* F3 U6 A, x$ u5 ]- z; ?                                     {' F* Y! m, H  r* m9 M4 m
                                             shi=0;
9 p0 j" y+ M, L6 [; s2 X                                     }' m  `2 V: ]2 b  B" s
                                    write_sfm(4,shi);
" [* _3 V9 x0 |4 r$ W+ ^6 t% K                               }! i( _7 L9 g- {& k% {  D
                              write_sfm(7,fen);$ ^  w% ~4 ], `+ L9 R) ~
                     }- |2 {6 K/ L* Y. V' U
                     write_sfm(10,miao);5 y$ ~! J1 _! g3 V, c. e& b1 D
                     4 G! B' E( i+ _3 }0 ~& Y
            }
8 A' _- O& m! g  q- Q9 y) W1 d}

cat12620 · 发表于 2019-1-18 15:07

看看

帐号		自动登录	找回密码
密码			注册

51单片机用LCD1602液晶显示年月日，及时间时钟设计代码

EDA365欢迎您登录！

浏览过的版块

推荐内容 /1