wl001.asm

周立功的51单片机试验例程,我当年就是靠这个学会单片机的

;********************************************************************************
;*                                                                              *
;*    File       : wl001.asm                                                    *
;*    Date       : 2004-1-5                                                     *
;*    Version    : 1.0                                                          *
;*                                                                              *
;*    Author     : Freeman          [e-mail]                          *
;*    Company    : Willar           www.willar.com                              *
;*                                                                              *
;********************************************************************************
;*    Descriptoon:                                                              *
;*                 LED流水灯                                                    *
;*                                                                              *
;*                                                                              *
;*                                                                              *
;*                                                                              *
;*                                                                              *
;********************************************************************************
	ORG	0000H
	LJMP	MAIN

MAIN:
	MOV	P0,#0FEH		; 初始点亮LED1 
	MOV	R7,#0FEH		; 保存P0
MAIN_LP:
	LCALL	DELAY			; 延时
	MOV	A,R7			; 
	RL	A			; 循环移位
	MOV	R7,A			; 保存到R7
	MOV	P0,A			; 点亮下一个LED
	JMP	MAIN_LP			; 不停循环

;===========================================================
DELAY:					; 延时子程序
	MOV	R0,#0FFH
	MOV	R1,#0FFH
DLY_LP:
	NOP
	NOP
	DJNZ	R0,DLY_LP
	MOV	R0,#0FFH
	DJNZ	R1,DLY_LP 
	RET
	
	END