ap3p1.asm

来自「恒科试验平台的所有程序代码」· 汇编 代码 · 共 32 行

;       “验证式”      实验二  P3.0口输入 P1口输出

;P3.3口输入一脉冲,控制P1口按16进制加1方式点亮发光二极管
        ORG    0000h
        MOV    A, #00H
        MOV    P1,A
L0812:  JB     P3.0, L0812   ;判断P3.0为高吗?
        MOV    R2, #10H
        LCALL  DELY
        JB     P3.0, L0812   ;延时后再判断P3.0为高吗?
L081D:  JNB    P3.0, L081D   ;P3.0为低吗?
        MOV    R2, #10H
        LCALL  DELY
        JNB    P3.0, L081D   ;延时后再判断P3.0为低吗?
        INC    A             ;累加器加1
        PUSH   ACC
        MOV    P1, A         ;A送P1口
        POP    ACC
        AJMP   L0812
DELY:	 PUSH   02H		   ;延时子程序
DEL2:	 PUSH   02H
DEL3:	 PUSH   02H
DEL4:	 DJNZ   R2,DEL4
	 POP    02H
	 DJNZ   R2,DEL3
	 POP    02H
	 DJNZ   R2,DEL2
	 POP    02H
	 DJNZ   R2,DELY
	 RET
	 END