

流水灯

源程序
#include<reg52.h>
#include <intrins.h>
typedef unsigned char uchar;
void delay(uchar t)
{
uchar i=100,j=100,k=100;
while(t--)
{
while(i--)
{
while(j--)
{ while(k--);
}
}
}
}
void main()
{
uchar LED;
LED = 0x7f;
P1 = LED;
while(1)
{
delay(500);
LED = _cror_(LED,1); //点亮下一个LED
P1 = LED;
}
}

数码管的程序:
#include<reg52.h>
#define unchar unsigned char
#define unint unsigned int
unchar code tabol[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,
0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71};
unchar tmap,nmb;
void shuma_key();
unchar keyscan();
sbit P30=P3^0;
sbit P31=P3^1;
sbit P32=P3^2;
sbit P33=P3^3;
sbit D1=P1^0;
sbit D2=P1^1;
sbit D3=P1^2;
sbit D4=P1^3;
sbit P20=P2^0;//位选
sbit P21=P2^1;
sbit P22=P2^2;
sbit P37=P3^7;//段选
void delay(unint z)
{
unint x,y;
for(x=z;x>0;x--)
for(y=210;y>0;y--);
}void main()
{
while(1)
{
keyscan();
shuma_key();
}
}
unchar keyscan()
{
tmap=P3;
tmap=tmap&0x0f;
if(tmap!=0X0f)
delay(10);
{
tmap=tmap&0x0f;
if(tmap!=0X0f)
{
switch(tmap)
{
case 0x0e:nmb=1;
break;
case 0x0d:nmb=2;
break;
case 0x0b:nmb=3;
break;
case 0x07:nmb=4;
break;
}
}
while(tmap!=0x0f)
{
tmap=P3;
tmap=tmap&0x0f;
}
}
return nmb;
}
void shuma_key()
{
if(nmb==1)
{
P2=0X0;
P37=1;
P0=tabol[1];
P37=0;
D1=0;
}
if(nmb==2)
{
P2=0X01;
P37=1;
P0=tabol[2];
P37=0;
D2=0;
}
if(nmb==3)
{
P2=0X02;
P37=1;
P0=tabol[3];
P37=0;
D3=0;
}
if(nmb==4)
{
P2=0X03;
P37=1;
P0=tabol[4];
P37=0;
D4=0;
}
}

回复
有奖活动 | |
---|---|
【EEPW电子工程师创研计划】技术变现通道已开启~ | |
发原创文章 【每月瓜分千元赏金 凭实力攒钱买好礼~】 | |
【EEPW在线】E起听工程师的声音! | |
“我踩过的那些坑”主题活动——第001期 | |
高校联络员开始招募啦!有惊喜!! | |
【工程师专属福利】每天30秒,积分轻松拿!EEPW宠粉打卡计划启动! | |
送您一块开发板,2025年“我要开发板活动”又开始了! | |
打赏了!打赏了!打赏了! |
打赏帖 | |
---|---|
电流检测模块MAX4080S被打赏10分 | |
【我踩过的那些坑】calloc和malloc错误使用导致跑飞问题排查被打赏50分 | |
多组DCTODC电源方案被打赏50分 | |
【我踩过的那些坑】STM32cubeMX软件的使用过程中的“坑”被打赏50分 | |
新手必看!C语言精华知识:表驱动法被打赏50分 | |
【我踩过的那些坑】杜绑线问题被打赏50分 | |
【我踩过的那些坑】STM32的硬件通讯调试过程的“坑”被打赏50分 | |
【我踩过的那些坑】晶振使用的问题被打赏100分 | |
【我踩过的那些坑】电感选型错误导致的处理器连接不上被打赏50分 | |
【我踩过的那些坑】工作那些年踩过的记忆深刻的坑被打赏10分 |