单片机红外报警系统仿真与源码和上面的文档配套

红外防盗报警系统的Proteus仿真和源码，系统功能是手动布防，当红外线监测发现有人闯入时进行报警。此仿真和源码和上面的红外防盗报警系统课程设计文档是配套的。

//51单片机简人体红外报警器设计，手动按键控制实现紧急报警、布防、撤防、关闭报警）//
#include 
#define uchar unsigned char 
#define uint  unsigned int 

uchar Mode=1Mode1=0;
uchar t;

sbit s1=P1^0;
sbit s2=P1^2;
sbit s3=P1^1;

bit alarm=1kai=1;

sbit LR=P2^0;//红灯报警灯
sbit LY=P2^2;//布防灯
sbit LG=P2^1;//红外信号检测灯

sbit Feng=P1^3;//蜂鸣器报警
sbit HR=P0^3;//红外模块接入端口

void delay（uint x） //毫秒级延时函数
{
  uint ij;
  for（i=x;i>0;i--）
     for（j=110;j>0;j--）;
}

void di（）
{
	LR=0;//蜂鸣器报警，红灯跟随闪烁
	Feng=0;
	delay（80）;
	LR=1;
	Feng=1;
	delay（200）;	
}
void main（）
{
	LR=1;//初始化三个灯都是灭
	LG=1;
	LY=1;
	delay（5）;
	while（1）
	{
		if（s1==0）				//紧急手动报警
		{
				delay（5）;	   //延时消抖
				if（s1==0）	
				{
					delay（5）;
					while（!s1）;
					kai=0;
					LY=1;	    
					LG=1;
					alarm=0; //进入报警状态
					Mode1=1; //Mode1置1：紧急报警过程中以防按了布防键取消紧急报警
					delay（5）;
				}			 

		}
		if（s3==0）			//取消报警
		{
								
				delay（5）;
				if（s3==0）				
				{
					delay（5）;
					while（!s3）;
					LR=1;
					LY=1;
					Mode=1;
					Mode1=0;
					alarm=1;
					delay（5）;
				}
		}
		if（s2==0）			//布防
		{
			if（Mode1==1） //判断Mode1的状态，如果是紧急报警状态就保持，否则进入布防设置
			{
				alarm=0;
			}
			else
			{
				for（t=0;t<200;t++）
				{
				  LY=~LY;
				  delay（200）;
				}
				LR=1;
				LY=0;
				Mode=0;	//布防状态标识
				kai=1;
				delay（5）;
			}
				
		} 		
		if（alarm==0）
		{
			di（）;
			delay（100）;
			di（）;
			delay（100）;
		}
		if（HR==1&&Mode==0）
		{
			alarm=0;//开始进入报警
		}
		else
		{
			if（kai）
			{
				alarm=1;
				LR=1;
			}
		}
		if（HR==1）  //检测红外模块有信号，绿灯亮否则灭
		{	   
			LG=0;
			delay（200）;
		}
		else
		{
			LG=1;
		}			 
	}
}

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件     125577  2016-06-25 11:09  210 单片机防盗报警器仿真\仿真\Last Loaded 仿真.DBK

     文件     125577  2016-06-25 11:09  210 单片机防盗报警器仿真\仿真\Last Loaded 红外防盗报警仿真.DBK

     文件        742  2016-06-25 11:14  210 单片机防盗报警器仿真\仿真\仿真.PWI

     文件       1187  2016-06-25 09:31  210 单片机防盗报警器仿真\仿真\红外报警.hex

     文件     125700  2018-05-30 19:41  210 单片机防盗报警器仿真\仿真\红外防盗报警仿真.DSN

     文件        742  2018-05-30 19:41  210 单片机防盗报警器仿真\仿真\红外防盗报警仿真.PWI

     文件      59135  2016-06-25 11:13  210 单片机防盗报警器仿真\仿真\红外防盗报警仿真图.PNG

     文件       4640  2018-05-30 19:40  210 单片机防盗报警器仿真\程序代码\代码\红外报警

     文件       1871  2016-06-25 10:20  210 单片机防盗报警器仿真\程序代码\代码\红外报警.c

     文件       1187  2018-05-30 19:40  210 单片机防盗报警器仿真\程序代码\代码\红外报警.hex

     文件         33  2018-05-30 19:40  210 单片机防盗报警器仿真\程序代码\代码\红外报警.lnp

     文件       6887  2018-05-30 19:40  210 单片机防盗报警器仿真\程序代码\代码\红外报警.LST

     文件       7986  2018-05-30 19:40  210 单片机防盗报警器仿真\程序代码\代码\红外报警.M51

     文件       5080  2018-05-30 19:40  210 单片机防盗报警器仿真\程序代码\代码\红外报警.OBJ

     文件        860  2018-05-30 19:41  210 单片机防盗报警器仿真\程序代码\代码\红外报警.Opt

     文件        253  2018-05-30 19:44  210 单片机防盗报警器仿真\程序代码\代码\红外报警.plg

     文件       2147  2018-05-30 19:41  210 单片机防盗报警器仿真\程序代码\代码\红外报警.Uv2

     文件        847  2016-06-25 11:09  210 单片机防盗报警器仿真\程序代码\代码\红外报警_Opt.Bak

     文件       2118  2015-05-13 21:34  210 单片机防盗报警器仿真\程序代码\代码\红外报警_Uv2.Bak

     目录          0  2018-05-30 19:44  210 单片机防盗报警器仿真\程序代码\代码

     目录          0  2018-05-30 19:44  210 单片机防盗报警器仿真\仿真

     目录          0  2018-05-30 19:44  210 单片机防盗报警器仿真\程序代码

     目录          0  2018-05-30 19:44  210 单片机防盗报警器仿真

----------- ---------  ---------- -----  ----

               472569                    23