0 )t--;}s" />

衡阳派盒市场营销有限公司

0
  • 聊天消息
  • 系統(tǒng)消息
  • 評論與回復(fù)
登錄后你可以
  • 下載海量資料
  • 學(xué)習(xí)在線課程
  • 觀看技術(shù)視頻
  • 寫文章/發(fā)帖/加入社區(qū)
會員中心
創(chuàng)作中心

完善資料讓更多小伙伴認(rèn)識你,還能領(lǐng)取20積分哦,立即完善>

3天內(nèi)不再提示

51單片機及紅外熱釋電傳感器仿真

科技綠洲 ? 來源:單片機實例設(shè)計 ? 作者:單片機實例設(shè)計 ? 2023-09-11 11:32 ? 次閱讀

1.51單片機+LCD1602顯示屏+紅外熱釋電傳感器仿真

功能:

(1)紅外熱釋電傳感器采用按鍵模擬輸入信號,由于傳感器檢測人體時輸出高電平,按鍵需要下拉電阻作為無信號時的電平狀態(tài)。

(2)當(dāng)熱釋電檢測到人體時,LED燈亮以及蜂鳴器響起。

圖片

2.程序設(shè)計(采用keil5進(jìn)行編程

#include < reg52.h >
#include < intrins.h > 
#include < math.h >
#define uchar  unsigned char
#define uint   unsigned int   
//延時函數(shù)ms
void _delay_ms(uint t)
{
   uint i,j;
   for(i=0;i< t;i++)
     for(j=0;j< 120;j++);
}
//延時函數(shù)us
void _delay_us(uchar t)
{
   while(t >0)t--;
}


sbit  RS=P3^2;  //寫信號
sbit  RWW=P3^3;  //讀信號
sbit  E=P3^4;  //使能信號
#define e1   E=1 
#define rd1  RWW=1  
#define rs1  RS=1  
#define e0   E=0 
#define rd0  RWW=0 
#define rs0  RS=0 
#define PP P1
//寫1602控制字
void  lcd1602_writecrtl(uchar  dat)
{
  rd0;//讀信號置0
  rs0;//寫信號置0
  _delay_us(5);
  PP=dat;
  e1;//使能信號置1
  _delay_us(5);
  e0;//使能信號置0
}
//寫1602數(shù)據(jù)
void  lcd1602_writenumber(uchar dat)
{
  rd0;//讀信號置0
  rs1;//寫信號置1
  _delay_us(5);
  PP=dat;
  e1;//使能信號置1
  _delay_us(5);
  e0;//使能信號置0
}
//1602初始化
void  lcd1602_init()  
{
  lcd1602_writecrtl(0x38); //顯示模式
  lcd1602_writecrtl(0x06); //顯示光標(biāo)移動位置
  lcd1602_writecrtl(0x0c); //顯示開及光標(biāo)設(shè)置
  lcd1602_writecrtl(0x01); //顯示清屏
}
//顯示地址
void  lcd1602_adr(uchar dat)  
{
  lcd1602_writecrtl(0x80 | dat);
}
//行顯示-
void LCD1602_string(uchar hang,uchar lie,uchar const *p)
{
  uchar a;
  if(hang == 1) a = 0x00;
  if(hang == 2) a = 0x40;
  a = a + lie - 1;
  lcd1602_adr(a);
  while(1)
  {
    if(*p == '?') break;
    lcd1602_writenumber(*p);
    p++;
  }
}
uchar code zifux[]="0123456789abcdef";
uchar code zifu0[]="Pyroelectric    ";
uchar code zifu2[]="   Alarm       ";
uchar code zifu1[]="   Normal      ";
sbit  key_sr= P2^1;//傳感器
sbit led= P0^0; //報警
sbit  beer= P2^7;//報警
uint jishu1=0;
uint jishubeer=0;
uchar bz=0;
//---------------
void ct()                                                              
{  
   //顯示
  if(bz==0)  LCD1602_string(2,1,zifu1); 
  if(bz==1)  LCD1602_string(2,1,zifu2);
  //判斷
  if((key_sr==1)&&(bz==0)) {bz=1;jishu1=0;}
  //報警
  if(bz==1)
  {
     jishubeer=(jishubeer+1)%100;
     if(jishubeer >50){beer=led=0;} 
   else {beer=led=1;}
   //延時
   jishu1=jishu1+1;if(jishu1 >500) {jishu1=0;bz=0;}
  }
  else {beer=led=1;}
}
//主函數(shù)
void main()
{ 
  _delay_ms(1);
  key_sr=0;
  //初始化
  lcd1602_init();
  LCD1602_string(1,1,zifu0);
  LCD1602_string(1,1,zifu0);
  LCD1602_string(2,1,zifu1);
  while(1)
   {
    ct();


  } 
}
聲明:本文內(nèi)容及配圖由入駐作者撰寫或者入駐合作網(wǎng)站授權(quán)轉(zhuǎn)載。文章觀點僅代表作者本人,不代表電子發(fā)燒友網(wǎng)立場。文章及其配圖僅供工程師學(xué)習(xí)之用,如有內(nèi)容侵權(quán)或者其他違規(guī)問題,請聯(lián)系本站處理。 舉報投訴
  • 傳感器
    +關(guān)注

    關(guān)注

    2553

    文章

    51390

    瀏覽量

    756572
  • 仿真
    +關(guān)注

    關(guān)注

    50

    文章

    4124

    瀏覽量

    133991
  • 51單片機
    +關(guān)注

    關(guān)注

    274

    文章

    5705

    瀏覽量

    124294
  • 紅外熱釋電
    +關(guān)注

    關(guān)注

    0

    文章

    11

    瀏覽量

    7933
收藏 人收藏

    評論

    相關(guān)推薦

    紅外傳感器

    本人弄畢設(shè),proteus中找不到電傳感器,百度說用信號源輸出1Hz正弦波代替紅外傳感器
    發(fā)表于 05-08 10:12

    人體紅外電傳感器

    ==0) //當(dāng)傳感器被遮蔽的時候向單片機輸入低電平,單片機控制放光二極管亮led=0;elseled=1;}}
    發(fā)表于 10-04 16:08

    大神們有知道51單片機怎么用中斷識別人體紅外電傳感器的3v信號嗎?

    我用51單片機控制人體紅外電傳感器,怎么中斷不能產(chǎn)生?是不是輸出的3v電壓太低不能識別?有沒
    發(fā)表于 10-14 23:03

    紅外傳感器單片機怎么連接

    紅外傳感器單片機連接一般用什么型號,誰有這方面的質(zhì)料求發(fā)
    發(fā)表于 11-22 09:40

    請問電人體紅外傳感器51單片機怎么連接檢測信號?

    我用51單片機控制人體紅外電傳感器,怎么中斷不能產(chǎn)生?是不是輸出的3v電壓太低不能識別?有沒
    發(fā)表于 08-06 00:00

    熱電堆傳感器電傳感器的區(qū)別是什么?

    甘肽等受熱時,晶體兩端會產(chǎn)生數(shù)量相等、符號相反的電荷。1842年布魯斯特將這種由溫度變化引起的電極化現(xiàn)象正式命名為“pyroelectric”,即電效應(yīng)。電效應(yīng)示意圖
    發(fā)表于 03-06 14:02

    紅外電傳感器是什么

    概述 紅外電傳感器是一款基于電效應(yīng)的人體熱
    發(fā)表于 11-23 07:37

    電傳感器紅外傳感器

    實驗 光電傳感器——紅外傳感器實驗原理:紅外傳感
    發(fā)表于 03-06 15:51 ?5878次閱讀
    光<b class='flag-5'>電傳感器</b>—<b class='flag-5'>熱</b><b class='flag-5'>釋</b>電<b class='flag-5'>紅外傳感器</b>

    電傳感器電路圖大全(六款電傳感器電路設(shè)計原理圖詳解)

    本文主要介紹了電傳感器電路圖大全(六款電傳感器電路設(shè)計原理圖詳解)。
    發(fā)表于 03-04 09:48 ?8.9w次閱讀

    電傳感器的應(yīng)用

    紅外傳感器利用專用晶體材料產(chǎn)生的電效應(yīng)來檢測紅外線輻射的變化。通過檢測
    的頭像 發(fā)表于 07-11 14:07 ?1.5w次閱讀

    電傳感器結(jié)構(gòu)

    紅外傳感器由濾光片、電探測元和前置放大器組成,補償型
    的頭像 發(fā)表于 07-11 14:07 ?7449次閱讀

    電傳感器的原理及特性

    電傳感器是一種能檢測人或動物發(fā)射的紅外線而輸出電信號的傳感器。早在1938年,就有人提出過利用
    發(fā)表于 11-30 10:27 ?1.1w次閱讀
    <b class='flag-5'>熱</b><b class='flag-5'>釋</b><b class='flag-5'>電傳感器</b>的原理及特性

    電傳感器如何提高被動紅外探測的準(zhǔn)確性

    電傳感器可以用于被動紅外探測——也就是常見的防盜報警中,這是紅外
    發(fā)表于 12-15 17:26 ?1879次閱讀

    CC2530人體紅外電傳感器

    CC2530人體紅外電傳感器文件分享
    發(fā)表于 09-27 14:43 ?2次下載

    松下外電傳感器手冊

    松下外電傳感器手冊免費下載。松下公司的紅外電傳感器
    發(fā)表于 06-09 16:49 ?4次下載
    爱赢娱乐城| 网上百家乐官网作弊不| 易胜博娱乐场| 大发888官方 df888 gfxzylc8| 百家乐网| 五星百家乐的玩法技巧和规则 | 澳门百家乐博牌| 金沙百家乐娱乐城场| 百家乐官网园qq群| 月华百家乐官网的玩法技巧和规则 | 赌场百家乐官网赢钱| 百家乐官网游戏世界视频| 百家乐官网下注口诀| 百家乐官网如何投注法| 娄底市| 凭祥市| 北安市| 平陆县| 百家乐官网美女真人| 娄底市| 百家乐官网起步多少| 永嘉县| 百家乐官网赢钱lv| 百家乐官网重要心态| 太阳城百家乐官网币| 皇冠网热门小说| 网络博彩群| 澳门赌场美女| 象州县| 新宝百家乐官网网址| 百家乐官网冯氏坐庄法| 百家乐官网必胜软件下载| 玩百家乐官网是否有技巧| 澳门百家乐官网玩| 网络百家乐官网真假| 伯爵百家乐官网娱乐网| 百家乐官网斗地主下载| 百家乐官网任你博娱乐场开户注册| 华侨人百家乐官网的玩法技巧和规则 | 百家乐官网正负计算| 百家乐游戏必赢法|