资源描述:
《基于51单片机的简易计算器》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、基于51单片机的简易计算器简介用51做的一个建议计算器,能计算7位数*7位数,小数点保留三位,其他不多说,上图和程序,由于时间关系,程序没完全优化,解决了按一次计算符号后再按符号键无效的问题。1.硬件电路单片机部分+矩阵键盘+1602显示 图3-1所示为简易计算器的电路原理图。P3口用于键盘输入,接4*4矩阵键盘,键值与键盘的对应表如表----所示,p0口和p2口用于显示,p2口用于显示数值的高位,po口用于显示数值的低位。图3-1简易计算器电路原理图PCB键值与功能对应表键值0123456789+-×/=ON/C功能0123456789+-×÷=清
2、零说明矩阵键盘有16个按键,满足对简易计算器的计算实现,显示部分采用LCD1602,第一行显示计算的数值符号,第二行显示计算结果。最大能计算7位数*7位数的值,可以计算负数,小数点结果保留有三位,在每次按下计算符号后,接着只能按下数字,再按下符号键无效,也就是每次计算只能按一个计算符号,如输入错误需按N清零键,或者复位单片机。2.计算器的软件设计#include#include#defineucharunsignedcharsbitlcden=P2^2;sbitlcdrs=P2^0;sbitlcdrw=P2^1;
3、sbitlcdbf=P0^7;uchartemp,key,i,j,flag,fh,k;longa,b,c;ucharcodetable[]={1,2,3,0,4,5,6,0,7,8,9,0,0,0,0,0};ucharcodetable2[]="123+456-789*000/";voiddelay(ucharms){ucharx,y;for(x=ms;x>0;x--)for(y=110;y>0;y--);}/*-------------对LCD1602的操作-----------*/bitbusy(void)//判断忙碌{bitres;lcdrs=0
4、;lcdrw=1;lcden=1;_nop_();_nop_();res=lcdbf;lcden=0;returnres;}voidwrite_inst(ucharcmd)//写命令{while(busy()==1);//忙碌就等待lcdrs=0;lcdrw=0;lcden=0;_nop_();_nop_();P0=cmd;_nop_();_nop_();lcden=1;_nop_();_nop_();lcden=0;}voidwrite_com(ucharcom)//写地址{write_inst(com
5、0x80);}voidwrite_date(u
6、chardat)//写数据{while(busy()==1);lcdrs=1;lcdrw=0;lcden=0;P0=dat;_nop_();_nop_();lcden=1;_nop_();_nop_();lcden=0;}voidinit()//初始化{lcden=1;write_inst(0x38);//显示8位2行delay(5);write_inst(0x0c);//显示开,光标关,不闪烁delay(5);write_inst(0x06);//增量方式不位移delay(5);write_inst(0x80);//检测忙碌信号delay(5);wr
7、ite_inst(0x01);//delay(5);}/*------------键盘扫描-----------*/voidkeyscan()//键盘扫描{P3=0xfe;if(P3!=0xfe){delay(20);if(P3!=0xfe){temp=P3&0xf0;switch(temp){case0xe0:key=0;break;case0xd0:key=1;break;case0xb0:key=2;break;case0x70:key=3;break;}}while(P3!=0xfe);if(key==0
8、
9、key==1
10、
11、key==2){if
12、(j!=0){write_inst(0x01);j=0;}if(flag==0){a=a*10+table[key];}if(flag==1){b=b*10+table[key];}write_date(table2[key]);}else{if(k==0){flag=1;k=1;fh=1;write_date(table2[key]);}}}P3=0xfd;if(P3!=0xfd){delay(20);if(P3!=0xfd){temp=P3&0xf0;switch(temp){case0xe0:key=4;break;case0xd0:key=5;
13、break;case0xb0:key=6;break;case0x70:key=7;break