久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 2383|回復: 0
打印 上一主題 下一主題
收起左側

基于51單片機的紅外線程序

[復制鏈接]
跳轉到指定樓層
樓主
ID:143852 發表于 2016-10-22 00:07 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
/*******************************************************************************
------------------------------------------------------------------------------
* 實 驗 名                 : 紅外線顯示試驗
* 實驗說明       : 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 );
/*******************************************************************************
* 函數名         : main
* 函數功能                   : 主函數
* 輸入           : 無
* 輸出                  : 無
*******************************************************************************/

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);                        //設置顯示位置
                        LcdWriteData(0x37+IrValue[4]);        //將數值轉換為該顯示的ASCII碼
                }
                else
                {
                        LcdWriteCom(0xc0+0x09);
                        LcdWriteData(IrValue[4]+0x30);        //將數值轉換為該顯示的ASCII碼
                }       
                if(IrValue[5]>9)
                {
                        LcdWriteCom(0xc0+0x0a);
                        LcdWriteData(IrValue[5]+0x37);                //將數值轉換為該顯示的ASCII碼
                }
                else
                {
                        LcdWriteCom(0xc0+0x0a);
                        LcdWriteData(IrValue[5]+0x30);                //將數值轉換為該顯示的ASCII碼
                }       
        }
}                                                                         
/*******************************************************************************
* 函數名         : DelayMs()
* 函數功能                   : 延時
* 輸入           : x
* 輸出                  : 無
*******************************************************************************/

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

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

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

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

        if(IRIN==0)                //確認是否真的接收到正確的信號
        {         
               
                err=1000;                                //1000*10us=10ms,超過說明接收到錯誤的信號
                /*當兩個條件都為真是循環,如果有一個條件為假的時候跳出循環,免得程序出錯的時
                侯,程序死在這里*/       
                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組數據
                        {                               
                                for(j=0;j<8;j++)        //接收一組數據
                                {

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

評分

參與人數 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵!

查看全部評分

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

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板: 国产精品三级在线 | 国产资源在线观看 | 深夜福利视频在线观看 | 久久精品一区二区三区四区五区 | 中文字幕黄色片 | 国产视频成人 | 亚洲国产一区二区三区 | 毛片网站在线播放 | 日韩一区二区三 | 国产亚洲欧美日韩高清 | 日韩一区二区三区四区 | 成人小视频在线 | 黄色在线播放 | 亚洲成人国产 | 日韩av网站在线观看 | 蜜臀久久99精品久久久久宅男 | 欧美一级二级三级 | 成人免费视频视频 | 在线观看欧美日韩 | 国产黄色大片 | 国产日韩精品在线 | 综合久久久久 | 亚洲视频免费在线观看 | 亚洲色欧美| 日韩黄色片 | 免费看a级片 | 国产三级在线观看 | 99热综合 | 国产精品福利一区 | 日韩毛片视频 | 在线日韩视频 | 一级黄毛片 | 一区二区三区国产 | 午夜av在线 | 亚洲国产欧美在线 | 视频一区二区在线观看 | 成人免费av | 成人综合网站 | 成年人免费在线视频 | 99视频网站 | 黄色网在线 |