汇编语言实现人体感应灯

最新推荐文章于 2023-07-08 11:11:34 发布
最新推荐文章于 2023-07-08 11:11:34 发布
阅读量328 收藏 2
点赞数 1
分类专栏： 汇编语言 单片机 文章标签： 单片机
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/weixin_45972927/article/details/121188144
版权 
ORG     0000H
 		LJMP    MAIN
		ORG     0003H								;定时器中断0
		AJMP    WAITKEYBEGIN
		ORG     001BH								;定时器中断1
		AJMP    T1INT
		ORG     0100H
;*********************************************************************************************************************************************************************				 
		S1      EQU    30H
		S2      EQU    31H
		S3      EQU    32H
		S4      EQU    33H
		S5      EQU    34H
		S6      EQU    35H

		SS1     EQU    40H
		SS2     EQU    41H
		SS3     EQU    42H
		SS4     EQU    43H
		SS5     EQU    44H
		SS6     EQU    45H
MAIN:  
		SETB    IT0
		SETB	EX0
		SETB	EA	 
		MOV     SP,     #60H		
		MOV		A,		#4
		ACALL	SENDNUM
		LJMP	WAITPEOPLE

;独立键盘检测********************************************************************************************设置倒计时初值*********************KEYTEST******************************************
WAITKEYBEGIN:
		CJNE	R7,		#01H,	KEYTEST
		SETB	P1.5
		AJMP	NEXTSTEP
KEYTEST:
		MOV     A,	    #0FFH
		MOV     P3,	    A
WAITKEY:
		MOV     A,      P3							;读键盘状态	 
		XRL		A,		#0FFH						;REVERSE
		ANL		A,		#0F0H
		CJNE	A,		#00H,		TESTAGAIN		;不全为0时，有键按下
		SJMP	WAITKEYBEGIN
TESTAGAIN:
		ACALL   DELAY_10MS							;延时10ms
		MOV     A,		P3							;读键盘状态	 
		XRL		A,		#0FFH						;REVERSE
		ANL		A,		#0F0H						;再次读键盘状态
		CJNE	A,		#00H,		RUNKEY			;确实有键按下
		SJMP	WAITKEY
RUNKEY:
		JNB		P3.7,	K4
		JNB		P3.6,	K3
		JNB		P3.5,	K2
		SJMP	WAITKEY
K1:
		MOV     A,		#20
		AJMP	WAITPEOPLE
K2:
		MOV		R7,		#01H
		CLR		P1.5
		SJMP	WAITKEYBEGIN
K3:
		ACALL   ADDNUM
		ACALL	SHOWNUM
		SJMP	WAITKEYBEGIN
K4:
		ACALL	SUBNUM
		ACALL	SHOWNUM
		SJMP	WAITKEYBEGIN
NEXTSTEP:
		RETI

;***************************************************************************************************检测外界信号*******************WAITPEOPLE*****************************************
WAITPEOPLE:	 
		SETB	IT1									;人体感应对应接入的外部中断，设置下降沿触发中断	
WAITCOME: 
		JNB		P2.1,	WAITCOME					;白天输出低电平0,则一直等待，直到输出高电平
		MOV		C,		P2.2						;有声音时P3.2是低电平
		CPL		C
		JC		WAITUP								;C等于1的时候，外部声音输入为0，已经检测到声音，等于一跳转，等待声音结束

		MOV     C,     P3.3						  
		CPL     C				
		JNC		WAITDOWN							;C等于0的时候，外部感应输入为1，已经检测到人体，跳转，等待下降沿到来
		SJMP	WAITPEOPLE

WAITDOWN:
		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,	30H
		MOV     41H,	31H
		MOV     42H,	32H
		MOV     43H,	33H
		MOV     44H,	34H
		MOV     45H,	35H
DISPBEGIN:
		MOV     R6,    #20															 		      	;;;;;;;;;;R6 R6 R6 R6 R6
DISPBEGIN1:	   
		MOV     TMOD,  #01H     	 				;T0工作在定时工作方式1
		MOV     TH0,   #4CH		 					;定时0.05s
		MOV     TL0,   #00H		  
		SETB    TR0             					;开启定时器开始定时
DISP:		    
		MOV     R0,    #40H			 				;要显示的数字存储首地址				       	   ;;;;;;;;;;;;;;;R0 R0 R0 R0 R0
		MOV     R2,    #0DFH 		     			;11011111									 ;;;;;;;;;;;;;;;;;R2 R2 R2 R2 R2
		MOV     R7,    #2		         			;控制循环次数					控制显示的位数;;;;;;;;;;;;;;;;R7 R7 R7 R7 R7  
DISPLAY:
		MOV     A,     R2				 			;选择要亮的数码管										      		R2
		SETB    P2.7					 			;开锁存器
		MOV     P0,    A			     			;为0时选定对应数码管	 		  
		CLR     P2.7					 			;关锁存器
			    
		MOV     A,     @R0			 				;R0存的为要显示的数值										  		R0
			     
		MOV     DPTR,  #SEGTAB		 				;查表获得显示特定数值需要的码  
		MOVC    A,     @A+DPTR		 				;设置要显示的数字
			     
		SETB    P2.6					 			;开锁存器
		MOV     P0,    A			     			;为1时选定对应段				 
		ACALL   DELAY_1MS			     			;延时1ms
		CLR     P2.6					 			;关锁存器
			  	 
		DJNZ    R7,    DISPLOOP		 				;扫描完一个，显示下一个，扫描完六个(R7=0)，重新扫描					R7
		LJMP    NEXT
		RET	     
			    
DISPLOOP:	    
		INC     R0									;取下一个数码管要显示的数字     									R0
		MOV     A,      R2							;下一个要亮的数码管									  				R2
		RR      A 
		MOV     R2,     A	
		LJMP    DISPLAY
				 
NEXT:			  
		JNB     TF0,   DISP			  				;;;;;;有没有过0.05s
		CPL     TF0
		DEC     R6 
		CJNE    R6,     #00H,    DISPBEGIN1	 	 	;R6不等于零时转移，说明还没到一秒
		MOV     A,      40H
		CJNE    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     40H
		LJMP    DISPBEGIN
			    
RUNS2:		    
		DEC     41H
		MOV     40H,   #9
		LJMP    DISPBEGIN



;显示键盘对应数字***************************************************************在调用前往30H，31H送好倒计时初值**************************SHOWNUM**********************************************
SHOWNUM:
		MOV     40H,	30H
		MOV     41H,	31H
		MOV     42H,	32H
		MOV     43H,	33H
		MOV     44H,	34H
		MOV     45H,	35H
DISPNUMBEGIN:
		MOV     R6,    #10															 			   ;;;;;;;;;;R6 R6 R6 R6 R6
DISPNUMBEGIN1:	   
		MOV     TMOD,  #01H     	 				;T0工作在定时工作方式1
		MOV     TH0,   #4CH		 					;定时0.05s
		MOV     TL0,   #00H		  
		SETB    TR0             					;开启定时器开始定时
DISPNUM:		    
		MOV     R0,    #40H			 				;要显示的数字存储首地址				       	   ;;;;;;;;;;;;;;;R0 R0 R0 R0 R0
		MOV     R2,    #0DFH 		     			;11011111									   ;;;;;;;;;;;;;;;R2 R2 R2 R2 R2
		MOV     R7,    #2		         			;控制循环次数				 控制显示的位数    ;;;;;;;;;;;;;;;R7 R7 R7 R7 R7 
DISPLAYNUM:
		MOV     A,     R2				 			;选择要亮的数码管										      R2
		SETB    P2.7					 			;开锁存器
		MOV     P0,    A			     			;为0时选定对应数码管	 		  
		CLR     P2.7					 			;关锁存器
			    
		MOV     A,     @R0			 				;R0存的为要显示的数值										  R0
			     
		MOV     DPTR,  #SEGTAB		 				;查表获得显示特定数值需要的码  
		MOVC    A,     @A+DPTR		 				;设置要显示的数字
			     
		SETB    P2.6					 			;开锁存器
		MOV     P0,    A			     			;为1时选定对应段				 
		ACALL   DELAY_1MS			     			;延时1ms
		CLR     P2.6					 			;关锁存器
			  	 
		DJNZ    R7,    DISPNUMLOOP		 			;扫描完一个，显示下一个，扫描完六个(R7=0)，重新扫描			  R7
		LJMP    NEXTNUM
		RET	     
			    
DISPNUMLOOP:	    
		INC     R0									;取下一个数码管要显示的数字     							  R0
		MOV     A,      R2							;下一个要亮的数码管									  		  R2
		RR      A 
		MOV     R2,     A	
		LJMP    DISPLAYNUM
NEXTNUM:			  
		JNB     TF0,   DISPNUM			  			;有没有过0.05s
		CPL     TF0
		DEC     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 R4
		DJNZ    R4,	 $		    															               ;R4
	 	DJNZ    R3,	 LOOP_1MS	        													               ;R3
		RET	    	 


;延时子程序**********************************************************************延时10毫秒，调用前无需操作*****************************DELAY_10MS*******************************************
DELAY_10MS:
		MOV	    R3,	 #180			 			;1ms		                ;;;;;;;;;;;;;;;;;;;;;;;;;;R3 R3 R3 R3 R3
LOOP_10MS:       
		MOV	    R4,	 #24										             ;;;;;;;;;;;;;;;;;;;;;;;;;R4 R4 R4 R4 R4
		DJNZ    R4,	 $		    														               	   ;R4
	 	DJNZ    R3,	 LOOP_10MS	        													               ;R3
		RET	    	 
			    

;定时器1中断******************************************************************中断计时50ms,中断前需设置好R5的值**************************T1INT**********************************************
T1INT:
		MOV     TH1,  #4CH	     	 				;定时R5个0.05s   
		MOV     TL1,  #00H
		DJNZ    R5,   T1INTLOOP																               ;R5
		;MOV     P1,   #44H
		CLR     TR1
T1INTLOOP:	   
		RETI   


;根据按键值，设置显示缓冲区中的数字***************************************************调用前需要设置好A的值*******************************SENDNUM*****************************************
SENDNUM:
		MOV		B,		#10
		DIV		AB              					;当前值除以10
		MOV		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,		#00H
		SJMP	ASENDBACK
ADDONE:
		INC		R6
ASENDBACK:
		MOV		30H,	R6
		MOV		31H,	R7
		RET	
;*************************************************************************************************************************************************************		
SUBNUM:
		MOV		R6,		30H							;个位
		MOV		R7,		31H							;十位
		CJNE	R6,		#00,		SUBONE			;不等于0的时候直接减一
		CJNE	R7,		#00,		SUBONEONE		;十位不等于零的时候，给十位减一
		SJMP	SSENDBACK
SUBONEONE:
		DEC		R7									;等于0的时候给十位减一
		MOV		R6,		#09H
		SJMP	SSENDBACK
SUBONE:
		DEC		R6
SSENDBACK:
		MOV		30H,	R6
		MOV		31H,	R7
		RET					   
;数码管显示数字表*************************************************************************数字对应的BCD码表**********************************SEGTAB**************************************
SEGTAB:		    
		DB      3FH,06H,5BH,4FH,66H     			;0,1,2,3,4
		DB	    6DH,7DH,07H,7FH,6FH     			;5,6,7,8,9
  			   
		END
花盆里的樱桃树
关注
  • 1
    点赞
  • 踩
  • 2
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
基于Arduino实现简单人体红外感应灯（人体红外传感器+LED）
Ricardo_ts的博客
06-18 2万+
这是一个使用arduino以及人体红外传感器实现的人体感应灯，详细细节如下： 1. 实验元件 UNO 实验套装（arduino控制板、USB数据线、面包板、跳线） 人体红外传感器1个 led灯1个 电阻（220欧，1个） 2. 实现连接图 如图，这是测试实现前连接的实物图 实现效果时的图如下： 3. 实现代码 在Arduino上编写代码，如下： cons...
汇编语言实现交通灯模拟
01-18
汇编语言实现交通灯模拟，实现东南西北四个方向的路灯闪烁和控制。
基于单片机的智能路灯控制系统人体感应灯光控制系统的设计与实现
Holidaylive的博客
07-08 1643
以51单片机作为主控系统；LCD1602液晶显示当前时间、年月日、时分秒；按键看看有设置自动手动模式；3路红外探头用来感应当前3个区域是否有人；按键可以设置当前时间、开启和关闭教室灯光时间；在手动模式下，可以通过按键直接控制灯的开关；自动模式下，光敏传感器检测当前室光线强度；光线较弱，有人并且在开灯的时间范围内，根据3路人体红外传感器检测到有人将自动开启LED指示灯进行照明；整个电路以5v供电;电路图。
39、基于51单片机声控光控灯人体感应路灯照明灯系统设计
ENGLISH_HHZ的专栏
02-21 6555
单片机主要特点：（1）有优异的性能价格比。（2）集成度高、体积小、有很高的可靠性。单片机把各功能部件集成在一块芯片上，内部采用总线结构，减少了各芯片之间的连线，大大提高了单片机的可靠性和抗干扰能力。另外，其体积小，对于强磁场环境易于采取屏蔽措施，适合在恶劣环境下工作。（3）控制功能强。为了满足工业控制的要求，一般单片机的指令系统中均有极丰富的转移指令、I/O口的逻辑操作以及位处理功能。单片机的逻辑控制功能及运行速度均高于同一档次的微机。（4）低功耗、低电压，便于生产便携式产品。
用arduino写一个人体感应灯的代码
weixin_35752233的博客
02-18 548
我可以为你提供一些简单的指导：首先，你需要准备一个Arduino板，以及一个可以检测人体移动的传感器。然后，使用Arduino IDE将这段代码编写下来：int ledPin = 13; //定义LED灯的引脚号int sensorPin = 8; //定义传感器的引脚号void setup() {pinMode(ledPin, OUTPUT); //设定LED灯为输出模式pinMode(sens...
任务9 人体感应灯（arduino程序）
dzq18257433147的博客
05-19 2241
认识传感器： 热释电红外传感器在结构上引入场效应管，其目的在于完成阻抗变换。由于热释电元输出的是电荷信号，并不能直接使用，因而需要用电阻将其转换为电压形式。故引入的N沟道结型场效应管应接成共漏形式来完成阻抗变换。热释电红外传感器由传感探测元、干涉滤光片和场效应管匹配器三部分组成。设计时应将高热电材料制成一定厚度的薄片，并在它的两面镀上金属电极，然后加电对其进行极化，这样便制成了热释电探测元。 实现原理： 传感器检测到人体会输出高电平一段时间后变为低电平，通过单片机读取某一引脚的高低电平即可获取传感
用汇编语言实现51单片机定时器中断和中断嵌套1
weixin_45714135的博客
05-30 7880
实现定时器中断和中断嵌套 一、背景知识 1.定时器结构和原理： （1）组成：两个16位的定时器T0和T1，以及他们的工作方式寄存器TMOD和控制寄存器TCON等组成。内部由总线与CPU连接。 （2）工作模式 每个定时器内部结构实际上就是一个可编程的加法计数器，由编程来设置它工作在定时状态还是计数状态。 计数器工作模式： 计数脉冲来自相应的外部输入引脚T0（P3.4)或T1(P3.5)。当输入信号发生由1至0的负跳变(下降沿)时，计数器（TH0，TL0或TH1，TL1）的值增1。 定时器工作模式： 计数脉冲
和12岁小同志搞创客开发：手撕代码，做一款人体感应灯
热门推荐
不脱发的程序猿
11-12 3万+
本篇博文我们要手写代码做一款人体感应灯。
基于Arduino UNO的楼道人体感应灯
weixin_45900296的博客
04-10 2850
基于Arduino UNO的楼道人体感应灯 文章目录前言一、认识人体热释电红外传感器二、模块连接图及程序1.setup()初始化程序2.loop()主函数总结 前言 生活中经常看到一些自动化设备，例如感应水龙头、自动开关门等。这些设备都通过传感器来检测来环境进而实现的，当环境要求满足是时候，便启动执行程序开始工作。 提示：以下是本篇文章正文内容，下面案例可供参考 一、认识人体热释电红外传感器 人体热释电红外传感器是一种对人体辐射出的红外线敏感的传感器。当无人在其检测范围内运动时，模块保持输出低电平；当
汇编语言课程设计变换跑马灯
04-19
跑马灯课设asm文件 AT89S51芯片
基于51单片机的人体感应灯测试程序与原理图
11-10
基于51单片机的人体感应灯测试程序与原理图
基于51单片机的人体感应灯设计
11-25
基于51单片机的人体红外感应灯的设计，使用了人体红外感应模块HC-SR501，同时使用声音感应模块以及光感应模块，增加了声控及光控的功能。 注：文件包含c语言代码以及proteus原理图（传感器模块未详细画出，所有传感器的输出均为可直接读取的电平信号，不涉及模数转换）
人体红外感应模块程序资源
07-05
可以很好的了解红外感应模块原理及使用方法，此资源使用于51和STM32,可以实现比较使用的人体检测报警功能，非常实用
人体红外感应灯.
12-24
人体红外感应灯.一个完整的单片机项目源码
传感器 人体感应
07-26
生活中很常用到的技术
闪烁灯 程序代码 汇编语言
02-08
汇编语言程序设计 闪烁灯 程序代码 汇编语言
流水灯 程序代码 汇编语言
02-08
汇编语言程序设计 流水灯 程序代码 汇编语言
汇编语言实现AT89C51交通灯控制.zip
03-05
（5）时钟采用倒计时方式显示, 即各灯亮时, 时钟为点亮的最大时间, 以后每1s 显示数据减1, 直到减为0 以后指示灯再进行变换。 （6）高峰时，各方向通行时间缩短，南北方向30s，东西方向10s。 （7）所有的时间设置都...
Arduino笔记-人体感应灯项目
IT1995的博客
03-30 1万+
程序演示如下： 但感应到人后： 后台打印如下： 接线图如下： 这里我修改了下，人体热释放红外传感器的OUT脚放到Arduino的A5 继电器控制信号放到Ardunio的2号引脚 其中人体热释放红外传感器设置如下： 源码如下： int PIRpin = A5; int RELAYpin = 2; void setup() { pinMode(RELAYpi...
汇编语言实现圆形流水灯
最新发布
05-04
实现圆形流水灯需要掌握汇编语言的基础知识和对计算机硬件的理解。 圆形流水灯是指多个LED灯按照一定的顺序循环点亮，形成一个圆形的流水灯效果。实现这个效果需要将LED灯连接到计算机的GPIO口，通过控制GPIO口输出...

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值