用单片机实现4位数码管动态显示0217。

发布网友 发布时间：2024-03-03 14:11

我来回答

共1个回答

热心网友 时间：2024-04-06 20:34

#include<reg51.h>
#define uchar unsigned char
uchar tab[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71};  //0到f
uchar keyval,num,dis[4],kn=0;

void delay(uchar a)
{
 uchar i,j;
 for(i=0;i<a;i++)
 for(j=0;j<125;j++);
}
uchar kbscan(void)
{
 unsigned char sccode,recode;
 P3=0x0f;  //发0扫描,列线输入
 if ((P3 & 0x0f) != 0x0f)  //有键按下
 {
  delay(20);   //延时去抖动
  if ((P3&0x0f)!= 0x0f)
  {
   sccode = 0xef;    //逐行扫描初值
   while((sccode&0x01)!=0)
   {
       P3=sccode;
    if((P3&0x0f)!=0x0f)
    {
        recode=(P3&0x0f)|0xf0;
     while((P3&0x0f)!=0x0f);//等待键抬起
     return((~sccode)+(~recode));
     }
          else
    sccode=(sccode<<1)|0x01;
   }
  }
 }
 return 0;  //无键按下，返回0
}

void getkey(void)
{
 unsigned char key;
 key=kbscan();
 if(key==0)
 {
 return;
 }
  switch(key)
  {
  case 0x11:keyval=7;break;
  case 0x12:keyval=4;break;
  case 0x14:keyval=1;break;
  case 0x18:keyval=10;break;
  case 0x21:keyval=8;break;
  case 0x22:keyval=5;break;
  case 0x24:keyval=2;break;
  case 0x28:keyval=0;break;
  case 0x41:keyval=9;break;
  case 0x42:keyval=6;break;
  case 0x44:keyval=3;break;
  case 0x48:keyval=11;break;
  case 0x81:keyval=12;break;
  case 0x82:keyval=13;break;
  case 0x84:keyval=14;break;
  case 0x88:keyval=15;break;
  default:keyval=0xff;break;
  }
  dis[kn]=keyval;
  kn++;
  kn%=4;
}
void t0isr() interrupt 1
{
 TH0=(65536-10000)/256;
 TL0=(65536-10000)%256;
 switch(num)
 {
 case 0:P2=0x01;break;
 case 1:P2=0x02;break;
 case 2:P2=0x04;break;
 case 3:P2=0x08;break;
 default:break;
 }
 P0=~tab[dis[num]];
 num++;
 num&=0x03;
}
main()
{
 TMOD=0x01;
 TH0=(65536-10000)/256;
 TL0=(65536-10000)%256;
 TR0=1;
 ET0=1;
 EA=1;
 while(1)
 {
 getkey();
 }
}