找回密码
 立即注册

QQ登录

只需一步,快速开始

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

51单片机红外摇控在LCD1602上显示源码

[复制链接]
跳转到指定楼层
楼主

我的单片机课程设计,里面有源程序和实物图,抱歉原理图和PCB图找不到了。附一张实物图。希望可以帮助到大家。



单片机控制LCD1602显示红外值源程序如下:
  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.         P1=0xf0;
  26.         IrInit();       
  27.         LcdInit();
  28.         LcdWriteCom(0x80);
  29.         for(i=0;i<13;i++)
  30.         {
  31.                 LcdWriteData(CDIS1[i]);       
  32.         }
  33.         LcdWriteCom(0x80+0x40);
  34.         for(i=0;i<13;i++)
  35.         {
  36.                 LcdWriteData(CDIS2[i]);       
  37.         }
  38.         while(1)
  39.         {
  40.                 IrValue[4]=IrValue[2]>>4;                          //高位
  41.                 IrValue[5]=IrValue[2]&0x0f;                //低位       
  42.                 if(IrValue[4]>9)
  43.                 {
  44.                         LcdWriteCom(0xc0+0x09);                        //设置显示位置
  45.                         LcdWriteData(0x37+IrValue[4]);        //将数值转换为该显示的ASCII码
  46.                 }
  47.                 else
  48.                 {
  49.                         LcdWriteCom(0xc0+0x09);
  50.                         LcdWriteData(IrValue[4]+0x30);        //将数值转换为该显示的ASCII码
  51.                 }       
  52.                 if(IrValue[5]>9)
  53.                 {
  54.                         LcdWriteCom(0xc0+0x0a);
  55.                         LcdWriteData(IrValue[5]+0x37);                //将数值转换为该显示的ASCII码
  56.                 }
  57.                 else
  58.                 {
  59.                         LcdWriteCom(0xc0+0x0a);
  60.                         LcdWriteData(IrValue[5]+0x30);                //将数值转换为该显示的ASCII码
  61.                 }       
  62.         }
  63. }                                                                         
  64. /*******************************************************************************
  65. * 函数名         : DelayMs()
  66. * 函数功能                   : 延时
  67. * 输入           : x
  68. * 输出                  : 无
  69. *******************************************************************************/

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

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

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

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

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

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

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

所有资料51hei提供下载:
12.红外遥控.zip (2.11 MB, 下载次数: 49)


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

使用道具 举报

沙发
ID:705447 发表于 2020-3-11 16:30 | 只看该作者
程序下下去,不能运行啊
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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