51單片機計算器制作可開根，解方程，算二階矩陣已做出實物

ID:226990 · 發表于 2017-9-15 18:30

可以常規運算和開根，解方程，和算二階矩陣，代碼挺簡單的

Altium Designer畫的原理圖和PCB圖如下：(51hei附件中可下載工程文件)

單片機源程序如下:

#include<reg52.h>
#include<math.h>
typedef unsigned char uint8;
typedef unsigned int uint16;
sbit rs=P2^5;
sbit rw=P2^6;
sbit e=P2^7;
sbit led=P3^7;
sbit k4=P2^0;
sbit k2=P2^1;
sbit k3=P2^2;
sbit k1=P2^3;
sbit beep=P2^0;
uint8 key,num;
uint8 fuhao;
uint8 flag;
long a,b,c,d,f,g;
uint8 k;
uint8 biao;
float n,x;
int i,j=0;
uint8 dat1[]={1,2,3,0x2b-0x30,
4,5,6,0x2d-0x30,
7,8,9,0x2a-0x30,
0,0x48+0x30,0x3d-0x30,0x2f-0x30 };
void delay(uint16 i)
{
while(i--);
}
void lcdwrc(uint8 c)
{
delay(1000);
rs=0;
rw=0;
e=0;
P0=c;
e=1;
delay(1000);
e=0;
}
void lcdwrd(uint8 dat)
{
delay(1000);
rs=1;
rw=0;
e=0;
P0=dat;
e=1;
delay(1000);
e=0;
rs=0;
}
void lcdinit()
{
delay(1500);
lcdwrc(0x38);
delay(500);
lcdwrc(0x38);
delay(500);
lcdwrc(0x38);
delay(500);
lcdwrc(0x38);
lcdwrc(0x08);
lcdwrc(0x01);
lcdwrc(0x06);
lcdwrc(0x0c);
key=0;
num=0;
flag=0;
fuhao=0;
a=0;
b=0;
c=0;
d=0;
biao=0;
led=0;
}
void keyscan()
{
if(k1==0) //檢測按鍵K1是否按下
{
delay(1000); //消除抖動一般大約10ms
if(k1==0) //再次判斷按鍵是否按下
{
k=0;
lcdwrc(0x4f+0x80);
lcdwrc(0x04);//設置光標左移，屏幕不移動
c=(long)(((float)sqrt(a))*1000);
while(c!=0) //一位一位顯示
{
k++;
lcdwrd(0x30+c%10);//顯示結果的最后一位在0x4f的位置
c=c/10;//取前面的結果數據
//lcdwrd(0x3d);
if(k==3)
{
lcdwrd(0x2e);
k=0;
}
}
lcdwrd(0x3d); //顯示等于號=
}
while(!k1); //檢測按鍵是否松開
}
if(k2==0)
{
delay(1000);
if(k2==0)
{
j++;
}
if(j==1)
{
lcdwrd(0x50-0x30);
flag=1;
}
if(j==2)
{
lcdwrc(0x40+0x80);
flag=2;
}
if(j==3)
{
lcdwrd(0x50-0x30);
flag=3;
}
if(j==4)
{
lcdwrc(0x4f+0x80);
lcdwrc(0x04);
c=(a*g)-(b*f);
while(c!=0)
{
lcdwrd(0x30+c%10);
c=c/10;
}
if((a*g)<(b*f))
{
lcdwrd(0x2d);
}
lcdwrd(0x3d);
a=0;
b=0;
flag=0;
fuhao=0;
}
while(!k2);
}
if(k3==0)
{
delay(1000);
if(k3==0)
{
if(fuhao==1)//加
{
lcdwrc(0x4f+0x80);
lcdwrc(0x04);//設置光標左移，屏幕不移動
c=(long)(((float)b/a)*1000);
//c=a+b;
while(c!=0)
{
k++;
lcdwrd(0x30+c%10);
c=c/10;
if(k==3)
{
lcdwrd(0x2e);
k=0;
}
}
lcdwrd(0x2d);
lcdwrd(0x3d);
lcdwrd(0x48+0x30);//顯示x
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;
*/
c=(long)(((float)b/a)*1000);
while(c!=0)
{
k++;
lcdwrd(0x30+c%10);
c=c/10;
if(k==3)
{
lcdwrd(0x2e);
k=0;
}
}
/*if(a<b)
{
lcdwrd(0x2d); //顯示-號
}
*/
lcdwrd(0x3d); //顯示等于號=
lcdwrd(0x48+0x30);//顯示x
a=0;
b=0;
flag=0;
fuhao=0;//全部清除為0
}
}
while(!k3);
}
if(k4==0) //檢測按鍵K1是否按下
{
delay(1000); //消除抖動一般大約10ms
if(k4==0) //再次判斷按鍵是否按下
{
lcdwrc(0x01); //清屏指令
a=0;
b=0;
flag=0;
fuhao=0;
}
while(!k4); //檢測按鍵是否松開
}
P1=0xfe;
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) //沒有按下符號鍵
{
//led=1;
a=a*10+dat1[num];
}
if(flag==1)
{
//led=1;
b=b*10+dat1[num];
}
if(flag==2)
{
f=f*10+dat1[num];
}
if(flag==3)
{
g=g*10+dat1[num];
}
}
if(num==3)
{
//led=0;
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) //沒有按下符號鍵
{
//led=1;
a=a*10+dat1[num];
}
if(flag==1)
{
//led=1;
b=b*10+dat1[num];
}
if(flag==2)
{
f=f*10+dat1[num];
}
if(flag==3)
{
g=g*10+dat1[num];
}
}
else
{
flag=1;
fuhao=2;//帶表減號
}
lcdwrd(0x30+dat1[num]);
}
P1=0xfb;
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) //沒有按下符號鍵
{
//led=1;
a=a*10+dat1[num];
}
if(flag==1)
{
//led=1;
b=b*10+dat1[num];
}
if(flag==2)
{
f=f*10+dat1[num];
}
if(flag==3)
{
g=g*10+dat1[num];
}
}
else
{
flag=1;
fuhao=3;//帶表乘號*
}
lcdwrd(0x30+dat1[num]);
}
P1=0xf7;
if(P1!=0xf7)
{
delay(1000);
if(P1!=0xf7)
{
key=P1&0xf0;
switch(key)
{
case 0xe0: num=12;break; //0
case 0xd0: num=13;break; // x
case 0xb0: num=14;break; //等號=
case 0x70: num=15;break; //除/
}
}
while(P1!=0xf7);
switch(num)
{
case 12:
if(flag==0) //沒有按下符號鍵
{
//led=1;
a=a*10+dat1[num];
lcdwrd(0x30);
}
if(flag==1)
{
//led=1;
b=b*10+dat1[num];
lcdwrd(0x30);
}if(flag==2)
{
f=f*10+dat1[num];
lcdwrd(0x30);
}
if(flag==3)
{
g=g*10+dat1[num];
lcdwrd(0x30);
}
break;
case 13:
lcdwrd(0x48+0x30);
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);
c=c/10;
}
lcdwrd(0x3d); //顯示等于號=
a=0;
b=0;
flag=0;
fuhao=0;//全部清除為0
}
if(fuhao==3)//乘法
{
lcdwrc(0x4f+0x80);
……………………
…………限于本文篇幅余下代碼請從51黑下載附件…………

復制代碼

所有資料51hei提供下載:

原理圖和pcb.rar (1.04 MB, 下載次數: 86)

ID:165276 · 發表于 2017-9-17 17:01

強大的計算器啊，厲害。

ID:226990 · 發表于 2017-9-19 18:40

1965501205 發表于 2017-9-17 17:01
強大的計算器啊，厲害。

那個pcb是錯的，是另一個，管理員截錯了

ID:649892 · 發表于 2019-12-11 10:33

1965501205 發表于 2017-9-17 17:01
強大的計算器啊，厲害。

按照這個pcb圖可以出程序嗎

ID:401343 · 發表于 2019-12-16 22:02

厲害，學習學習

帳號		自動登錄	找回密碼
密碼			立即注冊

久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

51單片機計算器制作 可開根，解方程，算二階矩陣 已做出實物

51單片機計算器制作可開根，解方程，算二階矩陣已做出實物