找回密碼
 立即注冊(cè)

QQ登錄

只需一步,快速開始

搜索
查看: 1298|回復(fù): 0
打印 上一主題 下一主題
收起左側(cè)

單片機(jī)寫計(jì)算器

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:707448 發(fā)表于 2020-3-13 10:34 | 只看該作者 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式
#include "reg51.h"
char code pos[]={0xE0,0XD0,0XB0,0X70};

char  val[4],n;
char mode=0;
int num=0,num1=0,num2=0;
char opt,innum;                //操作命令,操作次數(shù);

sbit Col1=P1^4;
sbit Col2=P1^5;
sbit Col3=P1^6;
sbit Col4=P1^7;

char keyvalue;

void delay(char n)                  //減速
{
        char i,j;
        for(i=0;i<n;i++)
                for(j=0;j<100;j++)
                ;
}
void main()
{
        TMOD=0X01;
        TH0=(65536-10000)/256;
        TL0=(65536-10000)%256;
        TR0=1;


        EA=1;
        ET0=1;


        IT0=1;
        EX0=1;
        P1=0xf0;
        while(1)
        {
                val[0]=num/1000;
                val[1]=num%1000/100;
                val[2]=num%1000%100/10;
                val[3]=num%10;       
        ;         
        }

}

void u1_func() interrupt  1
{
        TH0=(65536-10000)/256;
        TL0=(65536-10000)%256;
        P2=pos[n]+val[n];
        n++;
        n=n%4;
}

void key_click() interrupt  0
{
        delay(5);
        if(P1!=0xf0)
        {
                EA=0;

                P1=0xfe;                  //1111 1110
                if(Col1==0) keyvalue = 0;
                else if(Col2==0)  keyvalue = 1;
                else if(Col3==0)  keyvalue = 2;
                else if(Col4==0)  keyvalue = 3;
                P1=0xfd;                  //1111 1101
                if(Col1==0) keyvalue = 4;
                else if(Col2==0)  keyvalue = 5;
                else if(Col3==0)  keyvalue = 6;
                else if(Col4==0)  keyvalue = 7;
                P1=0xfb;                  //1111 1011
                if(Col1==0) keyvalue = 8;
                else if(Col2==0)  keyvalue = 9;
                else if(Col3==0)  keyvalue = 10;        //代表*
                else if(Col4==0)  keyvalue = 11;        //代表/
                P1=0xf7;                  //1111 0111
                if(Col1==0) keyvalue = 12;                        //代表+
                else if(Col2==0)  keyvalue = 13;        //代表-
                else if(Col3==0)  keyvalue = 14;        //代表=
                else if(Col4==0)  keyvalue = 15;        //代表AC
                P1=0xf0;
                switch(keyvalue)
                {
                        case 10:  
                        case 11:  
                                num1=num;
                                num=0;
                                opt=keyvalue;
                                innum=0;
                        break;
                        case 12:                                        //+
                        case 13:                                        //-
                                num1=num;
                                num=0;
                                opt=keyvalue;
                                innum=0;
                                break;
                        case 14:                                         //等于
                                        num2=num;
                                        if(opt==12)                                   //+
                                        {
                                                num=num1+num2;
                                                if(num>9999)
                                                {
                                                        num=9999;
                                                }
                                        }
                                        if(opt==13)                                 //-
                                        {
                                                num=num1-num2;
                                                if(num<0)
                                                {
                                                        num=0;
                                                }
                                        }
                                        if(opt==10)                                //*
                                        {
                                                num=num1*num2;
                                                if(num>9999)
                                                {
                                                        num=9999;
                                                }
                                        }
                                        if(opt==11)                                  //除
                                        {
                                                num=num1/num2;
                                                if(num<0)
                                                {
                                                        num=0;
                                                }
                                        }
                                        break;
                        case 15: num=0; break;                //清零
                        default:
                                innum++;
                                if(innum<5)
                                {
                                        num=num*10+keyvalue;
                                }
                                 
                }
        }                                          
        EA=1;       

}

0417.rar

54.16 KB, 下載次數(shù): 4, 下載積分: 黑幣 -5

程序和仿真

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表