简易计算器Proteus仿真及单片机源码 -

#include<reg51.h> //头文件
#define uint unsigned int
#define uchar unsigned char
sbit lcden=P1^0; //LCD1602控制引脚
sbit rs=P1^2;
sbit rw=P1^1;
sbit k1=P3^4; //十六进制转换
sbit k2=P3^5; //十进制转换
sbit k3=P3^6; //八进制转换
sbit k4=P3^7; //二进制转换
char i,j,temp,num,num_1;
long a,b,c; //a,第一个数 b,第二个数 c,得数
float a_c,b_c;
bit bt1;
uchar flag,fuhao;//flag表示是否有运算符键按下，fuhao表征按下的是哪个运算符
//flag=1表示运算符键按下，flag=0表示运算符键没有按下；
//fuhao=1为加法，fuhao=2为减法，fuhao=3为乘法，fuhao=4为除法。
uchar code q[]={"<<<<huan ying shi yong<<<<"};
uchar code q1[]={"<ji suan qi<"};
uchar code q2[]={"0123456789ABCDEF"};
uchar code table[]={//运算数字输入数组
7,8,9,0,
4,5,6,0,
1,2,3,0,
0,0,0,0};
uchar code table1[]={ //砗蠼屑淙胂允咀急傅氖?
7,8,9,0x2f-0x30, //7，8，9，÷
4,5,6,0x2a-0x30, //4, 5, 6，×
1,2,3,0x2d-0x30, //1, 2, 3，－
0x01-0x30,0,0x3d-0x30,0x2b-0x30//C，0，=，＋
};
void delay(uchar z) // 延迟函数
{
uchar y;
for(z;z>0;z--)
for(y=0;y<110;y++);
}
void write_com(uchar com) // 写指令函数
{
rs=0;
P0=com; //com指令付给P0口
delay(5);lcden=1;delay(5); lcden=0;
}
void write_date(uchar date) // 写数据函数
{
rs=1; P0=date; delay(5);
lcden=1; delay(5); lcden=0;
}
void init() //初始化
{
num=-1;
lcden=1; //使能信号为高电平
rw=0;
write_com(0x38); //8位，2行
delay(5); write_com(0x38); //8位，2行
delay(5); write_com(0x0c); //显示开，光标关，不闪烁*/
delay(1); write_com(0x06); //增量方式不移位显竟獗暌贫柚?
delay(1); write_com(0x80); //检测忙信号
delay(1); write_com(0x01); //显示开，光标关，不闪烁
num_1=0;
i=0; j=0;
a=0; //第一个参与运算的数
b=0; //第二个参与运算的数
c=0;
flag=0; //flag表示是否有符号键按下，
fuhao=0; // fuhao表征按下的是哪个符号
}
void keyscan() // 键盘扫描程序
{uint ix=0,addr;
if(bt1==0)
{P2=0xfe;
if(P2!=0xfe)
{
delay(20);// 延迟20ms
if(P2!=0xfe) { temp=P2&0xf0;
switch(temp)
{
case 0xe0:num=0; break; //7
case 0xd0:num=1; break; //8
case 0xb0:num=2; break; //9
case 0x70:num=3; break; //÷
}
} while(P2!=0xfe);
if(num==0||num==1||num==2)//如果按下的是'7','8'或'9
{
if(j!=0){write_com(0x01); j=0; }
if(flag==0)//没有按过运算符键
{ a=a*10+table[num]; } //按下数字存储到a
else//如果按过运算符键
{ b=b*10+table[num]; }//按下数字存储到b
if(a>100|b>100)bt1=1;
}
else//如果按下的是'/' 除法
{
flag=1; //按下运算符
fuhao=4;//4表示除号已按
}
i=table1[num]; //数据显示做准备
write_date(0x30+i);//显示数据或操作符号
}
P2=0xfd;
if(P2!=0xfd)
{
delay(20);
if(P2!=0xfd){ temp=P2&0xf0;
switch(temp)
{
case 0xe0:num=4; break; //4
case 0xd0:num=5; break; //5
case 0xb0:num=6; break; //6
case 0x70:num=7; break; //×
}
} while(P2!=0xfd);//等待按键释放
if(num==4||num==5||num==6&&num!=7)//如果按下的是'4','5'或'6'
{
if(j!=0){ write_com(0x01); j=0; }
if(flag==0)//没有按过运算符键
{ a=a*10+table[num]; }
else//如果按过运算符键
{ b=b*10+table[num]; }
if(a>100|b>100)bt1=1;
}
else//如果按下的是'×'
{ flag=1;
fuhao=3;//3表示乘号已按
}
i=table1[num]; //数据显示做准备
write_date(0x30+i);//显示数据或操作符号
}
P2=0xfb;
if(P2!=0xfb){ delay(20);
if(P2!=0xfb) { temp=P2&0xf0;
switch(temp)
{
case 0xe0:num=8; break; //1
case 0xd0:num=9; break; //2
case 0xb0:num=10; break; //3
case 0x70:num=11; break; //-
}
} while(P2!=0xfb);
if(num==8||num==9||num==10)//如果按下的是'1','2'或'3'
{
if(j!=0){ write_com(0x01); j=0; }
if(flag==0)//没有按过运算符键
{ a=a*10+table[num]; }
else//如果按过运算符键
{ b=b*10+table[num]; }
if(a>100|b>100)bt1=1;
}
else if(num==11)//如果按下的是'-'
{
flag=1;
fuhao=2;//2表示减号已按
}
i=table1[num]; //数据显示做准备
write_date(0x30+i);//显示数据或操作符号
}
if(a>0&b==0)
{if(k1==0){write_com(0x80);write_date('0');write_date('X');write_date(q2[a/16]);write_date(q2[a%16]);for(ix=8;ix>0;ix--)write_date(' ');write_com(0x80+4);}
if(k2==0){write_com(0x80);write_date(q2[a/10]);write_date(q2[a%10]);for(ix=8;ix>0;ix--)write_date(' ');write_com(0x80+2);}
if(k3==0){write_com(0x80);write_date('0');write_date(q2[a/8]);write_date(q2[a%8]);for(ix=8;ix>0;ix--)write_date(' ');write_com(0x80+3);}
if(k4==0){write_com(0x80);write_date('0');write_date('B');
addr = a ;
for (ix = 0; ix < 8; ix ++)
{
if ((addr<<ix) & 0x80)
{
write_date('1');
}
else
{
write_date('0');
}
}
}
}
}
else
{ write_com(0xc0+5);
write_date('!');write_date('R');write_date('O');
write_date('R');write_date('R');write_date('E');
}
P2=0xf7;
if(P2!=0xf7){ delay(20);
if(P2!=0xf7){ temp=P2&0xf0;
switch(temp)
{
case 0xe0:num=13; break; //数字0
case 0xd0:num=12; break; //清0键
case 0xb0:num=14; break; //等于键
case 0x70:num=15; break; //加
}
} while(P2!=0xf7);
switch(num)
{
case 12:{write_com(0x01);a=0;b=0;flag=0;fuhao=0;bt1=0;}//按下的是"清零"
break;
case 13:{ //按下的是"0"
if(flag==0)//没有按过运算符键
{ a=a*10; write_date(0x30); P2=0; }
else if(flag>=1)//如果按过运算符键
{ b=b*10; write_date(0x30); }
} break;
case 14:{j=1; //按下等于键，根据运算符号进行不同的算术处理
if(fuhao==1) //加法运算
{
write_com(0x80+0x4f);//按下等于键，光标前进至第二行最后一个显示处
write_com(0x04); //设置从后住前写数据，每写完一个数据，光标后退一格
c=a+b;
while(c!=0){write_date(0x30+c%10); c=c/10; }
write_date(0x3d); //再写"="
a=0;b=0;flag=0;fuhao=0;
}
else if(fuhao==2) //减法运算
{
write_com(0x80+0x4f);//光标前进至第二行最后一个显示处
write_com(0x04); //设置从后住前写数据，每写完一个数据，光标后退一格(这个照理说顺序不对，可显示和上段一样)
if(a-b>0) c=a-b;
else c=b-a;
while(c!=0) { write_date(0x30+c%10);c=c/10; }
if(a-b<0) write_date(0x2d);
write_date(0x3d); //再写"="
a=0;b=0;flag=0;fuhao=0;
}
else if(fuhao==3) //乘法运算
{write_com(0x80+0x4f); write_com(0x04);
c=a*b;
while(c!=0) {write_date(0x30+c%10); c=c/10; }
write_date(0x3d); a=0;b=0;flag=0;fuhao=0;
}
else if(fuhao==4)//除法运算
{write_com(0x80+0x4f);
write_com(0x04);
i=0;
c=(long)(((float)a/b)*1000);
while(c!=0)
{
write_date(0x30+c%10);
c=c/10;
i++; if(i==3) write_date(0x2e);
}
if(a/b<=0)
{
if(i<=2)
{
if(i==1) write_date(0x30);
write_date(0x2e); // .
write_date(0x30);
}
write_date(0x30); //
}
write_date(0x3d);
a=0;b=0;flag=0;fuhao=0;
}
} break;
case 15:{write_date(0x30+table1[num]);flag=1;fuhao=1;} break; //加键设置加标志fuhao=1;
}
}//P2!=0xf7
}
/*------------------------------------------------
写入字符串函数
------------------------------------------------*/
void LCD_Write_String(unsigned char x,unsigned char y,unsigned char *s)
{
if (y == 0)
{
write_com(0x80 + x); //表示第一行
}
else
{
write_com(0xC0 + x); //表示第二行
}
while (*s)
{
write_date( *s);
s ++;
}
}
void main()
{uint c=60000;
init(); //系统初始化
LCD_Write_String(0,0,q);
LCD_Write_String(0,1,q1);
while(c--);
init(); //系统初始化
while(1)
{
keyscan();//键扫描
}
}

复制代码