l8leds.asm

来自「十五个关于AT89S51的源代码」· 汇编 代码 · 共 30 行

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
;实例二：点亮P1口上的8支发光二极管  Light eight LEDs    (《51单片机应用从零开始》 2.2小节实例）
;
;现象：P1口上的8支发光二极管被点亮后熄灭，以此循环
;
;作者：杨欣，刘长焕，张延强  电路飞翔网    [e-mail]
;
;				http://www.circuitfly.com
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

	
		ORG 	00H		; 设置起始地址
START:			     		; 标号
		MOV	P1,#00H		; 向P1口输出低电平，使发光二极管点亮
		CALL 	DELAY		; 调用延时子程序
		MOV 	P1,#0FFH	; 向P1口输出高电平，使发光二极管熄灭
		CALL 	DELAY		; 调用延时子程序
		JMP	START		; 跳回START，循环执行
	
DELAY:		MOV	R3,#50		; 延时子程序（500ms）
D1:		MOV	R4,#20
D2:		MOV	R5,#248
		DJNZ	R5,$
			DJNZ	R4,D2
			DJNZ	R3,D1
			RET		; 返回主程序
			END		; 汇编程序结束