a15.asm

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

;“验证式”	实验十五  INT0中断实验

;外中断0
;文件名:(MCS51\A15.ASM)

	ORG 0000H
    	SJMP MAIN
	ORG 0003H      ;外中断0入口地址
	LJMP INTER0
MAIN:	JB P1.3,MAIN1  ;判断是电平触发还是沿触发
        CLR TCON.0
        SJMP MAIN2
MAIN1:  SETB TCON.0    ;中断初始化
MAIN2:	ORL IE,#81H
	ORL IP,#02H
	SJMP MAIN
INTER0: CLR EA          ;中断处理程序
        SETB P1.2
        LCALL DELY
        CLR P1.2
        LCALL DELY
        SETB EA
	RETI
DELY:   MOV R6,#00H    ;延时
DELY1:  MOV R7,#00H
 DELY2:  DJNZ R7,DELY2
        DJNZ R6,DELY1
        RET