欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136
標題:
單片機紅外遙控器+紅外一體化接收頭部分的Proteus仿真程序
[打印本頁]
作者:
繁星落葉
時間:
2022-12-8 13:53
標題:
單片機紅外遙控器+紅外一體化接收頭部分的Proteus仿真程序
紅外線編碼是數據傳輸和家用電器遙控常用的一種通訊方法,其實質是一種脈寬調制的串行通訊。家電遙控中常用的紅外線編碼電路有μPD6121G型HT622型和7461型等。
這里就以這些電路的編碼格式來仿真怎樣使用單片機的捕獲中斷功能來實現其解碼。 紅外線通訊的發送部分主要是把待發送的數據轉換成一定格式的脈沖,然后驅動紅外發光管向外發送數據。接收部分則是完成紅外線的接收、放大、解調,還原成同步發射格式相同(但高、低電位剛好相反的脈沖信號)。這些工作通常由一體化的接收頭來完成,主要輸出TTL兼容電平。最后通過解碼把脈沖信號轉換成數據,從而實現數據的傳輸。
本單元就是來完成一體化接收頭接受到的紅外遙控器編碼后的輸出數據,所以只要單片機完成本單元的解碼任務,并成功實現之后,只要將IR引腳接上紅外接收頭之后就可以實現紅外遙控的功能了。
這是我積累前人經驗和自己實踐的成果,并且已經有硬件的成功案例,并非只是理論.
16704786451hei7.jpg
(51.7 KB, 下載次數: 46)
下載附件
2022-12-8 13:53 上傳
單片機源程序如下:
#include "At89x51.h"
#include "stdio.h"
#include "stdlib.h"
#include "string.h"
#define JINGZHEN 48
#define TIME0TH ((65536-100*JINGZHEN/12)&0xff00)>>8 //time0,100us,紅外遙控
#define TIME0TL ((65536-100*JINGZHEN/12)&0xff)
#define TIME1TH ((65536-5000*JINGZHEN/12)&0xff00)>>8
#define TIME1TL ((65536-5000*JINGZHEN/12)&0xff)
#define uchar unsigned char
#define uint unsigned int
code uchar BitMsk[]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80,};
uint IrCount=0,Show=0,Cont=0;
uchar IRDATBUF[32],s[20];
uchar IrDat[5]={0,0,0,0,0};
uchar IrStart=0,IrDatCount=0;
extern void initLCM( void); //LCD初始化子程序
extern void DisplayListChar(uchar X,uchar Y, unsigned char *DData); //顯示指定坐標的一串字符子函數
void timer1int (void) interrupt 3 using 3{ //定時器1
EA=0;
TH1 = TIME1TH;
TL1 = TIME1TL;
Cont++;
if(Cont>10)Show=1;
EA=1;
}
void timer0int (void) interrupt 1 using 1{ //定時器0
uchar i,a,b,c,d;
EA=0;
TH0 = TIME0TH;
TL0 = TIME0TL;
if(IrCount>500)IrCount=0;
if(IrCount>300&&IrStart>0){IrStart=0;IrDatCount=0;IrDat[0]=IrDat[1]=IrDat[2]=IrDat[3]=0;IrCount=0;}
if(IrStart==2)
{
IrStart=3;
for(i=0;i<IrDatCount;i++)
{
if(i<32)
{
a=i/8;
b=IRDATBUF[i];
c=IrDat[a];
d=BitMsk[i%8];
if(b>5&&b<14)c|=d;
if(b>16&&b<25)c&=~d;
IrDat[a]=c;
}
}
if(IrDat[2]!=~IrDat[3])
{
IrStart=0;IrDatCount=0;IrDat[0]=IrDat[1]=IrDat[2]=IrDat[3]=0;IrCount=0;
}
EA=1;
return;
}
IrCount++;
EA=1;
}
void int0() interrupt 0 using 0 {
EA=0;
if(IrStart==0)
{
IrStart=1;IrCount=0;TH0 = TIME0TH;TL0 = TIME0TL;
IrDatCount=0;EA=1;
return;
}
if(IrStart==1)
……………………
…………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼
Keil代碼與Proteus7.5 ; 8.13仿真下載:
紅外遙控模擬.7z
(71.82 KB, 下載次數: 50)
2022-12-8 18:38 上傳
點擊文件名下載附件
下載積分: 黑幣 -5
歡迎光臨 (http://m.raoushi.com/bbs/)
Powered by Discuz! X3.1