找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 1768|回复: 0
打印 上一主题 下一主题
收起左侧

1602显示红外键值的单片机代码

[复制链接]
跳转到指定楼层
楼主
ID:251082 发表于 2018-6-24 11:25 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
1602显示红外键值代码

单片机源程序如下:
  1. /*******************************************************************************
  2. * 实验名                           : 1602显示红外线值实验
  3. * 使用的IO             : 电机用P1口,键盘使用P3.0、P3.1、P3.2、P3.3
  4. * 实验效果       : LCD1602显示出读取到的红外线的值
  5. *        注意                                         :
  6. *******************************************************************************/
  7. #include<reg51.h>
  8. #include"lcd.h"

  9. sbit IRIN=P3^2;

  10. unsigned char code CDIS1[13]={" Red Control "};
  11. unsigned char code CDIS2[13]={" IR-CODE:--H "};
  12. unsigned char IrValue[6];
  13. unsigned char Time;
  14. void IrInit();
  15. void DelayMs(unsigned int );
  16. /*******************************************************************************
  17. * 函数名         : main
  18. * 函数功能                   : 主函数
  19. * 输入           : 无
  20. * 输出                  : 无
  21. *******************************************************************************/

  22. void main()
  23. {
  24.         unsigned char i;
  25.         IrInit();       
  26.         LcdInit();
  27.         LcdWriteCom(0x80);
  28.         for(i=0;i<13;i++)
  29.         {
  30.                 LcdWriteData(CDIS1[i]);       
  31.         }
  32.         LcdWriteCom(0x80+0x40);
  33.         for(i=0;i<13;i++)
  34.         {
  35.                 LcdWriteData(CDIS2[i]);       
  36.         }
  37.         while(1)
  38.         {
  39.                 IrValue[4]=IrValue[2]>>4;                          //高位
  40.                 IrValue[5]=IrValue[2]&0x0f;                //低位       
  41.                 if(IrValue[4]>9)
  42.                 {
  43.                         LcdWriteCom(0xc0+0x09);                        //设置显示位置
  44.                         LcdWriteData(0x37+IrValue[4]);        //将数值转换为该显示的ASCII码
  45.                 }
  46.                 else
  47.                 {
  48.                         LcdWriteCom(0xc0+0x09);
  49.                         LcdWriteData(IrValue[4]+0x30);        //将数值转换为该显示的ASCII码
  50.                 }       
  51.                 if(IrValue[5]>9)
  52.                 {
  53.                         LcdWriteCom(0xc0+0x0a);
  54.                         LcdWriteData(IrValue[5]+0x37);                //将数值转换为该显示的ASCII码
  55.                 }
  56.                 else
  57.                 {
  58.                         LcdWriteCom(0xc0+0x0a);
  59.                         LcdWriteData(IrValue[5]+0x30);                //将数值转换为该显示的ASCII码
  60.                 }       
  61.         }
  62. }                                                                         
  63. /*******************************************************************************
  64. * 函数名         : DelayMs()
  65. * 函数功能                   : 延时
  66. * 输入           : x
  67. * 输出                  : 无
  68. *******************************************************************************/

  69. void DelayMs(unsigned int x)   //0.14ms误差 0us
  70. {
  71. unsigned char i;
  72.   while(x--)
  73. {
  74.   for (i = 0; i<13; i++)
  75. {}
  76. }
  77. }
  78. /*******************************************************************************
  79. * 函数名         : IrInit()
  80. * 函数功能                   : 初始化红外线接收
  81. * 输入           : 无
  82. * 输出                  : 无
  83. *******************************************************************************/

  84. void IrInit()
  85. {
  86.         IT0=1;//下降沿触发
  87.         EX0=1;//打开中断0允许
  88.         EA=1;        //打开总中断

  89.         IRIN=1;//初始化端口
  90. }
  91. /*******************************************************************************
  92. * 函数名         : ReadIr()
  93. * 函数功能                   : 读取红外数值的中断函数
  94. * 输入           : 无
  95. * 输出                  : 无
  96. *******************************************************************************/

  97. void ReadIr() interrupt 0
  98. {
  99.         unsigned char j,k;
  100.         unsigned int err;
  101.         Time=0;                                         
  102.         DelayMs(70);

  103.         if(IRIN==0)                //确认是否真的接收到正确的信号
  104.         {         
  105.                
  106.                 err=1000;                                //1000*10us=10ms,超过说明接收到错误的信号
  107.                 /*当两个条件都为真是循环,如果有一个条件为假的时候跳出循环,免得程序出错的时
  108.                 侯,程序死在这里*/       
  109.                 while((IRIN==0)&&(err>0))        //等待前面9ms的低电平过去                 
  110.                 {                       
  111.                         DelayMs(1);
  112.                         err--;
  113.                 }
  114.                 if(IRIN==1)                        //如果正确等到9ms低电平
  115.                 {
  116.                         err=500;
  117.                         while((IRIN==1)&&(err>0))                 //等待4.5ms的起始高电平过去
  118.                         {
  119.                                 DelayMs(1);
  120.                                 err--;
  121.                         }
  122.                         for(k=0;k<4;k++)                //共有4组数据
  123.                         {                               
  124.                                 for(j=0;j<8;j++)        //接收一组数据
  125.                                 {

  126.                                         err=60;               
  127.                                         while((IRIN==0)&&(err>0))//等待信号前面的560us低电平过去
  128. //                                        while (!IRIN)
  129.                                         {
  130.                                                 DelayMs(1);
  131.                                                 err--;
  132.                                         }
  133.                                         err=500;
  134.                                         while((IRIN==1)&&(err>0))         //计算高电平的时间长度。
  135.                                         {
  136.                                                 DelayMs(1);//0.14ms
  137.                                                 Time++;
  138.                                                 err--;
  139.                                                 if(Time>30)
  140. ……………………

  141. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
LCD1602显示红外值.rar (38.88 KB, 下载次数: 12)


评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励!

查看全部评分

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

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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