基于单片机的智能计算机程序 可以实现加减乘除运算

kinidrily

基于单片机的智能计算机程序 可以实现加减乘除运算
1 ]# d1 r, s3 E9 B$ J  C


2 T( @* K* j* k- A3 I单片机源程序：
/*  S16 S12 S8 S4分别是123+
7 W. Z$ Z7 O7 n# ?$ I: G. v! Q/ c        S15 S11 S7 S3分别是456-
5 y$ @# V) Y8 D2 @4 i        S14 S10 S6 S2分别是789*
        S13 S9 S5 S1分别是0 CLR = /
7 B- j( X  J1 I: `- I/ k/ p*/
' @5 G7 |5 [, {$ _/ M/* 实现两个数的运算，每个数的位数至少可以八位  */
$ W" Z& l4 \6 B' m, I. s3 m#include<reg52.h>                        
typedef unsigned char uint8;
7 x# A8 X* a4 Q. n: E' otypedef unsigned int uint16;
! s1 [) |! `0 Q5 asbit rw=P2^5;
sbit rs=P2^6;
sbit en=P2^7;
" s- f% A/ h. ^$ Csbit led=P3^7;
1 P3 m. A' X+ Q; h* n5 @9 r! Isbit psb=P3^2;
/ ?/ S. X& z8 G# w$ b; O3 jsbit beep=P2^0;
uint8 key,num;
uint8 fuhao;//定义具体的那个符号，是加减还是乘除。
uint8 flag;        //定义有没有按下符号键，这个是统称
long a,b,c,d;        //定义运算数据的第一个和第二个及等于的数变量
uint8 k; //定义小数点后面显示的位数
9 u$ O+ r5 j+ t' c8 auint8 biao,keyflag;
; x- Y. T. f6 G4 I/ o9 Quint8 dat1[]={1,2,3,0x2b-0x30,4,5,6,0x2d-0x30,7,8,9,0x2a-0x30,0,0x01-0x30,0x3d-0x30,0x2b-0x30 };//保存显示的数据
void delay(uint16 i)
{
6 {! u3 s/ B" H3 A* m( N9 E/ B        while(i--);
}
. h( e. D4 C$ g% Q# Pvoid write_com(uint16 com)
{
rs=0;
/ X9 A/ o- G* ?% q) x P0=com;
delay(500);
& H1 o# \0 Y; j3 i# \: Y: V en=1;
. o. N, L% A( {' p2 J delay(500);
en=0;
9 w, E) b5 n) n% i }
3 K3 y  G+ Z5 t3 j: R5 i7 ?. R8 lvoid write_data(uint16 date)
4 U; C4 b. @9 q {
' ~7 y- v% N2 z rs=1;
5 b0 G6 c+ v/ M" @5 Y P0=date;
" B' ~* I- K5 \, q1 v2 h delay(500);
. ]+ ?  \0 i  N7 l6 T9 {, X* |7 _ en=1;
delay(500);
en=0;
}
( ^) I9 @+ U+ G: U# l/ _! V1 tvoid lcdinit()
{
5 P% q2 E; R7 e7 K& [+ ]& f! R        psb=1;
rw=0;
en=0;
  write_com(0x30);
delay(500);
, [" F8 U) i. _, O' ]3 }  write_com(0x0c);
delay(500);
write_com(0x01);
: W5 w7 h* E/ r4 B2 w4 H. X delay(500);
( i/ O+ y% Q  |. w2 h% ]        key=0;
3 A0 j$ S2 A% A        num=0;
        flag=0;
2 a3 f1 C, j7 w% z- Y        fuhao=0;
( [5 Y$ w: o2 `% J9 S: J        a=0;
+ g" l  t  S- z) v2 F        b=0;
        c=0;
. x8 @7 N, M/ z/ r" g        d=0;
        biao=0;
        led=0;
0 V3 M. }" T4 d; K  E}
4 w! o- ^$ ^5 t3 R* I7 F# L( zvoid keyscan()
6 B6 T) M; I. v0 L. J{
        P1=0xfe;   //令第一行为0，然后判断是哪一列按下
        if(P1!=0xfe)
        {
                delay(1000);
+ _( Y* f/ R: d& ^7 Y. {7 d                if(P1!=0xfe)
$ E! t( q6 P) a+ {% I/ c                {
( F$ P8 a" ]1 Q9 M% _3 U( X                        key=P1&0xf0;
                        switch(key)
7 g' I9 I: V% K# j; p                        {
                                case 0xe0: num=0;if(keyflag==1){keyflag=0;write_com(0x01);};break;          //1
# {9 c9 Q+ z# @                                case 0xd0: num=1;if(keyflag==1){keyflag=0;write_com(0x01);};break;          //2
8 O: L* h8 z4 v. J# V- i) `: h                                case 0xb0: num=2;if(keyflag==1){keyflag=0;write_com(0x01);};break;          //3
8 }- A+ o8 z% S4 B                                case 0x70: num=3;break;          //加
                        }
- I( }3 L( L5 z# U+ h6 p                }
                while(P1!=0xfe);
                if(num==0||num==1||num==2)         //确认第一行的数1,2,3
                {
* n+ |) t" g0 ?$ G9 H. M/ t. n                        if(flag==0)         //没有按下符号键
4 F/ T+ j+ {9 f/ b                        {
! f) {# X6 F8 Z7 F                                //led=1;
                                a=a*10+dat1[num];        
                        }
                        else
                        {
                                //led=1;
                                b=b*10+dat1[num];
                        }
1 [& \7 j0 V2 E+ d* ]0 O* T               
; \/ j9 x, [9 n6 e/ @. y# B9 Q                }
                if(num==3)
                {
                        //led=0;
                        flag=1;
* l4 T& a9 c( c0 }1 b                        fuhao=1;//加号+        
                }
- y/ H7 \2 t( v; t, D                write_data(0x30+dat1[num]);
8 I0 `8 ?5 i2 m" |& H, E        }

: d' s) K: q. K" P! L3 N        P1=0xfd;                                //令第二行为0，判断是哪一列按下
: ^; c% l' T: d( ?3 i2 C3 D( f        if(P1!=0xfd)
- V% K8 U1 k- T7 R9 D        {
                delay(1000);
                if(P1!=0xfd)
- g0 i, _+ B4 L, q* w$ p, c+ F                {
                        key=P1&0xf0;
                        switch(key)
                        {
                                case 0xe0: num=4;if(keyflag==1){keyflag=0;write_com(0x01);};break;          //4                                 
' ^/ v9 k7 F* u8 z& C& T                                case 0xd0: num=5;if(keyflag==1){keyflag=0;write_com(0x01);};break;          //5
                                case 0xb0: num=6;if(keyflag==1){keyflag=0;write_com(0x01);};break;          //6
                                case 0x70: num=7;break;          //减—
" u9 @/ S4 Q5 |                        }        
                }
- Z1 O( O  W1 r2 y4 V: l* f                while(P1!=0xfd);
  R& W* f* w- \; r                if(num==4||num==5||num==6)
                {
                        if(flag==0)         //没有按下符号键
/ b3 [9 E3 s! ^& A% P                        {
6 p" \2 w  n; T+ H                                //led=1;
                                a=a*10+dat1[num];        
                        }
                        else
                        {
, Q9 B) z% T5 q7 o) C) v! h                                //led=1;
2 n# u  A% l$ b4 o- H                                b=b*10+dat1[num];
                        }                        
/ V5 M( Q: b/ o7 h7 y                }
                else
7 f9 W; o& i0 G1 F8 `$ Q5 r: M                {
) l! v# T: d0 R, y                        flag=1;
                        fuhao=2;//带表减号
                }
                write_data(0x30+dat1[num]);
        }

- h# Z! r9 |& ]! J& S        P1=0xfb;                 //令第三行为0，判断哪一列按下
+ Y  V9 G' g+ Q6 P* o8 ^  @        if(P1!=0xfb)
+ Y% f3 a! m4 |( ]4 B        {
                delay(1000);
                if(P1!=0xfb)
' {( i8 ^) t& H$ e7 G) ^                {
                        key=P1&0xf0;
2 e9 I: O" v$ U                        switch(key)
                        {
3 k( c* t8 m: X" g! @. J                                case 0xe0: num=8;if(keyflag==1){keyflag=0;write_com(0x01);};break;          //7
                                case 0xd0: num=9;if(keyflag==1){keyflag=0;write_com(0x01);};break;          //8
                                case 0xb0: num=10;if(keyflag==1){keyflag=0;write_com(0x01);};break;  //9
$ n+ ]: E7 ^0 @4 {% }                                case 0x70: num=11;break;  //乘*
' o% x+ M4 ]+ J$ G( O* a, d                        }        
; w7 Y2 e2 ~1 F                }
0 B) b# E2 s! L8 Y                while(P1!=0xfb);
                if(num==8||num==9||num==10)
                {
                        if(flag==0)         //没有按下符号键
- W7 n3 |/ i( `+ ^$ e1 ~                        {
! @, h. r! G: {8 M5 D                                //led=1;
                                a=a*10+dat1[num];        
- o  R2 ]5 N2 z+ t                        }
                        else
/ b6 J" t. Q$ F& p2 Z                        {
- e/ L1 m2 J3 R, N; D. E( e/ Z2 Q                                //led=1;
0 l& u" g0 h; ^0 g; l/ ~9 R0 o3 a! `                                b=b*10+dat1[num];
                        }                        
% b$ L+ Z) z" J% ^/ ?2 {7 B8 }4 X                }
1 a( M! D; y4 w2 S( S                else
                {
                        flag=1;
0 h  Y$ J7 g. k5 I: `                        fuhao=3;//带表乘号*
( K5 _' Y. B, t                }
                write_data(0x30+dat1[num]);
1 H9 B7 _1 s- t" K9 a        }

        P1=0xf7;                 //令第四行为0，判断哪一列按下
        if(P1!=0xf7)
7 ^  F. l% ~  i9 j5 B        {
                delay(1000);
                if(P1!=0xf7)
                {
# i  g0 t( P) u1 _' E$ X2 P                        key=P1&0xf0;
4 k& v4 K9 u0 D6 L6 H. @3 E: N" {                        switch(key)
                        {
                                case 0xe0: num=12;if(keyflag==1){keyflag=0;write_data(0x01);};break;  //0
                                case 0xd0: num=13;break;  //清除rst
                                case 0xb0: num=14;break;  //等号=
$ i8 e& b, z- l) S9 o7 ~                                case 0x70: num=15;break;  //除/
                        }        
                }
                while(P1!=0xf7);
                switch(num)
                {
                        case 12:
3 w% O; K2 v8 ^: v* A                                        if(flag==0)         //没有按下符号键
                                        {
                                                //led=1;
9 j- q- C: J. ~/ Y5 h. j8 U                                                a=a*10+dat1[num];
                                                write_data(0x30);        
: E: \: f. L) u  x$ K& B                                        }
& Z& N3 J$ U+ R0 V                                        else
                                        {
8 Z& f; o( M7 Y" K' S; @                                                //led=1;
& P/ _& Q) A4 z1 P3 j7 Y9 s0 U                                                b=b*10+dat1[num];
                                                write_data(0x30);
* n6 b( |1 }, C7 w7 L' F. p% ?/ O                                        }
: ^( e  m4 @' [) ]                                        break;
                        
                        case 13:
                                        write_com(0x01);        //清屏指令                        
                                        a=0;
) |- Z6 [+ C( V0 d6 R                                        b=0;
                                        flag=0;
                                        fuhao=0;
: l0 R8 X5 O  M: E6 o1 z4 J                                        break;
* ^' A! L( I- Y% j' @! y: G( a                        case 15:
                        
) p- D+ v: p+ p' H; u: @                                        flag=1;
                                        fuhao=4;
                                        write_data(0x2f);//除号/
                                        break;
& E1 b5 J7 v2 C" d9 `9 [                                       
% x! l: s- v) H% P0 U- S                        case 14:                                 
                                        if(fuhao==1)//加
                                        {
, _! ~# h0 e4 \- H$ m8 I' x2 b                                            write_com(0x4f+0x80);
- H% P8 A) T5 [: W8 z                                                write_com(0x04);//设置光标左移，屏幕不移动
5 ?$ Y- \6 j  n' {* A                                                c=a+b;
                                                while(c!=0)         //一位一位显示
5 |1 }' R& \& E: Z* x                                                {
8 S; Q& ?: G0 V) ?                                                        write_data(0x30+c%10);//显示结果的最后一位在0x4f的位置
                                                        c=c/10;//取前面的结果数据        
                                                        keyflag=1;
                                                }
) F/ F) f2 ?5 a8 H. h1 h                                                write_data(0x3d); //显示等于号=
                                                a=0;
                                                b=0;
                                                flag=0;
                                                fuhao=0;//全部清除为0
                                        }
; e9 S& f; a( h5 w4 w                                        if(fuhao==2)   //减
- j' F  g5 |8 ~2 Y( @                                        {
                                                write_com(0x4f+0x80);
2 |3 j. l# \* y( b2 e! f' l! Y# k                                            write_com(0x04);//设置光标左移，屏幕不移动
8 Z; y+ u2 p3 I' V+ q                                                if(a>b)
6 S5 U! P7 u9 W" a" A0 Z- _                                                        c=a-b;
/ ?) N  {$ X$ n! {9 ~' R                                                else
                                                        c=b-a;
                                                
                                                while(c!=0)         //一位一位显示
                                                {
" _7 d  @7 r; ?# V7 g                                                        write_data(0x30+c%10);//显示结果的最后一位在0x4f的位置
                                                        c=c/10;//取前面的结果数据        
                                                        keyflag=1;
                                                }
) t5 o( j( _. u+ V  P6 l                                                if(a<b)        write_data(0x2d); //显示-号
                                                write_data(0x3d); //显示等于号=
                                                a=0;
) V* U! n. k3 L8 Y" g                                                b=0;
% K3 Q$ w4 M! _! p8 u) m5 ?2 D0 B                                                flag=0;
                                                fuhao=0;//全部清除为0
                                        }
                                        if(fuhao==3)//乘法               
                                        {
                                                write_com(0x4f+0x80);
                                                write_com(0x04);//设置光标左移，屏幕不移动
( O; d5 ~0 q9 J( S7 R                                                c=a*b;
                                                while(c!=0)         //一位一位显示
                                                {
                                                        write_data(0x30+c%10);//显示结果的最后一位在0x4f的位置
- L, ?5 U9 K, h& b                                                        c=c/10;//取前面的结果数据        
: g, c# F, }# n$ R' E' R                                                        keyflag=1;
                                                }
7 i* Q  ~7 e4 n1 P3 |5 z  O                                                write_data(0x3d); //显示等于号=
                                                a=0;
                                                b=0;
( F; U% r- f8 A: k- C1 f4 X5 @; V# m5 g                                                flag=0;
                                                fuhao=0;//全部清除为0        
                                        }
5 A  ~7 N: M5 o" T                                        if(fuhao==3)//乘法               
5 A8 a: @5 m0 o; I' F                                        {
                                                write_com(0x4f+0x80);
                                                write_com(0x04);//设置光标左移，屏幕不移动
& B  ]# N3 G9 L  a- b                                                c=a*b;
                                                while(c!=0)         //一位一位显示
0 e& [" z) `% e; T! {0 Z9 o  d                                                {
: g. u  y  |+ W4 u5 i( _; o                                                        write_data(0x30+c%10);//显示结果的最后一位在0x4f的位置
                                                        c=c/10;//取前面的结果数据        
2 s$ C; P: @/ ^2 O- M0 k3 W3 Z                                                        keyflag=1;
                                                }
                                                write_data(0x3d); //显示等于号=
) U5 M' M1 e+ o                                                a=0;
2 ?# a9 k# O2 c                                                b=0;
9 d- b! q: [8 a                                                flag=0;
+ c9 v# Z/ [  ^0 V. ~7 Y. F4 A3 j                                                fuhao=0;//全部清除为0        
; a4 E# o: [' f2 @1 V9 c( |                                        }
! r$ v# B" P" W, V, v                                        if(fuhao==4)
9 K# |+ N! L5 @$ T/ C* y( E                                        {
                                                k=0;
                                                write_com(0x4f+0x80);
2 A3 N6 K  @# g" ?) H6 l1 ~                                                write_com(0x04);//设置光标左移，屏幕不移动
                                                c=(long)(((float)a/b)*1000);//强制转换为long。
2 F$ f% U2 J/ K7 h  H/ ^                                                while(c!=0)         //一位一位显示
* h% |. y3 z- A3 `5 e                                                {
5 c9 V3 E9 {- @- }1 a                                                        k++;
3 V6 k9 q) s; d  X' T- _; ~                                                        write_data(0x30+c%10);//显示结果的最后一位在0x4f的位置
$ ]: R: V8 |* W2 l) n, ~& j7 `                                                        c=c/10;//取前面的结果数据
                                                        if(k==3)
                                                        {
) \2 d$ z# r& s- D, i- a                                                                write_data(0x2e);
                                                                k=0;
2 b, {3 B; c- p* ]7 C                                                        }               
% Z/ g6 f! h9 I: _+ C, m                                                        keyflag=1;
" d2 [% D: G5 x* e4 K3 ?                                                }
                                                if(a/b<0)          //如果a比b小的话那么除的结果最高位是0
8 t: F" [( }. y2 z                                                {
/ t& [0 y+ @" K1 _  v: u                                                        write_data(0x30);        
0 S. d% ^" g& R                                                }
4 W' p8 H; j$ H                                                write_data(0x3d); //显示等号
' m% I/ l, U9 O, E9 I2 I" c
…………限于本文篇幅 余下代码请下载附件…………

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

* ?5 ?7 G. h( C
5 v( _' c2 I5 h, l

sunygd

看看楼主的代码