HX1838紅外無線遙控模塊51單片機程序

ID:313027 · 發表于 2018-12-3 15:05

紅外無線模塊：
1.硬件：紅外接收器+遙控器
2.連接方式：接收器的+、-分別連接在單片機的VCC、GND上面，S為信號輸出端連接在單片機的IO口上面（例程里面連接在了P3^2引腳）
3.遙控器上面每一個按鍵對應的鍵碼值已經在程序中給出，程序的內容是用遙控器控制單片機上面的流水燈

單片機源程序如下:

#include<reg52.h> //包含單片機寄存器的頭文件
#include<intrins.h> //包含_nop_()函數定義的頭文件
#define uchar unsigned char
#define uint unsigned int
sbit IRIN=P3^2; //紅外接收器數據線
sbit led1=P1^0;
sbit led2=P1^1;
sbit led3=P1^2;
sbit led4=P1^3;
sbit led5=P1^4;
sbit led6=P1^5;
sbit led7=P1^6;
sbit led8=P1^7;
uchar IRCOM[7];
void delay(unsigned char x) ;
/*******************************************************************/
void main()
{
unsigned int a;
IRIN=1; //I/O口初始化
IE=0x81; //允許總中斷中斷,使能 INT0 外部中斷
TCON=TCON|0x01; //觸發方式為脈沖負邊沿觸發
while(1)
{
for(a=100;a>0;a--)
{
void IR_IN();
}
}
}
/**********************************************************/
void IR_IN() interrupt 0 using 0
{
unsigned char j,k,N=0;
unsigned char q=0;
EX0 = 0;
delay(15);
if (IRIN==1)
{
EX0 =1;
return;
}
//確認IR信號出現
while (!IRIN) //等IR變為高電平，跳過9ms的前導低電平信號。
delay(1);
for (j=0;j<4;j++) //收集四組數據
{
for (k=0;k<8;k++) //每組數據有8位
{
while (IRIN) //等 IR 變為低電平，跳過4.5ms的前導高電平信號。
{delay(1);}
while (!IRIN) //等 IR 變為高電平
delay(1);
while (IRIN) //計算IR高電平時長
{
delay(1);
N++;
if (N>=30)
{
EX0=1;
return;
} //0.14ms計數過長自動離開。
} //高電平計數完畢
IRCOM[j]=IRCOM[j] >> 1; //數據最高位補“0”
if(N>=8)
{
IRCOM[j] = IRCOM[j] | 0x80; //數據最高位補“1”
}
N=0;
}
}
if(IRCOM[2]!=~IRCOM[3])
{
EX0=1;
return;
}
IRCOM[5]=IRCOM[2] & 0x0F; //取鍵碼的低四位
IRCOM[6]=IRCOM[2] >> 4; //右移4次，高四位變為低四位
if(IRCOM[5]>9)
{
IRCOM[5]=IRCOM[5]+0x37;
}
else
IRCOM[5]=IRCOM[5]+0x30;
if(IRCOM[6]>9)
{
IRCOM[6]=IRCOM[6]+0x37;
}
else
IRCOM[6]=IRCOM[6]+0x30;
q= (((IRCOM[6]&0x0f)<<4) + (IRCOM[5]&0x0f));
switch(q) //判斷按鍵鍵碼值
{
case 0x04:led1=1;led2=0;led3=1;led4=0;led5=1;led6=0;led7=1;led8=0;break; //（#）
case 0x19:led1=0;break; //（0）
case 0x40:led5=0;break; //（5）
case 0x43:led6=0;break; //（6）
case 0x44:led4=0;break; //（4）
case 0x45:led1=0;break; //（1）
case 0x46:led2=0;break; //（2）
case 0x47:led3=0;break; //（3）
case 0x07:led7=0;break; //（7）
case 0x18:led1=0;led2=0;led3=1;led4=1;led5=1;led6=1;led7=1;led8=1;break; //（上）
case 0x09:led1=0;led2=0;led3=0;led4=0;led5=0;led6=0;led7=0;led8=0;break; //（9）
case 0x08:led1=1;led2=1;led3=1;led4=1;led5=0;led6=0;led7=1;led8=1;break; //（左）
case 0x13:led1=1;led2=1;led3=1;led4=1;led5=1;led6=1;led7=1;led8=1;break; //（ok）
case 0x51:led1=1;led2=1;led3=1;led4=1;led5=1;led6=1;led7=0;led8=0;break; //（右）
case 0x15:led8=0;break; //（8）
case 0x52:led1=1;led2=1;led3=0;led4=0;led5=1;led6=1;led7=1;led8=1;break; //（下）
case 0x16:led1=0;led2=1;led3=0;led4=1;led5=0;led6=1;led7=0;led8=1;break; // （*）
default :break;
}
EX0 = 1;
}
/***************延時函數*****************************/
void delay(unsigned char x) //x*0.14MS
{
unsigned char i;
while(x--)
{
for (i = 0; i<13; i++) {}
}
}

復制代碼

所有資料51hei提供下載:

CR2025.zip (28.47 KB, 下載次數: 292)

ID:365823 · 發表于 2019-2-18 16:26

感謝分享

ID:293438 · 發表于 2019-3-24 20:37

學習了

ID:65956 · 發表于 2019-3-25 09:02

謝謝分享

ID:472506 · 發表于 2019-3-25 12:08

學習學習。

ID:500015 · 發表于 2019-3-28 16:44

謝謝！

ID:62865 · 發表于 2019-10-21 16:37

tzr448106883 發表于 2019-7-31 18:15
你好啊我把這個代碼寫到STC89C52能用但是寫到STC15W401AS就用不了是什么原因？

15系列的比89系列的速度快，估計是延時時間不一致

ID:428298 · 發表于 2019-12-11 10:51

太棒啦！

ID:485431 · 發表于 2020-2-9 15:07

怎么沒有看到電源鍵的作用？？

ID:452950 · 發表于 2020-3-7 14:29

正好用到這款紅外遙控，有了鍵值就不用自己另外解碼了，多謝

ID:686739 · 發表于 2020-3-7 19:59

學習一下

ID:704402 · 發表于 2020-3-8 09:59

感謝分享

ID:434551 · 發表于 2020-3-8 11:17

感謝分享

ID:688189 · 發表于 2020-3-8 18:45

感謝分享

ID:703745 · 發表于 2020-3-11 13:48

xxpp2011 發表于 2020-3-7 14:29
正好用到這款紅外遙控，有了鍵值就不用自己另外解碼了，多謝

請問大佬程序成功了嗎？為什么我下進去不行呢？

ID:452950 · 發表于 2020-3-24 16:23

最高權限發表于 2020-3-11 13:48
請問大佬程序成功了嗎？為什么我下進去不行呢？

我買的紅外遙控看起來是同一款，可能廠家不一樣，實際的數據碼與樓主發的不一致，所以后來自己解碼了。

ID:699194 · 發表于 2020-3-30 17:49

樓主，為什么我燒錄你的程序，紅外遙控沒有反應（和你一樣的紅外模塊），請問是什么原因的呢

ID:314869 · 發表于 2020-4-7 13:26

學習了

ID:356226 · 發表于 2020-4-7 16:32

感謝樓主的分享，對我的課程設計有一定的啟發

ID:618097 · 發表于 2020-4-26 10:23

你好，這個與晶振有沒有關系，我用的是12M的，

ID:497323 · 發表于 2021-3-10 16:15

樓主主頻晶振設置為多少M？0.14mS的延時程序用了14個循環

ID:923440 · 發表于 2021-8-23 21:03

xxpp2011 發表于 2020-3-24 16:23
我買的紅外遙控看起來是同一款，可能廠家不一樣，實際的數據碼與樓主發的不一致，所以后來自己解碼了。

你好，這個紅外模塊的鍵值碼用什么可以測出來呀

，

ID:923440 · 發表于 2021-8-24 10:07

xxpp2011 發表于 2020-3-24 16:23
我買的紅外遙控看起來是同一款，可能廠家不一樣，實際的數據碼與樓主發的不一致，所以后來自己解碼了。

大佬，請問這個怎么解碼，我用的也是這款遙控器，發現也不能顯示，求解碼的程序謝謝

帳號		自動登錄	找回密碼
密碼			立即注冊

wwwxxx国产_337p日本欧洲亚洲大胆张筱雨_免费在线看成人av_日本黄色不卡视频_国产精品成熟老女人_99视频一区_亚洲精品97久久中文字幕_免费精品视频在线_亚洲色图欧美视频_欧美一区二三区

HX1838紅外無線遙控模塊51單片機程序

評分

	7^# 無效樓層，該帖已經被刪除

	11^# 無效樓層，該帖已經被刪除