用发光二极管实现跑马灯--单片机仿真实验

作业题目：用汇编语言实现跑马灯

作业要求：用发光二极管实现跑马灯效果，八个发光二极管从上到下跑两遍，闪两下；

然后从下到上跑两遍，闪两下。

程序流程图：

发光二极管的应用仿真效果图：

汇编语言的源程序：

LEDEQ P1

ORG 00H

SJMP Start

ORG 30H

Start: MOVA,#0FEH;初值11111110送入A

MOVR4,#2 ;判断P1循环移位的次数

MOVR0 #2;判断循环移位后发光二极管全清零的次数

MOVR3,#7 ;R3单元作计数器，初值位左移的次数

NEXT: MOVLED,A

MOVR5 ,#20

ACALLDELAY

AA: RL A

DJNZR3,NEXT

MOVR3,#7

DJNZR4, AA

BB: CRL A

DJNZ R0,BB

NEXT1:MOVLED,A

LCALL DELAY

CC: RRA

DJNZR3,NEXT1

MOVR3, #7

DJNZR4,CC

BB: CRL A

DJNZ R0,BB

AJMP Start

DELAY: MOV R6,#50H

L1:MOV R7,#100H

DJNZ R7,$

DJNZ R6,L1

DJNZ R5,DELAY

RET

END