;0CA0H-0CB8H P0口的LED發光二極管-1、+1程序。

               ORG     00A0H			;P0口-1,+1程序
        MOV     P0,#0FFH			;關P0口, LED燈滅
L6CA3:  MOV     R2,#20H			;延時常數
        LCALL   S0010			;調用延時子程序
        DJNZ    P0,L6CA3			;P0口-1不為零轉
L6CAB:  MOV     R2,#15H			; 延時常數(快)
        LCALL   S00E0			; 調用延時子程序
        INC     P0				;P0口+1
        MOV     A,P0				;
        CJNE    A,#0FFH,L6CAB	;P0不為FFH轉
        SJMP    L6CA3			;循環
        ORG	00E0H
S00E0:  MOV     R2,#28H	;延時常數
        ACALL   S00EB
        RET     
	ORG	0100H
S0010:	MOV	R2,#1AH
	ACALL	S00EB
	RET
        ORG     00EBH	;通用延時子程序
 S00EB:  PUSH    02H
 L00ED:  PUSH    02H
 L00EF:  PUSH    02H
 L00F1:  DJNZ    R2,$
        POP     02H
        DJNZ    R2,L00EF
        POP     02H
        DJNZ    R2,L00ED
        POP     02H
        DJNZ    R2,S00EB
        RET
        END