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

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

EDA365欢迎您登录！

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

x

51单片机用LCD1602液晶显示年月日，及时间时钟设计代码
1 N5 O: b9 }0 A4 ~# _

#include<reg52.h>
2 m5 a. Q2 F( j8 G1 N0 a#define uchar unsigned char   ^8 d; C0 @1 M7 }( ~
#define uint unsigned int6 _# @) b5 e! h6 ]7 D
sbit dula=P2^6;
! q$ ~! ?0 c! f2 X. Lsbit wela=P2^7;! W, p& L6 ^" c( ~4 ~7 I+ }8 q
sbit rs=P3^5;" m* m' A( n6 S
sbit lcden=P3^4;) R$ U) ]' @$ F! F3 D
sbit s1=P3^0;
* `& I8 x; d5 E: [# @sbit s2=P3^1;
. a6 [# S# Z$ t0 Y: h- ^7 xsbit s3=P3^2;
9 ~4 F# I9 n5 C2 I/ }sbit rd=P3^7;5 c1 G  e* a7 b- U8 z# ~. d& l
uchar count,s1num;
) Z( _$ K. r. ~; kchar miao,shi,fen;) x  o0 \7 t$ W# h3 ^- t, v
uchar code table[]="  2007-7-30 MON";
% |0 z/ O) k  ]uchar code table1[]=" 00:00:00";
/ w+ J. {* t# i5 N. F( Y3 K$ \& w9 l3 {void delay(uint z)' T4 z$ `4 |% j/ r
{9 I% V! l) D' y$ d) X" W
      uint x,y;
4 e; x: E$ ]5 m- P9 I       for(x=z;x>0;x--)
8 X' [8 S1 G7 I' y             for(y=110;y>0;y--);, }9 D/ p" s( q, b* F# K
}
5 O* L6 T- z( S& q
8 Y* C! I3 d( w( S4 z' ?void write_com(uchar com)+ ]2 N8 {) q4 [- [, B
{! @$ a5 T9 x" C" Z! h" j
      rs=0;" w, Q7 I. s2 z; v# H
      lcden=0;
/ D/ x1 P) d& N1 t, X       P0=com;: E0 ~7 D, O6 X5 p
      delay(5);2 C; O, _& v. B. U/ h' y9 s
      lcden=1;9 c# C" Z  e5 b" U, r! {
      delay(5);
3 }4 t4 \( h# ]7 S& }6 S2 K* [$ _8 G       lcden=0;       % \0 Y( [" V! T/ F" H' F" ?
}  \( b9 a% F& s( I6 S, F+ a4 {( q

+ P# O# S  m' _4 \& l3 F9 {void write_date(uchar date), r8 |# I9 ]/ M, K* t. }
{' y9 P! M/ t3 e- E# ?9 e; g1 ?
      rs=1;7 a' n7 P* u1 E, b1 @
      lcden=0;6 {; [- y" I& N! F' |" \
      P0=date;( J# X4 o, e" ~. C. E4 N( ]: L
      delay(5);
6 }! f3 Q4 k5 F  R6 b       lcden=1;
6 c, E. n' ?# j  X       delay(5);
  V# E, S9 [. s& B; H       lcden=0;
}
3 X' R/ m6 h3 z8 N& J
3 c7 P+ p- j/ }! V# Zvoid init()/ A4 u/ T; l" ?. x% ~' R& |- q
{' r9 T: t6 ~3 H0 f5 W- ^, E8 T  i
      uchar num;
+ C9 I) N$ r+ D2 e1 z( e       dula=0;8 S, A( X& E, S; f
      wela=0;# U- z  s$ b) J' s6 I
      lcden=0;- z1 N+ C) n; t! W9 S. `
//       fen=59;3 C) |% p/ y4 c0 N! h* q* D" M" u
//       miao=53;- y0 G. T9 |# b" x, Z: V& A5 i
//       shi=23;
* V* X5 u+ H9 G" `, r0 ?9 K       write_com(0x38);( D; D8 u) F, G/ E% {$ q1 l6 V& @
      write_com(0x0c);
% Q( S% l) `- o2 j, z4 Y       write_com(0x06);
; H% X) e# G: @9 ^! h       write_com(0x01);6 H( Q: {0 K$ G3 R5 m
      write_com(0x80);( z) [( u  {5 C5 j. f. `  u  L6 x
      for(num=0;num<15;num++)
! K4 L: n$ o7 X  E" B             {
7 l* Y8 ]( x1 H+ g7 L( ?% e6 E                      write_date(table[num]);
' N# F& \, [! _                      delay(5);
3 y( C  S1 m' r             }0 |2 t& l. T$ [. z( X5 x
      write_com(0x80+0x40);
! K, h6 _! R+ h2 W& H4 e1 {       for(num=0;num<12;num++)
! X" G. C, a/ E0 O) z+ w( Z  d5 L             {! l# j. Q; f: }# z8 H
                     write_date(table1[num]);% Q9 _. b# @* M2 y
                     delay(5);
& T& ~. D! J1 w) `, i* ^             }+ i+ a2 l6 d1 o( z0 E
      TMOD=0x01;: v7 n8 a* d$ R5 s6 j
      TH0=(65536-50000)/256;9 ]- w' S3 i. F
      TL0=(65536-50000)%256;
+ T8 ^% y  `1 f% Y/ ~       EA=1;
0 Z+ U4 i3 n/ }       ET0=1;9 E( T+ g+ c/ {1 c0 t
      TR0=1;1 g0 j& |4 V+ ]. ]/ T
}
! I) A. G: i$ S/ R$ s0 \. q! |! P. b9 c$ a! m" c
void write_sfm(uchar add,uchar date)
) i# f" a( H' v% L! @! Z0 H4 B{
7 D6 a& y  u, Z/ d/ G3 i+ O; a& R       uchar shi,ge;
+ I* f# D) X* X0 H* M       shi=date/10;& j# a7 `! a, M/ m# v; D* Q
      ge=date%10;
* `' b: f7 a( f       write_com(0x80+0x40+add);; k8 P- j8 b. j* X/ {
      write_date(0x30+shi);
, a6 Y3 `; S( e) h, N8 v( r       write_date(0x30+ge);
, |+ P4 E3 G( H2 Z; L6 O3 ?}5 B, A- u; _# @# d

7 @$ c- y) R$ b8 v0 i( ~) Zvoid keyscan()
& o' v  x6 t: N{
2 c: H8 Y1 O. v7 p4 H       rd=0;/ k: W& r0 b; q" I" L' }
      if(s1==0)
" v) a4 ~+ g7 Z  r: L9 J7 Y' @" N       {. `' W9 h  V% _7 N( z
            delay(5);* `0 n# ^2 A: F
            if(s1==0)
- t" Z' `2 ^& {             {       s1num++;
% o; g( c2 s* |% G+ V- K% C                      while(!s1);
) q" r: i) O/ s                      if(s1num==1)
9 i# f# Y6 p0 m                      {
& C( H- z; I5 @' P" B                               TR0=0;
" E& Q' n9 D, Y- `' m                               write_com(0x80+0x40+10);
9 ~" ?+ @' @" J1 i9 ^; H, o                               write_com(0x0f);
5 G1 m1 t! N& I% k4 X  c. m9 m                      }# z9 a" _9 c, R# ^. [8 A
      }: l  [$ D5 b) ^+ o8 r- Y4 {
                     if(s1num==2)- r& w% R6 a$ l5 Y$ N5 \
                     {+ @' \& x9 s- G
                              write_com(0x80+0x40+7);
% V2 ~( K- F  `$ W                      }. }' b/ i$ g( F8 }& W6 L
                     if(s1num==3). G9 v5 p( u) \1 N- V$ {) _0 d/ y
                     {& e7 ^7 l  w) F1 k6 E$ X
                              write_com(0x80+0x40+4);
" i( I. i' x3 \/ t5 i$ J5 X& u$ C. c                      }
1 N% W: l2 Z2 T$ ~' H: a5 a. d                      if(s1num==4)
6 j4 E3 O5 x# I, q  j. m5 f; e                      {) j/ r: b8 r, Z7 l
                              s1num=0;
6 j$ n% z7 r4 r1 J- R8 U1 l8 _& f                               write_com(0x0c);
! q) |0 i9 g( C5 h+ U& d, p: @+ Z                               TR0=1;
3 H/ J+ x2 J1 L8 p                      }0 m* i7 w! G5 r9 R0 O1 ]
2 ^) J# d9 H9 Y0 }% k  T$ r, @
                              ( F% S, X0 [# m/ |; J2 W
            }1 z* z$ H3 ^( r1 A* R, b  `' [
            if(s1num!=0)
3 @$ P6 _! O% G0 t+ T, ^             {
- R0 R: [. s! o) A8 q0 V                      if(s2==0)
4 x& V5 P) h$ n9 {                      {9 ^8 m! v' Q$ b1 F- m2 g% f
                              delay(5);( S& y3 k# l. a* a
                              if(s2==0)4 u8 o2 W" F) L& R
                              {1 C3 v  @* A3 W' [2 p
                                    while(!s2);* P/ k( s7 n) a, A- X7 G5 D; f1 [% n
                                    if(s1num==1)
2 k! i# S% m% |4 i                                     {
" s; w; r: f6 u. {$ k+ w1 Q2 {* H/ V                                              miao++;
+ u8 T" z" a9 e! M                                              if(miao==60)2 d3 Z" a  P+ ?5 @7 l! a
                                                      miao=0;
% K6 h1 c( r, p* ]9 M) i                                              write_sfm(10,miao);$ K  O1 i. X% l- I
                                             write_com(0x80+0x40+10);
7 Y0 h. W' S0 D8 O* N! N. G
0 E& q& B# O2 d; ~
' B- _/ \3 n: G" U6 N" c2 _                                     }+ [9 F( e2 ]7 Y9 B# v6 \
                                    if(s1num==2)
0 r! B6 x/ Y& Z9 ]$ h% G                                     {1 G0 p  \0 n3 T% a' v/ L. P" I
                                             fen++;) f% Q+ M8 M5 e# @9 {# U2 m
                                             if(fen==60)( G) J* i; ~0 w: d
                                                      fen=0;& \: H, I# s0 D1 M
                                             write_sfm(7,fen);0 s$ R- ~/ O8 k0 V6 r7 m/ O, a
                                             write_com(0x80+0x40+7);
: F! {: G! d  }  ]4 A& h' x                                     }4 I' Q, `' o3 W" Q$ F3 i
                                    if(s1num==3)# ~5 x8 \! P2 K% x% y+ y; |2 }8 E7 N" G
                                    {
9 G' E, D4 k+ m+ ~* n0 N6 z- o0 @                                              shi++;0 s( d' ^0 N) {5 ?9 c0 ]
                                             if(shi==24)1 G( M$ U! m: n2 C
                                                      shi=0;! A+ x2 N5 z( P) u7 a  T8 l/ R
                                             write_sfm(4,shi);
6 L6 j: R" _9 g                                              write_com(0x80+0x40+4);
; @# {' i. ]2 w4 V7 t                                     }
& y3 ~- o3 D9 x5 ^& u8 r; V) R                               }/ c+ _& T; {: p# y% V
                     }4 k6 {; s# e% ?, h- s4 F
                     if(s3==0)2 C  Q" B' J* \
                     {# {9 I* u: n- }$ ?" L
                              delay(5);
7 o) \3 \+ |9 t. \3 `- c6 X% S                               if(s3==0). \& Q( f( \6 @' V
                              {
. A6 Y- {7 K& `9 {5 v                                     while(!s3);4 T; e8 P5 h) \1 c7 s% v4 |, W# z
                                    if(s1num==1)
# z7 n! K# ?7 h( R" a                                     {* F: `3 K  b0 T7 @9 w
                                    /*       if(miao==0)0 I2 L! \$ W, m8 l8 m
                                             {5 B% i% t( X: V; b: W
                                                      miao=59;5 @9 h8 Z/ R) |4 z7 c( Z  q
                                                      write_sfm(10,miao);3 @, C6 s  [$ V3 \4 M7 ^2 O
                                                      write_com(0x80+0x40+10);2 L/ T) _# x. G' j
                                             }*/! V, b5 R% @! g9 @4 i
                                             miao--;/ r3 j2 [* l. j6 J
                                             if(miao==-1)
& I/ D: k$ h$ w+ T9 ?9 }/ k                                                       miao=59;
: l$ U2 G3 }- m& J/ _0 H                                              write_sfm(10,miao);
+ m2 f$ \8 N8 z4 K( ]1 ^                                              write_com(0x80+0x40+10);
+ @% ]. b3 W) j% K                                     }
" I4 F" v- }9 k" q6 ^7 A                                     if(s1num==2)+ q( y; z5 Y/ X2 _5 p( M
                                    {
, Z# y  d0 T- ~* i                                              fen--;/ Q3 `- e8 A- [6 J
                                             if(fen==-1)
" q; k) f. {% ~$ \7 T) H0 p4 ?3 D' N                                                       fen=59;7 C* B$ |4 X4 s5 f+ ^$ l, w$ `. x
                                             write_sfm(7,fen);
; Y: {4 |" ^" p1 O. m" A; C; y- m                                              write_com(0x80+0x40+7);
5 z* {0 [8 g9 W3 y1 p                                     }8 H, v# ^: D- ~
                                    if(s1num==3): y( n( i9 ~3 F3 Y
                                    {
# k) @% h. z. L9 W) b. h                                              shi--;; P* O/ f2 T. t% Q2 l& k
                                             if(shi==-1)
; I9 n9 `) F0 F: h                                                       shi=23;+ |9 d3 @6 g9 y6 c/ e$ J% y
                                             write_sfm(4,shi);. Q: F  W# H9 ]8 {! V) _* f( e! ~
                                             write_com(0x80+0x40+4);0 `9 h3 U; ~" j9 K) L8 f
                                    }0 G' V) e  ~3 m
                              }
- h) n% W# Q+ X8 p  R" K                      }
: q7 \; B* c' \3 H0 _9 W# s$ _             }
9 f1 C1 f8 c6 {/ c& }; l}8 G; c) ~' z5 Y) k
void main()" d' M) [) D; W/ s2 e6 @9 \
{- p5 \, Y- K8 N
      init();
+ ^- j$ e6 D/ @$ }       while(1)9 O6 j, Z- m0 I* z% ?6 R1 d
      {8 y5 X9 |* f9 D4 B) X2 T6 d# b% E' w
            keyscan();
% P. Y- `4 l- Z& z1 z4 W) B- A9 |4 C
9 @5 E2 h- F; x! i       }/ ?  {3 Y, U4 S/ Y
//       while(1);
. l' `  A$ ^; M3 |}
9 S% D8 H/ L/ d3 M% _  B/ O
# N! l2 o# v. r) m4 ^void timer0() interrupt 10 o. b) T# X0 C* [
{5 H" \8 ~. t  T4 I3 M  o: t: {* t
      TH0=(65536-50000)/256;7 Y# P: Y8 R3 z% U. l  m$ A3 Z) E/ u7 `
      TL0=(65536-50000)%256;7 `4 J7 i  s4 y: J" d
      count++;( p7 b7 \; ^0 b7 r* I8 x
if(count==18)
6 Y% A) J( _4 g9 r) d! _             {' x, }. ]0 Y4 W  W
                     count=0;
+ E* E5 l' K- }" g2 y7 o3 `% z                      miao++;
$ g+ j9 y+ f. t: v$ l                      if(miao==60)
$ U3 J' N/ {; X# ~1 H! @9 d9 G' E                      {
/ O) f. W, H+ P2 k) P8 ]                               miao=0;2 p& n; d! G, F' c
                              fen++;
- h: K. w- D6 {* W1 y5 L( ]                               if(fen==60)
/ R# Z) `: @+ ]                               {. s7 J" I* w8 v0 r# S, G
                                    fen=0;
- {* ]; v4 r* V) e                                     shi++;/ b6 P; }( a+ X
                                    if(shi==24)
  f$ D2 D. N, Z5 Z                                     {# s5 `  s# j) ?4 ^% v$ m, b* w
                                             shi=0;
+ ^3 I2 S. f0 q) Y* R. \                                     }" a) n' R# t0 ]7 b; B  Y7 ?
                                    write_sfm(4,shi);/ P. h. u2 L2 M) c/ S' \' @" L3 A
                              }. p! T+ Y7 U( f+ B# k9 F% |5 y; d* u- j
                              write_sfm(7,fen);; q3 U3 |4 C/ y  R( U7 w: O6 H
                     }
5 g6 I7 C6 L, T/ [' \                      write_sfm(10,miao);
, g2 o- M) r# i3 f2 \) c
5 g! |5 j. g' R. w             }
' y6 Z# i3 A1 Q$ K1 A! M  m}

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

看看

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

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

EDA365欢迎您登录！

推荐内容 /1