JMP MAIN
ORG 30H
MAIN: MOV A,#0FFH ;設置左移初值
CLR C ;C=0
MOV R2,#08H ;設置左移次數
LOOP: RLC A ;左移1位
MOV P2,A ;輸出到P2
CALL DELAY ;延時
DJNZ R2,LOOP ;左移7次
MOV R2,#07H ;
LOOP1: RRC A ;右移1位
MOV P2,A ;輸出到P2
CALL DELAY ;
DJNZ R2,LOOP1 ;右移7次
JMP MAIN
DELAY: MOV R3,#20 ;延時0.2s
D1: MOV R4,#20
D2: MOV R5,#248
DJNZ R5,$
DJNZ R4,D2
DJNZ R3,D1
RET
END