单片机智能计算程序设计 LCD1602液晶显示

helendcany

单片机智能计算程序设计 LCD1602液晶显示
) Q8 ]; U" `, s0 D5 U单片机智能计算
/ S: u- m/ \5 L& R+ U9 [

+ P/ C- c) t! p5 V单片机源程序：
: S4 @8 B+ B* r, Z/*  S16 S12 S8 S4分别是123+
        S15 S11 S7 S3分别是456-
        S14 S10 S6 S2分别是789*
- g* e4 I. T6 I. z        S13 S9 S5 S1分别是0 CLR = /
- ?: a6 y7 x$ Q+ t! A4 R*/
4 N' a* u& x. D$ S& `& D$ ^
" b8 R/ q% A: K
/* 实现两个数的运算，每个数的位数至少可以八位  */
- D! j9 w/ M) g% |1 o0 b0 H#include<reg52.h>                        
typedef unsigned char uint8;
5 g9 X6 z/ M- X' ltypedef unsigned int uint16;

* u( V, o3 v$ p) F$ r
  q  w, ?* Z6 \3 x. Usbit rw=P2^5;
sbit rs=P2^6;
" A' h: S9 u0 k2 i! q$ g; Wsbit e=P2^7;
sbit led=P3^7;


& [6 Z" y) b/ H3 e6 B5 qsbit beep=P2^0;
uint8 key,num;
9 `8 ?0 s5 M! z. P  y8 ]uint8 fuhao;//定义具体的那个符号，是加减还是乘除。
uint8 flag;        //定义有没有按下符号键，这个是统称
long a,b,c,d;        //定义运算数据的第一个和第二个及等于的数变量
uint8 k; //定义小数点后面显示的位数
uint8 biao;


uint8 dat1[]={1,2,3,0x2b-0x30, 4,5,6,0x2d-0x30, 7,8,9,0x2a-0x30, 0,0x01-0x30,0x3d-0x30,0x2b-0x30 };//保存显示的数据

; h! K* T& }% ]9 |7 w9 g  a$ }( Z2 @
# u$ w; o; O; c: Xvoid delay(uint16 i)
: m0 n( f. Q' g) H. g* G& [9 W{
        while(i--);
}
void lcdwrc(uint8 c)
% q4 |; X/ M8 w. b/ h8 X0 G{
        delay(1000);
* Y- S! H9 l3 y/ M  V        rs=0;
        rw=0;
1 n9 V. ~/ ?2 t# @6 y9 S& T  M* p        e=0;
        P0=c;
        e=1;
        delay(1000);
  t, N. o& A8 v/ T1 n( B        e=0;
}
; G* Z8 a4 w  H% Svoid lcdwrd(uint8 dat)
{
: X% P3 K9 T' d2 a5 N2 G        delay(1000);
        rs=1;
& s% P4 v/ Z, L& U  [5 J        rw=0;
        e=0;
        P0=dat;
+ H" n. {  @! d/ D        e=1;
        delay(1000);
        e=0;
3 V0 \4 X3 @8 X( X( z. r        rs=0;
}
: d; s4 i/ p  R" b1 Y
/ B; g& d& b; J( [6 @  T8 m5 I( {
6 |, d, N4 g- U3 K# Vvoid lcdinit()
{
4 h; c) r$ N9 x) U6 G        delay(1500);
: S" ]9 u: r5 Y5 C        lcdwrc(0x38);
- B( ^3 h+ J6 x        delay(500);
        lcdwrc(0x38);
        delay(500);
4 ~1 c/ S, ~- U        lcdwrc(0x38);
1 M5 A$ X7 n+ e; j; ]2 E3 R        delay(500);
        lcdwrc(0x38);
, P4 d0 T* s6 W3 x# ~! w        lcdwrc(0x08);
. T. @" q1 U5 c1 ]# F1 J        lcdwrc(0x01);
  ]" T/ r" u0 g! ]' M5 U# f        lcdwrc(0x06);
        lcdwrc(0x0c);
        key=0;
. M3 x8 @. @2 G0 Y1 s        num=0;
        flag=0;
        fuhao=0;
+ x  {! u* D3 V% w) ]& D        a=0;
        b=0;
        c=0;
        d=0;
9 I+ M+ P  d' f2 E' `2 p" I        biao=0;
/ S" V2 J' z4 Q3 ]        led=0;


}


void keyscan()
{
        P1=0xfe;   //令第一行为0，然后判断是哪一列按下
        if(P1!=0xfe)
        {
                delay(1000);
9 O' p& v, Z! ]# e/ T                if(P1!=0xfe)
                {
. M2 f8 S6 l- k                        key=P1&0xf0;
: C+ l: W! c9 O0 ^+ U$ z5 c/ H" B$ _2 o                        switch(key)
                        {
                                case 0xe0: num=0;break;          //1
: R: B/ ~  ]6 g1 z, C' H                                case 0xd0: num=1;break;          //2
                                case 0xb0: num=2;break;          //3
' a' p, I  x/ _6 ~                                case 0x70: num=3;break;          //加
0 P7 k* j% o1 T) [9 ~! ^' T) J3 x                        }
5 b1 ~" V* ^6 a% q3 ?% `  Z                }
, C: G& T4 s3 x6 s, ?0 [7 {/ E                while(P1!=0xfe);
                if(num==0||num==1||num==2)         //确认第一行的数1,2,3
7 W, U- G) n# A& C3 b                {
                        if(flag==0)         //没有按下符号键
                        {
                                //led=1;
                                a=a*10+dat1[num];        
                        }
                        else
1 c3 U7 U4 |1 u6 Z/ G                        {
                                //led=1;
, A' D: a$ H- W; L5 ]" |1 E                                b=b*10+dat1[num];
                        }
               
                }
8 Q' S. q( C/ n7 G& G, O+ L* E- }                if(num==3)
                {
                        //led=0;
' {- B7 X( Y% U9 u0 }                        flag=1;
! Y& E4 K- d& ~& T/ q0 f0 B& }                        fuhao=1;//加号+        
                }
                lcdwrd(0x30+dat1[num]);
3 Z0 X# m- U3 |# _/ b' g        }
' @! M5 Y4 f" ^8 {' d
: b- Y2 p) y& N2 a4 F

2 j% |5 l7 H# k: G5 Z
        P1=0xfd;                                //令第二行为0，判断是哪一列按下
        if(P1!=0xfd)
        {
                delay(1000);
6 h1 J+ X$ m) `                if(P1!=0xfd)
                {
3 h0 h2 C8 A2 C; a                        key=P1&0xf0;
                        switch(key)
6 z( \& {; v: h- n- t. T5 m' [                        {
$ Z& ?" J. f7 z0 I0 n2 m$ G! n                                case 0xe0: num=4;break;          //4
# }6 {% L3 d) P) Q0 q4 N+ F6 h$ Q                                case 0xd0: num=5;break;          //5
8 z) w, o( v+ Z6 @0 F$ Q                                case 0xb0: num=6;break;          //6
                                case 0x70: num=7;break;          //减—
# u: U4 Z1 ?: J; @. K& }                        }        
/ i# B& ~8 g, y                }
                while(P1!=0xfd);
, D+ P6 v/ k/ d- s7 d7 E                if(num==4||num==5||num==6)
/ I$ r; S, z" A; A                {
                        if(flag==0)         //没有按下符号键
& d: `# c8 S# d. m                        {
" I/ Z! i4 z3 x9 j/ S, v2 ?" P  v                                //led=1;
7 W" F) O6 A1 {  p0 d                                a=a*10+dat1[num];        
& k7 Z4 H/ d) E: O) f! L                        }
                        else
0 F$ R8 S; A( _                        {
" o; l9 S0 ?# i; x) y5 m( i                                //led=1;
+ o7 Y6 g8 r5 U2 F                                b=b*10+dat1[num];
                        }                        
                }
* Z8 t4 |( t4 v4 B- u3 W, L. F                else
                {
( \) j7 D, b3 {" w9 T$ @                        flag=1;
) k2 p; O, Q/ b% `& w' D9 }                        fuhao=2;//带表减号
                }
  I( d8 m- x8 v& j5 I                lcdwrd(0x30+dat1[num]);
        }

" h: a2 F! K' N, j1 g
" _9 T1 S. L9 K% t
3 V4 g4 b9 f  M+ P; [* O# d+ r
        P1=0xfb;                 //令第三行为0，判断哪一列按下
        if(P1!=0xfb)
        {
) t- \7 W, L- u9 w: d                delay(1000);
                if(P1!=0xfb)
9 @) U5 N3 H) i                {
( |- \+ p- D) K, s2 H* E0 j# ~                        key=P1&0xf0;
                        switch(key)
7 N8 Y8 Y- `5 v                        {
                                case 0xe0: num=8;break;          //7
) F% k9 k. b+ A& {                                case 0xd0: num=9;break;          //8
                                case 0xb0: num=10;break;  //9
. h% P7 Q, O. _. h; g7 c                                case 0x70: num=11;break;  //乘*
                        }        
8 l/ \# u' r* ]                }
8 N% i6 J0 }4 \5 y                while(P1!=0xfb);
2 W2 H6 _3 T8 P) E2 u0 W                if(num==8||num==9||num==10)
                {
7 l# t0 z# |( f. L6 R                        if(flag==0)         //没有按下符号键
- _# e; G/ D0 v2 b0 }# [                        {
% m  L! U( t1 |% z) u) z                                //led=1;
8 W# f# W& p4 M$ r9 \( G                                a=a*10+dat1[num];        
/ o6 c1 H; y4 I, d1 k- G9 g+ F6 Z                        }
: {1 H6 O8 |/ m- K& ?1 _                        else
" k5 V8 g" g& t3 X) d7 d; Y                        {
1 t; ^7 Z+ B6 T  Q/ l' N  H/ w4 ?                                //led=1;
                                b=b*10+dat1[num];
                        }                        
                }
                else
                {
0 F: I$ Z) {( R" L- K& y& j                        flag=1;
9 F6 ]" _; S7 K" Z5 A0 ^# B% M                        fuhao=3;//带表乘号*
                }
                lcdwrd(0x30+dat1[num]);
        }
( F  m; t6 v/ r& e4 d# L



7 {% S& b) B8 c1 p* c        P1=0xf7;                 //令第四行为0，判断哪一列按下
; d5 I* f, T) b: w8 B) G        if(P1!=0xf7)
        {
                delay(1000);
8 [, U- w/ U+ @) c& L: E                if(P1!=0xf7)
6 c2 M3 r  O- F8 D. U/ X. J, @  R                {
                        key=P1&0xf0;
                        switch(key)
                        {
$ O! @  d, ?' ?                                case 0xe0: num=12;break;  //0
9 T: h4 s5 r% [1 ?                                case 0xd0: num=13;break;  //清除rst
                                case 0xb0: num=14;break;  //等号=
6 T! Y! k$ h% |' ~; D& `2 n                                case 0x70: num=15;break;  //除/
                        }        
                }
& d: \" I1 k% J& s# b7 h1 G' i                while(P1!=0xf7);
                switch(num)
                {
' {2 [! ?: Y! ]5 j7 W  r                        case 12:
5 i' i' _' V5 J4 b) C" g* a. _                                        if(flag==0)         //没有按下符号键
0 y  R4 _( E0 v6 ]6 H6 n% y                                        {
9 l4 m, m6 u/ N( l" B  p/ @                                                //led=1;
& Z( B/ L$ z5 o" O4 X4 r" W                                                a=a*10+dat1[num];
                                                lcdwrd(0x30);        
4 t4 ]( c. }6 N                                        }
                                        else
% |% r1 V! Q2 k( q; |& r                                        {
                                                //led=1;
# R- c% a' @1 G" l/ ~3 {                                                b=b*10+dat1[num];
, ~/ ^5 x" Y6 H* ?4 p/ \                                                lcdwrd(0x30);
                                        }
% {6 S" F+ ]5 q  \( I* a                                        break;
                        
/ G: t1 u7 G5 R0 H  }  f$ s" m8 d                        case 13:
                                        lcdwrc(0x01);        //清屏指令                        
                                        a=0;
  b7 ?1 _4 J' r' t# U: l                                        b=0;
6 m. M4 A% f$ w3 Q& i                                        flag=0;
. {* h5 D! n% M                                        fuhao=0;
                                        break;


                        case 15:
1 T0 @8 t* h# |+ i7 \; {                        
                                        flag=1;
/ s0 _' h/ `) u+ {# U% b% _                                        fuhao=4;
                                        lcdwrd(0x2f);//除号/
0 H- P" _2 U4 U5 C# a9 D! `" f                                        break;
                                       
                        case 14:
. I( x' R$ R! A# f% b: F* [6 w, v" i                                        if(fuhao==1)//加
4 Q! h0 @2 r& D3 @0 {, Z2 v1 ~$ S                                        {
                                                lcdwrc(0x4f+0x80);
                                                lcdwrc(0x04);//设置光标左移，屏幕不移动
* b5 U! ]: `3 V+ }1 I4 B                                                c=a+b;
+ p) j' l, x% m$ j                                                while(c!=0)         //一位一位显示
                                                {
                                                        lcdwrd(0x30+c%10);//显示结果的最后一位在0x4f的位置
                                                        c=c/10;//取前面的结果数据        
                                                }
                                                lcdwrd(0x3d); //显示等于号=
                                                a=0;
; T5 h/ ^& z! u) t" F                                                b=0;
8 z! G7 u4 b. V' x! \3 X' e% z7 C                                                flag=0;
                                                fuhao=0;//全部清除为0
                                        }
                                        if(fuhao==2)   //减
                                        {
                                                lcdwrc(0x4f+0x80);
# v( R* a$ {. n- w  e                                                lcdwrc(0x04);//设置光标左移，屏幕不移动
' M+ B' h- e* O' [# ?8 o7 K* t                                                if(a>b)
' K) w/ ~" ]* B6 R% w9 ]8 W4 c% \                                                        c=a-b;
                                                else
) ^$ q% N/ f! ?% x                                                        c=b-a;
* s% i7 S  k4 S. P& n1 X1 M8 ^# I                                                
7 ?0 F9 m, n& v                                                while(c!=0)         //一位一位显示
% r9 N4 L: G- U4 J& F0 S                                                {
                                                        lcdwrd(0x30+c%10);//显示结果的最后一位在0x4f的位置
: B( S, A8 z( u) K; _: ?# q  U                                                        c=c/10;//取前面的结果数据        
                                                }
                                                if(a<b)        lcdwrd(0x2d); //显示-号
; @" _$ j: |$ g9 L, h" v, D                                                lcdwrd(0x3d); //显示等于号=
2 b6 S- o1 _8 l  |                                                a=0;
                                                b=0;
$ ^* J: y9 I+ X1 Y( b1 q                                                flag=0;
                                                fuhao=0;//全部清除为0
0 \6 V- R2 a7 |& j8 S                                        }
                                        if(fuhao==3)//乘法               
                                        {
                                                lcdwrc(0x4f+0x80);
; P& j; K4 i1 i* y9 ?                                                lcdwrc(0x04);//设置光标左移，屏幕不移动
                                                c=a*b;
; O* _9 s4 B+ k" V( [                                                while(c!=0)         //一位一位显示
                                                {
( d5 @6 B7 _  N% u8 n9 _" J                                                        lcdwrd(0x30+c%10);//显示结果的最后一位在0x4f的位置
                                                        c=c/10;//取前面的结果数据        
                                                }
# i9 }- y4 g) E9 a1 \5 j                                                lcdwrd(0x3d); //显示等于号=
* g$ g2 K- u" `; Y5 M3 E" a                                                a=0;
3 W; ]3 S/ U1 G- V9 [- s7 ~& [" k                                                b=0;
1 {+ j; q1 k5 I: `                                                flag=0;
                                                fuhao=0;//全部清除为0        
" I4 ]  E- H# n9 y& f( v5 V                                        }
, g+ j& G3 ^! i. X8 `+ B0 a! e                                        if(fuhao==3)//乘法               
                                        {
                                                lcdwrc(0x4f+0x80);
# Z9 W1 J: z: I                                                lcdwrc(0x04);//设置光标左移，屏幕不移动
                                                c=a*b;
+ L4 J1 ^0 m7 {# |' P4 q                                                while(c!=0)         //一位一位显示
                                                {
                                                        lcdwrd(0x30+c%10);//显示结果的最后一位在0x4f的位置
3 m2 [' z9 L# _6 F% S6 k9 T                                                        c=c/10;//取前面的结果数据        
                                                }
  @0 c7 a' l6 G: K1 F: o, }                                                lcdwrd(0x3d); //显示等于号=
                                                a=0;
                                                b=0;
                                                flag=0;
                                                fuhao=0;//全部清除为0        
                                        }
                                        if(fuhao==4)
2 [. u6 x0 t. m% S3 ~1 p                                        {
                                                k=0;
% T* i1 x( c6 T: f                                                lcdwrc(0x4f+0x80);
. k2 u$ K% p8 P$ a" s# @                                                lcdwrc(0x04);//设置光标左移，屏幕不移动
                                                c=(long)(((float)a/b)*1000);//强制转换为long。
                                                while(c!=0)         //一位一位显示
                                                {
                                                        k++;
0 o1 Y% \3 x( H5 ~8 D" u                                                        lcdwrd(0x30+c%10);//显示结果的最后一位在0x4f的位置
. O% P; }7 Q) n& H                                                        c=c/10;//取前面的结果数据
                                                        if(k==3)
                                                        {
                                                                lcdwrd(0x2e);
                                                                k=0;
6 B, b) H) P2 y0 U: L  V7 [                                                        }               
                                                }
) @: n4 i3 b* j! _; @3 P( c                                                if(a/b<0)          //如果a比b小的话那么除的结果最高位是0
                                                {
                                                        
…………限于本文篇幅 余下代码请下载附件…………

! |- a) k; f6 O0 o) M
下载：
3 e6 Y9 @- M5 E8 H) W: H  v

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

) q6 o+ d5 P7 `
! q. S- N. L( S$ @2 o5 C
8 B1 _) n5 A4 a

sunygd

学习一下