欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

標題: 基于51單片機的人體紅外報警器程序設計 [打印本頁]

作者: 大哥大雷神 時間: 2016-12-21 14:31
標題: 基于51單片機的人體紅外報警器程序設計
//51單片機簡人體紅外報警器設計，手動按鍵控制實現緊急報警、布防、撤防、關閉報警）//
#include <reg52.h>
#define uchar unsigned char
#define uint  unsigned int

uchar Mode=1,Mode1=0;
uchar t;

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

bit alarm=1,kai=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 i,j;
  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;
            }
      }
}

作者: kkfy888 時間: 2016-12-21 22:07
試驗看看正常不

作者: 說過的挺好 時間: 2016-12-21 22:26
抱走~~試試看行不行~

作者: 大哥大雷神 時間: 2016-12-23 11:17
肯定行

作者: 303977143 時間: 2017-11-28 11:39
51有你真好

作者: 1318777948 時間: 2018-6-22 22:36
有沒有PCB圖啊

作者: huang137 時間: 2018-11-18 22:19
怎么在開發板上面連接線

作者: 我家小姚 時間: 2018-11-22 13:22
有沒有仿真圖，原理圖呢

作者: 電子灬愛好者 時間: 2018-12-5 15:51
很好的資料

作者: snowy. 時間: 2019-6-25 10:12
有沒有用紅外感應人在五米內一直報警的系統呢

作者: 來51學習 時間: 2019-6-26 22:11

snowy. 發表于 2019-6-25 10:12
有沒有用紅外感應人在五米內一直報警的系統呢

如果人在5米內一直報警，可以采用單次觸發模式

作者: 121081 時間: 2019-6-27 10:04
紅外感應范圍是多少

作者: ssst 時間: 2019-11-6 20:46
你有沒有仿真圖啊

作者: 流浪2020年 時間: 2019-12-11 23:48
不可能可以，紅外線檢測部分實現不了，請樓主認真看看51單片機使用手冊，單片機檢測不了外部高電平。

作者: 我們不一樣111 時間: 2019-12-16 11:28
仿真圖沒有

作者: 熱愛科技生活 時間: 2020-4-20 10:24
是不是要用keil燒錄

歡迎光臨 (http://www.raoushi.com/bbs/)