ORG 000H ;开端地址
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
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从上到下,替换闪耀完成滴水作用的单片机程序!(简略吧!)