单片机实验三霹雳灯.doc

实验三 霹雳灯
一、设计任务
依次显示8盏灯，然后逆序依次显示。
二、设计步骤
1、电路设计2、程序设计
ORG 0000H
START: CLR C
MOV A,#0FFH
MOV 实验三 霹雳灯
一、设计任务
依次显示8盏灯，然后逆序依次显示。
二、设计步骤
1、电路设计2、程序设计
ORG 0000H
START: CLR C
MOV A,#0FFH
MOV R1,#8
LOOP:RLC A ;-----带进位左移-----
MOV P1,A
LCALL DELAY
DJNZ R1,LOOP
MOV R1,#8
LOOP1:RRC A ;------带进位右移----
MOV P1,A
LCALL DELAY
DJNZ R1,LOOP1
LJMP START
;------DELAY SEC----
DELAY: MOV R7,#02
DEL1:MOV R6,#250
DEL2:MOV R5,#200
DEL3:DJNZ R5,DEL3
DJNZ R6,DEL2
DJNZ R7,DEL1
RET
END
ORG 0000H
MAIN: MOV R1,#07H
MOV A,#0FEH
NEXT: MOV P1,A
ACALL DELAY
RL A
DJNZ R1,NEXT
MOV R1,#07H
NEXT1: MOV P1,A
RR A
ACALL DELAY
DJNZ R1,NEXT1
SJMP MAIN
;------DELAY SEC----
DELAY: MOV R7,#02
DEL1:MOV R6,#250
DEL2:MOV R5,#200
DEL3:DJNZ R5,DEL3
DJNZ R6,DEL2
DJNZ R7,DEL1
RET
END
3、编译程序 4、电路仿真
ORG 0000H
START: CLR C
MOV A,#0FFH
MOV R1,#8
LOOP:RLC A ;-----带进位左移-----
MOV P1,A
LCALL DELAY
DJNZ R1,LOOP
MOV R1,#6
LOOP1:RRC A