找回密码
 立即注册

QQ登录

只需一步,快速开始

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

单片机按键控制数码管加减数字演示仿真+程序 点不亮

[复制链接]
跳转到指定楼层
楼主
ID:213546 发表于 2017-7-12 22:01 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
51单片机做的k1-k4按键控制数码管加减演示仿真+程序

仿真原理图如下(proteus仿真工程文件可到本帖附件中下载):


单片机源程序如下:
  1. #include <reg52.h>
  2. #include <intrins.h>
  3. #define uchar unsigned char
  4. #define uint unsigned int

  5. uchar code DSY_CODE[]=
  6. {
  7.          0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0xff
  8. };
  9. uchar Num_Buffer[] = {0,0,0};
  10. uchar Key_Code,Key_Counts=0;

  11. void DelayMS(uint x)
  12. {
  13.          uchar t;
  14.         while(x--)
  15.         {
  16.                  for(t=0;t<120;t++);
  17.         }
  18. }

  19. void Show_Counts_ON_DSY()
  20. {
  21.          uchar i,j=0x01;
  22.         Num_Buffer[2]=Key_Counts/100;
  23.            Num_Buffer[1]=Key_Counts/10%10;
  24.         Num_Buffer[0]=Key_Counts%10;
  25.         for(i=0;i<3;i++)
  26.         {
  27.                  j = _cror_(j,1);
  28.                 P2 = j;
  29.                 P0 = DSY_CODE[Num_Buffer[i]];
  30.                 DelayMS(1);
  31.         }
  32. }

  33. void main()
  34. {
  35.          uchar i;
  36.         P0 = 0xff;
  37.         P1 = 0xff;
  38.         P2 = 0x00;
  39.         Key_Code = 0xff;
  40.         while(1)
  41.         {
  42.                  Show_Counts_ON_DSY();
  43.                 P1 = 0xff;
  44.                 Key_Code = P1;
  45.                 if(Key_Code != 0xff)
  46.                 {
  47.                         for(i=0;i<30;i++)
  48.                         {
  49.                                  Show_Counts_ON_DSY();
  50.                         }
  51.                 }
  52. ……………………

  53. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
K1-K4 控制数码管加减演示.7z (22.72 KB, 下载次数: 116)


评分

参与人数 2黑币 +55 收起 理由
qjzyx + 5 赞一个!
admin + 50 共享资料的黑币奖励!

查看全部评分

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

使用道具 举报

沙发
ID:421189 发表于 2019-6-16 17:41 | 只看该作者
那啥,楼主,我想说的是,你的proteus文件发错了,你放了一个快捷方式proteusDNS,我们需要的是proteus project文件形式
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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