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
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从上到下,交替闪烁实现滴水效果的单片机程序!(简单吧!)
编程语言:汇编语言
编程人:蓝色梦幻
日期:3013年5月22