【proteus练一练2.14】K1-K4 控制数码管移位显示

proteus

/*  名称：K1-K4  控制数码管移位显示
  说明：按下 K1 时加 1 计数并增加显示位，
   按下 K2 时减 1 计数并减少显示位，
   按下 K3 时清零。
*/
#include
#define uchar unsigned char
#define uint unsigned int
//段码
uchar code DSY_CODE[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0xf
//位码
uchar code DSY_Index[]={0x80,0x40,0x20,0x10,0x08,0x04,0x02,0x01};
//待显示到各数码管的数字缓冲（开始仅在 0 位显示 0，其他黑屏）
uchar Display_Buffer[]={0,10,10,10,10,10,10,10};
//延时
void DelayMS(uint x)
{
uchar i;
while(x--) for(i=0;i<120;i++);
}
void Show_Count_ON_DSY()
{
uchar i;
for(i=0;i<8;i++)
{
  P0=0xff;

P0=DSY_CODE[Display_Buffer];
  P2=DSY_Index;
  DelayMS(2);
}
}
//主程序
void main()
{
uchar i,Key_NO,Key_Counts=0;
P0=0xff;
P1=0xff;
P2=0x00;
while(1)
{
  Show_Count_ON_DSY();
  P1=0xff;
  Key_NO=P1;
  //P1 口按键状态分别为 K1-0xfe，K2-0xfd,K3-0xfb
  switch(Key_NO)
  {
case 0xfe: Key_Counts++;
   if(Key_Counts>8) Key_Counts=8;
   Display_Buffer[Key_Counts-1]=Key_Counts;
   break;
case 0xfd: if(Key_Counts>0)Display_Buffer[--Key_Counts]=10;
   break;
case 0xfb: Display_Buffer[0]=0;
   for(i=1;i<8;i++) Display_Buffer=10;
   Key_Counts=0;
  }
  //若键未释放则仅刷新显示，不进行键扫描
  while(P1!=0xff) Show_Count_ON_DSY();
}
}
proteus 仿真图：

游客
，如果您要查看本帖隐藏内容请回复

tengfei · 2012-2-16 19:52:08

不错的，很好。

李玲枫 · 2012-2-25 13:08:12

看看

xblei · 2012-3-28 08:35:44

很好的例子。多谢啦。

李金 · 2012-4-3 13:29:44

不错的，很好。............

七夜一号 · 2012-4-8 15:57:56

{:soso_e113:}学习

lhqalex · 2012-4-9 16:58:51

很好！！！！！！！！

yann · 2012-4-9 21:51:46

看看怎么样

lyn0103 · 2012-4-20 09:52:08

沒看懂後面按鍵處理部份、、、、

阻力 · 2012-7-21 16:52:50

看看

郭建颖 · 2012-7-23 09:24:28

顶起来

期期2040 · 2012-8-14 16:41:35

正在学习。。。。

爱不在就放手 · 2012-9-23 13:20:51

{:soso_e100:}

lock2012 · 2012-10-29 09:28:15

学习{:soso_e179:}

young1013 · 2012-11-25 16:53:09

能不能一句句地给我们说明一下，读不懂啊~变态的老师还要这样问我们，读到那一句，就给我们多少分。。。

black_humor · 2013-8-23 15:15:30

那个缓冲是什么意思？

武夷山 · 2013-10-24 22:40:20

yefengling · 2013-11-10 14:12:13

谢谢分享。。。

徐飞 · 2013-11-10 17:41:05

需要好好学学！！！！

madaha0010 · 2014-1-17 23:54:52

学习

搜索历史

【proteus练一练2.14】K1-K4 控制数码管移位显示

相关推荐

50 条评论

评论

精选推荐

站长推荐 /7