ex6-2a.asm

《增强型8051单片机实用开发技术》例程代码

$include  (STC12C5A.INC)  ;包含STC12C5A60S2单片机寄存器定义文件
		ORG		0000H
		LJMP	MAIN			;转主程序
		ORG		0003H
		LJMP	INT0_ISR		;转中断服务程序
		ORG		0100H
MAIN:	MOV		SP,#60H
		SETB	IT0			    ;为沿触发中断方式
		SETB	EX0				;允许 中断
		SETB	EA				;CPU开中断
		MOV		P2,#0AAH		;灯全灭
		SJMP	$
INT0_ISR:
		JNB		P2.0,L1			;中断服务程序
		CLR		P2.1			;查询中断源，P1.0为0转L1，P1.0
		LJMP	L2				;为1，P1.1送出"0"使对应的灯亮。
L1:    	SETB	P2.1				
L2:   	JNB		P2.2,L3			
		CLR		P2.3				
		LJMP	L4				
L3:    	SETB	P2.3				
L4:     JNB		P2.4,L5			
		CLR		P2.5				
		LJMP	L6				
L5:     SETB	P2.5				
L6:  	JNB		P2.6,L7			
		CLR		P2.7				
		LJMP	L8				
L7:     SETB	P2.7				
L8:    	RETI					
		END