51单片机简易计算器-可算小数

1、51单片机简易计算器使用时注意调节vi对比度。5TC AT39S5C 'f:沖亠"201915171615141312111098765斗321Pl 1 DB2Pl 2 DE3Pl J DB4Pl 4 DBSPl S DB6Pl 6 DB7Pl.7 DBSRSTP30P3 1mTHNTTP=4P35P3.6P37GNDX2g刚XIPl 0 DEI1234101314 1?1617181920TXDIFmr一RDxrSDVCC POO P0.1 P0.2 P0.3 P0.4 P0.5 PO.6 卩厂 rs ALEP2.7P2.6P2.5P2.4P2.3P2.2PHP2.0403

2、938373巧355433323130292827262524232221bo pooVCCDI P0 1VCC PlDIGNDSTCS9C52P曲牡如扁小玄结D2 PO；D3 P0 3D4P04D5P05D6 PPG D 了 PO? verALE10111213141>1<5171：81920D2 D3 m D? WD710K#include<reg51.h>#include<math.h> #define uchar unsigned char#define uint unsigned int sbit beep=P2A3;sbit dula=P2A6;

3、sbit wela=P2A7;sbit rw=P1Al；sbit rs=P1A0；sbit lcden=P2A5;void yunsuan();void keyinput(char s);void write_data(char ddata);void write_com(char command);void display(long a);void init();void dealerror();void dataoverflow();void welcome();char code table1=0xee,0xde,0xbe,0x7e,0xed,0xdd,0xbd,0x7d,0xeb,0x

4、db,0xbb,0x7b,0xe7,0xd7,0xb7,0x77;char code table2="789/456*123-.0=+"char j,k,temp,temp1,temp2,key,mchar,m,flag2=0,flag3=0; long x,y,num;int operators,input,iny;char error5="error"char overflow8="overflow"char welcome_16="welcome to use !"void delay(uint x)/ 延时

5、uint a,b;for(a=x;a>0;a-)for(b=10;b>0;b-);void delay_ms(uint x)/ 延时 uint a,b;for(a=x;a>0;a-) for(b=110;b>0;b-);void write_com(uchar com)/ 写命令 P0=com;rs=0;lcden=0;delay(10);lcden=1;delay(10);lcden=0;void write_data(uchar date)/ 写数据 P0=date;rs=1;lcden=0;delay(10);lcden=1;delay(10);lcden=0;l

6、ong ming(int x)long m;switch(x)case 9:m=1000000000;return m;break;case 8:m=100000000;return m;break;case 7:m=10000000;return m;break;case 6:m=1000000;return m;break;case 5:m=100000;return m;break;case 4:m=10000;return m;break;case 3:m=1000;return m;break;case 2:m=100;return m;break;case 1:m=10;retur

7、n m;break;case 0:m=1;return m;break;void display(long a)long d;int i,flag1=0,temp,c=-1;init();if(a<0)a=a*c;write_data('-');for(i=9;i>=0;i-)d=ming(i);temp=a/d;a=a%d;if(temp=0)&&(flag1=0)elsew riQd asr(0x30+CDm p)f-ag_kA八=h(ll'H2)宀wriQdasr<)八f-ag_kA八void inioLCD 裆空去宀rwHO 八

8、du-auo 八we-auo 八wriCDcom(0x38)八=和引» 16 >2 和引“ 5X7>>目選a®口de-ay(20)八wriCDlcom(oxoe)八-_TMWde-ay(20)八wriCDcom(0x06)二/TMwi 味<计< 也<00delay(20);write_com(0x01); / 清屏幕指令，将以前的显示内容清除delay(20);void yunsuan() / 运算if (iny)switch(operators)case 1:x=x+y;num=x;if(num<10000000000&&

9、amp;num>-10000000000)display(num);elsedataoverflow();break;case 2: x=x-y; num=x;if(num<10000000000&&num>-10000000000) display(num);elsedataoverflow();break;case 3:x=x*y;num=x/100;if(num<10000000000&&num>-10000000000) display(num);elsedataoverflow();break;case 4:if (y=0

10、)dealerror();elseif(y<100)x=x*100;y=y*100;y=y/100;x=x/y;num=x;if(num<10000000000&&num>-10000000000) display(num);elsedataoverflow();break;y=0;void dealerror()/ 除数为 0int i=0;write_com(0x01);for(i=0;i<5;i+)write_data(errori);void dataoverflow()/ 数值溢出int i=0;write_com(0x01);for(i=0;

11、i<8;i+)write_data(overflowi);void welcome()/ 欢迎界面int i=0;write_com(0x01);for(i=0;i<16;i+)write_data(welcome_i);void keyinput(char s) / 键盘输入if(s<='9'&&s>='0') / 判断按下的键是否为数值if(flag3=0) num=num*10+100*(s-'0');elsenum=num*10+10*(s-'0');if(flag2=1)num=n

12、um/10;flag3=1;if (operators>0)y=num;iny=1;elsex=num;if(num<10000000000&&num>-10000000000) / 当前数值是 否超出限定范围display(num);elsedataoverflow();elseswitch(s)case '.':/*iny=0; operators=0;*/ flag2=1;break;case '=':write_data(table214); delay(10);yunsuan(); iny=0;operators=0;

13、 num=0;flag2=0;flag3=0; break;case '+':if (operators) yunsuan();operators=1; write_data(table215); num=0;flag2=0;flag3=0;break;case '-':if (operators) yunsuan();operators=2; write_data(table211);num=0;flag2=0;flag3=0;break;case '*':if (operators) yunsuan();operators=3; write_data(table27); num=0;flag2=0;flag3=0;break;case '/':if (operators) yunsuan();operators=4; write_data(table23); num=0;flag2=0;flag3=0; break;void main() / 主函数char i;char flag0=1;init();welcome();fo