簡易計算器Proteus仿真及單片機源碼

ID:582956 · 發(fā)表于 2019-7-12 14:59

上周做的一個簡易計算器的仿真，
功能：可以精確小數(shù)點后兩位，還可以進行十六進制，十進制，八進制，二進制轉換

仿真原理圖如下（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,第一個數(shù) b,第二個數(shù) c,得數(shù)
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[]={//運算數(shù)字輸入數(shù)組
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) // 延遲函數(shù)
{
uchar y;
for(z;z>0;z--)
for(y=0;y<110;y++);
}
void write_com(uchar com) // 寫指令函數(shù)
{
rs=0;
P0=com; //com指令付給P0口
delay(5);lcden=1;delay(5); lcden=0;
}
void write_date(uchar date) // 寫數(shù)據(jù)函數(shù)
{
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; //第一個參與運算的數(shù)
b=0; //第二個參與運算的數(shù)
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]; } //按下數(shù)字存儲到a
else//如果按過運算符鍵
{ b=b*10+table[num]; }//按下數(shù)字存儲到b
if(a>100|b>100)bt1=1;
}
else//如果按下的是'/' 除法
{
flag=1; //按下運算符
fuhao=4;//4表示除號已按
}
i=table1[num]; //數(shù)據(jù)顯示做準備
write_date(0x30+i);//顯示數(shù)據(jù)或操作符號
}
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]; //數(shù)據(jù)顯示做準備
write_date(0x30+i);//顯示數(shù)據(jù)或操作符號
}
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]; //數(shù)據(jù)顯示做準備
write_date(0x30+i);//顯示數(shù)據(jù)或操作符號
}
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; //數(shù)字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; //按下等于鍵，根據(jù)運算符號進行不同的算術處理
if(fuhao==1) //加法運算
{
write_com(0x80+0x4f);//按下等于鍵，光標前進至第二行最后一個顯示處
write_com(0x04); //設置從后住前寫數(shù)據(jù)，每寫完一個數(shù)據(jù)，光標后退一格
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); //設置從后住前寫數(shù)據(jù)，每寫完一個數(shù)據(jù)，光標后退一格(這個照理說順序不對，可顯示和上段一樣)
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
}
/*------------------------------------------------
寫入字符串函數(shù)
------------------------------------------------*/
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(); //系統(tǒng)初始化
LCD_Write_String(0,0,q);
LCD_Write_String(0,1,q1);
while(c--);
init(); //系統(tǒng)初始化
while(1)
{
keyscan();//鍵掃描
}
}

復制代碼

所有資料51hei提供下載:

簡易計算器.rar (71.24 KB, 下載次數(shù): 84)

ID:262 · 發(fā)表于 2022-2-27 21:09

喋喋phone 發(fā)表于 2022-2-27 21:02
我仿真怎么沒反應啊？

用Proteus8.8打開就可以了,我?guī)湍戕D成了8.8的格式:

簡易計算器.7z (61.18 KB, 下載次數(shù): 20)

ID:1007108 · 發(fā)表于 2022-2-27 21:02

我仿真怎么沒反應啊？

ID:1007108 · 發(fā)表于 2022-2-27 21:24

heicad 發(fā)表于 2022-2-27 21:09
用Proteus8.8打開就可以了,我?guī)湍戕D成了8.8的格式

我用8.6版本的可以嗎？

ID:1007266 · 發(fā)表于 2022-2-28 15:14

把代碼復制粘貼完運行出錯是怎么回事

ID:1007108 · 發(fā)表于 2022-3-1 21:45

heicad 發(fā)表于 2022-2-27 21:09
用Proteus8.8打開就可以了,我?guī)湍戕D成了8.8的格式:

hex文件可以直接用嗎，為什么我按了按鍵沒反應啊？而且顯示器什么也沒有

ID:1007108 · 發(fā)表于 2022-3-1 23:56

我的仿真怎么跟你的不太一樣啊

ID:262 · 發(fā)表于 2022-3-2 01:03

你去下載我?guī)湍阈薷暮蟮腜roteus文件只能用用Proteus8.8這個版本打開,因為其他版本我也沒有無法測試,然后就是把hex文件要選對

ID:1007108 · 發(fā)表于 2022-3-3 19:43

heicad 發(fā)表于 2022-3-2 01:03
你去下載我?guī)湍阈薷暮蟮腜roteus文件只能用用Proteus8.8這個版本打開,因為其他版本我也沒有無法測試,然后 ...

大佬，好像還是一樣的，lcd屏不顯示東西，按鍵按下去沒有效果

ID:1007108 · 發(fā)表于 2022-3-3 19:46

heicad 發(fā)表于 2022-3-2 01:03
你去下載我?guī)湍阈薷暮蟮腜roteus文件只能用用Proteus8.8這個版本打開,因為其他版本我也沒有無法測試,然后 ...

有用了，謝謝

ID:1126439 · 發(fā)表于 2024-6-22 13:56

請問進制轉換應該怎么操作呢，按了沒有反應呀。是應該算出結果了，再按按鍵。還是計算之前就按呢

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

	地板無效樓層，該帖已經被刪除

wwwxxx国产_337p日本欧洲亚洲大胆张筱雨_免费在线看成人av_日本黄色不卡视频_国产精品成熟老女人_99视频一区_亚洲精品97久久中文字幕_免费精品视频在线_亚洲色图欧美视频_欧美一区二三区

簡易計算器Proteus仿真及單片機源碼