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

ORG 00H
MOV A,#01111111B
START:MOV R3, #8
Q1:mov P2,A
RR A
LCALL DELAY
DJNZ R3, Q1
MOV R3, #8
Q2:RL A
mov P2,A
LCALL DELAY
DJNZ R3,Q2
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
END