找回密码
 立即注册

QQ登录

只需一步,快速开始

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

单个7段数码管段选编码,Proteus仿真

[复制链接]
跳转到指定楼层
楼主
仿真原理图如下(proteus仿真工程文件可到本帖附件中下载)


单片机源程序如下:

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

  9. void Delay_1ms(uint x)

  10. {
  11.     uint i;
  12.     uchar j;
  13.     for(i = 0; i < x; i++) for(j = 0; j <= 148; j++);
  14. }


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

  36. // 功能: 经由 P0 驱动 164,再使得共阳数码管显示 0~F
  37. //参数: k (键盘数值)

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

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

  75. */


复制代码

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


评分

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

查看全部评分

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

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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