?? 123.c
字號:
/**************************
0 1 2 3
4 5 6 7
8 9 . CLR
+ - = CLR
***************************/
/***************************
用鍵盤掃描,數碼管顯示實現計算功能,能實現xxx.x任意正數的加減
運算,超過范圍顯0000,功能鍵如上,并將所得結果儲入EEPROM
****************************/
#include <reg52.h>
#include<intrins.h>
#define uchar unsigned char
#define uint unsigned int
/*sfr ISP_DATA=0Xe2;
sfr ISP_ADDRH=0xe3;
sfr ISP_ADDRL=0xe4;
sfr ISP_CMD=0xe5;
sfr ISP_TRIG=0xe6;
sfr ISP_CONTR=0xe7;*/
//sfr LedPort=0x80; //P0口段選
//sfr LedBit=0x90; //P1口位選
uchar code table[]=
{0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,
0xbf,0x86,0xdb,0xcf,0xe6,0xed,0xfd,0x87,0xff,0xef
};//0,1,2,3,4,5,6,7,8,9,0.,1.,2.,3.,4.,5.,6.,7.,8.,9.,
uchar temp,dat;
uchar buf1[5];
uchar buf2[5];
uchar end[5];
/**************延時程序*************/
void delay(uint z)
{
uint x,y;
for(x=z;x>0;x--)
for(y=110;y>0;y--);
}
/***********鍵盤掃描***************/
uchar keyscan()
{
uchar num=0;
P2=0x7f;
temp=P2;
temp=temp&0x0f;
if(temp!=0x0f)
{
delay(5);
temp=P2;
temp=temp&0x0f;
if(temp!=0x0f)
{
temp=P2;
switch(temp)
{
case 0x77:num=1;break;
case 0x7b:num=2;break;
case 0x7d:num=3;break;
case 0x7e:num=4;break;
}
}
}
P2=0xbf;
temp=P2;
temp=temp&0x0f;
if(temp!=0x0f)
{
delay(5);
temp=P2;
temp=temp&0x0f;
if(temp!=0x0f)
{
temp=P2;
switch(temp)
{
case 0xb7:num=5;break;
case 0xbb:num=6;break;
case 0xbd:num=7;break;
case 0xbe:num=8;break;
}
}
}
P2=0xdf;
temp=P2;
temp=temp&0x0f;
if(temp!=0x0f)
{
delay(5);
temp=P2;
temp=temp&0x0f;
if(temp!=0x0f)
{
temp=P2;
switch(temp)
{
case 0xd7:num=9;break;
case 0xdb:num=10;break;
case 0xdd:num=11;break;
case 0xde:num=12;break;
}
}
}
P2=0xef;
temp=P2;
temp=temp&0x0f;
if(temp!=0x0f)
{
delay(5);
temp=P2;
temp=temp&0x0f;
if(temp!=0x0f)
{
temp=P2;
switch(temp)
{
case 0xe7:num=13;break;
case 0xeb:num=14;break;
case 0xed:num=15;break;
case 0xee:num=16;break;
}
}
}
return num;
}
/*********在數碼管上顯示四位數字**********/
void show(uchar *dis)
{
P1=0xf7;
P0=table[dis[3]];
delay(5);
P1=0xfb;
P0=table[dis[2]];
delay(5);
P1=0xfd;
P0=table[dis[1]];
delay(5);
P1=0xfe;
P0=table[dis[0]];
delay(5);
}
/*********eeprom里讀數據******************/
/*uchar EEPROM_Read(uint address)
{
ISP_ADDRH=address/256; // 待寫入扇區首地址
ISP_ADDRL=address%256;
ISP_CONTR=0X83; //控制字節
ISP_CMD=0X01; //讀命令
ISP_TRIG=0X46; //命令觸發寄存器
ISP_TRIG=0XB9;
_nop_();
ISP_CONTR=0X00; //初始化
ISP_CMD=0X00;
ISP_TRIG=0X00;
ISP_ADDRH=0x00;
ISP_ADDRL=0x00;
return(ISP_DATA); //返回讀出的值
}
/*********向eeprom里寫數據**********************/
/*void EEPROM_Write(uint address,uchar DataTemp)
{
ISP_DATA=DataTemp;
ISP_ADDRH=address/256;
ISP_ADDRL=address%256;
ISP_CMD=0X02; //寫指令
ISP_TRIG=0X46; //觸發，數據寫入
ISP_TRIG=0XB9;
_nop_();
ISP_CONTR=0X00; //初始化
ISP_CMD=0X00;
ISP_TRIG=0X00;
ISP_ADDRH=0x00;
ISP_ADDRL=0x00;
}*/
/*************扇區擦除**********************/
/*void EEPROM_Eares(uint address) //扇區擦除
{
ISP_ADDRL=address;
ISP_ADDRH=address>>6;
ISP_CONTR=0X83;
ISP_CMD=0X03; //扇區命令
ISP_TRIG=0X46; //命令觸發寄存器
ISP_TRIG=0XB9;
_nop_();
ISP_ADDRL=0x00;
ISP_ADDRH=0x00;
ISP_CONTR=0X00;
ISP_CMD=0X00;
ISP_TRIG=0X00;
}*/
/********主程序里進行運算********************/
void main(void)
{
uchar i,key,flag,addflag;
addflag=1;
while(1)
{
key=keyscan();
if(addflag==1)
show(buf1);
if(addflag==2)
show(buf2);
if(addflag==3)
show(end);
if(key>0&&key<12&&addflag==1) //第一次輸入的數
{
do
{
show(buf1);
P2=0x0f;
temp=P2;
}
while(temp!=0x0f);
if(key!=11)
{
buf1[4]=buf1[3];
buf1[3]=buf1[2];
buf1[2]=buf1[1];
buf1[1]=buf1[0];
buf1[0]=key-1;
}
else
buf1[0]=buf1[0]+10;
if(buf1[4]!=0)
{
for(i=0;i<4;i++)
buf1[i]=0;
}
}
if(key>0&&key<12&&addflag==2) //第二次輸入的數
{
do
{
show(buf2);
P2=0x0f;
temp=P2;
}
while(temp!=0x0f);
if(key!=11)
{
buf1[4]=buf1[3];
buf2[3]=buf2[2];
buf2[2]=buf2[1];
buf2[1]=buf2[0];
buf2[0]=key-1;
}
else
buf2[0]=buf2[0]+10;
}
if(key==13) //+
{
addflag=2;
flag=1;
}
if(key==14) //-
{
addflag=2;
flag=2;
}
if((key==15)&&(flag==1)) //做加法的結果
{
do
{
show(end);
addflag=3;
P2=0x0f;
temp=P2;
}
while(temp!=0x0f);
addflag=3;
if(buf1[1]<=9&&buf2[1]<=9)
{
end[0]=buf1[0]+buf2[0];
end[1]=buf1[1]+buf2[1];
end[2]=buf1[2]+buf2[2];
end[3]=buf1[3]+buf2[3];
if(end[0]>9) //有進位的整數加法
{
end[0]=end[0]-10;
end[1]++;
}
if(end[1]>9)
{
end[1]=end[1]-10;
end[2]++;
}
if(end[2]>9)
{
end[2]=end[2]-10;
end[3]++;
}
if(end[3]>9)
{
for(i=0;i<4;i++)
buf1[i]=0;
}
}
else if(buf1[1]>9&&buf2[1]>9) //兩個帶小數點的計算
{
end[0]=buf1[0]+buf2[0];
end[1]=buf1[1]+buf2[1]-10;
end[2]=buf1[2]+buf2[2];
end[3]=buf1[3]+buf2[3];
if(end[0]>9) //考慮進位
{
end[0]=end[0]-10;
end[1]++;
}
if(end[1]>19)
{
end[1]=end[1]-10;
end[2]++;
}
if(end[2]>9)
{
end[2]=end[2]-10;
end[3]++;
}
if(end[3]>9)
{
for(i=0;i<4;i++)
buf1[i]=0;
}
}
else if(buf1[1]>9&&buf2[0]<=9&&buf2[1]<=9) //帶小數點的和整數相加
{ end[0]=buf1[0];
end[1]=buf1[1]+buf2[0];
end[2]=buf1[2]+buf2[1];
end[3]=buf1[3]+buf2[2];
if(end[1]>19)
{
end[1]=end[1]-10;
end[2]++;
}
if(end[2]>9)
{
end[2]=end[2]-10;
end[3]++;
}
if(end[3]>9)
{
for(i=0;i<4;i++)
buf1[i]=0;
}
}
else if(buf1[0]<=9&&buf1[1]<=9&&buf2[1]>9) //整數和帶小數點的相加
{ end[0]=buf2[0];
end[1]=buf1[0]+buf2[1];
end[2]=buf1[1]+buf2[2];
end[3]=buf1[2]+buf2[3];
if(end[1]>19)
{
end[1]=end[1]-10;
end[2]++;
}
if(end[2]>9)
{
end[2]=end[2]-10;
end[3]++;
}
if(end[3]>9)
{
for(i=0;i<4;i++)
buf1[i]=0;
}
}
//EEPROM_Eares(0x2000);
//EEPROM_Write(0x2000+end[5],end[5]); //起始地址為2000
}
if((key==15)&&(flag==2)) //做減法的結果
{
do
{
show(end);
addflag=3;
P2=0x0f;
temp=P2;
}
while (temp!=0x0f);
addflag=3;
if(buf1[1]<=9&&buf2[1]<=9)
{
end[0]=buf1[0]-buf2[0];
end[1]=buf1[1]-buf2[1];
end[2]=buf1[2]-buf2[2];
end[3]=buf1[3]-buf2[3];
if(buf1[0]<buf2[0]) //考慮有借位的兩整數相減
{
end[0]=buf1[0]+(10-buf2[0]);
end[1]--;
buf1[1]--;
}
if(buf1[1]<buf2[1])
{
end[1]=buf1[1]+(10-buf2[1]);
end[2]--;
buf1[2]--;
}
if(buf1[2]<buf2[2])
{
end[2]=buf1[2]+(10-buf2[2]);
end[3]--;
}
if(buf1[3]<buf2[3])
{
for(i=0;i<4;i++)
buf1[i]=0;
}
}
else if (buf1[1]>9&&buf2[1]>9) //考慮兩帶小數點的兩數相減
{
end[0]=buf1[0]-buf2[0];
end[1]=buf1[1]-buf2[1]+10;
end[2]=buf1[2]-buf2[2];
end[3]=buf1[3]-buf2[3];
if(buf1[0]<buf2[0])
{
end[0]=buf1[0]+(10-buf2[0]);
end[1]--;
buf1[1]--;
}
if(buf1[1]<buf2[1])
{
end[1]=buf1[1]+20-buf2[1];
end[2]--;
buf1[2]--;
}
if(buf1[2]<buf2[2])
{
end[2]=buf1[2]+(10-buf2[2]);
end[3]--;
}
if(buf1[3]<buf2[3])
{
for(i=0;i<4;i++)
buf1[i]=0;
}
}
else if(buf1[1]>9&&buf2[0]<=9&&buf2[1]<=9) //帶小數點的減整數
{
end[0]=buf1[0];
end[1]=buf1[1]-buf2[0];
end[2]=buf1[2]-buf2[1];
end[3]=buf1[3]-buf2[2];
if(buf1[1]<buf2[0]+10)
{
end[1]=buf1[1]+10-buf2[0];
end[2]--;
buf1[2]--;
}
if(buf1[2]<buf2[1])
{
end[2]=buf1[2]+10-buf2[1];
end[3]--;
}
if(buf1[3]<buf1[3])
{
for(i=0;i<4;i++)
buf1[i]=0;
}
}
else if(buf1[0]<=9&&buf1[1]<=9&&buf2[1]>9) //整數減帶小數點的
{
end[0]=10-buf2[0];
end[1]=buf1[0]-buf2[1]+19;
end[2]=buf1[1]-buf2[2];
end[3]=buf1[2]-buf2[3];
if(buf1[0]<buf2[1]-10)
{
end[1]=buf1[0]+29-buf2[1];
end[2]--;
buf1[1]--;
}
if(buf1[1]<buf2[2])
{
end[2]=buf1[1]+10-buf2[1];
end[3]--;
}
if(buf1[3]<buf1[3])
{
for(i=0;i<4;i++)
buf1[i]=0;
}
}
// EEPROM_Eares(0x2000);
// EEPROM_Write(0x2000+end[5],end[5]);
}
if(key==12||key==16) //清0鍵
{
for(i=0;i<4;i++)
buf1[i]=0;
for(i=0;i<4;i++)
buf2[i]=0;
for(i=0;i<4;i++)
end[i]=0;
addflag=1;
}
/* while(1)
{
EEPROM_Write(0x2000,end[5]);//起始地址為2000
ISP_DATA=0;
dat=0;
dat=EEPROM_Read(0x200+end[5]-1); //一個扇區與下一個扇區相差200
show(end);
} */
}
}
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -