a10.asm

单片机实验程序-13种-17.4M-pdf.zip

;	“验证式”	实验十  P3.3口输入 P1口输出


;文件名:MCS51\A10.ASM

;P3.3口输入一脉冲,控制P1口按16进制加1方式点亮发光二极管
        
        
L0812:  JB     P3.0, L0812   ;判断P3,3为高吗?
     
        LCALL  DELY
        JB     P3.0, L0812   ;延时后再判断P3.3为高吗?
L081D:  JNB    P3.0, L081D   ;P3.3为低吗?
   
        LCALL  DELY
        JNB    P3.0, L081D   ;延时后再判断P3.3为低吗?
        ADD A,#1            ;累加器加1
        
        MOV    P1, A         ;A送P1口
        
        LJMP   L0812
DELY:	 MOV R2, #98		   ;延时子程序
DEL2:	MOV R3 ,#99
DEL3:	 NOP
	 DJNZ   R3,DEL3
	 DJNZ   R2,DEL2
	 RET