❶ 基於51單片機紅外遙控代碼(C語言)
以下文件是51單片機實現遙控解碼,通過數碼管顯示鍵碼的程序,P0口驅動數碼管段選,p2.6和p2.7為數碼管位選,接收頭連到P3.2口。此程序以通過驗證,可以直接編譯使用,另外還有一個繼電器和蜂鳴器的控制,不用可以屏蔽掉。
;********************************************************************************
;* 描述: *
;* 遙控鍵值讀取器 *
;* 數碼管顯示, P0口為數碼管的數據口 *
;* *
;********************************************************************************
;遙控鍵值解碼-數碼管顯示 *
;********************************************************************************/
#include <reg51.h>
#include <intrins.h>
void IR_SHOW();
void delay(unsigned char x);//x*0.14MS
void delay1(unsigned char ms);
void beep();
sbit IRIN = P3^2;
sbit BEEP = P3^7;
sbit RELAY= P1^3;
sbit GEWEI= P2^7;
sbit SHIWEI= P2^6;
unsigned char IRCOM[8];
unsigned char code table[16] =
{0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e};
main()
{
IE = 0x81; //允許總中斷中斷,使能 INT0 外部中斷
TCON = 0x1; //觸發方式為脈沖負邊沿觸發
delay(1);
IRIN=1;
BEEP=1;
RELAY=1;
for(;;)
{
IR_SHOW();
}
} //end main
void IR_IN() interrupt 0 using 0
{
unsigned char i,j,k,N=0;
EA = 0;
I1:
for (i=0;i<4;i++)
{
if (IRIN==0) break;
if (i==3) {EA =1;return;}
}
delay(20);
if (IRIN==1) goto I1; //確認IR信號出現
while (!IRIN) //等 IR 變為高電平
{delay(1);}
for (j=0;j<4;j++)
{
for (k=0;k<8;k++)
{
while (IRIN) //等 IR 變為低電平
{delay(1);}
while (!IRIN) //等 IR 變為高電平
{delay(1);}
while (IRIN) //計算IR高電平時長
{
delay(1);
N++;
if (N>=30) {EA=1;return;}
}
IRCOM[j]=IRCOM[j] >> 1;
if (N>=8) {IRCOM[j] = IRCOM[j] | 0x80;}
N=0;
}//end for k
}//end for j
if (IRCOM[2]!=~IRCOM[3]) {EA=1;return;}
IRCOM[5]=IRCOM[2] & 0x0F;
IRCOM[6]=IRCOM[2] & 0xF0;
IRCOM[6]=IRCOM[6] >> 4;
beep();
EA = 1;
}
void IR_SHOW()
{
P0 = table[IRCOM[5]];
GEWEI = 0;
SHIWEI = 1;
delay1(4);
P0 = table[IRCOM[6]];
SHIWEI = 0;
GEWEI = 1;
delay1(4);
}
void beep()
{
unsigned char i;
for (i=0;i<100;i++)
{
delay(5);
BEEP=!BEEP;
}
BEEP=1;
}
void delay(unsigned char x)//x*0.14MS
{
unsigned char i;
while(x--)
{
for (i = 0; i<13; i++) {}
}
}
void delay1(unsigned char ms)
{
unsigned char i;
while(ms--)
{
for(i = 0; i<120; i++)
{
_nop_();
_nop_();
_nop_();
_nop_();
}
}
}
❷ 用51單片機製作學習型紅外遙控器的原理
以下是程序,調試成功,LCD1602顯示
//本解碼程序適用於NEC的upd6121及其兼容晶元的解碼,支持大多數遙控器實驗板採用11.0592MHZ晶振
#include<reg52.h>//包含單片機寄存器的頭文件
#include<intrins.h>//包含_nop_()函數定義的頭文件
sbitIR=P3^2;//將IR位定義為P3.2引腳
sbitRS=P2^0;//寄存器選擇位,將RS位定義為P2.0引腳
sbitRW=P2^1;//讀寫選擇位,將RW位定義為P2.1引腳
sbitE=P2^2;//使能信號位,將E位定義為P2.2引腳
sbitBF=P0^7;//忙碌標志位,,將BF位定義為P0.7引腳
sbitBEEP=P3^6;//蜂鳴器控制埠P36
unsignedcharflag;
unsignedcharcodestring[]={"1602IR-CODETEST"};
unsignedchara[4];//儲存用戶碼、用戶反碼與鍵數據碼、鍵數據反碼
unsignedintLowTime,HighTime;//儲存高、低電平的寬度
/*****************************************************
函數功能:延時1ms
***************************************************/
voiddelay1ms()
{
unsignedchari,j;
for(i=0;i<10;i++)
for(j=0;j<33;j++)
;
}
/*****************************************************
函數功能:延時若干毫秒
入口參數:n
***************************************************/
voiddelay(unsignedcharn)
{
unsignedchari;
for(i=0;i<n;i++)
delay1ms();
}
/*********************************************************/
voidbeep()//蜂鳴器響一聲函數
{
unsignedchari;
for(i=0;i<100;i++)
{
delay1ms();
BEEP=!BEEP;//BEEP取反
}
BEEP=1;//關閉蜂鳴器
delay(250);//延時
}
/*****************************************************
函數功能:判斷液晶模塊的忙碌狀態
返回值:result。result=1,忙碌;result=0,不忙
***************************************************/
unsignedcharBusyTest(void)
{
bitresult;
RS=0;//根據規定,RS為低電平,RW為高電平時,可以讀狀態
RW=1;
E=1;//E=1,才允許讀寫
_nop_();//空操作
_nop_();
_nop_();
_nop_();//空操作四個機器周期,給硬體反應時間
result=BF;//將忙碌標志電平賦給result
E=0;
returnresult;
}
/*****************************************************
函數功能:將模式設置指令或顯示地址寫入液晶模塊
入口參數:dictate
***************************************************/
voidWriteInstruction(unsignedchardictate)
{
while(BusyTest()==1);//如果忙就等待
RS=0;//根據規定,RS和R/W同時為低電平時,可以寫入指令
RW=0;
E=0;//E置低電平(根據表8-6,寫指令時,E為高脈沖,
//就是讓E從0到1發生正跳變,所以應先置"0"
_nop_();
_nop_();//空操作兩個機器周期,給硬體反應時間
P0=dictate;//將數據送入P0口,即寫入指令或地址
_nop_();
_nop_();
_nop_();
_nop_();//空操作四個機器周期,給硬體反應時間
E=1;//E置高電平
_nop_();
_nop_();
_nop_();
_nop_();//空操作四個機器周期,給硬體反應時間
E=0;//當E由高電平跳變成低電平時,液晶模塊開始執行命令
}
/*****************************************************
函數功能:指定字元顯示的實際地址
入口參數:x
***************************************************/
voidWriteAddress(unsignedcharx)
{
WriteInstruction(x|0x80);//顯示位置的確定方法規定為"80H+地址碼x"
}
/*****************************************************
函數功能:將數據(字元的標准ASCII碼)寫入液晶模塊
入口參數:y(為字元常量)
***************************************************/
voidWriteData(unsignedchary)
{
while(BusyTest()==1);
RS=1;//RS為高電平,RW為低電平時,可以寫入數據
RW=0;
E=0;//E置低電平(根據表8-6,寫指令時,E為高脈沖,
//就是讓E從0到1發生正跳變,所以應先置"0"
P0=y;//將數據送入P0口,即將數據寫入液晶模塊
_nop_();
_nop_();
_nop_();
_nop_();//空操作四個機器周期,給硬體反應時間
E=1;//E置高電平
_nop_();
_nop_();
_nop_();
_nop_();//空操作四個機器周期,給硬體反應時間
E=0;//當E由高電平跳變成低電平時,液晶模塊開始執行命令
}
/*****************************************************
函數功能:對LCD的顯示模式進行初始化設置
***************************************************/
voidLcdInitiate(void)
{
delay(15);//延時15ms,首次寫指令時應給LCD一段較長的反應時間
WriteInstruction(0x38);//顯示模式設置:16×2顯示,5×7點陣,8位數據介面
delay(5);//延時5ms
WriteInstruction(0x38);
delay(5);
WriteInstruction(0x38);
delay(5);
WriteInstruction(0x0C);//顯示模式設置:顯示開,有游標,游標閃爍
delay(5);
WriteInstruction(0x06);//顯示模式設置:游標右移,字元不移
delay(5);
WriteInstruction(0x01);//清屏幕指令,將以前的顯示內容清除
delay(5);
}
/************************************************************
函數功能:對4個位元組的用戶碼和鍵數據碼進行解碼
說明:解碼正確,返回1,否則返回0
出口參數:dat
*************************************************************/
bitDeCode(void)
{
unsignedchari,j;
unsignedchartemp;//儲存解碼出的數據
for(i=0;i<4;i++)//連續讀取4個用戶碼和鍵數據碼
{
for(j=0;j<8;j++)//每個碼有8位數字
{
temp=temp>>1;//temp中的各數據位右移一位,因為先讀出的是高位數據
TH0=0;//定時器清0
TL0=0;//定時器清0
TR0=1;//開啟定時器T0
while(IR==0)//如果是低電平就等待
;//低電平計時
TR0=0;//關閉定時器T0
LowTime=TH0*256+TL0;//保存低電平寬度
TH0=0;//定時器清0
TL0=0;//定時器清0
TR0=1;//開啟定時器T0
while(IR==1)//如果是高電平就等待
;
TR0=0;//關閉定時器T0
HighTime=TH0*256+TL0;//保存高電平寬度
if((LowTime<370)||(LowTime>640))
return0;//如果低電平長度不在合理范圍,則認為出錯,停止解碼
if((HighTime>420)&&(HighTime<620))//如果高電平時間在560微秒左右,即計數560/1.085=516次
temp=temp&0x7f;//(520-100=420,520+100=620),則該位是0
if((HighTime>1300)&&(HighTime<1800))//如果高電平時間在1680微秒左右,即計數1680/1.085=1548次
temp=temp|0x80;//(1550-250=1300,1550+250=1800),則該位是1
}
a[i]=temp;//將解碼出的位元組值儲存在a[i]
}
if(a[2]=~a[3])//驗證鍵數據碼和其反碼是否相等,一般情況下不必驗證用戶碼
return1;//解碼正確,返回1
}
/*------------------二進制碼轉換為壓縮型BCD碼,並顯示---------------*/
voidtwo_2_bcd(unsignedchardate)
{
unsignedchartemp;
temp=date;
date&=0xf0;
date>>=4;//右移四位得到高四位碼
date&=0x0f;//與0x0f想與確保高四位為0
if(date<=0x09)
{
WriteData(0x30+date);//lcd顯示鍵值高四位
}
else
{
date=date-0x09;
WriteData(0x40+date);
}
date=temp;
date&=0x0f;
if(date<=0x09)
{
WriteData(0x30+date);//lcd顯示低四位值
}
else
{
date=date-0x09;
WriteData(0x40+date);
}
WriteData(0x48);//顯示字元'H'
}
/************************************************************
函數功能:1602LCD顯示
*************************************************************/
voidDisp(void)
{
WriteAddress(0x40);//設置顯示位置為第一行的第1個字
two_2_bcd(a[0]);
WriteData(0x20);
two_2_bcd(a[1]);
WriteData(0x20);
two_2_bcd(a[2]);
WriteData(0x20);
two_2_bcd(a[3]);
}
/************************************************************
函數功能:主函數
*************************************************************/
voidmain()
{
unsignedchari;
LcdInitiate();//調用LCD初始化函數
delay(10);
WriteInstruction(0x01);//清顯示:清屏幕指令
WriteAddress(0x00);//設置顯示位置為第一行的第1個字
i=0;
while(string[i]!='