单片机做的广告灯循环左移右移程序

ORG 00H
START:MOV R2,#8
MOV A,#0FFH        ;ACC=FFH左移初值
CLR C              ;C=0
MOV R2,#8          ;设左移8次
LOOP:RLC A         ;左移一位
P1,A               ;输出到P1
LCALL DELAY        ;延时0.2秒
DJNZ R2,LOOP       ;左移7次
MOV R2,#7
LOOP1:RRC A        ;右移一位
MOV P1,A           ;输出到P1
LCALL DELAY
DJNZ R2,LOOP1      ;右移7次
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