標題: STC89單片機簡單版超級計算器程序 [打印本頁]
作者: 天藍色的Toto    時間: 2020-11-16 20:44
標題: STC89單片機簡單版超級計算器程序
自己寫了個簡單版的超級計算器程序，只能實現(xiàn)最多五位整數(shù)的加減乘除，而且不可以用于負數(shù)的運算，僅僅用于參考。
制作出來的實物圖如下：


單片機源程序如下:
  1. #include<reg52.h>
  2. #include "matrixkey.h"
  3. #include "tm1638.h"
  4. /*制作一個簡易計算器。 要求： a. 實現(xiàn)兩個數(shù)字的 100 以內(nèi)加減乘除，結(jié)果只保留整數(shù)即可；
  5. b. 先輸入一個數(shù)字，下運算符按鍵時，數(shù)碼管清零，然后輸入下一個 數(shù)字，按下等于號按鍵后，顯示運算結(jié)果。
  6. 并且，中間若出現(xiàn)輸入錯 誤，可以利用刪除按鍵，進行一位一位地刪除更改。*/
  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];//第一個數(shù)
  11. u8 DEGSS[8];//第二個數(shù)
  12. u16 dygs;//第一個數(shù)
  13. u16 degs;//第二個數(shù)
  14. u16 result;//結(jié)果
  15. u8 state;  //state分為1 2 3
  16. u8 jisuan;//jisuan分為 1 2 3 4 加減乘除
  17. u8 weishu1=0;//第一個數(shù)的位數(shù)
  18. u8 weishu2=0;//第二個數(shù)的位數(shù)
  19. u8 hym;//hym為按鍵件嗎
  20. void Init_Tab();
  21. void Input_dygs();//輸入第一個數(shù)
  22. void Input_degs();//輸入第二個數(shù)DYGS
  23. void Tuige(u8 len,u8 *P);
  24. void Endline();//顯示結(jié)果
  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. }

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

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

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

  126. void Display(u8 len,u8 *P)//顯示中途
  127. {
  128.         u8 i;
  129.         for(i=0;i<len;i++)
  130.         {
  131.                 Write_DATA((7-i)*2,distab[P[len-1-i]]);
  132.         }
  133. }

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

  161. void CLRTAB()
  162. {
  163.         u8 ii;
  164.         for(ii=0;ii<8;ii++)
  165. ……………………

  167. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼

所有程序51hei提供下載:
簡單版計算器.zip (44.35 KB, 下載次數(shù): 29)





歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1