标题: 单片机数码管与按键 Proteus仿真程序 [打印本页]
作者: LHHHY    时间: 2020-6-28 18:21
标题: 单片机数码管与按键 Proteus仿真程序

  1. #include <reg51.h>
  2. #include <intrins.h>
  3. #include <ctype.h>   /*   isdigit()函数   */
  4. #include <stdlib.h>   /*    atoi()函数     */
  5. #define uchar unsigned char
  6. #define uint unsigned int
  7. uchar operand1[9], operand2[9];  /*   操作数   */
  8. uchar operator;      /*   操作符   */
  9. void delay(uint);
  10. uchar keyscan();
  11. void disp(void);
  12. void buf(uint value);
  13. uint compute(uint va1,uint va2,uchar optor);
  14. uchar code table[] = {0xc0,0xf9,0xa4,0xb0,0x99,
  15.     0x92,0x82,0xf8,0x80,0x90,0xff};     /*   字符码表   */
  16. uchar dbuf[8] = {10,10,10,10,10,10,10,10};      /*   显示缓存   */
  17. /*   延时函数   */  
  18. void delay(uint z)
  19. {
  20. uint x,y;
  21. for(x=z;x>0;x--)
  22. for(y=110;y>0;y--);
  23. }

  25. uchar keyscan()
  26. {
  27. uchar skey;                     /*   按键值标记变量    */
  28.    
  29. P1 = 0xfe;
  30. while((P1 & 0xf0) != 0xf0)     /*      有按键按下     */
  31. {
  32.   delay(3);              /*      去抖动延时     */
  33.   while((P1 & 0xf0) != 0xf0) /*      仍有键按下     */
  34.   {
  35.    switch(P1)    /*    识别按键并赋值   */
  36.    {
  37.     case 0xee: skey = '7'; break;
  38.     case 0xde: skey = '8'; break;
  39.     case 0xbe: skey = '9'; break;
  40.     case 0x7e: skey = '/'; break;
  41.      
  42.     default:   skey = '#';
  43.    }
  44.    while((P1 & 0xf0) != 0xf0) /*   等待按键松开   */
  45.     ;
  46.   }
  47. }

  49. P1 = 0xfd;
  50. while((P1 & 0xf0) != 0xf0)
  51. {
  52.   delay(3);
  53.   while((P1 & 0xf0) != 0xf0)
  54.   {
  55.    switch(P1)
  56.    {
  57.     case 0xed: skey = '4'; break;
  58.     case 0xdd: skey = '5'; break;
  59.     case 0xbd: skey = '6'; break;
  60.     case 0x7d: skey = '*'; break;
  61.      
  62.     default:   skey = '#';
  63.    }
  64.    while((P1 & 0xf0) != 0xf0)
  65.     ;
  66.   }
  67. }

  69. P1 = 0xfb;
  70. while((P1 & 0xf0) != 0xf0)
  71. {
  72.   delay(3);
  73.   
  74.   while((P1 & 0xf0) != 0xf0)
  75.   {
  76.    switch(P1)
  77.    {
  78.     case 0xeb: skey = '1'; break;
  79.     case 0xdb: skey = '2'; break;
  80.     case 0xbb: skey = '3'; break;
  81.     case 0x7b: skey = '-'; break;
  82.      
  83.     default: skey = '#';
  84.    }
  85.    while((P1 & 0xf0) != 0xf0)
  86.     ;
  87.   }
  88. }

  90. P1 = 0xf7;
  91. while((P1 & 0xf0) != 0xf0)
  92. {
  93.   delay(3);
  94.   while((P1 & 0xf0) != 0xf0)
  95.   {
  96.    switch(P1)
  97.    {
  98.     case 0xe7: skey = '

  100. ; break;
  101.     case 0xd7: skey = '0'; break;
  102.     case 0xb7: skey = '='; break;
  103.     case 0x77: skey = '+'; break;
  104.      
  105.     default:   skey = '#';
  106.    }
  107.    while((P1 & 0xf0) != 0xf0)
  108.     ;
  109.   }
  110. }
  111. return skey;
  112. }
  113. void main()
  114. {
  115. uint value1, value2, value;     /*    数值1,数值2,结果    */
  116. uchar ckey, cut1 = 0, cut2 = 0;    /*    ckey键盘输入字符    */
  117. uchar operator;                 /*         运算符         */
  118. uchar i, bool = 0;
  119. init:           /*    goto语句定位标签    */
  120. buf(0);                            /*         初始化         */
  121. disp();
  122. value = 0;
  123. cut1 = cut2 = 0;
  124. bool = 0;
  125. for(i = 0;i < 9;i++)
  126. {
  127.   operand1[i] = '\0';
  128.   operand2[i] = '\0';
  129. }                                  /*         初始化         */
  130. while(1)
  131. {
  132.   ckey = keyscan();             /*         读取键盘        */
  133.   if(ckey != '#')
  134.   { /*  isdigit函数，字符是阿拉伯数字返回非0值，否则返回0  */
  135.    if(isdigit(ckey))         
  136.    {
  137.     switch(bool)
  138.     {
  139.      case 0:
  140.        operand1[cut1] = ckey;
  141.        operand1[cut1+1] = '\0';
  142.        value1 = atoi(operand1);  
  143.        cut1++;
  144.        buf(value1);
  145.        disp();
  146.        break;
  147.      case 1:
  148.        operand2[cut2] = ckey;
  149.        operand2[cut2+1] = '\0';
  150.        value2 = atoi(operand2);
  151.        cut2++;
  152.        buf(value2);
  153.        disp();
  154.        break;
  155.       
  156.      default: break;
  157.     }
  158.    }
  159.    else if(ckey=='+'||ckey=='-'||ckey=='*'||ckey=='/')
  160.    {
  161.     bool = 1;
  162.     operator = ckey;
  163.     buf(0);
  164.     dbuf[7] = 10;
  165.     disp();
  166.    }
  167.    else if(ckey == '=')
  168.    {
  169.     value = compute(value1,value2,operator);
  170.     buf(value);
  171.     disp();
  172.     while(1)                    
  173.     {
  174.      ckey = keyscan();
  175.      if(ckey == '

  177. )          /* 如果有清零键按下跳转到开始 */
  178.       goto init;
  179.      else
  180.       {
  181.        buf(value);
  182.        disp();
  183.       }
  184.     }
  185.    }
  186.    else if(ckey == '

  188. )
  189.    { goto init;}
  190.   }
  191.   disp();
  192. }
  193. }
  194. uint compute(uint va1,uint va2,uchar optor)
  195. {
  196. uint value;
  197. switch(optor)
  198. {
  199.   case '+' : value = va1+va2; break;
  200.   case '-' : value = va1-va2; break;
  201.   case '*' : value = va1*va2; break;
  202.   case '/' : value = va1/va2; break;
  203.   
  204.   default :  break;
  205. }
  206. return value;
  207. }
  208. void buf(uint val)
  209. {
  210. uchar i;
  211. if(val == 0)
  212. {
  213.   dbuf[7] = 0;
  214.   i = 6;
  215. }

  217. else
  218.   for(i = 7; val > 0; i--)
  219.   {
  220.    dbuf[i] = val % 10;
  221.    val /= 10;
  222.   }

  224. for( ; i > 0; i--)
  225.   dbuf[i] = 10;
  226. }
  227. void disp(void)
  228. {
  229. uchar bsel, n;

  231. bsel=0x01;
  232.     for(n=0;n<8;n++)
  233.     {
  234.   P2=bsel;
  235.   P0=table[dbuf[n]];
  236.   bsel=_crol_(bsel,1);
  237.   delay(3);
  238.   P0=0xff;
  239.     }
  240. }
复制代码

附件.zip

56.46 KB, 下载次数: 2, 下载积分: 黑币 -5





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