标题: 单片机一位简易计算器程序源代码 [打印本页]
作者: niujia    时间: 2015-7-15 23:17
标题: 单片机一位简易计算器程序源代码
数码管显示部分的原理图：http://www.51hei.com/f/51hei-5.pdf

源代码：

  2. #include<reg52.h>
  3. #define uchar unsigned char
  4. #define uint  unsigned int
  5. sbit wela=P2^7;
  6. sbit dula=P2^6;
  7. uchar code smg_du[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x70,0x40,0x76,0x52};
  8. uchar code smg_we[]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};
  9. uchar dis_smg[6];
  10. uchar flag,num_key,oper,j;
  11. uchar num1,num2,num_i;
  12. uchar scan(void)
  13. {
  14. static uchar i;
  15. uchar num,key;
  16. P3=0x0f;
  17. if(P3!=0x0f)
  18. {
  19.   i++;
  20.   if(i>=7)
  21.   if(flag==0)
  22.   {
  23.    flag=1;
  24.    key=P3|0xf0;
  25.    P3=key;
  26.    switch(P3)
  27.    {
  28.     case 0xee:num=0; break;
  29.     case 0xde:num=1; break;
  30.     case 0xbe:num=2; break;
  31.     case 0x7e:num=3; break;
  32.     case 0xed:num=4; break;
  33.     case 0xdd:num=5; break;
  34.     case 0xbd:num=6; break;
  35.     case 0x7d:num=7; break;
  36.     case 0xeb:num=8; break;
  37.     case 0xdb:num=9; break;
  38.     case 0xbb:num=10;break;
  39.     case 0x7b:num=11;break;
  40.     case 0xe7:num=12;break;
  41.     case 0xd7:num=13;break;
  42.     case 0xb7:num=14;break;
  43.     case 0x77:num=15;break;
  44.    }
  45.   }
  46. }
  47. else {i=0;flag=0;}
  48. return num;
  49. }
  50. void dis_init()
  51. {
  52. dis_smg[0]=smg_du[num_i/10];
  53. dis_smg[1]=smg_du[num_i%10];
  54. dis_smg[2]=0x00;
  55. dis_smg[3]=smg_du[num1%10];
  56. dis_smg[4]=smg_du[j];
  57. dis_smg[5]=smg_du[num2%10];
  58. }
  59. void display()
  60. {
  61. static uchar i;
  62. P0=0x00;
  63. dula=1;
  64. dula=0;
  65. P0=smg_we[i];
  66. wela=1;
  67. wela=0;
  68. P0=dis_smg[i];
  69. dula=1;
  70. dula=0;
  71. i++;
  72. if(i>=6)
  73. i=0;
  74. }
  75. void main()
  76. {
  77. uchar num_key;

  79. while(1)
  80. {
  81.   num_key=scan();
  82.   dis_init();
  83.   display();
  84.   if(num_key<17)
  85.   {
  86.    switch(num_key)
  87.    {
  88.     case 10:num_i=0;oper=0;num1=0;num2=0;j=0;break;
  89.     case 11:
  90.       switch(oper)
  91.        {
  92.        case 0:num1 =num2;break;
  93.        case 1:num_i=num1+num2;break;
  94.        case 2:num_i=num1-num2;break;
  95.        case 3:num_i=num1*num2;break;
  96.        case 4:num_i=num1/num2;break;
  97.        }break;
  98.     case 12:oper=1;j=10;break;
  99.     case 13:oper=2;j=11;break;
  100.     case 14:oper=3;j=12;break;
  101.     case 15:oper=4;j=13;break;
  102.     default :if(num_key<10)
  103.        {
  104.        if(oper==0)
  105.         num1=num_key;
  106.        else
  107.         num2=num_key;
  108.        }
  109.        break;
  110.    }
  111.   }
  112.    
  113. }
  114. }
复制代码



作者: 啦啦啦12138    时间: 2018-6-11 21:03
楼主好 这是简易计算器的全部代码
作者: 孤芳自赏    时间: 2018-6-30 15:34
有电路图吗？



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1