標(biāo)題:
單片機(jī)按鍵控制八位流水燈的程序設(shè)計(jì) 雙燈一起從上到下點(diǎn)亮 不斷循環(huán) 依次從上到下...
[打印本頁(yè)]
作者:
hoshina
時(shí)間:
2022-12-30 22:04
標(biāo)題:
單片機(jī)按鍵控制八位流水燈的程序設(shè)計(jì) 雙燈一起從上到下點(diǎn)亮 不斷循環(huán) 依次從上到下...
該設(shè)計(jì)使用keil和proteus軟件共同實(shí)現(xiàn)。設(shè)計(jì)了四種按鍵
實(shí)現(xiàn)依次從上到下逐個(gè)點(diǎn)亮的流水燈效果,并循環(huán)進(jìn)行。
實(shí)現(xiàn)從下到上依次點(diǎn)亮,全部點(diǎn)亮后,全滅,并開始下次循環(huán)。
實(shí)現(xiàn)雙燈一起從上到下點(diǎn)亮,并不斷循環(huán)。
實(shí)現(xiàn)熄滅所有的燈。
并非采用數(shù)組法,希望可以啟發(fā)大家一些其他思路。
仿真原理圖如下(proteus仿真工程文件可到本帖附件中下載)
2.png
(54.47 KB, 下載次數(shù): 36)
下載附件
2022-12-30 22:20 上傳
單片機(jī)源程序如下:
#include <reg52.h>
#define uchar unsigned char
#define uint unsigned int
sbit L1=P1^0;
sbit L2=P1^1;
sbit L3=P1^2;
sbit L4=P1^3;
sbit L5=P1^4;
sbit L6=P1^5;
sbit L7=P1^6;
sbit L8=P1^7;
void delay(uint n)
{
uchar i;
uint j;
for(j=0;j<n;j++)
for(i=0;i<123;i++);
}
void flash0()
{
delay(500);
}
void flash1()
{
L1=0;
delay(500);
}
void flash2()
{
L2=0;
delay(500);
}
void flash3()
{
L3=0;
delay(500);
}
void flash4()
{
L4=0;
delay(500);
}
void flash5()
{
L5=0;
delay(500);
}
void flash6()
{
L6=0;
delay(500);
}
void flash7()
{
L7=0;
delay(500);
}
void flash8()
{
L8=0;
delay(500);
}
void flash9()
{
L1 = 0;
L2 = 0;
delay(500);
}
void flash10()
{
L3 = 0;
L4 = 0;
delay(500);
}
void flash11()
{
L5 = 0;
L6 = 0;
delay(500);
}
void flash12()
{
L7 = 0;
L8 = 0;
delay(500);
}
void flash13()
{
L8 = 0;
delay(500);
}
void flash14()
{
L7 = 0;
L8 = 0;
delay(500);
}
void flash15()
{
L6 = 0;
L7 = 0;
L8 = 0;
delay(500);
}
void flash16()
{
L5 = 0;
L6 = 0;
L7 = 0;
L8 = 0;
delay(500);
}
void flash17()
{
L4 = 0;
L5 = 0;
L6 = 0;
L7 = 0;
L8 = 0;
delay(500);
}
void flash18()
{
L3 = 0;
L4 = 0;
L5 = 0;
L6 = 0;
L7 = 0;
L8 = 0;
delay(500);
}
void flash19()
{
L2 = 0;
L3 = 0;
L4 = 0;
L5 = 0;
L6 = 0;
L7 = 0;
L8 = 0;
delay(500);
}
void flash20()
{
L1 = 0;
L2 = 0;
L3 = 0;
L4 = 0;
L5 = 0;
L6 = 0;
L7 = 0;
L8 = 0;
delay(500);
}
void main (void)
{
bit dir=0,run=0,cit=0;
char i;
while(1)
{
switch(P0 & 0x0f)
{
case 0x0e:run=1,dir=1,cit=1;break;
case 0x0d:run=1,dir=1,cit=0;break;
case 0x0b:run=1,dir=0;break;
case 0x07:run=0;break;
}
if(run)
if(dir)
if(cit)
{
delay(500);
flash1();
flash2();
flash3();
flash4();
flash5();
flash6();
flash7();
flash8();
P1=0xff;
}
else
{
delay(500);
flash13();
flash14();
flash15();
flash16();
flash17();
flash18();
flash19();
flash20();
P1=0xff;
}
else
{
delay(500);
flash9();
flash10();
flash11();
flash12();
P1=0xff;
}
else P2=0xff;
}
;
;
;
}
復(fù)制代碼
Keil代碼與Proteus仿真下載:
LED.zip
(67.57 KB, 下載次數(shù): 20)
2022-12-30 22:01 上傳
點(diǎn)擊文件名下載附件
下載積分: 黑幣 -5
歡迎光臨 (http://www.torrancerestoration.com/bbs/)
Powered by Discuz! X3.1