找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 2556|回复: 0
打印 上一主题 下一主题
收起左侧

STC89单片机简单版超级计算器程序

  [复制链接]
跳转到指定楼层
楼主
自己写了个简单版的超级计算器程序,只能实现最多五位整数的加减乘除,而且不可以用于负数的运算,仅仅用于参考。
制作出来的实物图如下:


单片机源程序如下:
  1. #include<reg52.h>
  2. #include "matrixkey.h"
  3. #include "tm1638.h"
  4. /*制作一个简易计算器。 要求: a. 实现两个数字的 100 以内加减乘除,结果只保留整数即可;
  5. b. 先输入一个数字,下运算符按键时,数码管清零,然后输入下一个 数字,按下等于号按键后,显示运算结果。
  6. 并且,中间若出现输入错 误,可以利用删除按键,进行一位一位地删除更改。*/
  7. #define u8 unsigned char
  8. #define u16 unsigned int
  9. u8 code distab[17] = {0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71,0x40};
  10. u8 DYGSS[8];//第一个数
  11. u8 DEGSS[8];//第二个数
  12. u16 dygs;//第一个数
  13. u16 degs;//第二个数
  14. u16 result;//结果
  15. u8 state;  //state分为1 2 3
  16. u8 jisuan;//jisuan分为 1 2 3 4 加减乘除
  17. u8 weishu1=0;//第一个数的位数
  18. u8 weishu2=0;//第二个数的位数
  19. u8 hym;//hym为按键件吗
  20. void Init_Tab();
  21. void Input_dygs();//输入第一个数
  22. void Input_degs();//输入第二个数DYGS
  23. void Tuige(u8 len,u8 *P);
  24. void Endline();//显示结果
  25. void Display(u8 len,u8 *P);//显示中途
  26. u16 Calculate();//计算
  27. void CLRTAB();
  28. void Init_Tab();
  29. void main()
  30. {
  31. //        u8 i;//万能变量
  32.         init_TM1638();
  33.         while(1)
  34.         {
  35.                 Init_Tab();
  36.                 Input_dygs();
  37.                 Input_degs();
  38.                 Endline();
  39.         }
  40. }

  41. void Input_dygs()//输入第一个数
  42. {
  43.         while(state==1)
  44.         {
  45.                         hym=Keyscan();
  46.                         if(hym!=88)
  47.                         {
  48.                                 if(hym<=9)
  49.                                 {
  50.                                         weishu1++;
  51.                                         DYGSS[weishu1]=DYGSS[weishu1-1];
  52.                                         DYGSS[weishu1-1]=hym;
  53.                                 }
  54.                                 if(hym==10)
  55.                                 {
  56.                                         weishu1--;
  57.                                                 CLRTAB();
  58.                                 }
  59.                                 switch(hym)
  60.                                 {
  61.                                         case 12:jisuan=1;state=2;break;
  62.                                         case 13:jisuan=2;state=2;break;
  63.                                         case 14:jisuan=3;state=2;break;
  64.                                         case 15:jisuan=4;state=2;break;
  65.                                         default:break;
  66.                                 }
  67.                         }
  68.                         Display(weishu1,DYGSS);
  69.         }
  70.         CLRTAB();
  71. }

  72. void Input_degs()//输入第二个数DYGS
  73. {
  74.         while(state==2)
  75.         {
  76.                         hym=Keyscan();
  77.                         if(hym!=88)
  78.                         {
  79.                                 if(hym<=9)
  80.                                 {
  81.                                         weishu2++;
  82.                                         DEGSS[weishu2]=DEGSS[weishu2-1];
  83.                                         DEGSS[weishu2-1]=hym;
  84.                                 }
  85.                                 if(hym==10)
  86.                                 {
  87.                                         weishu2--;
  88.                                                 CLRTAB();
  89.                                 }
  90.                                 if(hym==11)
  91.                                 {
  92.                                         state=3;
  93.                                         result=Calculate();
  94.                                 }
  95.                         }
  96.                         Display(weishu2,DEGSS);
  97.         }
  98.         CLRTAB();
  99. }

  100. void Tuige(u8 len,u8 *P)
  101. {
  102.         len--;
  103.         P[len]=0;
  104. }
  105. void Endline()//显示结果
  106. {
  107.         while(state==3)
  108.         {
  109.                 hym=Keyscan();
  110.                 if(hym==10)
  111.                 {
  112.                         state=1;
  113.                 }
  114.                 Write_DATA(3*2,distab[result/10000]);
  115.                 Write_DATA(4*2,distab[result%10000/1000]);
  116.                 Write_DATA(5*2,distab[result%1000/100]);
  117.                 Write_DATA(6*2,distab[result%100/10]);
  118.                 Write_DATA(7*2,distab[result%10]);
  119.         }
  120.         CLRTAB();
  121. }

  122. void Display(u8 len,u8 *P)//显示中途
  123. {
  124.         u8 i;
  125.         for(i=0;i<len;i++)
  126.         {
  127.                 Write_DATA((7-i)*2,distab[P[len-1-i]]);
  128.         }
  129. }

  130. u16 Calculate()//计算
  131. {
  132.         u8 i;
  133.         u16 hymm;
  134.         for(i=0;i<weishu1;i++)
  135.         {
  136.                 dygs+=DYGSS[i];
  137.                 dygs*=10;
  138.         }
  139.         for(i=0;i<weishu2;i++)
  140.         {
  141.                 degs+=DEGSS[i];
  142.                 degs*=10;
  143.         }
  144.         dygs/=10;
  145.         degs/=10;
  146.         switch(jisuan)
  147.         {
  148.                 case 1:hymm=dygs+degs;break;
  149.                 case 2:hymm=dygs-degs;break;
  150.                 case 3:hymm=dygs*degs;break;
  151.                 case 4:hymm=dygs/degs;break;
  152.         }
  153.         return hymm;
  154. }

  155. void CLRTAB()
  156. {
  157.         u8 ii;
  158.         for(ii=0;ii<8;ii++)
  159. ……………………

  160. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有程序51hei提供下载:
简单版计算器.zip (44.35 KB, 下载次数: 28)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励!

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏6 分享淘帖 顶2 踩1
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表