打印

用MS-51单片机编写的跑马灯程序

[复制链接]
2134|5
手机看帖
扫描二维码
随时随地手机跟帖
跳转到指定楼层
楼主
laslison|  楼主 | 2010-1-21 23:16 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
汇编的:
;p1口八个灯作跑马灯。

org 0000h
ajmp start
org 0030h
start:
mov a,#0ffh ;
clr c ;
mov r2,#08h ;循环八次。
loop: rlc a ;带进位左移。
mov p2,a ;输出到P1口。
call delay ;延时一段时间
djnz r2,loop ;反复循环
mov r2,#07h ;再往回循环。
loop1:
rrc a ;带进位右移
mov p2,a ;输出到P1口。
call delay ;延时一段时间
djnz r2,loop1 ;反复循环
jmp start ;重新开始

delay:
mov r3,#20 ;延时子程序
d1: mov r4,#200
d2: mov r5,#248
djnz r5,$
djnz r4,d2
ret

end


C语言的:

//例程:LED流水灯


#include<reg51.h>
#include <intrins.h>


void delayms(unsigned char ms)
// 延时子程序
{
unsigned char i;
while(ms--)
{
for(i = 0; i < 120; i++);
}
}

main()
{
unsigned char LED;
LED = 0xfe;
P0 = LED;

while(1)
{
delayms(250);
LED = _crol_(LED,1); //循环右移1位,点亮下一个LED
P2 = LED;
}
}
沙发
god_like| | 2010-1-21 23:50 | 只看该作者
哦,LZ自己做出来的

使用特权

评论回复
板凳
Karlshen| | 2010-1-24 18:05 | 只看该作者
我最近在学51,看看啊

使用特权

评论回复
地板
xiaoxin1986| | 2010-1-24 22:17 | 只看该作者
不错写的挺好的,继续努力

使用特权

评论回复
5
laslison|  楼主 | 2010-1-26 12:27 | 只看该作者
2# god_like
哦,不是,在别的地方看到的,贴出来让大家看看

使用特权

评论回复
6
wangwo| | 2010-1-29 14:34 | 只看该作者
两个版本对比,不错

使用特权

评论回复
发新帖 我要提问
您需要登录后才可以回帖 登录 | 注册

本版积分规则

95

主题

791

帖子

1

粉丝