ORG     0000HLJMP    MAINORG     0003H								;定时器中断0AJMP    WAITKEYBEGINORG     001BH								;定时器中断1AJMP    T1INTORG     0100H
;*********************************************************************************************************************************************************************				 S1      EQU    30HS2      EQU    31HS3      EQU    32HS4      EQU    33HS5      EQU    34HS6      EQU    35HSS1     EQU    40HSS2     EQU    41HSS3     EQU    42HSS4     EQU    43HSS5     EQU    44HSS6     EQU    45H
MAIN:  SETB    IT0SETB	EX0SETB	EA	 MOV     SP,     #60H		MOV		A,		#4ACALL	SENDNUMLJMP	WAITPEOPLE;独立键盘检测********************************************************************************************设置倒计时初值*********************KEYTEST******************************************
WAITKEYBEGIN:CJNE	R7,		#01H,	KEYTESTSETB	P1.5AJMP	NEXTSTEP
KEYTEST:MOV     A,	    #0FFHMOV     P3,	    A
WAITKEY:MOV     A,      P3							;读键盘状态	 XRL		A,		#0FFH						;REVERSEANL		A,		#0F0HCJNE	A,		#00H,		TESTAGAIN		;不全为0时，有键按下SJMP	WAITKEYBEGIN
TESTAGAIN:ACALL   DELAY_10MS							;延时10msMOV     A,		P3							;读键盘状态	 XRL		A,		#0FFH						;REVERSEANL		A,		#0F0H						;再次读键盘状态CJNE	A,		#00H,		RUNKEY			;确实有键按下SJMP	WAITKEY
RUNKEY:JNB		P3.7,	K4JNB		P3.6,	K3JNB		P3.5,	K2SJMP	WAITKEY
K1:MOV     A,		#20AJMP	WAITPEOPLE
K2:MOV		R7,		#01HCLR		P1.5SJMP	WAITKEYBEGIN
K3:ACALL   ADDNUMACALL	SHOWNUMSJMP	WAITKEYBEGIN
K4:ACALL	SUBNUMACALL	SHOWNUMSJMP	WAITKEYBEGIN
NEXTSTEP:RETI;***************************************************************************************************检测外界信号*******************WAITPEOPLE*****************************************
WAITPEOPLE:	 SETB	IT1									;人体感应对应接入的外部中断，设置下降沿触发中断	
WAITCOME: JNB		P2.1,	WAITCOME					;白天输出低电平0,则一直等待，直到输出高电平MOV		C,		P2.2						;有声音时P3.2是低电平CPL		CJC		WAITUP								;C等于1的时候，外部声音输入为0，已经检测到声音，等于一跳转，等待声音结束MOV     C,     P3.3						  CPL     C				JNC		WAITDOWN							;C等于0的时候，外部感应输入为1，已经检测到人体，跳转，等待下降沿到来SJMP	WAITPEOPLEWAITDOWN:CLR     P1.1	 							;点亮P1.1指示灯	 CLR		P1.7								;点亮P1.7模拟光	   JNB		IE1,	WAITDOWN					;IE1=0,下降沿还未到来，继续等待下降沿,等于零转移CLR		IE1									;清除人体感应中断请求		 SJMP	SETLIGHT							;跳转设置开灯
WAITUP:CLR     P1.3	 							;点亮P1.0指示灯CLR		P1.7								;点亮P1.7模拟光	 SJMP	SETLIGHT							;IE0=1,声音感应信号低电平出现，跳转设置开灯
SETLIGHT:ACALL	INT133		LJMP	WAITPEOPLE;数码管倒计时显示子程序******************************************************************在调用前往30H，31H送好倒计时初值***************DISPLAYBEGIN*************************
DISPLAYBEGIN:MOV     40H,	30HMOV     41H,	31HMOV     42H,	32HMOV     43H,	33HMOV     44H,	34HMOV     45H,	35H
DISPBEGIN:MOV     R6,    #20															 		      	;;;;;;;;;;R6 R6 R6 R6 R6
DISPBEGIN1:	   MOV     TMOD,  #01H     	 				;T0工作在定时工作方式1MOV     TH0,   #4CH		 					;定时0.05sMOV     TL0,   #00H		  SETB    TR0             					;开启定时器开始定时
DISP:		    MOV     R0,    #40H			 				;要显示的数字存储首地址				       	   ;;;;;;;;;;;;;;;R0 R0 R0 R0 R0MOV     R2,    #0DFH 		     			;11011111									 ;;;;;;;;;;;;;;;;;R2 R2 R2 R2 R2MOV     R7,    #2		         			;控制循环次数					控制显示的位数;;;;;;;;;;;;;;;;R7 R7 R7 R7 R7  
DISPLAY:MOV     A,     R2				 			;选择要亮的数码管										      		R2SETB    P2.7					 			;开锁存器MOV     P0,    A			     			;为0时选定对应数码管	 		  CLR     P2.7					 			;关锁存器MOV     A,     @R0			 				;R0存的为要显示的数值										  		R0MOV     DPTR,  #SEGTAB		 				;查表获得显示特定数值需要的码  MOVC    A,     @A+DPTR		 				;设置要显示的数字SETB    P2.6					 			;开锁存器MOV     P0,    A			     			;为1时选定对应段				 ACALL   DELAY_1MS			     			;延时1msCLR     P2.6					 			;关锁存器DJNZ    R7,    DISPLOOP		 				;扫描完一个，显示下一个，扫描完六个(R7=0)，重新扫描					R7LJMP    NEXTRET	     DISPLOOP:	    INC     R0									;取下一个数码管要显示的数字     									R0MOV     A,      R2							;下一个要亮的数码管									  				R2RR      A MOV     R2,     A	LJMP    DISPLAYNEXT:			  JNB     TF0,   DISP			  				;;;;;;有没有过0.05sCPL     TF0DEC     R6 CJNE    R6,     #00H,    DISPBEGIN1	 	 	;R6不等于零时转移，说明还没到一秒MOV     A,      40HCJNE    A,      #00H,    RUNS1	 			;个位还没有减为零跳转MOV     A,      41H			     			;个位为零时，判断十位是不是零CJNE    A,      #00H,    RUNS2 				;十位不为零跳转MOV     A,      #0FFH			 			;关闭数码管										      SETB    P2.7					 			;开锁存器MOV     P0,    	A			     			;关掉所有数码管	 		  CLR     P2.7					 			;关锁存器RET	     RUNS1:		    DEC     40HLJMP    DISPBEGINRUNS2:		    DEC     41HMOV     40H,   #9LJMP    DISPBEGIN;显示键盘对应数字***************************************************************在调用前往30H，31H送好倒计时初值**************************SHOWNUM**********************************************
SHOWNUM:MOV     40H,	30HMOV     41H,	31HMOV     42H,	32HMOV     43H,	33HMOV     44H,	34HMOV     45H,	35H
DISPNUMBEGIN:MOV     R6,    #10															 			   ;;;;;;;;;;R6 R6 R6 R6 R6
DISPNUMBEGIN1:	   MOV     TMOD,  #01H     	 				;T0工作在定时工作方式1MOV     TH0,   #4CH		 					;定时0.05sMOV     TL0,   #00H		  SETB    TR0             					;开启定时器开始定时
DISPNUM:		    MOV     R0,    #40H			 				;要显示的数字存储首地址				       	   ;;;;;;;;;;;;;;;R0 R0 R0 R0 R0MOV     R2,    #0DFH 		     			;11011111									   ;;;;;;;;;;;;;;;R2 R2 R2 R2 R2MOV     R7,    #2		         			;控制循环次数				 控制显示的位数    ;;;;;;;;;;;;;;;R7 R7 R7 R7 R7 
DISPLAYNUM:MOV     A,     R2				 			;选择要亮的数码管										      R2SETB    P2.7					 			;开锁存器MOV     P0,    A			     			;为0时选定对应数码管	 		  CLR     P2.7					 			;关锁存器MOV     A,     @R0			 				;R0存的为要显示的数值										  R0MOV     DPTR,  #SEGTAB		 				;查表获得显示特定数值需要的码  MOVC    A,     @A+DPTR		 				;设置要显示的数字SETB    P2.6					 			;开锁存器MOV     P0,    A			     			;为1时选定对应段				 ACALL   DELAY_1MS			     			;延时1msCLR     P2.6					 			;关锁存器DJNZ    R7,    DISPNUMLOOP		 			;扫描完一个，显示下一个，扫描完六个(R7=0)，重新扫描			  R7LJMP    NEXTNUMRET	     DISPNUMLOOP:	    INC     R0									;取下一个数码管要显示的数字     							  R0MOV     A,      R2							;下一个要亮的数码管									  		  R2RR      A MOV     R2,     A	LJMP    DISPLAYNUM
NEXTNUM:			  JNB     TF0,   DISPNUM			  			;有没有过0.05sCPL     TF0DEC     R6 CJNE    R6,     #00H,    DISPNUMBEGIN1	 	;R6不等于零时转移，说明还没到一秒MOV     A,      #0FFH			 			;关闭数码管										      SETB    P2.7					 			;开锁存器MOV     P0,    A			     			;关掉所有数码管	 		  CLR     P2.7					 			;关锁存器RET	   			 	 	 		;延时子程序**********************************************************************延时一毫秒，调用前无需操作******************************DELAY_1MS******************************************
DELAY_1MS:MOV	    R3,	 #180			 			;1ms	                   	;;;;;;;;;;;;;;;;;;;;;;;;;;R3 R3 R3 R3 R3
LOOP_1MS:       MOV	    R4,	 #1										                 ;;;;;;;;;;;;;;;;;;;;;;;;;R4 R4 R4 R4 R4DJNZ    R4,	 $		    															               ;R4DJNZ    R3,	 LOOP_1MS	        													               ;R3RET	    	 ;延时子程序**********************************************************************延时10毫秒，调用前无需操作*****************************DELAY_10MS*******************************************
DELAY_10MS:MOV	    R3,	 #180			 			;1ms		                ;;;;;;;;;;;;;;;;;;;;;;;;;;R3 R3 R3 R3 R3
LOOP_10MS:       MOV	    R4,	 #24										             ;;;;;;;;;;;;;;;;;;;;;;;;;R4 R4 R4 R4 R4DJNZ    R4,	 $		    														               	   ;R4DJNZ    R3,	 LOOP_10MS	        													               ;R3RET	    	 ;定时器1中断******************************************************************中断计时50ms,中断前需设置好R5的值**************************T1INT**********************************************
T1INT:MOV     TH1,  #4CH	     	 				;定时R5个0.05s   MOV     TL1,  #00HDJNZ    R5,   T1INTLOOP																               ;R5;MOV     P1,   #44HCLR     TR1
T1INTLOOP:	   RETI   ;根据按键值，设置显示缓冲区中的数字***************************************************调用前需要设置好A的值*******************************SENDNUM*****************************************
SENDNUM:MOV		B,		#10DIV		AB              					;当前值除以10MOV		31H,	A							;得出的商送给十位MOV		30H,	B							;得出的余数送给个位RET;控制关灯子程序****************************************************************************************************************************INT133*******************
INT133:SETB	P1.3								;关指示灯	 SETB	P1.1								;关指示灯ACALL	DISPLAYBEGIN						;延时，同时数码管显示倒计时SETB	P1.7								;关模拟灯RET
;************************************************************************************************************************************************************
ADDNUM:												;加一MOV		R6,		30H							;个位MOV		R7,		31H							;十位CJNE	R6,		#09,		ADDONE			;不等于9的时候直接加一CJNE	R7,		#09,		ADDONEONE		;十位不是9的时候加一     不相等跳转SJMP	ASENDBACK							;十位是9,返回
ADDONEONE:INC		R7									;个位等于9的时候给十位加一MOV		R6,		#00HSJMP	ASENDBACK
ADDONE:INC		R6
ASENDBACK:MOV		30H,	R6MOV		31H,	R7RET	
;*************************************************************************************************************************************************************		
SUBNUM:MOV		R6,		30H							;个位MOV		R7,		31H							;十位CJNE	R6,		#00,		SUBONE			;不等于0的时候直接减一CJNE	R7,		#00,		SUBONEONE		;十位不等于零的时候，给十位减一SJMP	SSENDBACK
SUBONEONE:DEC		R7									;等于0的时候给十位减一MOV		R6,		#09HSJMP	SSENDBACK
SUBONE:DEC		R6
SSENDBACK:MOV		30H,	R6MOV		31H,	R7RET					   
;数码管显示数字表*************************************************************************数字对应的BCD码表**********************************SEGTAB**************************************
SEGTAB:		    DB      3FH,06H,5BH,4FH,66H     			;0,1,2,3,4DB	    6DH,7DH,07H,7FH,6FH     			;5,6,7,8,9END