51單片機32位心形流水燈仿真與程序源碼設(shè)計

ID:387867 · 發(fā)表于 2018-8-19 17:47

51單片機主控的32位心形流水燈仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）

單片機源程序如下:

#include<reg51.h>
#include<intrins.h>
#define uchar unsigned char
#define uint unsigned int
void delay(uchar shu);
void sszzgdl();
void sszzgxm();
void lmtsdl();
void lmtsxm();
void bgdlxh();
void lgbgdlxh();
uchar code shuzhu1[]={0x7f,0x3f,0x1f,0x0f,0x07,0x03,0x01,0x00};
uchar code shuzhu2[]={0xfe,0xfc,0xf8,0xf0,0xe0,0xc0,0x80,0x00};
uchar code shuzhu3[]={0x80,0xc0,0xe0,0xf0,0xf8,0xfc,0xfe,0xff};
uchar code shuzhu4[]={0x01,0x03,0x07,0x0f,0x1f,0x3f,0x7f,0xff};
void main()
{
while(1)
{
sszzgdl();
sszzgxm();
sszzgdl();
sszzgxm();
lmtsdl();
lmtsxm();
lmtsdl();
lmtsxm();
bgdlxh();
lgbgdlxh();
}
}
///////延時函數(shù)///////
void delay(uchar shu)
{
uchar i,j;
for(i=0;i<shu;i++)
for(j=0;j<120;j++);
}
///////順時針逐個點亮/////////
void sszzgdl()
{
uchar i;
for(i=0;i<8;i++)
{
P2=shuzhu1[i];
delay(500);
}
for(i=0;i<8;i++)
{
P3=shuzhu1[i];
delay(500);
}
for(i=0;i<8;i++)
{
P1=shuzhu1[i];
delay(500);
}
for(i=0;i<8;i++)
{
P0=shuzhu2[i];
delay(500);
}
}
///////順時針逐個熄滅/////////
void sszzgxm()
{
uchar i;
for(i=0;i<8;i++)
{
P2=shuzhu3[i];
delay(500);
}
for(i=0;i<8;i++)
{
P3=shuzhu3[i];
delay(500);
}
for(i=0;i<8;i++)
{
P1=shuzhu3[i];
delay(500);
}
for(i=0;i<8;i++)
{
P0=shuzhu4[i];
delay(500);
}
}
///////倆面同時點亮/////////
void lmtsdl()
{
uchar i;
for(i=0;i<8;i++)
{
P2=shuzhu1[i];
P0=shuzhu1[i];
delay(500);
}
for(i=0;i<8;i++)
{
P3=shuzhu1[i];
P1=shuzhu2[i];
delay(500);
}
}
///////倆面同時熄滅/////////
void lmtsxm()
{
uchar i;
for(i=0;i<8;i++)
{
P2=shuzhu3[i];
P0=shuzhu3[i];
delay(500);
}
for(i=0;i<8;i++)
{
P3=shuzhu3[i];
P1=shuzhu4[i];
delay(500);
}
}
///////8個點亮循環(huán)/////////
void bgdlxh()
{
uchar i;
for(i=0;i<8;i++)
{
P2=shuzhu1[i];
delay(500);
}
for(i=0;i<8;i++)
{
P2=shuzhu3[i];
P3=shuzhu1[i];
delay(500);
}
for(i=0;i<8;i++)
{
P3=shuzhu3[i];
P1=shuzhu1[i];
delay(500);
}
for(i=0;i<8;i++)
{
P1=shuzhu3[i];
P0=shuzhu2[i];
delay(500);
}
for(i=0;i<8;i++)
{
P0=shuzhu4[i];
P2=shuzhu1[i];
delay(500);
}
for(i=0;i<8;i++)
{
P2=shuzhu3[i];
P3=shuzhu1[i];
delay(500);
}
for(i=0;i<8;i++)
{
P3=shuzhu3[i];
P1=shuzhu1[i];
delay(500);
}
for(i=0;i<8;i++)
{
P1=shuzhu3[i];
P0=shuzhu2[i];
delay(500);
}
for(i=0;i<8;i++)
{
P0=shuzhu4[i];
delay(500);
}
sszzgdl();
sszzgxm();
}
///////倆個8個點亮循環(huán)/////////
void lgbgdlxh()
{
uchar i;
for(i=0;i<8;i++)
{
P2=shuzhu1[i];
P1=shuzhu1[i];
delay(500);
}
for(i=0;i<8;i++)
{
P2=shuzhu3[i];
P1=shuzhu3[i];
P3=shuzhu1[i];
P0=shuzhu2[i];
delay(500);
}
for(i=0;i<8;i++)
{
P3=shuzhu1[i];
P0=shuzhu4[i];
P2=shuzhu1[i];
P1=shuzhu1[i];
delay(500);
}
for(i=0;i<8;i++)
{
P2=shuzhu3[i];
P1=shuzhu3[i];
P3=shuzhu1[i];
P0=shuzhu2[i];
delay(500);
}
for(i=0;i<8;i++)
{
P3=shuzhu3[i];
P0=shuzhu4[i];
delay(500);
}
}

復(fù)制代碼

Proteus仿真只能用7.5版本:

01 單片機32位流水燈設(shè)計.rar (48.95 KB, 下載次數(shù): 243)

ID:262 · 發(fā)表于 2022-3-28 05:43

元寶66 發(fā)表于 2022-3-28 00:13
您好，您的最后一組燈沒有跑通跑到一半就停止了

這個還是幾年前的老帖,作者當(dāng)時用的是Proteus的老版本做的,我剛用Proteus7.5打開正常,你看我發(fā)的gif

ID:539230 · 發(fā)表于 2019-5-19 13:58

沒有仿真的文件啊

ID:505219 · 發(fā)表于 2019-5-23 23:00

很棒！

ID:486527 · 發(fā)表于 2019-6-24 10:59

不錯

ID:716845 · 發(fā)表于 2020-3-27 14:48

真棒AAAAAA

ID:1013575 · 發(fā)表于 2022-3-28 00:13

您好，您的最后一組燈沒有跑通跑到一半就停止了

帳號		自動登錄	找回密碼
密碼			立即注冊

	5^# 無效樓層，該帖已經(jīng)被刪除

	7^# 無效樓層，該帖已經(jīng)被刪除

	10^# 無效樓層，該帖已經(jīng)被刪除

	11^# 無效樓層，該帖已經(jīng)被刪除

久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

51單片機32位心形流水燈仿真與程序源碼設(shè)計