p0口led+1-1程序t.asm

单片机开发资料光盘-双龙-686M.zip

;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