找回密码
 立即注册

QQ登录

只需一步,快速开始

帖子
查看: 12502|回复: 10
收起左侧

旋转LED时钟(指针版)

  [复制链接]
ID:104835 发表于 2016-2-3 23:08 | 显示全部楼层 |阅读模式
本帖最后由 51黑科技 于 2016-2-3 23:13 编辑

旋转LED时钟简介

主要材料:

电动机,发光二极管,锁存器(74HC573),单片机(89s51),红外发射管,红外接收管,电池。

时钟显示原理:

电动机带动焊有一排LED的电路板旋转,单片机通过红外管测得电路板转一圈的时间,然后将时间分割,在每个分割点让不同的发光二极管显示,利用人眼视觉暂留,看上去就像一个时钟。

另外有旋转LED显示数字的程序:http://www.51hei.com/bbs/dpj-43385-1.html

效果图:

源程序:

#include<reg51.h>

sbit a1=P2^0;

sbit a2=P2^1;

sbit a3=P2^2;


int shi,fen,miao,i=0,ii=0;

unsigned int a=0,th,tl,q=0,aa=0,aaa=0;  

void main(void)

{

      int x,y;

      TMOD=0x11;

      EA=1;

      EX0=1;

      ET0=1;

      ET1=1;

      IT0=1;

      shi=7,fen=20,miao=0;

      while(1)

      {

           for(x=300;x>=0;x--)

                 for(y=150;y>=0;y--)

                 {

                      P1=0xff;

                      P2=0xff;                          

                      P2=0x00;


                      P1=0xff;

                      a3=1;

                      P1=0xfc;

                      P1=0xff;   

                      a3=0;

                 }

           miao++;

           if(miao==61)

           {

                 miao=1;

                fen++;

           }

           if(fen==60)

           {

                 fen=0;

                 shi++;

           }

      }

}


void i0() interrupt 0

{

      int k;

      unsigned int b,q;  

      TR0=1;



      q=(TH0*0x100+TL0)/62;


      a=q/0x100;


      b=q-(q/0x100)*0x100;

      th=0xff-a;

      tl=0xff-b;        


/*   a=TH0;

      b=TL0;

      th=0x100-((a*256+b)/49)/256;

      tl=0x100-((a*256+b)/49)%256;          */


      TH1=th;               

      TL1=tl;

      TR1=1;

      TH0=0x00;

      TL0=0x00;                             

      i=0;

      P1=0xff;

      P2=0xff;                          

      P2=0x00;

      k=3;

      P1=0xff;

      a1=1;

      P1=0x0f;

      while(k--);

      P1=0xff;   

      a1=0;

}


void i1(void) interrupt 1

{


      TH0=0x00;

      TL0=0x00;

}


void i3(void) interrupt 3

{

      int k=3,q1,q2,q3;

      long chen;

      TH1=th;

      TL1=tl;


      i++;


      P1=0xff;

      P2=0xff;                          

      P2=0x00;   

      if(i%15==0)

      {

           P1=0xff;                     

           a1=1;

           P1=0x0f;

           while(k--);

           P1=0xff;   

           a1=0;

      }

      else if(i%5==0)

      {

           P1=0xff;

           a1=1;

           P1=0x1f;

           while(k--);

           P1=0xff;   

           a1=0;

      }

      else

      {

           P1=0xff;

           a1=1;

           P1=0x7f;

           while(k--);

           P1=0xff;   

           a1=0;

      }

      k=3;

      if(i==miao)           

      {

           k=3;

           P1=0xff;

           a1=1;

           P1=0xf8;

           while(k--);

           P1=0xff;   

           a1=0;

           k=3;

           P1=0xff;

           a2=1;

           P1=0x00;

           while(k--);

           P1=0xff;   

           a2=0;

           k=3;

           P1=0xff;

           a3=1;

           P1=0x00;

           while(k--);

           P1=0xff;   

           a3=0;

      }

      else if(i==fen)

      {

           k=3;                                                                  

           P1=0xff;

           a2=1;

           P1=0xc0;

           while(k--);

           P1=0xff;   

           a2=0;

           k=3;

           P1=0xff;

           a3=1;

           P1=0x00;

           while(k--);

           P1=0xff;   

           a3=0;

      }

      else if(i==(shi*5)+2     )

      {

           k=3;

           P1=0xff;

           a3=1;

           P1=0x00;

           while(k--);

           P1=0xff;   

           a3=0;

      }

      else if(i==(shi*5)+1||i==(shi*5)+3)

      {

           k=1;

           P1=0xff;

           a3=1;

           P1=0xbf;

           while(k--);

           P1=0xff;   

           a3=0;

      }

}     





回复

举报

ID:29972 发表于 2016-2-12 09:31 | 显示全部楼层
佩服!楼主春节快乐!
回复

举报

ID:141444 发表于 2016-11-18 09:26 来自触屏版 | 显示全部楼层
楼主有没有原理图??
回复

举报

ID:194752 发表于 2017-5-25 21:44 | 显示全部楼层
楼主。。。放个原理图吧。。。我刚想做这个东东呢。。。拜托拜托~~~~
回复

举报

ID:207025 发表于 2017-6-2 11:33 | 显示全部楼层
单片机供电是如何实现的呢?无线供电吗?
回复

举报

ID:183120 发表于 2017-6-3 20:18 | 显示全部楼层
楼主放个原理图啦
回复

举报

ID:220216 发表于 2017-7-18 15:42 | 显示全部楼层
同求原理图
回复

举报

ID:226881 发表于 2017-8-11 10:50 | 显示全部楼层
好程序
回复

举报

ID:81140 发表于 2017-10-23 21:35 | 显示全部楼层
楼主 程序有四个未使用的变量
回复

举报

ID:325273 发表于 2018-5-8 17:43 | 显示全部楼层
大佬厉害111
回复

举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表