[经验分享] 一个流水灯程序

[复制链接]
3494|12
 楼主| wangwo 发表于 2010-4-15 22:38 | 显示全部楼层 |阅读模式
/*间隔300ms先奇数亮再偶数亮,循环三次;一个灯上下循环三次;两个分别从两边往中间流动三次;再从中
间往两边流动三次;8个全部闪烁3次;关闭发光管,程序停止。*/

//P0口位输出口
#include<reg52.h>
#include<intrins.h>
#define uchar unsigned char
#define uint unsigned int

uchar code table[]={0x55,0xaa,0x7f,0x7e,0xbd,0xdb,0xe7};

uchar t,i,j,temp;
void delay(uint z)
{
while(t!=z);
t=0;
}
void main()
{
t=0;
TMOD=0x01;
TH0=(65536-50000)/256;//timer 50ms
TL0=(65536-50000)%256;

EA=1;
ET0=1;
TR0=1;
while(1)
{
  /*间隔300ms先奇数亮再偶数亮,循环三次;一个灯上下循环三次;两个分别从两边往中间流动三次;再从中
间往两边流动三次;8个全部闪烁3次;关闭发光管,程序停止。*/
  for(i=0;i<3;i++)
  {
   temp=table[0];
   P0=temp;
   delay(6);
   temp=table[1];
   P0=temp;
   delay(6);
  }//间隔300ms先奇数亮再偶数亮,循环三次?
   temp=table[2];
    _nop_();
  for(i=0;i<24;i++)
  {
   P0=temp;
   delay(6);
   temp=_cror_(temp,1);
   
  }//一个灯上下循环三次?
//uchar code table[]={0x55,0xaa,0x7f,0x7e,0xbd,0xdb,0xe7};
  for(i=0;i<3;i++)
  {
   for(j=3;j<8;j++)
   {
    P0=table[j];
    delay(6);
   }
  }//liang  bian dao zhong jian
  for(i=0;i<3;i++)
  {
   for(j=6;j>2;j--)
   {
    P0=table[j];
    delay(6);
   }
  }//zhongjian wang liangbian
  for(i=0;i<3;i++)
  {
   P0=0xff;
   delay(6);
   P0=0x00;
   delay(6);
  }   //8个全部闪烁3次
  
  P0=0xff;
  delay(10);
  while(1);
}
}
void timer0() interrupt 1
{
TH0=(65536-50000)/256;
TL0=(65536-50000)%256;
t++;
}
转自:http://www.51hei.com/bbs/dispbbs.asp?boardid=2&id=4025

love_life 发表于 2010-4-16 17:38 | 显示全部楼层
不错,收下了,以后教师弟用:lol
huamunv 发表于 2010-4-16 20:50 | 显示全部楼层
先奇数亮再偶数亮?
chuxh 发表于 2010-4-16 22:31 | 显示全部楼层
网上一抓一大把
chuxh 发表于 2010-4-16 22:32 | 显示全部楼层
网上一抓一大把
yidou 发表于 2010-4-20 21:27 | 显示全部楼层
可以写出很多花样
麻辣鸭脖子 发表于 2010-4-20 21:50 | 显示全部楼层
lpydidi 发表于 2010-4-20 22:40 | 显示全部楼层
很普通的一个程序
puppyJJ 发表于 2010-4-21 09:28 | 显示全部楼层
听说现在已经有LED驱动芯片直接控制流水灯!!
wuyuwu 发表于 2010-4-25 20:45 | 显示全部楼层
很不错,大概看的懂。
god_like 发表于 2010-4-25 21:24 | 显示全部楼层
感觉还行,不错,收下了
孤傲雕 发表于 2010-10-17 06:41 | 显示全部楼层
不错,对于初学者是很好的程序
BG4QJB 发表于 2010-10-30 09:01 | 显示全部楼层
标记一下,昨天刚学到流水灯。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

99

主题

806

帖子

2

粉丝
快速回复 在线客服 返回列表 返回顶部