;****************************************
;功能：流水燈的顯示實驗
;使用資源：P1口的輸出
;****************************************
        ORG 00H
	AJMP MAIN
	ORG 030H

MAIN:   MOV SP,#07H
        MOV R1,#0FEH
	SETB C
LOOP:
        MOV A,R1
	MOV P1,A
	RLC A
	MOV R1,A
	LCALL DLY
	AJMP LOOP
;-----------------------延時子程序
DLY:    MOV R0,#02
DLY0:   MOV R7,#100
DLY1:   MOV R6,#250
        DJNZ R6,$
	DJNZ R7,DLY1
	DJNZ R0,DLY0
	RET
	END