标题: 单片机流星灯程序（拖尾灯）挺好看的 [打印本页]
作者: 323    时间: 2019-4-30 19:10
标题: 单片机流星灯程序（拖尾灯）挺好看的
流星灯（拖尾灯）
现象大概是一排LED上出现拖尾灯，虽然没什么用，但挺好看的……可加在你的任意程序上。
我是用51开发板做的


就这些灯，现象你们下载编译一下就看到了。

单片机源程序如下:
  1. #include<reg52.h>
  2. #define uint unsigned int
  3. #define uchar unsigned char
  4.         uchar abit=16; //流到哪位
  5.         uchar atimer0_n;
  6.         uchar code abit8[9]={1,2,4,8,16,32,64,128,0};
  7.         uchar nn,num;
  8.         char a,b,c,d;
  9.         main()
  10.                 { TMOD=0x01;
  11.                         TH0=(65536-45872)/256;            /////////////////3.00
  12.                         TL0=(65536-45872)%256;
  13.                         EA=1;
  14.                         ET0=1;
  15.                         TR0=1;
  16.                  while(1)
  17.                  {
  18.                   a=abit;
  19.                   if(a>7||a<0)
  20.                   a=8;
  21.                   b=abit-1;
  22.                   if(b>7||b<0)
  23.                    b=8;
  24.                   c=abit-2;
  25.                   if(c>7||c<0)
  26.                    c=8;
  27.                    d=abit-3;
  28.                   if(d>7||d<0)
  29.                    d=8;
  30.                  
  31.                   
  32.                  atimer0_n++;
  33.                  if(atimer0_n==255)
  34.                  atimer0_n=0;
  35.                  if(atimer0_n<5)
  36.                   P1=0xff-abit8[a];
  37.                  if(atimer0_n<40)
  38.                   P1=0xff-abit8[b];
  39.                  if(atimer0_n<150)
  40.                   P1=0xff-abit8[c];
  41.                  if(atimer0_n<255)
  42.                   P1=0xff-abit8[d];
  43.                  }                                                               ///////流星灯
  44.                 }
  45.         void T0_time() interrupt 1
  46.                 {
  47.                 TH0=(65536-45872)/256;
  48.                 TL0=(65536-45872)%256;
  49.                 num++;
  50.                 if(num==3)
  51.                 {
  52.                 num=0;
  53.                 abit--;
  54.                    if(abit==0)
  55.                    abit=16;
  56.                    }}
  57. }
复制代码

所有资料51hei提供下载:
流星灯.rar (547 Bytes, 下载次数: 70)


3.jpg (32.08 KB, 下载次数: 85)

嘻嘻

嘻嘻
作者: 323    时间: 2019-4-30 19:11
大家有问题可以问哈！！
作者: 刚好中意    时间: 2019-7-6 16:24
对于我来说超牛啊，51黑有你更精彩。
作者: 323    时间: 2019-7-25 18:09
刚好中意 发表于 2019-7-6 16:24
对于我来说超牛啊，51黑有你更精彩。

谢谢你，你是第一个夸我的
作者: hzw854025403    时间: 2020-4-20 11:06
厉害啊，代码这么少
作者: 放肆的小红    时间: 2020-5-6 11:28
51有你更精彩
作者: 三三两两在离别    时间: 2020-5-22 10:10
楼主，有proteus的仿真图吗
作者: 心羽家电    时间: 2020-5-22 19:49
感谢楼主 已在开发板上试验过啦！太感谢啦！
作者: yechuan220    时间: 2020-5-22 22:01
厉害啊，代码这么少，感谢楼主
作者: 夏一    时间: 2020-5-23 10:23
下载了，发现里面空荡荡的



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1