循环移位指令的流水灯

;运行结果：P1口8个灯循环点亮

ORG 0000H;程序开始

LJMP MAIN;

ORG 030H;

MAIN:MOV R0,#08H;把8送入R0中,

MOV A,#0FEH;把FE送入A中,即11111110

PLAY:RR A;右移动1位

MOV P1,A;输出显示

ACALL DEL;延时

DJNZ R0,PLAY;一共移动8次

AJMP MAIN;重新开始

DEL: MOV R7,#0FH;延时子程序

DEL1:MOV R6,#0FFH;

DEL2:MOV R5,#01FH;

DEL3: DJNZ R5,DEL3;

DJNZ R6,DEL2;

DJNZ R7,DEL1;

RET;

运行结果流水灯的瞬间（注意由于照相机的延时,看到的两个灯亮实际为一个灯亮）