【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 仿真图：

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

猪开玩笑 · 2014-4-8 13:32:35

卤煮好人一生平安

~♫_SOLO · 2014-5-18 10:26:38

值得参考！好好好好好好好好好好

h1654155175.1303 · 2014-6-17 22:11:51

xiankankanzaishuo,haoma

yangxiaobonihao · 2014-6-18 08:28:26

{:1:}

yy365174541 · 2015-1-4 00:27:53

牛逼！！学习了！！！

唐宋元明清zc · 2015-1-9 16:40:26

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

天涯与海角 · 2016-6-14 10:41:23

谢谢楼主分享

王子 · 2016-6-14 13:08:13

谢谢分享~试试看

Giliable · 2016-7-19 12:44:24

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

路人甲lihu · 2017-4-23 19:30:58

protues仿真图，啊啊啊啊啊啊啊啊

scccx8106 · 2017-4-27 10:23:23

安装结束之前询问是否采用原有Proteus的设置时，一定要选择“No”。大致意思是这样，不记得原文了。
如果重装不再出现这种询问，除了卸载程序，还要删除注册表中有关它的内容。

paghaha · 2017-5-24 16:39:13

感谢分享，在学proteus，看一看

wk750142349 · 2017-5-25 10:39:11

王室佳圌宝　挽救男人圌面子历经５年　重出江湖　强势回归

姜维 · 2017-5-25 10:45:58

感谢分享经验

李山 · 2017-5-27 17:31:33

look.....................

李乐园 · 2017-10-22 17:08:13

看着很不错哦~想学

2017-11-9 21:48:43

dfsfsdfsdfsd

3r32 · 2018-4-15 23:40:56

很好支持一下

fontex · 2018-4-20 08:26:21

好资料,不错,不错!

城之间 · 2018-6-25 14:48:59

期末了什么都不会啊，想找点来混期末考查课真难受

搜索历史

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

相关推荐

50 条评论

评论

精选推荐

站长推荐 /7