找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 19820|回复: 16
打印 上一主题 下一主题
收起左侧

详解基于51Hei板子的三种不同流水灯的实现方法

  [复制链接]
跳转到指定楼层
楼主
ID:1 发表于 2010-6-26 15:10 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

第一种方法:

;这是一种比较笨但又最易理解的方法,采用顺序程序结构,
;用位指令控制P0口的每一个位输出高低电平,
;从而来控制相应LED灯的亮灭 ;程序如下:

   

   ORG       0000H          ;单片机上电后从0000H地址执行
    AJMP     START           ;跳转到主程序存放地址处
    ORG       0030H          ;设置主程序开始地址
    START:MOV      SP,#60H   ;设置堆栈起始地址为60H
    clr    P1.4            ;打开led使能,使得8个led灯可由P0口来控制
    mov    P2,#00110101B   ;锁存2个74hc573,防止数码管点阵点亮.
    CLR        P0.0        ;P0.0输出低电平,使LED1点亮
    ACALL  DELAY          ;调用延时子程序
    SETB    P0.0             ;P0.0输出高电平,使LED1熄灭
    CLR     P0.1              ;P0.1输出低电平,使LED2点亮
    ACALL  DELAY          ;调用延时子程序
    SETB    P0.1             ;P0.1输出高电平,使LED2熄灭
    CLR     P0.2             ;P0.2输出低电平,使LED3点亮
    ACALL  DELAY          ;调用延时子程序
    SETB    P0.2             ;P0.2输出高电平,使LED3熄灭
    CLR     P0.3             ;P0.3输出低电平,使LED4点亮
    ACALL  DELAY          ;调用延时子程序
    SETB    P0.3             ;P0.3输出高电平,使LED4熄灭
    CLR     P0.4             ;P0.4输出低电平,使LED5点亮
    ACALL  DELAY          ;调用延时子程序
    SETB    P0.4             ;P0.4输出高电平,使LED5熄灭
    CLR     P0.5             ;P0.5输出低电平,使LED6点亮
    ACALL  DELAY          ;调用延时子程序
    SETB    P0.5             ;P0.5输出高电平,使LED6熄灭
    CLR     P0.6             ;P0.6输出低电平,使LED7点亮
    ACALL  DELAY          ;调用延时子程序
    SETB    P0.6             ;P0.6输出高电平,使LED7熄灭
    CLR     P0.7             ;P0.7输出低电平,使LED8点亮
    ACALL  DELAY          ;调用延时子程序
    SETB    P0.7             ;P0.7输出高电平,使LED8熄灭
    ACALL  DELAY          ;调用延时子程序
    AJMP   START           ;8个LED流了一遍后返回到标号START处再循环
    DELAY:                     ;延时子程序
    MOV      R0,#255      ;延时一段时间
    D1:      MOV      R1,#255
    DJNZ      R1,$
    DJNZ      R0,D1
    RET                     ;子程序返回
    END                     ;程序结束

-------------------------------2循环移位法-----------------------------------

/* 循环移位法:
在上个程序中我们是逐个控制P0端口的每个位来实现的,因此程序显得有点复杂,
下面我们利用循环移位指令,采用循环程序结构进行编程。我们在程序一开始就
给P0口送一个数,这个数本身就让P0.0先低,其他位为高,然后延时一段时间,再让
这个数据向高位移动,然后再输出至P0口,这样就实现“流水”效果啦。由于8051
系列单片机的指令中只有对累加器ACC中数据左移或右移的指令,因此实际编程中
我们应把需移动的数据先放到ACC中,让其移动,然后将ACC移动后的数据再转送到
P0口,这样同样可以实现“流水”效果。具体编程如下所示,程序结构确实简单了很多
*/
    ORG      0000H         ;单片机上电后从0000H地址执行
    AJMP     START         ;跳转到主程序存放地址处
    ORG       0030H        ;设置主程序开始地址
    START:MOV      SP,#60H ;设置堆栈起始地址为60H
    clr    P1.4            ;打开led使能,使得8个led灯可由P0口来控制
    mov    P2,#00110101B   ;锁存2个74hc573,防止数码管点阵点亮.
    MOV     A,#0FEH        ;ACC中先装入LED1亮的数据(二进制的11111110)
    MOV    P0,A            ;将ACC的数据送P0口
    MOV    R0,#7           ;将数据再移动7次就完成一个8位流水过程
    LOOP: RL          A    ;将ACC中的数据左移一位
    MOV      P0,A          ;把ACC移动过的数据送p0口显示
    ACALL   DELAY          ;调用延时子程序
    DJNZ      R0,LOOP      ;没有移动够7次继续移动
    AJMP     START         ;移动完7次后跳到开始重来,以达到循环流动效果
    DELAY:                 ;延时子程序
    MOV      R0,#255       ;延时一段时间
    D1:      MOV      R1,#255
    DJNZ      R1,$
    DJNZ      R0,D1
    RET                     ;子程序返回
    END                     ;程序结束


----------------------------------3查表法---------------------------------------

/*  查表法:
       上面的两个程序都是比较简单的流水灯程序,“流水”花样只能实现单一
的“从左到右”流方式。运用查表法所编写的流水灯程序,能够实现任意方式流水,
而且流水花样无限,只要更改流水花样数据表的流水数据就可以随意添加或改变流
水花样,真正实现随心所欲的流水灯效果。我们首先把要显示流水花样的数据建在
一个以TAB为标号的数据表中,然后通过查表指令“MOVC A,@A+DPTR”把数据取到
累加器A中,然后再送到P0口进行显示。具体源程序如下,TAB标号处的数据表可以根
据实现效果的要求任意修改。
*/
    ORG       0000H          ;单片机上电后从0000H地址执行
    AJMP     START           ;跳转到主程序存放地址处
    ORG       0030H          ;设置主程序开始地址
    START:MOV       SP,#60H  ;设置堆栈起始地址为60H
    clr    P1.4              ;打开led使能,使得8个led灯可由P0口来控制
    mov    P2,#00110101B     ;锁存2个74hc573,防止数码管点阵点亮.
    MOV      DPTR,# TAB      ;流水花样表首地址送DPTR
    LOOP: CLR        A       ;累加器清零
    MOVC    A,@A+DPTR        ;取数据表中的值
    CJNE     A,#0FFH,SHOW    ;检查流水结束标志
    AJMP     START           ;所有花样流完,则从头开始重复流
    SHOW: MOV      P0,A      ;将数据送到P0口
    ACALL   DELAY            ;调用延时子程序
    INC        DPTR          ;取数据表指针指向下一数据
    AJMP     LOOP            ;继续查表取数据
    DELAY:                   ;延时子程序
    MOV      R0,#255         ;延时一段时间
    D1:      MOV      R1,#255
    DJNZ      R1,$
    DJNZ      R0,D1
    RET                       ;子程序返回
    TAB:                      ;下面是流水花样数据表,用户可据要求任意编写
    DB   11111110B            ;二进制表示的流水花样数据,从低到高左移
    DB   11111101B
    DB   11111011B
    DB   11110111B
    DB   11101111B
    DB   11011111B
    DB   10111111B
    DB   01111111B
    DB   01111111B              ;二进制表示的流水花样数据,从高到低右移
    DB   10111111B
    DB   11011111B
    DB   11101111B
    DB   11110111B
    DB   11111011B
    DB   11111101B
    DB   11111110B
    DB   0FEH,0FDH,0FBH,0F7H    ;十六进制表示的流水花样数据
    DB   0EFH,0DFH,0BFH,7FH
    DB   7FH,0BFH,0DFH,0EFH
    DB   0F7H,0FBH,0FDH,0FEH
    DB 0FFH                      ;流水花样结束标志0FFH
    END                          ;程序结束
[此贴子已经被作者于2010-6-26 15:16:39编辑过]
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏2 分享淘帖 顶 踩
回复

使用道具 举报

沙发
ID:26275 发表于 2011-1-10 05:35 | 只看该作者
 非常好,解释得很详细!
回复

使用道具 举报

板凳
ID:29055 发表于 2011-5-24 02:39 | 只看该作者
很好的程序,刚在板子上测试通过了,效果不错
回复

使用道具 举报

地板
ID:31196 发表于 2011-9-21 14:46 | 只看该作者

我放一个Keil C编的程序  ,请大家给点评

#include"AT89x51.h"
sbit LED=P1^4;


void main(void)

{
unsigned  int  a;
LED=0;
while(1)
{
for (a=0;a<50000;a++);  //全部位均为零,LED全亮
 {
 P0=0x00;
 }
for (a=0;a<50000;a++);  //最低位为1,其余位为零,即最低位灭,其余位亮
 {
 P0=0x01;
 }
for (a=0;a<50000;a++); 
 {
 P0=0x02;
 }
for (a=0;a<50000;a++);
 {
 P0=0x04;
 }
for (a=0;a<50000;a++);
 {
 P0=0x08;
 }
for (a=0;a<50000;a++);
 {
 P0=0x10;
 }
for (a=0;a<50000;a++);
 {
 P0=0x20;
 }
for (a=0;a<50000;a++);
 {
 P0=0x40;
 }
for (a=0;a<50000;a++);
 {
 P0=0x80;
 }
}

}

回复

使用道具 举报

5#
ID:31196 发表于 2011-9-21 15:27 | 只看该作者

哎,对了,LED灯接的是P1口,数码管接的是P0口,应该控制P1口才对呀?为啥控制P0口也能让LED亮灭呢???

回复

使用道具 举报

6#
ID:36076 发表于 2012-3-28 18:30 | 只看该作者

我也有同感,???

回复

使用道具 举报

7#
ID:37581 发表于 2012-4-1 16:19 | 只看该作者
感谢楼主
回复

使用道具 举报

8#
ID:30546 发表于 2012-4-3 15:14 | 只看该作者
LED和数码管都是接P0口。问下。
[此贴子已经被作者于2012-4-3 15:16:10编辑过]
回复

使用道具 举报

9#
ID:48835 发表于 2013-3-22 19:30 | 只看该作者
 学习了
回复

使用道具 举报

10#
ID:51227 发表于 2013-6-29 10:43 | 只看该作者
不错,赞一个
回复

使用道具 举报

11#
ID:51856 发表于 2013-7-15 08:55 | 只看该作者
学习了
回复

使用道具 举报

12#
ID:55726 发表于 2013-10-8 21:26 | 只看该作者
越来越对单片机感兴趣了
回复

使用道具 举报

13#
ID:51335 发表于 2013-10-27 22:26 | 只看该作者
很好,很详细
回复

使用道具 举报

14#
ID:56665 发表于 2013-11-6 10:26 | 只看该作者
学汇编很吃力,建议版主把程序换成C的,这样就方便很大一批初学者。
回复

使用道具 举报

15#
ID:68416 发表于 2015-4-13 23:33 | 只看该作者
这个程序太好了。。。顶一个
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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