流水灯
功能:RR移位操作实现单灯亮灭从,左至右移动
硬件连接:
程序:
ORG 0000H
AJMP START
ORG 0030H
START:
MOV P0,#00H ;全亮
LCALL DELAY
LCALL DELAY
LCALL DELAY
MOV A,#7FH ;P0.7LED亮
MOV R2,08H ;循环8次
LOOP:
MOV P0,A
LCALL DELAY
RR A ;累加器A的数据右移一位
DJNZ R2,LOOP ;R2为0则转移
AJMP START
DELAY: ;延时程序
MOV R7,#250
D1: MOV R6,#250
D2: DJNZ R6,D2
DJNZ R7,D1
RET
END
仿真结果: