标题: 单个7段数码管段选编码，Proteus仿真 [打印本页]
作者: longyao    时间: 2017-9-24 14:21
标题: 单个7段数码管段选编码，Proteus仿真
仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


单片机源程序如下:

  2. /*
  3. #include <reg51.h>
  4. #include <intrins.h>
  5. typedef unsigned char uchar;
  6. typedef unsigned int  uint;
  7. sbit DAT = P0^2;
  8. sbit CLK = P0^1;
  9. //////////////

  11. void Delay_1ms(uint x)

  13. {
  14.     uint i;
  15.     uchar j;
  16.     for(i = 0; i < x; i++) for(j = 0; j <= 148; j++);
  17. }


  20. //名称： Keyscan()
  21. //功能： P1外接4×4按键, 用扫描法读出键值
  22. //返回： 按键值0~15/如无键按下, 返回16
  23. //
  24. uchar Keyscan(void)
  25. {
  26.     uchar i, j, temp;
  27.     uchar Buffer[4] = {0xef, 0xdf, 0xbf, 0x7f};
  28.     for(j = 0; j < 4; j++)//循环四次
  29.     {
  30.         P1 = Buffer[j];         //在P1高四位分别输出一个低电平
  31.         temp = 0x01;            //计划先判断P1.0位
  32.         for(i = 0; i < 4; i++) //循环四次
  33.             {
  34.             if(!(P1 & temp))      //从P1低四位，截取1位
  35.             return (i + j * 4); //返回取得的按键值
  36.             temp <<= 1;           //判断的位，左移一位
  37.             }
  38.     }
  39.     return 16;                //判断结束，没有键按下，返回16
  40. }                               //呵呵，实质性的语句不过8行，就是这么简练！

  42. // 功能： 经由 P0 驱动 164，再使得共阳数码管显示 0~F
  43. //参数： k (键盘数值)

  45. void Display(uchar k)
  46. {
  47.     uchar code table[16] = {0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xd8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e}; //共阳段码
  48.     uchar i, j;
  49.     j = table[k];             //取出段码
  50.     for(i = 0; i < 8; i++)  
  51.         {
  52.         DAT = j & 0x01;         //低位在前
  53.         CLK = 0;
  54.         Delay_1ms(1);
  55.         CLK = 1;  
  56.         j >>= 1;
  57.         }
  58. }
  59. /////////////////////////////////////////

  61. void Main(void)
  62. {
  63.     uchar Key_Value = 16, Key_Temp1, Key_Temp2;//两次读出的键值
  64.     P0 = 0xff;
  65.     while(1)
  66.     {
  67.                                           //---------以下读入按键、消抖、等待按键释放
  68.         
  69.         P1 = 0xff;
  70.         Key_Temp1 = Keyscan();          //先读入按键
  71.         if(Key_Temp1 != 16)
  72.             {                           //如果有键按下
  73.             Delay_1ms(10);               //延时一下
  74.             Key_Temp2 = Keyscan();        //再读一次按键
  75.             if (Key_Temp1 == Key_Temp2)
  76.             {                             //必须是两次相等
  77.             Key_Value = Key_Temp1;       //才保存，这就是消除抖动
  78.             Display(Key_Value);          //显示键值                        
  79.             }
  80.         }
  81.     }
  82. }

  84. */


复制代码

所有资料51hei提供下载:
两种4X4按键扫描.rar (113.67 KB, 下载次数: 9)






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