/*     S16 S12 S8 S4分別是123+
S15 S11 S7 S3分別是456-
S14 S10 S6 S2分別是789*
S13 S9 S5 S1分別是0 CE =/
*/


/* 實現兩個數的運算，每個數的位數至少可以八位 （在液晶顯示屏LCD1602上顯示） */
#include<reg52.h>

typedef unsigned char uint8;
typedef unsigned int uint16;


sbit rw=P2^5;
sbit rs=P2^6;
sbit e=P2^7;


uint8 key=0,num=0;
uint8 fuhao=0;          //定義具體的那個符號，是加減還是乘除。
uint8 flag=0;        //定義有沒有按下符號鍵，這個是統稱
long a=0,b=0,c=0,d=0;//定義運算資料的第一個和第二個及等於的數變數
uint8 k;                //定義小數點後面顯示的位數
uint8 biao=0;


uint8 dat1[]={ 1,2,3,0x2b-0x30, 4,5,6,0x2d-0x30, 7,8,9,0x2a-0x30, 0,0x01-0x30,0x3d-0x30,0x2b-0x30 };//儲存顯示的資料


void delay(uint16 i)
{
while(i--);
}


void lcdwrc(uint8 c)
{
e=0;
rs=0;
rw=0;

P0=c;
delay(1000);


e=1;
delay(500);
e=0;
}


void lcdwrd(uint8 dat)
{
e=0;
rs=1;
rw=0;

P0=dat;
delay(1000);


e=1;
delay(1000);
e=0;
}


void lcdinit()
{
lcdwrc(0x38);
lcdwrc(0x0c);
lcdwrc(0x06);
lcdwrc(0x01);
lcdwrc(0x80);
}


void keyscan()
{
P1=0xfe;   //令第一行為0，然後判斷是哪一列按下
if(P1!=0xfe)
{
delay(1000);
if(P1!=0xfe)
{
key=P1&0xf0;
switch(key)
{
case 0xe0: num=0;break;  //1
case 0xd0: num=1;break;  //2
case 0xb0: num=2;break;  //3
case 0x70: num=3;break;  //加
}
}
while(P1!=0xfe);
if(num==0||num==1||num==2) //確認第一行的數1,2,3
{
if(flag==0) //沒有按下符號鍵
{
a=a*10+dat1[num];
}
else
{
b=b*10+dat1[num];
}

}
else
{
flag=1;
fuhao=1;//加號+
}
lcdwrd(0x30+dat1[num]);
}




P1=0xfd;//令第二行為0，判斷是哪一列按下
if(P1!=0xfd)
{
delay(1000);
if(P1!=0xfd)
{
key=P1&0xf0;
switch(key)
{
case 0xe0: num=4;break;  //4
case 0xd0: num=5;break;  //5
case 0xb0: num=6;break;  //6
case 0x70: num=7;break;  //減—
}
}
while(P1!=0xfd);
if(num==4||num==5||num==6)
{
if(flag==0) //沒有按下符號鍵
{
a=a*10+dat1[num];
}
else
{
b=b*10+dat1[num];
}
}
else
{
flag=1;
fuhao=2;//帶表減號
}
lcdwrd(0x30+dat1[num]);
}




P1=0xfb; //令第三行為0，判斷哪一列按下
if(P1!=0xfb)
{
delay(1000);
if(P1!=0xfb)
{
key=P1&0xf0;
switch(key)
{
case 0xe0: num=8;break;  //7
case 0xd0: num=9;break;  //8
case 0xb0: num=10;break;  //9
case 0x70: num=11;break;  //乘*
}
}
while(P1!=0xfb);
if(num==8||num==9||num==10)
{
if(flag==0) //沒有按下符號鍵
{
a=a*10+dat1[num];
}
else
{
b=b*10+dat1[num];
}
}
else
{
flag=1;
fuhao=3;//帶表乘號*
}
lcdwrd(0x30+dat1[num]);
}




P1=0xf7; //令第四行為0，判斷哪一列按下
if(P1!=0xf7)
{
delay(1000);
if(P1!=0xf7)
{
key=P1&0xf0;
switch(key)
{
case 0xe0: num=12;break;  //0
case 0xd0: num=13;break;  //清除rst
case 0xb0: num=14;break;  //等號=
case 0x70: num=15;break;  //除/
}
}
while(P1!=0xf7);
switch(num)
{
case 12: 
if(flag==0) //沒有按下符號鍵
{
a=a*10+dat1[num];
lcdwrd(0x30);
}
else
{
b=b*10+dat1[num];
lcdwrd(0x30);
}
break;

case 13: 
lcdwrc(0x01);//清屏指令
a=0;
b=0;
flag=0;
fuhao=0;
break;


case 15:

flag=1;
fuhao=4;
lcdwrd(0x2f);//除號/
break;

case 14: 
if(fuhao==1)//加
{
lcdwrc(0x4f+0x80);
lcdwrc(0x04);//設定游標左移，螢幕不移動
c=a+b;
while(c!=0) //一位一位顯示
{
lcdwrd(0x30+c%10);//顯示結果的最後一位在0x4f的位置
c=c/10;//取前面的結果資料
}
lcdwrd(0x3d); //顯示等於號=
a=0;
b=0;
flag=0;
fuhao=0;//全部清除為0
}
if(fuhao==2)   //減
{
lcdwrc(0x4f+0x80);
lcdwrc(0x04);//設定游標左移，螢幕不移動
if(a>b)
c=a-b;
else
c=b-a;

while(c!=0) //一位一位顯示
{
lcdwrd(0x30+c%10);//顯示結果的最後一位在0x4f的位置
c=c/10;//取前面的結果資料
}
if(a<b)lcdwrd(0x2d); //顯示-號
lcdwrd(0x3d); //顯示等於號=
a=0;
b=0;
flag=0;
fuhao=0;//全部清除為0
}
if(fuhao==3)//乘法
{
lcdwrc(0x4f+0x80);
lcdwrc(0x04);//設定游標左移，螢幕不移動
c=a*b;
while(c!=0) //一位一位顯示
{
lcdwrd(0x30+c%10);//顯示結果的最後一位在0x4f的位置
c=c/10;//取前面的結果資料
}
lcdwrd(0x3d); //顯示等於號=
a=0;
b=0;
flag=0;
fuhao=0;//全部清除為0
}
if(fuhao==3)//乘法
{
lcdwrc(0x4f+0x80);
lcdwrc(0x04);//設定游標左移，螢幕不移動
c=a*b;
while(c!=0) //一位一位顯示
{
lcdwrd(0x30+c%10);//顯示結果的最後一位在0x4f的位置
c=c/10;//取前面的結果資料
}
lcdwrd(0x3d); //顯示等於號=
a=0;
b=0;
flag=0;
fuhao=0;//全部清除為0
}
if(fuhao==4)
{
k=0;
lcdwrc(0x4f+0x80);
lcdwrc(0x04);//設定游標左移，螢幕不移動
c=(long)(((float)a/b)*1000);//強制轉換為long。
while(c!=0) //一位一位顯示
{
k++;
lcdwrd(0x30+c%10);//顯示結果的最後一位在0x4f的位置
c=c/10;//取前面的結果資料
if(k==3)
{
lcdwrd(0x2e);
k=0;
}
}
if(a<b)  //如果a比b小的話那麼除的結果最高位是0
{
lcdwrd(0x30);
}
lcdwrd(0x3d); //顯示等號
a=0;
b=0;
flag=0;
fuhao=0;//全部清除為0
}
break;
}
}
}


void main()
{
lcdinit();
while(1)
{
keyscan();
}
}