STC单片机实现水滴效果程序

START: ;开始标号
MOV R0,#8 ;设置右移次数
MOV A,#0FEH;向A寄存器输入初始值
D2:
MOV P1,A ;输出至P1口
CALL DL; 调入延时程序
RL A; 将A中数据向右移一位
DJNZ R0,D2;检测是否右移八次了
JMP START;否则跳到开始
DL: ;延时程序
MOV R3,#20
L1: MOV R4,#15
L2: MOV R5,#50
DJNZ R5,$
DJNZ R4,L2
DJNZ R3,L1
RET
END

这是STC单片机P1口驱动8个LED灯D0-D7从上到下，交替闪烁实现滴水效果的单片机程序！（简单吧！）