//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