#include<reg52.h>
uchar dx[]={0X3F,0X06,0X5B,0X4F,0X66,0X6D,0X7D,0X07,0X7F,0X6F}; //聲明全局變量(段選)
uchar wx[]={0XFE,0XFD,0XFB,0XF7,0XEF,0XDF,0XBF,0X7F}; //聲明全局變量(位選)
void jzkey(); //聲明矩陣鍵盤函數
uint sj,sj1,sj2; //聲明(unsigned int)全局變量:數據,數據1,數據2.
uchar bzw,s[5]; //聲明(unsigned char)全局變量:標志位,數.
/*****延時函數*****/
void delay1ms(c) //誤差 0us
{
uchar a,b,d; //聲明局部變量:a,b,d.
for(d=c;d>0;d--)
for(b=199;b>0;b--)
for(a=1;a>0;a--);
}
/****數據顯示*****/
sjxs(uint a)
{
uchar b[8];
b[7]=a/100000;b[6]=a/100000%10;b[5]=a/10000%10;b[4]=a/1000%10;
b[3]=a/1000%10;b[2]=a/100%10;b[1]=a/10%10;b[0]=a%10; //定義數據位
P2=dx[b[0]]; P1=wx[0];delay1ms(10); //定義P2口為段選,P1口為位選,延時10ms.
if(a>=10){P2=dx[b[1]];P1=wx[1];delay1ms(1);} //十位
if(a>=100){P2=dx[b[2]]; P1=wx[2];delay1ms(1);} //百位
if(a>=1000){P2=dx[b[3]]; P1=wx[3];delay1ms(1);} //千位
if(a>=10000){P2=dx[b[5]]; P1=wx[4];delay1ms(1);} //萬位
if(a>=100000){P2=dx[b[6]]; P1=wx[4];delay1ms(1);} //十萬
if(a>=1000000){P2=dx[b[7]]; P1=wx[4];delay1ms(1);} //百萬
if(a>=10000000){P2=dx[b[8]]; P1=wx[4];delay1ms(1);} //千萬
}
void main()
{
while(1)
{
jzkey(); //調用矩陣按鍵函數
sjxs(sj); //調用數據顯示函數
}
}
/******數據移位*****/
void yw()
{
s[7]=s[6]=s[5]=s[4]=s[3]=s[2]=s[1]=s[0];
}
/******數據合成*****/
void sjhc()
{
sj=s[7]*10000000+s[6]*1000000+s[5]*100000+s[4]*10000+s[3]*1000+s[2]*100+s[1]*10+s[0]*1;
}
/*******數據復位*****/
void fw()
{
sj=s[4]=s[3]=s[2]=s[1]=s[0]=0;
}
/*****矩陣按鍵*****/
void jzkey()
{
P3=0XFE;if(P3!=0XFE) delay1ms(10);P3=0XFE;if(P3!=0XFE)
{
if(P3==0XEE){yw();s[0]=1;sjhc();}
if(P3==0XDE){yw();s[0]=2;sjhc();}
if(P3==0XBE){yw();s[0]=3;sjhc();}
if(P3==0X7E){yw();s[0]=4;sjhc();}delay1ms(500);}
P3=0XFD;if(P3!=0XFD) delay1ms(10);P3=0XFD;if(P3!=0XFD)
{
if(P3==0XED){yw();s[0]=5;sjhc();}
if(P3==0XDD){yw();s[0]=6;sjhc();}
if(P3==0XBD){yw();s[0]=7;sjhc();}
if(P3==0X7D){yw();s[0]=8;sjhc();}delay1ms(500);}
P3=0XFB;if(P3!=0XFB) delay1ms(10);P3=0XFB;if(P3!=0XFB)
{
if(P3==0XEB){yw();s[0]=9;sjhc();}
if(P3==0XDB){yw();s[0]=0;sjhc();}
if(P3==0XBB){fw(),sj1,sj2;}
if(P3==0X7B)
{
sj2=sj;
if(bzw==1)sj=sj1+sj2; //設置(+,-,*,/)
if(bzw==2)sj=sj1-sj2;
if(bzw==3)sj=sj1*sj2;
if(bzw==4)sj=sj1/sj2;
bzw=0;}
delay1ms(500);}
P3=0XF7;if(P3!=0XF7) delay1ms(10);P3=0XF7;if(P3!=0XF7)
{
if(P3==0XE7){bzw=1;sj1=sj;fw();}
if(P3==0XD7){bzw=2;sj1=sj;fw();}
if(P3==0XB7){bzw=3;sj1=sj;fw();}
if(P3==0X77){bzw=4;sj1=sj;fw();}delay1ms(500);}
}
|