找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

帖子
查看: 13722|回復(fù): 5
打印 上一主題 下一主題
收起左側(cè)

51單片機(jī)對紅外發(fā)射和紅外接收模塊電路+程序設(shè)計

  [復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:407794 發(fā)表于 2018-12-12 22:07 | 只看該作者 |只看大圖 回帖獎勵 |倒序瀏覽 |閱讀模式
一、簡介
紅外發(fā)射模塊:電源3.3V或5V,通過發(fā)射管發(fā)射38KHz的紅外信號,高電平驅(qū)動
紅外接收模塊:電源3.3V或5V,可接收紅外信號,并解調(diào)成邏輯電平,低電平有效
二、電路圖

紅外發(fā)射電路圖

紅外接收電路圖
三、紅外發(fā)射模塊代碼
#include
#include
#define uchar unsigned char
#define uint unsigned int
//管腳定義
sbit key = P2^0;
sbit out = P2^1;
//函數(shù)聲明
void delayms(uchar aa); //紅外發(fā)射延時
void khz(uchar aa); //發(fā)射38KHz
void IR_OUT(uchar num); //紅外發(fā)射
void keyScan(); //讀取鍵盤信息
//變量聲明
uchar i, a, num1;
//-----------------------
//紅外發(fā)射延時
//-----------------------
void delayms(uchar aa)
{
for(a=aa; a》0; a--)
{
_nop_();
_nop_();
_nop_();
_nop_();
_nop_();
_nop_();
_nop_();
_nop_();
}
}
//-----------------------
//發(fā)射38KHz
//-----------------------
void khz(uchar aa)
{
for(a=aa;a》0;a--) //這個for語句可以得到準(zhǔn)確的26.3波特率
{
out=0;
i=7;
while(i》0) i--; //38kHZ
out=1;
}
}
//-----------------------
//紅外發(fā)射
//-----------------------
void IR_OUT(uchar num)
{
khz(116); //發(fā)射3ms 38khz
delayms(125);
for(num1=8; num1》0; num1--)
{
khz(40);
if(num&0x01)
delayms(93); //delay 1.5ms
else
delayms(65); //delay 1ms
num=num》》1;
}
khz(20);
}
//-----------------------
//讀取鍵盤信息
//-----------------------
void keyScan()
{
if(key==0)
{
_nop_(); _nop_(); _nop_();
_nop_(); _nop_(); _nop_();
if(key==0)
IR_OUT(0xC0);
key = 1;
}
}
//-----------------------
//主函數(shù)
//-----------------------
void main()
{
key = 1;
while(1)
{
keyScan();
}
}
四、紅外接收模塊代碼
#include
#include
#define uchar unsigned char
#define uint unsigned int
//管腳定義
sbit in = P3^2; //紅外中斷接收
//P2接靜態(tài)數(shù)碼管
//函數(shù)聲明
void init(); //初始化函數(shù)
void delayms(uchar j); //延時函數(shù)
//變量聲明
uchar i, num, a;
bit fleg;
//-----------------------
//初始化函數(shù)
//-----------------------
void init()
{
fleg = 1; //標(biāo)志位
in = 1; //紅外接收
EA = 1; //中斷設(shè)置
EX0 = 1;
IT0 = 1;
}
//-----------------------
//延時函數(shù)
//-----------------------
void delayms(uchar j)
{
for(i=j; i》0; i--)
{
_nop_(); _nop_(); _nop_();
_nop_(); _nop_(); _nop_();
}
}//-----------------------
//主函數(shù)
//-----------------------
void main()
{
init();
while(1);
}
//-----------------------
//接收中斷
//-----------------------
void sieasdf() interrupt 0
{
EX0 = 0;
for(a=5; a》0; a--)
{
delayms(35);//延時0.5ms 判斷5次 5*0.5=2.5ms
if(in) fleg=0;
}
if(fleg)
{
delayms(72);//延時1ms 判斷是不是高電平了
if(in)
{
delayms(115);//延時讓它超過2ms; 2.5+1+1.623=5.123ms 開始讀數(shù)據(jù)
delayms(118);//若偏移一位,可以去掉。
for(a=8; a》0; a--)
{
while(!in);
delayms(86);//延時1.188ms 判斷IO高低,從而得0或1
num = num》》1;
if(in)
{
num = num|0x80;
delayms(31);//延時0.6ms 因為上面延時1.2ms+0.6 剛好跳過1.5ms
}
}
P2 = num;
}
}
fleg = 1;
EX0 = 1;
}

評分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵!

查看全部評分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏5 分享淘帖 頂 踩
回復(fù)

使用道具 舉報

沙發(fā)
ID:237723 發(fā)表于 2018-12-13 08:38 | 只看該作者
不明白for(num1=8; num1》0; num1--)   num1右移0是什么意思
回復(fù)

使用道具 舉報

板凳
ID:407794 發(fā)表于 2018-12-13 22:22 | 只看該作者
qyh123456 發(fā)表于 2018-12-13 08:38
不明白for(num1=8; num1》0; num1--)   num1右移0是什么意思

補(bǔ)零右移0.0
回復(fù)

使用道具 舉報

地板
ID:539254 發(fā)表于 2019-7-25 11:46 | 只看該作者
請問接收電路圖中 左邊的J1是什么意思?
回復(fù)

使用道具 舉報

5#
ID:425175 發(fā)表于 2019-8-5 21:28 | 只看該作者
creeperist 發(fā)表于 2019-7-25 11:46
請問接收電路圖中 左邊的J1是什么意思?

排針(排針母座)
回復(fù)

使用道具 舉報

6#
ID:378732 發(fā)表于 2019-8-19 21:35 | 只看該作者
qyh123456 發(fā)表于 2018-12-13 08:38
不明白for(num1=8; num1》0; num1--)   num1右移0是什么意思

這是個NUM>0,大于0
回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表