3l.asm

这是５１单片机的应用程序

ORG 00H
MOV A,#00011111B
START:MOV R3, #6
Q1:mov P2,A
RR A
LCALL DELAY
DJNZ R3, Q1
MOV P2,#11111111B
LCALL DELAY2
MOV P2,#11111000B
LCALL DELAY2
MOV P2,#11111111B
LCALL DELAY2
MOV P2,#11111000B
LCALL DELAY2


MOV R3, #6
Q2:RL A
mov P2,A
LCALL DELAY
DJNZ R3,Q2
MOV P2,#11111111B
LCALL DELAY2
MOV P2,#00011111B
LCALL DELAY2
MOV P2,#11111111B
LCALL DELAY2
MOV P2,#00011111B
LCALL DELAY2
LJMP START

DELAY: MOV R5,#20 ;延时子程序，延时0.2秒
D1: MOV R6,#20
D2: MOV R7,#248
DJNZ R7,$
DJNZ R6,D2
DJNZ R5,D1
RET
DELAY2: MOV R5,#10 ;延时子程序，延时0.2秒
D3: MOV R6,#20
D4: MOV R7,#248
DJNZ R7,$
DJNZ R6,D4
DJNZ R5,D3
RET
END