找回密碼
 立即注冊(cè)

QQ登錄

只需一步,快速開始

搜索
查看: 2320|回復(fù): 0
打印 上一主題 下一主題
收起左側(cè)

基于51單片機(jī)的紅外線程序

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:143852 發(fā)表于 2016-10-22 00:07 | 只看該作者 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式
/*******************************************************************************
------------------------------------------------------------------------------
* 實(shí) 驗(yàn) 名                 : 紅外線顯示試驗(yàn)
* 實(shí)驗(yàn)說明       : LCD1602顯示接收到的紅外線鍵值                 :
*******************************************************************************/

#include<reg51.h>
#include"lcd.h"

sbit IRIN=P3^2;

unsigned char code CDIS1[13]={" Red Control "};
unsigned char code CDIS2[13]={" IR-CODE:--H "};
unsigned char IrValue[6];
unsigned char Time;
void IrInit();
void DelayMs(unsigned int );
/*******************************************************************************
* 函數(shù)名         : main
* 函數(shù)功能                   : 主函數(shù)
* 輸入           : 無
* 輸出                  : 無
*******************************************************************************/

void main()
{
        unsigned char i;
        IrInit();       
        LcdInit();
        LcdWriteCom(0x80);
        for(i=0;i<13;i++)
        {
                LcdWriteData(CDIS1[i]);       
        }
        LcdWriteCom(0x80+0x40);
        for(i=0;i<13;i++)
        {
                LcdWriteData(CDIS2[i]);       
        }
        while(1)
        {
                IrValue[4]=IrValue[2]>>4;                          //高位
                IrValue[5]=IrValue[2]&0x0f;                //低位       
                if(IrValue[4]>9)
                {
                        LcdWriteCom(0xc0+0x09);                        //設(shè)置顯示位置
                        LcdWriteData(0x37+IrValue[4]);        //將數(shù)值轉(zhuǎn)換為該顯示的ASCII碼
                }
                else
                {
                        LcdWriteCom(0xc0+0x09);
                        LcdWriteData(IrValue[4]+0x30);        //將數(shù)值轉(zhuǎn)換為該顯示的ASCII碼
                }       
                if(IrValue[5]>9)
                {
                        LcdWriteCom(0xc0+0x0a);
                        LcdWriteData(IrValue[5]+0x37);                //將數(shù)值轉(zhuǎn)換為該顯示的ASCII碼
                }
                else
                {
                        LcdWriteCom(0xc0+0x0a);
                        LcdWriteData(IrValue[5]+0x30);                //將數(shù)值轉(zhuǎn)換為該顯示的ASCII碼
                }       
        }
}                                                                         
/*******************************************************************************
* 函數(shù)名         : DelayMs()
* 函數(shù)功能                   : 延時(shí)
* 輸入           : x
* 輸出                  : 無
*******************************************************************************/

void DelayMs(unsigned int x)   //0.14ms誤差 0us
{
        unsigned char i;
        while(x--)
        {
                for (i = 0; i<13; i++)
                {}
        }
}
/*******************************************************************************
* 函數(shù)名         : IrInit()
* 函數(shù)功能                   : 初始化紅外線接收
* 輸入           : 無
* 輸出                  : 無
*******************************************************************************/

void IrInit()
{
        IT0=1;//下降沿觸發(fā)
        EX0=1;//打開中斷0允許
        EA=1;        //打開總中斷

        IRIN=1;//初始化端口
}
/*******************************************************************************
* 函數(shù)名         : ReadIr()
* 函數(shù)功能                   : 讀取紅外數(shù)值的中斷函數(shù)
* 輸入           : 無
* 輸出                  : 無
*******************************************************************************/

void ReadIr() interrupt 0
{
        unsigned char j,k;
        unsigned int err;
        Time=0;                                         
        DelayMs(70);

        if(IRIN==0)                //確認(rèn)是否真的接收到正確的信號(hào)
        {         
               
                err=1000;                                //1000*10us=10ms,超過說明接收到錯(cuò)誤的信號(hào)
                /*當(dāng)兩個(gè)條件都為真是循環(huán),如果有一個(gè)條件為假的時(shí)候跳出循環(huán),免得程序出錯(cuò)的時(shí)
                侯,程序死在這里*/       
                while((IRIN==0)&&(err>0))        //等待前面9ms的低電平過去                 
                {                       
                        DelayMs(1);
                        err--;
                }
                if(IRIN==1)                        //如果正確等到9ms低電平
                {
                        err=500;
                        while((IRIN==1)&&(err>0))                 //等待4.5ms的起始高電平過去
                        {
                                DelayMs(1);
                                err--;
                        }
                        for(k=0;k<4;k++)                //共有4組數(shù)據(jù)
                        {                               
                                for(j=0;j<8;j++)        //接收一組數(shù)據(jù)
                                {

                                        err=60;               
                                        while((IRIN==0)&&(err>0))//等待信號(hào)前面的560us低電平過去
                                        {
                                                DelayMs(1);
                                                err--;
                                        }
                                        err=500;
                                        while((IRIN==1)&&(err>0))         //計(jì)算高電平的時(shí)間長(zhǎng)度。
                                        {
                                                DelayMs(1);//0.14ms
                                                Time++;
                                                err--;
                                                if(Time>30)
                                                {
                                                        EX0=1;
                                                        return;
                                                }
                                        }
                                        IrValue[k]>>=1;         //k表示第幾組數(shù)據(jù)
                                        if(Time>=8)                        //如果高電平出現(xiàn)大于565us,那么是1
                                        {
                                                IrValue[k]|=0x80;
                                        }
                                        Time=0;                //用完時(shí)間要重新賦值                                                       
                                }
                        }
                }
                if(IrValue[2]!=~IrValue[3])
                {
                        return;
                }
        }                       
}

評(píng)分

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

查看全部評(píng)分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩

相關(guān)帖子

回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

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

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

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