单片机提高WWW.51C51.COM 自学单片机的网站：作中国单片机编程技术普及推广第一站！

;p1口八个灯作跑马灯。采用了寄存器存中间数
;***************************************************************************
;* sxj1974@163.com (51c51 test web) www.8951.com                           *
;* Create by :石学军 www.51c51.com 更多例程请登陆网站                      *
;***************************************************************************

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

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

照片

hex格式文件下载  （另存为hex格式文件即可直接烧写）