;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
;實例十四：外部中斷實驗 external interrupt  (《51單片機應用從零開始》 11.1小節實例）
;
;現象：系統上電復位時，發光二極管DS1點亮，當按下外部中斷INT1的中斷模擬開關INT1時，產生外部中斷，發光二極管DS1熄滅，DS8點亮500ms
;
;作者：楊欣，劉長煥，張延強  電路飛翔網    eedesign@163.com
;
;				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						; 程序結束