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

kinidrily

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


; T7 r2 _7 N( H" |7 A8 U8 s3 n5 v. y
4 B  \3 ]+ e9 l, \# X单片机源程序：
/*  S16 S12 S8 S4分别是123+
        S15 S11 S7 S3分别是456-
# X" r) `0 c( @; t+ a, K* C1 `        S14 S10 S6 S2分别是789*
        S13 S9 S5 S1分别是0 CLR = /
: @0 |, p$ V+ T0 h+ R) J*/
0 H: \! ]( G8 [/* 实现两个数的运算，每个数的位数至少可以八位  */
" M% {9 }  L. v#include<reg52.h>                        
typedef unsigned char uint8;
typedef unsigned int uint16;
sbit rw=P2^5;
- I8 Y) C( B6 d5 Ksbit rs=P2^6;
sbit en=P2^7;
8 m% t6 R4 l. w" Ysbit led=P3^7;
sbit psb=P3^2;
sbit beep=P2^0;
: ^1 F+ [5 g% \: b* j1 Muint8 key,num;
; f5 w% ?, T4 O# P  kuint8 fuhao;//定义具体的那个符号，是加减还是乘除。
uint8 flag;        //定义有没有按下符号键，这个是统称
long a,b,c,d;        //定义运算数据的第一个和第二个及等于的数变量
0 E. z; S" N) e; u5 cuint8 k; //定义小数点后面显示的位数
uint8 biao,keyflag;
uint8 dat1[]={1,2,3,0x2b-0x30,4,5,6,0x2d-0x30,7,8,9,0x2a-0x30,0,0x01-0x30,0x3d-0x30,0x2b-0x30 };//保存显示的数据
' M7 T- y3 L* l% M7 K! O' Gvoid delay(uint16 i)
{
        while(i--);
! k. R9 I2 q7 l}
% x3 V4 B, F* x# m* c# ]# u- s' q. k; fvoid write_com(uint16 com)
{
  F. u. S4 V. }% I3 m  V: [ rs=0;
/ l* u* S, j) @% L, H P0=com;
delay(500);
en=1;
delay(500);
en=0;
; E2 c$ M5 O; `; M. \ }
void write_data(uint16 date)
{
rs=1;
. U) l2 n( X% O& ^  w: v% r* ? P0=date;
delay(500);
en=1;
delay(500);
en=0;
8 C3 W* D( L6 \/ A# p% g1 s6 u) ^1 ]8 ]. x }
6 M) R9 r- Q1 ^' l: _9 L8 Nvoid lcdinit()
' {, A$ b. j) T& P; ^# ~2 U{
. I* F3 U# W6 `- s  Q9 p        psb=1;
  W* u. p$ P- n9 s rw=0;
en=0;
  write_com(0x30);
/ o3 i9 ]) V6 C# n! s# `% \9 i3 z delay(500);
9 V. T$ [/ @$ c1 ]" j. O/ k  write_com(0x0c);
6 h& i# k& ]+ W) }( V) A4 v/ y delay(500);
write_com(0x01);
delay(500);
; J! U! Z0 e1 N  {( ]: j# Z0 S        key=0;
' X. {/ R4 T! H- ^: J, D6 }6 f) _        num=0;
        flag=0;
        fuhao=0;
        a=0;
        b=0;
" r5 p3 ]  m  G6 P) r/ V9 V* G* O        c=0;
        d=0;
        biao=0;
        led=0;
}
void keyscan()
" g: M) U9 D' G& O' ^{
        P1=0xfe;   //令第一行为0，然后判断是哪一列按下
/ B2 _4 R# ^  v        if(P1!=0xfe)
        {
+ G0 H, h) J9 [% ?                delay(1000);
                if(P1!=0xfe)
% }# n7 z+ x. h. q+ O# h7 J                {
' ]7 Z+ D3 F$ D0 `) v) S7 a! f                        key=P1&0xf0;
  D4 |  a! `, K" ^' S, `                        switch(key)
9 v: h" X# F/ r( w5 D                        {
' Q* H. t: k# k/ G* J% _; _                                case 0xe0: num=0;if(keyflag==1){keyflag=0;write_com(0x01);};break;          //1
                                case 0xd0: num=1;if(keyflag==1){keyflag=0;write_com(0x01);};break;          //2
                                case 0xb0: num=2;if(keyflag==1){keyflag=0;write_com(0x01);};break;          //3
                                case 0x70: num=3;break;          //加
                        }
! \1 a# f5 T! S/ H7 J  }. B9 M                }
* |. j2 J! _; m; h% X- A                while(P1!=0xfe);
                if(num==0||num==1||num==2)         //确认第一行的数1,2,3
                {
                        if(flag==0)         //没有按下符号键
9 J2 r$ y& ]" N. `                        {
7 P* E. R: }. j* i; y) y                                //led=1;
                                a=a*10+dat1[num];        
                        }
' D9 A. a. h+ d+ }7 `; w9 Z! d                        else
0 B7 h* I3 W" S+ |& Q2 ^% M                        {
- o! L! z& H& \" i1 v/ t8 O                                //led=1;
                                b=b*10+dat1[num];
9 p; G: ?4 V" ~" I9 O% n1 `9 Y                        }
& F0 F# Y' X! r" A               
! d% Z5 F0 d+ I7 r' I                }
$ i; Y6 V0 M: v. }1 L# G                if(num==3)
                {
                        //led=0;
2 u3 N/ B! S% D                        flag=1;
+ j) Q5 J3 R7 `- G                        fuhao=1;//加号+        
                }
                write_data(0x30+dat1[num]);
        }
6 t# \6 x# [" S6 [& ^  C1 n0 I. |
        P1=0xfd;                                //令第二行为0，判断是哪一列按下
' X, u  X' t/ \$ i' ]- _6 n( S        if(P1!=0xfd)
* P7 j- m& E( z        {
# R7 c! t* A) d& x) ]9 t- D6 {* s( X                delay(1000);
. l0 Y6 j' S( D. q2 R; e2 {                if(P1!=0xfd)
                {
/ ?$ F, F  V- ~" K. c6 n! ?8 I                        key=P1&0xf0;
                        switch(key)
                        {
                                case 0xe0: num=4;if(keyflag==1){keyflag=0;write_com(0x01);};break;          //4                                 
; c9 u) w$ u/ G( }0 L                                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
" c1 J) e; M3 J5 e: Y; i& Y( E                                case 0x70: num=7;break;          //减—
; ?: d% |4 o2 b  [, l% b2 C                        }        
                }
                while(P1!=0xfd);
                if(num==4||num==5||num==6)
% m, Q4 k0 \  P$ A( r                {
/ K+ K7 n9 R- i: y, ^: u+ Q5 ?                        if(flag==0)         //没有按下符号键
                        {
                                //led=1;
& R6 b* D2 [3 q: g0 R* I7 h3 f# a                                a=a*10+dat1[num];        
                        }
+ a! R* Q( f# j) t6 N* A                        else
                        {
                                //led=1;
                                b=b*10+dat1[num];
                        }                        
) J- O4 i7 c- O0 F                }
. ?6 A8 q9 R' H8 o3 e% `  Y                else
                {
/ ~% |5 C8 d% i  `6 V0 _                        flag=1;
                        fuhao=2;//带表减号
1 b# K, t% X* {8 b                }
- _& I: n8 h% c6 D                write_data(0x30+dat1[num]);
        }
% H0 y+ ?5 w) D, O1 q
        P1=0xfb;                 //令第三行为0，判断哪一列按下
        if(P1!=0xfb)
6 N6 m% _1 Z+ b3 Y$ S; l! m        {
                delay(1000);
                if(P1!=0xfb)
                {
                        key=P1&0xf0;
                        switch(key)
; \/ y2 k' h' S4 r4 ]6 @                        {
( ?: p7 x6 G4 C1 `8 J' s                                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
                                case 0x70: num=11;break;  //乘*
: [" ?  \/ k* s( O! m( s# r+ A  F                        }        
                }
                while(P1!=0xfb);
                if(num==8||num==9||num==10)
  Q  D! g3 h" h6 j( \                {
                        if(flag==0)         //没有按下符号键
                        {
                                //led=1;
                                a=a*10+dat1[num];        
                        }
8 A* S8 i* M% P                        else
                        {
                                //led=1;
, M$ n7 s7 {. Q, O' C9 A                                b=b*10+dat1[num];
/ ~) C& {0 C5 s6 v  B- p                        }                        
* c5 o: w8 s7 [$ K+ O' n5 l, \8 s                }
6 K! z# y: z) O0 D; E                else
: K: U8 a) e3 z# b3 v, |* A$ v( T7 _                {
) X+ w* a2 a) n% r                        flag=1;
7 p1 U' U  H, u                        fuhao=3;//带表乘号*
* C5 k+ W% k( N/ t  V8 E/ [                }
/ s$ n2 L2 i) C                write_data(0x30+dat1[num]);
        }
+ y. R! L, p+ k4 J) S! W; p
* @6 A/ P, w3 j2 v& T. O        P1=0xf7;                 //令第四行为0，判断哪一列按下
9 b6 A9 T0 O( q7 `+ r        if(P1!=0xf7)
        {
. J0 b: f# g+ P0 E1 W* R                delay(1000);
3 H5 g' z; b; ~6 A                if(P1!=0xf7)
) V( Y, e0 @. W1 j6 e- `, o                {
: m1 i. b6 t+ I, L# S                        key=P1&0xf0;
                        switch(key)
' V8 Z! Y7 [& Z8 x/ M                        {
) e' S' @9 B- G5 r) F. e" t                                case 0xe0: num=12;if(keyflag==1){keyflag=0;write_data(0x01);};break;  //0
                                case 0xd0: num=13;break;  //清除rst
6 \, p* w2 K5 a' q                                case 0xb0: num=14;break;  //等号=
                                case 0x70: num=15;break;  //除/
                        }        
                }
. `" g# p7 e+ j5 b. b                while(P1!=0xf7);
% h) ^/ ]+ I0 |3 B+ g* Q                switch(num)
                {
, P0 n. @8 L% c1 S' U, m                        case 12:
2 A' e* ]$ n! g: j& B2 M4 H) Z                                        if(flag==0)         //没有按下符号键
                                        {
                                                //led=1;
                                                a=a*10+dat1[num];
                                                write_data(0x30);        
                                        }
                                        else
                                        {
; a" n0 w* V  C) N                                                //led=1;
4 ]0 `$ a3 h+ q! z2 V                                                b=b*10+dat1[num];
, i8 ?5 |$ n" X2 Y                                                write_data(0x30);
                                        }
/ N6 Z0 S0 y- ]                                        break;
& w1 [3 P: i% F( W7 H3 V4 }, p                        
! A$ k. Y, p% |$ A; v$ A                        case 13:
4 u" v8 `1 U0 W% R                                        write_com(0x01);        //清屏指令                        
3 j' W8 L6 s% b' e# [                                        a=0;
                                        b=0;
                                        flag=0;
6 L+ ]1 d) ]6 B                                        fuhao=0;
6 ]& [4 C  i1 Y                                        break;
                        case 15:
; T! c, j1 G/ x! h; [& f# T                        
                                        flag=1;
                                        fuhao=4;
                                        write_data(0x2f);//除号/
$ B: I. D* a. K                                        break;
) r0 M( B# y) {3 y( ]# i2 \                                       
7 l1 |% U3 O3 V6 |8 D2 L: j) ^7 R8 c' L' K                        case 14:                                 
% X6 h' }! b3 h0 R! J2 c4 T7 T                                        if(fuhao==1)//加
9 g1 b+ ?9 K; L  U9 k& v2 A' m9 h                                        {
                                            write_com(0x4f+0x80);
2 G9 Y6 l& L' K- j1 t- q0 ~+ ?* F: U                                                write_com(0x04);//设置光标左移，屏幕不移动
& R$ d1 t% m, W4 d' C                                                c=a+b;
( l" Z* X* l1 ?( X                                                while(c!=0)         //一位一位显示
                                                {
8 p1 D% v' n4 z: J2 I- D8 J                                                        write_data(0x30+c%10);//显示结果的最后一位在0x4f的位置
                                                        c=c/10;//取前面的结果数据        
% d% R3 A% E, E# S+ _& m( l                                                        keyflag=1;
                                                }
" n. j  N/ Z! _/ W                                                write_data(0x3d); //显示等于号=
! V. }  r7 R$ I' F1 O1 a                                                a=0;
- k# i! c. k8 Y7 r& }                                                b=0;
                                                flag=0;
( F0 @/ Y3 j  U                                                fuhao=0;//全部清除为0
                                        }
4 A8 c( W6 r! h( @: n                                        if(fuhao==2)   //减
* }0 D, A7 r$ C( x% v                                        {
                                                write_com(0x4f+0x80);
                                            write_com(0x04);//设置光标左移，屏幕不移动
! y9 S5 B; e" J, [                                                if(a>b)
2 d% l: g  `6 ^3 R+ P* b3 f& p                                                        c=a-b;
# S' o" ?  j' V( j                                                else
                                                        c=b-a;
3 O" @0 x! R" z                                                
" B" p4 n: z" g2 f6 P5 c                                                while(c!=0)         //一位一位显示
7 O+ l: p* e0 z! v7 X                                                {
; ]& d8 m& \  M7 q4 y3 d* W- x                                                        write_data(0x30+c%10);//显示结果的最后一位在0x4f的位置
: t% t* u! _4 T: e- s                                                        c=c/10;//取前面的结果数据        
                                                        keyflag=1;
! Y# i/ m8 Z5 v/ V6 T6 l                                                }
                                                if(a<b)        write_data(0x2d); //显示-号
3 c6 P/ d0 S6 o- D  D                                                write_data(0x3d); //显示等于号=
! e# B' l. g" L8 D0 m" x, p  f                                                a=0;
                                                b=0;
                                                flag=0;
                                                fuhao=0;//全部清除为0
0 i5 {# g( n7 }+ B- n) [( `                                        }
                                        if(fuhao==3)//乘法               
. z4 Z( U; \, k                                        {
% y7 j4 x. A# ?                                                write_com(0x4f+0x80);
                                                write_com(0x04);//设置光标左移，屏幕不移动
9 P& e' s, f3 n9 Y& ], O. |                                                c=a*b;
, W( n! M$ n4 J' G8 Q9 |                                                while(c!=0)         //一位一位显示
5 }; l) h1 X( w6 `2 @9 X0 }                                                {
( q! ]5 g4 o: B# R! F4 G- T, F                                                        write_data(0x30+c%10);//显示结果的最后一位在0x4f的位置
                                                        c=c/10;//取前面的结果数据        
3 X4 G3 K: W6 w2 W8 A                                                        keyflag=1;
! j8 z1 P1 y- X8 N8 K                                                }
9 V# m$ t8 V2 H3 `1 ^% Y                                                write_data(0x3d); //显示等于号=
3 y' L* Q- N7 c/ K* D                                                a=0;
+ w; |* F! c8 N! q+ W                                                b=0;
                                                flag=0;
* I$ A$ d/ O3 S8 ^                                                fuhao=0;//全部清除为0        
                                        }
4 q- e  W9 h1 t$ d                                        if(fuhao==3)//乘法               
& w( o' \+ p4 M                                        {
+ Y5 m6 Q* S6 I; f* I                                                write_com(0x4f+0x80);
                                                write_com(0x04);//设置光标左移，屏幕不移动
1 D9 H+ a# o+ P# T9 e                                                c=a*b;
                                                while(c!=0)         //一位一位显示
9 p- V8 \! a. B, ~+ r! D+ B                                                {
                                                        write_data(0x30+c%10);//显示结果的最后一位在0x4f的位置
* a5 i. f5 C: B; P5 v                                                        c=c/10;//取前面的结果数据        
3 @' X. }$ }4 u+ n- `$ o; y9 a                                                        keyflag=1;
& f( I6 c- }8 V& A5 u8 ~                                                }
7 ]5 z6 _% Y1 ~1 s! ~6 x" M                                                write_data(0x3d); //显示等于号=
$ R' C6 P  f, g- q; y1 b) H                                                a=0;
8 }2 ^& p4 E$ ?2 c3 o- i                                                b=0;
  B& t" e; f, ?- p7 }: g                                                flag=0;
                                                fuhao=0;//全部清除为0        
# ]6 ~* b6 ^0 w3 J0 H$ C) B( }1 Q1 i# ^                                        }
                                        if(fuhao==4)
                                        {
9 M4 U7 M; B7 k; B  b                                                k=0;
/ u' t( j/ }  U$ {& c  j                                                write_com(0x4f+0x80);
4 ~9 N6 L8 ?& B8 E                                                write_com(0x04);//设置光标左移，屏幕不移动
                                                c=(long)(((float)a/b)*1000);//强制转换为long。
4 k$ T% V8 y! ]                                                while(c!=0)         //一位一位显示
                                                {
: p6 i4 y+ K  B/ b, X                                                        k++;
                                                        write_data(0x30+c%10);//显示结果的最后一位在0x4f的位置
  Y2 ], C9 D5 d  Y! {, @                                                        c=c/10;//取前面的结果数据
                                                        if(k==3)
: `3 G3 Z& e7 c: x. d2 M' L, F! g! i) P+ ]                                                        {
7 m) w3 ~6 x& v2 \( \3 }1 }                                                                write_data(0x2e);
- o. D4 \9 ?1 E' M7 E                                                                k=0;
5 O6 t7 T/ _0 q0 _/ O                                                        }               
9 P0 e  g  X- e: ?9 w                                                        keyflag=1;
                                                }
                                                if(a/b<0)          //如果a比b小的话那么除的结果最高位是0
                                                {
% g5 Q1 l4 m8 W; \- d0 A                                                        write_data(0x30);        
" f* p7 H7 t, ]' ^" V) H7 t* \                                                }
                                                write_data(0x3d); //显示等号
: E8 W6 ^& n& @2 h
…………限于本文篇幅 余下代码请下载附件…………
( Z3 U5 D5 f2 @3 f

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

2 z; F. u& ~/ ^1 ]% N
7 ^/ J9 Q" t4 n1 j

sunygd

看看楼主的代码