51单片机开发板程序（数码管和矩阵键盘和流水灯的组合） -

标题: 51单片机开发板程序（数码管和矩阵键盘和流水灯的组合） [打印本页]

作者: OUYTYI 时间: 2019-7-22 22:13
标题: 51单片机开发板程序（数码管和矩阵键盘和流水灯的组合）
本帖最后由 OUYTYI 于 2019-7-26 10:12 编辑

用数码管的前两位显示一个十进制数，，变化范围为00~59，开始时显示00，每按下S2键一次，数值加1，LED灯随之往下移动一个单位；每按下S3键一次，数值减一，LED灯往上移动一个单位；每按下S4键一次，数值归零，LED灯回到初始位置；按下S5键一次，利用定时器功能使数值开始自动每秒加1，同时LED灯每隔一秒由上往下再由下往上的循环移动，再次按下S5键，数值停止自动加1，保持显示原数，LED灯停止移动。

单片机源程序如下:
#include<reg52.h>
#include<intrins.h>
#include<intrins.h>
#define uchar unsigned char
#define uint unsigned int
sbit key1=P3^4;
sbit key2=P3^5;
sbit key3=P3^6;
sbit key4=P3^7;
sbit dula=P2^6;
sbit wela=P2^7;
uchar code table[]={
0x3f,0x06,0x5b,0x4f,
0x66,0x6d,0x7d,0x07,
0x7f,0x6f,0x77,0x7c,
0x39,0x5e,0x79,0x7c};
void delayms(uint);
uchar num0,num,aa,flag,flag1;
void display(uint num)
{
uint shi,ge;
shi=num/10;
ge=num%10;
dula=1;
P0=table[shi];
dula=0;
P0=0xff;
wela=1;
P0=0xfe;
wela=0;
delayms(5);
dula=1;
P0=table[ge];
dula=0;
P0=0xff;
wela=1;
P0=0xfd;
wela=0;
delayms(5);
}
void delayms(uint xms)
{
uint i,j;
for(i=xms;i>0;i--)
   for(j=110;j>0;j--);
}
void init()
{
TMOD=0x01;
TH0=(65536-45872)/256;
TL0=(65536-45872)%256;
EA=1;
ET0=1;
}
void keyscans()
{
if(key1==0)
{
   delayms(10);
  if(key1==0)
  {
aa=_crol_(aa,1);
P1=aa;
num++;
if(num==60)
      num=0;
while(!key1);
  }
}
if(key2==0)
{
   delayms(10);
  if(key2==0)
  {
aa=_cror_(aa,1);
P1=aa;
if(num==0)
   num=60;
num--;
while(!key2);
  }
}
  if(key3==0)
  {
delayms(10);
if(key3==0)
{
   aa=0xfe;
   P1=aa;
   num=0;
while(!key3);
}
  }
  if(key4==0)
  {
delayms(10);
if(key4==0)
{
   while(!key4);
TR0=~TR0;
}
   }
}
void main()
{
init();
aa=0xfe;
flag1=1;
flag=0;
P1=aa;
while(1)
{
   keyscans();
  display(num);
}
}
void T0_time()interrupt 1
{
TH0=(65536-45872)/256;
TL0=(65536-45872)%256;
num0++;
if(num0==20)
{
   num0=0;
  num++;
  if(num==60)
   num=0;
  flag1=~flag1;
   if(flag==0)
{
   aa=_crol_(aa,1);
P1=aa;
if(aa==0x7f){flag=~flag;aa=0x7f;}
}
else
{
aa=_cror_(aa,1);
P1=aa;
if(aa==0xfe){flag=~flag;aa=0xfe;}
}
}
}

0752380802020740be1e9b7c.jpg (802.18 KB, 下载次数: 14)

作者: admin 时间: 2019-7-23 17:23
本帖需要重新编辑补全电路原理图,源码,详细说明与图片即可获得100+黑币(帖子下方有编辑按钮)

欢迎光临 (http://www.51hei.com/bbs/)