xinterrupt.asm

十五个关于AT89S51的源代码

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
;实例十四：外部中断实验 external interrupt  (《51单片机应用从零开始》 11.1小节实例）
;
;现象：系统上电复位时，发光二极管DS1点亮，当按下外部中断INT1的中断模拟开关INT1时，产生外部中断，发光二极管DS1熄灭，DS8点亮500ms
;
;作者：杨欣，刘长焕，张延强  电路飞翔网    [e-mail]
;
;				http://www.circuitfly.com
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


			ORG		00H				; 起始地址00H

			; 这里是主程序段，点亮发光二极管DS1
	MAIN:
			MOV		IE, #84H			; 使能外部中断1
	GREEN:
			CLR		P1.0				; 点亮发光二极管DS1
			JMP		GREEN				; 循环
	
			; 这里是中断服务子程序段，熄灭发光二极管DS1，点亮红色DS8
			ORG		13H				; 中断服务子程序起始地址为13H
	EXT1_RED:
			SETB		P1.0				; 熄灭绿色发光二极管DS1
			CLR		P1.7				; 点DS8
	DELAY:			
			MOV		R3,#50				; 延时(500ms)
	D1:		MOV		R4,#20
	D2:		MOV		R5,#248
			DJNZ		R5,$
			DJNZ		R4,D2
			DJNZ		R3,D1

			SETB		P1.7				; 熄灭发光二极管DS8
			RETI						; 中断服务子程序结束
			
			END						; 程序结束