Lcd1602简易计算器

Lcd1602显示实现千位数加减乘除用4*4矩阵按键输入0~9 +，-，*，/，=，和清除建

#include

#define temp P3

sbit RS=P0^0;

sbit RW=P0^1;

sbit E =P0^2;

unsigned char key_num;

unsigned char lcd_tab3[16]=" ";

unsigned char code lcd_tab4[]="0123456789+-*/=";

unsigned char lcd_tab5[16]=" ";

unsigned char lcd_tab6[]=" ";

unsigned char lcd_tab7[]=".";

int a,b,c,d,m,i;

void decide();

long int key_cnt=0,key_number,key_number1;

unsigned char flag1=0,flag2=0,flag3=0,flag4=0,flag5=0;

long int result, result1, result2, result3, result4,result5, result6, result7, result8;

int decimal0,decimal1;

delay_nms(unsigned int i)

{

unsigned int j;

for(;i!=0;i--)

{

for(j=0;j<61;j++);

}

}

key_scan(void)

{

unsigned char a;

temp=0xf0;

if(temp!=0xf0)

{

delay_nms(10);

{

if(temp!=0xf0)

switch(temp)

{

case 0xe0 :key_num= 0; break;

case 0xd0 :key_num= 1; break;

case 0xb0 :key_num= 2; break;

case 0x70 :key_num= 3; break;

}

temp=0x0f;

switch(temp)

{

case 0x0e :key_num=key_num; break;

case 0x0d :key_num= key_num+4; break;

case 0x0b :key_num= key_num+8; break;

case 0x07 : key_num=key_num+12; break;

default :break;

}

while((a<50)&&( temp!=0x0f))

{

delay_nms(1);

a++;

}

temp=0xf0;

}

}

return (key_num);

}

void write_com(char cod)

{

E=0;

RS=0;

RW=0;

E=1;

delay_nms(1);

P2=cod;

E=0;

delay_nms(1);

}

void write_data(char pat)

{

E=0;

RS=1;

RW=0;

E=1;

delay_nms(1);

P2=pat;

E=0;

delay_nms(1);

}

void write_clean()

{

write_com(0x38);

write_com(0x01);

write_com(0x06);

write_com(0x0c);

}

void input()

{

unsigned char i,x;

write_com(0x80);

for(i=0;i<16;i++)

{

write_data(lcd_tab3[i]);

delay_nms(1);

}

write_com(0xc0);

{

for(x=0;x<16;x++)

{

write_data(lcd_tab5[x]) ;

delay_nms(1);

}

}

}

void display()

{

if(flag5==0)

{

lcd_tab5[0]=lcd_tab4[key_num];

lcd_tab5[2]=lcd_tab4[result7];

lcd_tab5[3]=lcd_tab4[result6];

lcd_tab5[4]=lcd_tab4[result5];

lcd_tab5[5]=lcd_tab4[result4];

lcd_tab5[6]=lcd_tab4[result3];

lcd_tab5[7]=lcd_tab4[result2];

lcd_tab5[8]=lcd_tab4[result1];

if((decimal0!=0)||(decimal1!=0))

{

lcd_tab5[9]=lcd_tab7[0];

lcd_tab5[10]=lcd_tab4[decimal1];

lcd_tab5[11]=lcd_tab4[decimal0];

}

i=0;

decide();

}

else

{

lcd_tab5[0]=lcd_tab4[key_num];

lcd_tab5[1]=lcd_tab4[11];

lcd_tab5[2]=lcd_tab4[result8];

lcd_tab5[3]=lcd_tab4[result7];

lcd_tab5[4]=lcd_tab4[result6];

lcd_tab5[5]=lcd_tab4[result5];

lcd_tab5[6]=lcd_tab4[result4];

lcd_tab5[7]=lcd_tab4[result3];

lcd_tab5[8]=lcd_tab4[result2];

lcd_tab5[9]=lcd_tab4[result1];

i=1;

decide();

}

}

void decide()

{

if(lcd_tab5[1+i]==lcd_tab4[0])

{

lcd_tab5[1+i]=lcd_tab5[2+i];

lcd_tab5[2+i]=lcd_tab5[3+i];

lcd_tab5[3+i]=lcd_tab5[4+i];

lcd_tab5[4+i]=lcd_tab5[5+i];

lcd_tab5[5+i]=lcd_tab5[6+i];

lcd_tab5[6+i]=lcd_tab5[7+i];

lcd_tab5[8+i]=lcd_tab5[9];

lcd_tab5[9]=lcd_tab5[10];

lcd_tab5[10]=lcd_tab5[11];

lcd_tab5[11]=lcd_tab6[0];

if(lcd_tab5[1+i]==lcd_tab4[0]) {

lcd_tab5[1+i]=lcd_tab5[2+i];

lcd_tab5[2+i]=lcd_tab5[3+i];

lcd_tab5[3+i]=lcd_tab5[4+i];

lcd_tab5[4+i]=lcd_tab5[5+i];

lcd_tab5[5+i]=lcd_tab5[6+i];

lcd_tab5[6+i]=lcd_tab5[7+i];

lcd_tab5[7+i]=lcd_tab5[8+i];

lcd_tab5[8+i]=lcd_tab5[9];

lcd_tab5[9]=lcd_tab5[10];

lcd_tab5[10]=lcd_tab6[0];

lcd_tab5[11]=lcd_tab6[0];

if(lcd_tab5[1+i]==lcd_tab4[0]) {

if(lcd_tab5[1+i]==lcd_tab4[0]) {

lcd_tab5[1+i]=lcd_tab5[2+i];

lcd_tab5[2+i]=lcd_tab5[3+i];

lcd_tab5[3+i]=lcd_tab5[4+i];

lcd_tab5[4+i]=lcd_tab5[5+i];

lcd_tab5[5+i]=lcd_tab5[6+i];

lcd_tab5[6+i]=lcd_tab5[7+i];

lcd_tab5[7+i]=lcd_tab5[8+i];

lcd_tab5[8+i]=lcd_tab5[9];

lcd_tab5[9]=lcd_tab6[0];

lcd_tab5[10]=lcd_tab6[0];

lcd_tab5[11]=lcd_tab6[0];

if(lcd_tab5[1+i]==lcd_tab4[0]) {

lcd_tab5[1+i]=lcd_tab5[2+i];

lcd_tab5[2+i]=lcd_tab5[3+i];

lcd_tab5[3+i]=lcd_tab5[4+i];

lcd_tab5[4+i]=lcd_tab5[5+i];

lcd_tab5[5+i]=lcd_tab5[6+i];

lcd_tab5[6+i]=lcd_tab5[7+i];

lcd_tab5[7+i]=lcd_tab5[8+i];

lcd_tab5[8+i]=lcd_tab6[0];

lcd_tab5[9]=lcd_tab6[0];

lcd_tab5[10]=lcd_tab6[0];

lcd_tab5[11]=lcd_tab6[0];

if(lcd_tab5[1+i]==lcd_tab4[0]) {

lcd_tab5[1+i]=lcd_tab5[2+i];

lcd_tab5[2+i]=lcd_tab5[3+i];

lcd_tab5[3+i]=lcd_tab5[4+i];

lcd_tab5[4+i]=lcd_tab5[5+i];

lcd_tab5[5+i]=lcd_tab5[6+i];

lcd_tab5[6+i]=lcd_tab5[7+i];

lcd_tab5[7+i]=lcd_tab6[0];

lcd_tab5[8+i]=lcd_tab6[0];

lcd_tab5[9]=lcd_tab6[0];

lcd_tab5[10]=lcd_tab6[0];

lcd_tab5[11]=lcd_tab6[0];

if(lcd_tab5[1+i]==lcd_tab4[0]) {

lcd_tab5[1+i]=lcd_tab5[2+i];

lcd_tab5[2+i]=lcd_tab5[3+i];

lcd_tab5[3+i]=lcd_tab5[4+i];

lcd_tab5[4+i]=lcd_tab5[5+i];

lcd_tab5[5+i]=lcd_tab5[6+i];

lcd_tab5[6+i]=lcd_tab6[0];

lcd_tab5[7+i]=lcd_tab6[0];

lcd_tab5[8+i]=lcd_tab6[0];

lcd_tab5[9]=lcd_tab6[0];

lcd_tab5[10]=lcd_tab6[0];

lcd_tab5[11]=lcd_tab6[0];

if(lcd_tab5[1+i]==lcd_tab4[0]) {

lcd_tab5[1+i]=lcd_tab5[2+i];

lcd_tab5[2+i]=lcd_tab5[3+i];

lcd_tab5[3+i]=lcd_tab5[4+i];

lcd_tab5[4+i]=lcd_tab5[5+i];

lcd_tab5[5+i]=lcd_tab6[0];

lcd_tab5[6+i]=lcd_tab6[0];

lcd_tab5[7+i]=lcd_tab6[0];

lcd_tab5[8+i]=lcd_tab6[0];

lcd_tab5[9]=lcd_tab6[0];

lcd_tab5[10]=lcd_tab6[0];

lcd_tab5[11]=lcd_tab6[0];

}

}

}

}

}

}

}

}

}

void lcd_shiftl(void)

{

lcd_tab3[0]=lcd_tab3[1];

lcd_tab3[1]=lcd_tab3[2];

lcd_tab3[2]=lcd_tab3[3];

lcd_tab3[3]=lcd_tab3[4];

lcd_tab3[4]=lcd_tab3[5];

lcd_tab3[5]=lcd_tab3[6];

lcd_tab3[6]=lcd_tab3[7];

lcd_tab3[7]=lcd_tab3[8];

lcd_tab3[8]=lcd_tab3[9];

lcd_tab3[9]=lcd_tab3[10];

lcd_tab3[10]=lcd_tab3[11];

lcd_tab3[11]=lcd_tab3[12];

lcd_tab3[12]=lcd_tab3[13];

lcd_tab3[13]=lcd_tab3[14];

lcd_tab3[14]=lcd_tab3[15];

lcd_tab3[15]=lcd_tab4[key_num];

}

void displasis()

{

int i;

for(i=0;i<16;i++)

{

lcd_tab3[i]=lcd_tab6[0];

}

for(i=0;i<16;i++)

{

lcd_tab5[i]=lcd_tab6[0];

}

key_cnt=key_number=key_number1=0;

a=b=c=d=0;

result=result1=result2=result3=result4=result5=result6=result7=result8=0;

flag1=0,flag2=0,flag3=0,flag4=0,flag5=0;

decimal0=0;decimal1=0;

}

void main()

{

while(1)

{

write_clean();

input();

m=1;

while(m)

{

P3=0xf0;

if(P3!=0xf0)

{

m=0;

}

}

P3=0xf0;

if(P3!=0xf0)

{

key_scan();

if(key_num<=9)

{

if(key_cnt<4)

{

switch(key_cnt)

{

case 0: a=key_num ; break;

case 1: a=a*10 ;b=key_num; a=a+b; break;

case 2: a=a*10 ;c=key_num; a=a+c; break;

case 3: a=a*10 ;d=key_num; a=a+d; break;

}

lcd_shiftl();

key_cnt++;

}

while(P3!=0xf0)

{

;

}

}

if(key_num==10) //加法

{

flag1=1;

key_number=a;

a=b=c=d=0;

key_cnt=0;

lcd_shiftl();

while(P3!=0xf0)

{

;

}

}

if(key_num==11) //减法{

flag2=1;

key_number=a;

a=b=c=d=0;

key_cnt=0;

lcd_shiftl();

while(P3!=0xf0)

{

;

}

}

if(key_num==12) // 乘法{

flag3=1;

key_number=a;

a=b=c=d=0;

key_cnt=0;

lcd_shiftl();

while(P3!=0xf0)

{

;

}

}

if(key_num==13) //除法{

flag4=1;

key_number=a;

a=b=c=d=0;

key_cnt=0;

lcd_shiftl();

while(P3!=0xf0)

{

;

}

}

if(key_num==14)

{

while(P3!=0xf0)

{

;

}

key_number1=a;

a=b=c=d=0;

key_cnt=0;

if((flag1==1)&&(key_number1!=0))

{

result=key_number+key_number1; //加法运算result1= result%10;

result2= result/10%10;

result3= result/100%10;

result4= result/1000%10;

result5= result/10000%10;

result6= result/100000%10;

result7= result/1000000%10;

result8= result/10000000;

delay_nms(2);

key_number1=0 ;

key_number=result;

display();

}

if((flag2==1)&&(key_number1!=0)) //减法运算

{

result=key_number-key_number1;

if(result<0)

{

result= key_number1-key_number;

flag5=1;

}

result1= result%10;

result2= result/10%10;

result3= result/100%10;

result4= result/1000%10;

result5= result/10000%10;

result6= result/100000%10;

result7= result/1000000%10;

result8= result/10000000;

delay_nms(2);

key_number1=0 ;

key_number=result;

display();

}

if((flag3==1)&&(key_number1!=0))

{

result=key_number*key_number1; //乘法运算

result1= result%10;

result2= result/10%10;

result3= result/100%10;

result4= result/1000%10;

result5= result/10000%10;

result6= result/100000%10;

result7= result/1000000%10;

result8= result/10000000;

delay_nms(2);

key_number1=0 ;

key_number=result;

display();

}

if((flag4==1)&&(key_number1!=0)) //除法运算

{

result=key_number/key_number1;

decimal0=((key_number*100)/key_number1)%10;

//小数各位

decimal1=((key_number*100)/key_number1)/10%10; //小数十位

result1= result%10;

result2= result/10%10;

result3= result/100%10;

result4= result/1000%10;

result5= result/10000%10;

result6= result/100000%10;

result7= result/1000000%10;

result8= result/10000000;

delay_nms(2);

key_number1=0 ;

key_number=result;

display();

}

}

if(key_num==15)

{

while(P3!=0xf0)

{

;

}

displasis();

}

}

}

}