/*******************************************************************************
*                                                                              *
*    File       : uP51s001.asm                                                   *
*    Date       : 2004-9-5                                                     *
*    Version    : 1.0                                                          *
*                                                                              *
*    Author     : kevin           kevin@dz51.com                               *
*    Company    : Http://www.dz51.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