用發(fā)光二極管實現(xiàn)跑馬燈--單片機仿真實驗

作業(yè)題目：用匯編語言實現(xiàn)跑馬燈

作業(yè)要求：用發(fā)光二極管實現(xiàn)跑馬燈效果，八個發(fā)光二極管從上到下跑兩遍，閃兩下；

然后從下到上跑兩遍，閃兩下。

程序流程圖：

發(fā)光二極管的應(yīng)用仿真效果圖：

匯編語言的源程序：

LED EQ P1

ORG 00H

SJMP Start

ORG 30H

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

MOV R4,#2 ;判斷P1循環(huán)移位的次數(shù)

MOV R0 #2;判斷循環(huán)移位后發(fā)光二極管全清零的次數(shù)

MOV R3,#7 ;R3單元作計數(shù)器，初值位左移的次數(shù)

NEXT: MOV LED,A

MOV R5 ,#20

ACALL DELAY

AA: RL A

DJNZ R3,NEXT

MOV R3,#7

DJNZ R4, AA

BB: CRL A

DJNZ R0,BB

NEXT1:MOV LED,A

LCALL DELAY

CC: RR A

DJNZ R3,NEXT1

MOV R3, #7

DJNZ R4,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