设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 电子技术分类讨论区 › 资料共享 › 单片机红外通信程序
返回列表 发新帖
查看: 1428|回复: 0
打印 上一主题 下一主题
收起左侧

单片机红外通信程序

[复制链接]
跳转到指定楼层
楼主
ID:391337 发表于 2018-8-29 19:55 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
红外通信接线图：


单片机源程序如下:
  1. /**************************************************************************************
  2. *                              红外通信实验                                                                                                  *
  3. 实现现象：        具体接线操作请参考视频
  4.                         下载程序后，数码管显示红外遥控键值数据
  5. 注意事项：        红外遥控模块的短接片J1短接，
  6.                         红外遥控器内的电池绝缘片一定要抽掉                                                                                                                                                          
  7. ***************************************************************************************/

  9. #include "reg52.h"                         //此文件中定义了单片机的一些特殊功能寄存器
  10.        

  12. typedef unsigned int u16;          //对数据类型进行声明定义
  13. typedef unsigned char u8;

  15. sbit LSA=P2^2;
  16. sbit LSB=P2^3;
  17. sbit LSC=P2^4;

  19. sbit IRIN=P3^2;

  21. u8 IrValue[6];
  22. u8 Time;

  24. u8 DisplayData[8];
  25. u8 code smgduan[17]={
  26. 0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,
  27. 0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71,0X76};
  28. //0、1、2、3、4、5、6、7、8、9、A、b、C、d、E、F、H的显示码

  30. /*******************************************************************************
  31. * 函 数 名         : delay
  32. * 函数功能                   : 延时函数，i=1时，大约延时10us
  33. *******************************************************************************/
  34. void delay(u16 i)
  35. {
  36.         while(i--);       
  37. }


  40. /*******************************************************************************
  41. * 函数名         :DigDisplay()
  42. * 函数功能                 :数码管显示函数
  43. * 输入           : 无
  44. * 输出                  : 无
  45. *******************************************************************************/
  46. void DigDisplay()
  47. {
  48.         u8 i;
  49.         for(i=0;i<3;i++)
  50.         {
  51.                 switch(i)         //位选，选择点亮的数码管，
  52.                 {
  53.                         case(0):
  54.                                 LSA=0;LSB=0;LSC=0; break;//显示第0位
  55.                         case(1):
  56.                                 LSA=1;LSB=0;LSC=0; break;//显示第1位
  57.                         case(2):
  58.                                 LSA=0;LSB=1;LSC=0; break;//显示第2位       
  59.                 }
  60.                 P0=DisplayData[i];//发送数据
  61.                 delay(100); //间隔一段时间扫描       
  62.                 P0=0x00;//消隐
  63.         }               
  64. }


  67. /*******************************************************************************
  68. * 函数名         : IrInit()
  69. * 函数功能                   : 初始化红外线接收
  70. * 输入           : 无
  71. * 输出                  : 无
  72. *******************************************************************************/

  74. void IrInit()
  75. {
  76.         IT0=1;//下降沿触发
  77.         EX0=1;//打开中断0允许
  78.         EA=1;        //打开总中断

  80.         IRIN=1;//初始化端口
  81. }


  84. /*******************************************************************************
  85. * 函 数 名       : main
  86. * 函数功能                 : 主函数
  87. * 输    入       : 无
  88. * 输    出             : 无
  89. *******************************************************************************/
  90. void main()
  91. {       
  92.         IrInit();
  93.         while(1)
  94.         {       
  95.                 DisplayData[0] = smgduan[IrValue[2]/16];
  96.                 DisplayData[1] = smgduan[IrValue[2]%16];
  97.                 DisplayData[2] = smgduan[16];
  98.             DigDisplay();               
  99.         }               
  100. }

  102. /*******************************************************************************
  103. * 函数名         : ReadIr()
  104. * 函数功能                   : 读取红外数值的中断函数
  105. * 输入           : 无
  106. * 输出                  : 无
  107. *******************************************************************************/

  109. void ReadIr() interrupt 0
  110. {
  111.         u8 j,k;
  112.         u16 err;
  113.         Time=0;                                         
  114.         delay(700);        //7ms
  115.         if(IRIN==0)                //确认是否真的接收到正确的信号
  116.         {         
  117.                
  118.                 err=1000;                                //1000*10us=10ms,超过说明接收到错误的信号
  119.                 /*当两个条件都为真是循环，如果有一个条件为假的时候跳出循环，免得程序出错的时
  120.                 侯，程序死在这里*/       
  121.                 while((IRIN==0)&&(err>0))        //等待前面9ms的低电平过去                 
  122.                 {                       
  123.                         delay(1);
  124.                         err--;
  125.                 }
  126.                 if(IRIN==1)                        //如果正确等到9ms低电平
  127.                 {
  128.                         err=500;
  129.                         while((IRIN==1)&&(err>0))                 //等待4.5ms的起始高电平过去
  130.                         {
  131.                                 delay(1);
  132.                                 err--;
  133.                         }
  134.                         for(k=0;k<4;k++)                //共有4组数据
  135.                         {                               
  136.                                 for(j=0;j<8;j++)        //接收一组数据
  137.                                 {

  139.                                         err=60;               
  140.                                         while((IRIN==0)&&(err>0))//等待信号前面的560us低电平过去
  141.                                         {
  142.                                                 delay(1);
  143.                                                 err--;
  144.                                         }
  145.                                         err=500;
  146.                                         while((IRIN==1)&&(err>0))         //计算高电平的时间长度。
  147.                                         {
  148.                                                 delay(10);         //0.1ms
  149.                                                 Time++;
  150.                                                 err--;
  151.                                                 if(Time>30)
  152.                                                 {
  153.                                                         return;
  154.                                                 }
  155.                                         }
  156.                                         IrValue[k]>>=1;         //k表示第几组数据
  157.                                         if(Time>=8)                        //如果高电平出现大于565us，那么是1
  158.                                         {
  159.                                                 IrValue[k]|=0x80;
  160.                                         }
  161.                                         Time=0;                //用完时间要重新赋值                                                       
  162.                                 }
  163.                         }
  164.                 }
  165.                 if(IrValue[2]!=~IrValue[3])
  166.                 {
  167.                         return;
  168.                 }
  169.         }                       
  170. }

复制代码

所有资料51hei提供下载:
程序.rar (21.71 KB, 下载次数: 12)


评分

参与人数 1黑币 +8 收起 理由
xiou + 8 很给力！

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶顶 踩踩
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表