标题:
单片机红外热释电人体感应报警器Proteus仿真程序
[打印本页]
作者:
heilongbao
时间:
2021-12-12 14:37
标题:
单片机红外热释电人体感应报警器Proteus仿真程序
本设计系统是红外热释电人体感应报警器,当按下布防键30秒钟后系统会进入布防状态,只要一有人进入传感器的范围系统会马上报警蜂鸣器会叫、红色发光二极管会闪烁。
报警方式:
红色发光二极管闪烁,蜂鸣器报警。
操作说明:
1.紧急报警键:按下紧急报警键,系统会马上报警。
2.布防键:按下布防键绿色发光二极管会闪烁,说明系统准备开始布防,30秒钟后绿色发光二管会长亮,说明系统进入布防状态了,只要一有人进入传感器的范围内系统马上就会报警。
3.取消键:按下取消键可取消当前报警。
4.红色发光二极管:当有报警时此发光二极管长亮,否则熄灭。
5.绿色发光二极管:用做布防状态指示灯。
6.黄色发光二极管:用做传感器指示,当传感器有信号输出,此灯会亮,否则熄灭。
仿真原理图如下(proteus仿真工程文件可到本帖附件中下载)
仿真图.jpg
(258.27 KB, 下载次数: 114)
下载附件
2021-12-13 01:40 上传
51hei.gif
(61.91 KB, 下载次数: 100)
下载附件
2021-12-13 01:40 上传
单片机源程序如下:
#include <reg52.h> //调用单片机头文件
#define uchar unsigned char //无符号字符型 宏定义 变量范围0~255
#define uint unsigned int //无符号整型 宏定义 变量范围0~65535
//红外热释电传感器 平时为0 有输出为1
sbit beep = P2^3; //蜂鸣器定义
sbit red = P2^2; //红色发光二极管定义
sbit green = P2^1; //绿色发光二极管定义
sbit yellow = P2^0; //黄色发光二极管定义
sbit hw = P1^3; //红外热释传感器定义
bit flag_300ms = 0;
uchar flag_alarm ; //报警标志位
uchar flag_bufang ; //布防标志位
uchar flag_bufang_en ; //布防标志位使能
uint flag_value; //用做定时器的变量
/***********************1ms延时函数*****************************/
void delay_1ms(uint q)
{
uint i,j;
for(i=0;i<q;i++)
for(j=0;j<120;j++);
}
/********************独立按键程序*****************/
uchar key_can; //按键值
void key() //独立按键程序
{
static uchar key_new;
key_can = 20; //按键值还原
P1 |= 0x07;
if((P1 & 0x07) != 0x07) //按键按下
{
delay_1ms(1); //按键消抖动
if(((P1 & 0x07) != 0x07) && (key_new == 1))
{ //确认是按键按下
key_new = 0;
switch(P1 & 0x07)
{
case 0x06: key_can = 1; break; //得到按键值
case 0x05: key_can = 2; break; //得到按键值
case 0x03: key_can = 3; break; //得到按键值
}
}
}
else //按键松开
key_new = 1;
}
/******************对应不同按键处理**********************/
void key_with()
{
if(key_can == 1) //按键紧急报警
{
flag_alarm = 1; //报警标志位 ;
}
if(key_can == 2) //布防按键
{
flag_bufang_en = 1;
}
if(key_can == 3) //取消报警 把变量清零
{
flag_alarm = 0;
flag_bufang = 0;
flag_bufang_en = 0;
flag_value = 0;
beep = 1;
red = 1; //关闭红灯
green = 1; //关闭绿灯
yellow = 1; //关闭黄灯
}
}
/*************定时器0初始化程序***************/
void time_init()
{
EA = 1; //开总中断
TMOD = 0X01; //定时器0工作方式1
ET0 = 1; //开定时器0中断
TR0 = 1; //允许定时器0定时
}
/******************红外报警处理**********************/
void hongwai_dis()
{
if(flag_bufang_en == 1) //准备开始布防
{
green = ~green; //绿灯闪
}
if(flag_bufang == 1) //确认布防
{
green = 0; //如果延时布防成功 绿灯长亮
if(hw == 1) //红外有输出
{
flag_alarm = 1;
}
}
if(flag_alarm == 1) //报警
{
red = ~red; //红灯报警
beep = ~beep; //蜂鸣器报警
}
}
/******************主程序**********************/
void main()
{
time_init(); //定时器初始化程序
beep = 0; //开机叫一声
delay_1ms(200);
P0 = P1 = P2 = P3 = 0xff; //初始化单片机IO口为高电平
while(1)
{
key();
yellow = ~hw; //红外热释电指示灯 有输出就亮黄灯
if(key_can < 10)
{
key_with(); //按键设置函数
}
if(flag_300ms == 1)
{
flag_300ms = 0;
hongwai_dis(); //红外报警函数
}
}
}
/*************定时器0中断服务程序***************/
void time0_int() interrupt 1
{
static uint value;
TH0 = 0x3c;
TL0 = 0xb0; // 50ms
value ++;
if(value % 6 == 0)
{
flag_300ms = 1;
}
if(flag_bufang_en == 1)
{
flag_value ++; // 400 * 50ms = 20000ms = 20秒
if(flag_value >= 400) //20秒
{
flag_bufang = 1;
flag_bufang_en = 0;
flag_value = 0;
}
}
}
复制代码
内含代码及代码,仿真
红外热释电.zip
(203.9 KB, 下载次数: 139)
2021-12-12 14:37 上传
点击文件名下载附件
下载积分: 黑币 -5
作者:
@zdd1998
时间:
2022-11-15 14:53
左下角蓝色的箭头是什么呀?
欢迎光临 (http://www.51hei.com/bbs/)
Powered by Discuz! X3.1