單片機(jī)學(xué)習(xí)型紅外線遙控器制作資料含源碼,原理圖與PCB及視頻演示

ID:366653 · 發(fā)表于 2018-7-7 09:35

分享一個(gè)學(xué)習(xí)型紅外遙控程設(shè)計(jì)資料需要的拿走

設(shè)計(jì)視頻：

Altium Designer畫的學(xué)習(xí)型紅外線遙控器的PCB圖如下：(51hei附件中可下載工程文件)

電路原理圖如下：

元件清單：

單片機(jī)源程序如下:

/*********************************************************************/
// remote.c
// 學(xué)習(xí)型遙控器
/*********************************************************************/
//使用AT89C52單片機(jī)，12MHZ晶振，
//
//#pragma src(E:\remote.asm)
#include "reg51.h"
#include "intrins.h" //_nop_();延時(shí)函數(shù)用
//
#define uchar unsigned char
#define uint unsigned int
//
sbit studylamp=P1^6; //學(xué)習(xí)狀態(tài)指示燈
sbit lamp=P1^7; //發(fā)射指示燈
sbit studykey=P3^2; //學(xué)習(xí)鍵(中斷口）
sbit remotein=P3^4; //遙控信號(hào)輸入口
sbit remoteout=P3^5; // 遙控輸出口
sbit txkey=P1^0 ; //發(fā)射鍵
//
//
uint i,j,m=255,n,k,s;
uchar idata remotedata[206];//存肪沖寬度數(shù)據(jù)用
uint head; //存起始位用
uint remdata;
//
//
////
/*********1毫秒延時(shí)程序**********/
delay1ms(uint t)
{
for(i=0;i<t;i++)
for(j=0;j<120;j++)
;
}
//
//
/***********初始化函數(shù)**********/
clearmen()
{
studylamp=0; //關(guān)學(xué)習(xí)燈
lamp=0; //關(guān)發(fā)射指示
remoteout=0; //關(guān)遙控輸出
remotein=1; //
for(i=0;i<206;i++) //清內(nèi)存
{remotedata[i]=0x00;}
IE=0x00;
IP=0x01;
TMOD=0x22; //8位自動(dòng)重裝模式
PCON=0X00;
TH1=0xf3; //40KHZ初值
TL1=0xf3;
IT0=1;
EX0=1; //外中斷允許
EA=1; //開(kāi)總中斷
}
//
//
/**********鍵功能函數(shù)************/
keywork()
{
if(txkey==0)
{
while(txkey==0); //等待鍵釋放
ET1=1;TR1=1; //發(fā)起始位
for(i=head;i>0;i--){;}
remoteout=0;ET1=0;TR1=0;
n=0;
while(1)
{
if(remotedata[n]==0x00){delay1ms(10);break;}//數(shù)據(jù)為0結(jié)束
for(i=remotedata[n];i>0;i--){_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();}
lamp=~lamp;n++;//偶地址不發(fā)脈沖
//
ET1=1;TR1=1; //奇地址發(fā)調(diào)制脈沖
for(i=remotedata[n];i>0;i--){;}
remoteout=0;ET1=0;TR1=0;n++;
}
}
}
//
//
/***********主函數(shù)***************/
main()
{
clearmen(); //初始化
while(1)
{
keywork(); //按鍵掃描
}
}
//
//
/*********40KHZ發(fā)生器***********/
//定時(shí)中斷T1
void time_intt1(void) interrupt 3
{
remoteout=~remoteout;
}
//
//
/***********學(xué)習(xí)函數(shù) ***********/
//外中斷0
void intt0(void) interrupt 0
{
ET1=0;TR1=0;EX0=0;EA=0;
head=0;studylamp=1;lamp=0;
while(studykey==0); //等待鍵釋放
while(remotein==1); //等待遙控碼輸入
head=0; //讀入起始位
while(remotein==0){_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();head++;}
n=0;remdata=0x0000;
while(1)
{
while(remotein==1){_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();remdata++;}
if(remdata>m) //高電平>5毫秒退出
{remotedata[n]=0x00;EX0=1;EA=1;goto end;}
remotedata[n]=remdata;n++; //存高電平脈寬數(shù)據(jù)
remdata=0x0000; //脈寬計(jì)數(shù)器清零
while(remotein==0){_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();remdata++;} //低電平計(jì)數(shù)
……………………
…………限于本文篇幅余下代碼請(qǐng)從51黑下載附件…………

復(fù)制代碼

所有資料51hei提供下載:

學(xué)習(xí)型紅外線遙控.rar (9.89 MB, 下載次數(shù): 229)

ID:367656 · 發(fā)表于 2018-7-9 09:37

學(xué)習(xí)了，謝謝樓主分享。

ID:340878 · 發(fā)表于 2018-9-24 17:47

為什么會(huì)有兩個(gè)原理圖�。�

ID:419018 · 發(fā)表于 2018-11-16 09:35

如果學(xué)習(xí)多個(gè)按鍵，電路和程序如何修改？

ID:462106 · 發(fā)表于 2019-2-14 22:45

哈哈，非常棒啊！

ID:471632 · 發(fā)表于 2019-3-6 10:53

這個(gè)可是個(gè)好東西，昨天晚上剛想這個(gè)，今天就找個(gè)例子了。

ID:494207 · 發(fā)表于 2019-3-19 20:34

好東西，值得學(xué)習(xí)！

ID:304839 · 發(fā)表于 2019-3-22 23:55

默默大的得發(fā)表于 2019-2-14 22:45
哈哈，非常棒啊！

想問(wèn)一下怎么燒寫到板子上

ID:304839 · 發(fā)表于 2019-3-22 23:56

18371269426 發(fā)表于 2019-3-19 20:34
好東西，值得學(xué)習(xí)！

想問(wèn)一下，這個(gè)程序怎么燒寫進(jìn)板子

ID:499283 · 發(fā)表于 2019-3-27 21:38

新海闊天空發(fā)表于 2019-3-22 23:55
想問(wèn)一下怎么燒寫到板子上

R7不用管的嗎？？

ID:255472 · 發(fā)表于 2019-8-7 18:54

空調(diào)遙控器能用嗎？

ID:484435 · 發(fā)表于 2019-8-8 19:20

謝謝分享

ID:636697 · 發(fā)表于 2019-11-25 09:09

正在自學(xué)當(dāng)中

ID:385168 · 發(fā)表于 2020-1-7 05:54

一直在找這方面的資料，謝謝樓主分享。

ID:398219 · 發(fā)表于 2020-1-27 16:57

謝謝大神分享，把12的晶振程序改11.0592的，可行嗎

ID:34637 · 發(fā)表于 2020-2-10 23:36

高手啊！向你學(xué)習(xí)！

ID:305511 · 發(fā)表于 2020-2-11 17:45

值得學(xué)習(xí)，謝謝！

ID:517951 · 發(fā)表于 2020-11-15 16:22

不錯(cuò)，值得學(xué)習(xí)。51hei有你更精彩��！

ID:95375 · 發(fā)表于 2021-8-16 22:47

這個(gè)有圖有程序真的很好，我先試用一下看能不能用先

ID:95375 · 發(fā)表于 2021-8-19 21:33

完全按樓主的電路搭了個(gè)電路，程序運(yùn)行大概沒(méi)問(wèn)題，就是學(xué)習(xí)后的波形一是反向了，另一就是有一向的信號(hào)沒(méi)截止吧，都沒(méi)分開(kāi)，所以解決這兩個(gè)問(wèn)題就能正常使用了，先記錄，去試驗(yàn)其它帖子的程序先。

ID:95375 · 發(fā)表于 2021-8-19 21:34

本帖最后由 liyago 于 2021-8-20 10:58 編輯

占樓

帳號(hào)		自動(dòng)登錄	找回密碼
密碼			立即注冊(cè)

單片機(jī)學(xué)習(xí)型紅外線遙控器制作資料含源碼,原理圖與PCB及視頻演示

評(píng)分

瀏覽過(guò)的版塊

單片機(jī)學(xué)習(xí)型紅外線遙控器制作資料 含源碼,原理圖與PCB及視頻演示

評(píng)分

瀏覽過(guò)的版塊

單片機(jī)學(xué)習(xí)型紅外線遙控器制作資料含源碼,原理圖與PCB及視頻演示