单片机6按键控制16位心形流水灯Proteus仿真程序

ID:1076180 · 发表于 2023-5-8 22:20

6个按键，每一个按键代表一个花型，附带Proteus仿真

仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）

单片机源程序如下:

/*
名称：LED流水灯实验
LED接口：LED0-7--------P2
LED8-16-------P3
KEY1--------P1.0
KEY2--------P1.1
KEY3--------P1.2
KEY4--------P1.3
KEY5--------P1.4
用按键扫描和查表法实现花式流水灯，一次只能闭合一个按键
*/
# include <reg52.h>
# define uchar unsigned char
# define uint unsigned int
uchar i,flag1,flag2,flag3,flag4,flag5,flag6;
/******************* 定义按键 *****************************/
sbit k1=P1^0;
sbit k2=P1^1;
sbit k3=P1^2;
sbit k4=P1^3;
sbit k5=P1^4;
sbit k6=P1^7;
/************************ 流水灯花样设计 ********************/
/***********外圈依次亮********/
uchar table1_1[]={0xef,0xfe,0xfd,0xfb,0xf7,0x7f};
uchar table1_2[]={0xf7,0x7f,0xbf,0xdf,0xef,0xfe};
/*****内圈依次点亮 */
uchar table2_1[]={0xdf,0xbf};
uchar table2_2[]={0xfb,0xfd};
/******* 间隔一个循环点亮 ********/
uchar table3_1[]={0xfe,0xfb,0xef,0xbf};
uchar table3_2[]={0xfd,0xf7,0xdf,0x7f};
/*********第一行到第四行闪烁*************/
uchar table4_1[]={0xf0,0xff,0xf0,0xff,0xf0,0xff};
uchar table4_2[]={0x0f,0xff,0x0f,0xff};
uchar table4_3[]={0xf0,0xff,0xf0,0xff,0xf0,0xff,0xf0,0xff};
uchar table4_4[]={0x0f,0xff};
/*********16位流水灯**********/
uchar table5_1[]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};
/**********全亮全灭交替*******/
uchar table6_1[]={0x00};
uchar table6_2[]={0xff};
/********************* 延时程序 ****************************/
void delay(uint x)
{
uint i;
while(x--)
for(i=50;i>0;i--);
}
//delay(1000)为1s
/****************** 判断按键 ***********************/
void keyscan()
{ if(k1==0) //K1按下
{delay(10);
if(k1==0)
{
flag6=0;
flag2=0;
flag3=0;
flag4=0;
flag1=1;
flag5=0;
}
}
if(k2==0){ //K2按下
delay(10);
if(k2==0){
flag3=0;
flag1=0;
flag4=0;
flag5=0;
flag6=0;
flag2=1;
}
}
if(k3==0){ //K3按下
delay(10);
if(k3==0){
flag1=0;
flag2=0;
flag4=0;
flag5=0;
flag6=0;
flag3=1;
}
}
if(k4==0){ //K4按下
delay(10);
if(k4==0){
flag5=0;
flag6=0;
flag1=0;
flag2=0;
flag3=0;
flag4=1;
}
}
if(k5==0){ //K5按下
delay(10);
if(k5==0){
flag1=0;
flag2=0;
flag3=0;
flag4=0;
flag6=0;
flag5=1;
}
}
if(k6==0){ //K6按下
delay(10);
if(k6==0){
flag1=0;
flag2=0;
flag3=0;
flag4=0;
flag5=0;
flag6=1;
}
}
}
/************** 主程序 ************************/
void main()
{
P3=0xff;
P2=0xff;
while(1)
{keyscan();
//按下按键1
if(flag1==1)
{
P3=0xff;
for(i=0;i<6;i++)
{
P2=table1_1[i];
delay(1000);
keyscan();
}
P2=0xff;
for(i=0;i<6;i++)
{
P3=table1_2[i];;
delay(1000);
keyscan();
}
P3=0xff;
}
//按下按键2
if(flag2==1)
{
P3=0xff;
for(i=0;i<2;i++)
{
P2=table2_1[i];
delay(2000);
keyscan();
}
P2=0xff;
for(i=0;i<2;i++)
{
P3=table2_2[i];
delay(2000);
keyscan();
}
}
//*****当按下第三个按键****
if(flag3==1)
{ P3=0xff;
for(i=0;i<4;i++)
{
P2=table3_1[i];
delay(1000);
keyscan();
} P2=0xff;
for(i=0;i<4;i++)
{
P3=table3_1[i];
delay(1000);
keyscan();
}
P2=0xff;
P3=0xff;
for(i=0;i<4;i++)
{
P2=table3_2[i];
delay(1000);
keyscan();
}
P2=0xff;
for(i=0;i<4;i++)
{
P3=table3_2[i];
delay(1000);
keyscan();
}
}
//按下第四个按键
if(flag4==1)
{
P3=0xff;
P2=0xff;
for(i=0;i<6;i++)
{
P2=table4_1[i];
delay(1000);
keyscan();
}
for(i=0;i<4;i++)
{
P2=table4_2[i];
delay(1000);
keyscan();
}
for(i=0;i<10;i++)
{
P3=table4_3[i];
delay(1000);
keyscan();
}
P3=table4_4[0];
}
//按下第五个按键
if(flag5==1)
{
P3=0xff;
for(i=0;i<8;i++)
{
P2=table5_1[i];
delay(1000);
keyscan();
}
P2=0xff;
for(i=0;i<8;i++)
{
P3=table5_1[i];
delay(1000);
keyscan();
}
P3=0xff;
}
//按下第六个按键
if(flag6==1)
{
P2=0xff;
P3=0xff;
for(i=0;i<1;i++)
{
P2=table6_1[i];
P3=table6_1[i];
delay(1000);
keyscan();
}
for(i=0;i<1;i++)
{
P2=table6_2[i];
P3=table6_2[i];
delay(1000);
keyscan();
}
}
}
}

复制代码

Keil代码与Proteus仿真下载:

4按键控制16LED流水灯.zip (127.5 KB, 下载次数: 41)

帐号		自动登录	找回密码
密码			立即注册

单片机6按键控制16位心形流水灯Proteus仿真程序

评分