找回密码
 立即注册

QQ登录

只需一步,快速开始

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

基于stc15w单片机的红外解码控制程序

  [复制链接]
跳转到指定楼层
楼主
ID:499469 发表于 2019-12-17 20:28 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
基于stc15w的红外控制程序(实测stc15w408as、15w204s、15w4k56s4均可用,使用外中断P3.3接收信号),可以和万能红外遥控器和智能音箱结合实现远程控制和语音控制,前提需要知道红外码 红外解码16位解码.zip (57.26 KB, 下载次数: 104) 红外接收(P3.3中断).zip (46.72 KB, 下载次数: 93)

单片机源程序如下:
  1. /*********************************************************************************************
  2. 程序名:    DHT11-1602
  3. 编写人:    fby
  4. 硬件支持:  STC89C52RC  DHT11  LCD1602
  5. 接口说明:  DHT11:VCC DATA NC GND
  6. *********************************************************************************************
  7. 说明:1、单片机是STC89C52RC,晶振频率11.0592MHz,实验成功。
  8.           2、好东西要共享,大家随意折腾~~
  9. *********************************************************************************************/
  10. #include<reg51.h>
  11. #include<intrins.h>
  12. #include<stdio.h>

  13. #define uchar unsigned char        //无符号字符型类型数据
  14. #define uint unsigned int //无符号整型数据
  15.         #define ulong unsigned long //无符号整型数据
  16.         #define xiao float //xiaoshu
  17. #define IODATA  P0
  18. unsigned char IrValue[24]; //接收收据
  19. unsigned char Time;

  20. sbit RS=P2^6; //定义rs端口
  21. sbit RW=P2^5; //定义rw端口
  22. sbit E=P2^7;
  23.        
  24. sbit IRIN=P3^2;//红外数据io

  25.              
  26. /*******************************************************************************
  27. * 函数名         : DelayMs()
  28. * 函数功能                   : 延时
  29. * 输入           : x
  30. * 输出                  : 无
  31. *******************************************************************************/

  32. void DelayMs(unsigned int x)   //0.14ms误差 0us
  33. {
  34. unsigned char i;
  35.   while(x--)
  36. {
  37.   for (i = 0; i<13; i++)
  38. {}
  39. }
  40. }
  41. /*******************************************************************************
  42. * 函数名         : IrInit()
  43. * 函数功能                   : 初始化红外线接收
  44. * 输入           : 无
  45. * 输出                  : 无
  46. *******************************************************************************/

  47. void IrInit()
  48. {
  49.         IT0=1;//下降沿触发
  50.         EX0=1;//打开中断0允许
  51.         EA=1;        //打开总中断

  52.         IRIN=1;//初始化端口
  53. }
  54. /*******************************************************************************
  55. * 函数名         : ReadIr()
  56. * 函数功能                   : 读取红外数值的中断函数
  57. * 输入           : 无
  58. * 输出                  : 无
  59. *******************************************************************************/

  60. void ReadIr() interrupt 0
  61. {
  62.         unsigned char j,k;
  63.         unsigned int err;
  64.         Time=0;                                         
  65.         DelayMs(70);

  66.         if(IRIN==0)                //确认是否真的接收到正确的信号
  67.         {         
  68.                
  69.                 err=1000;                                //1000*10us=10ms,超过说明接收到错误的信号
  70.                 /*当两个条件都为真是循环,如果有一个条件为假的时候跳出循环,免得程序出错的时
  71.                 侯,程序死在这里*/       
  72.                 while((IRIN==0)&&(err>0))        //等待前面9ms的低电平过去                 
  73.                 {                       
  74.                         DelayMs(1);
  75.                         err--;
  76.                 }
  77.                 if(IRIN==1)                        //如果正确等到9ms低电平
  78.                 {
  79.                         err=500;
  80.                         while((IRIN==1)&&(err>0))                 //等待4.5ms的起始高电平过去
  81.                         {
  82.                                 DelayMs(1);
  83.                                 err--;
  84.                         }
  85.                         for(k=0;k<8;k++)                //共有4组数据
  86.                         {                               
  87.                                 for(j=0;j<8;j++)        //接收一组数据
  88.                                 {

  89.                                         err=60;               
  90.                                         while((IRIN==0)&&(err>0))//等待信号前面的560us低电平过去
  91. //                                        while (!IRIN)
  92.                                         {
  93.                                                 DelayMs(1);
  94.                                                 err--;
  95.                                         }
  96.                                         err=500;
  97.                                         while((IRIN==1)&&(err>0))         //计算高电平的时间长度。
  98.                                         {
  99.                                                 DelayMs(1);//0.14ms
  100.                                                 Time++;
  101.                                                 err--;
  102.                                                 if(Time>30)
  103.                                                 {
  104.                                                         EX0=1;
  105.                                                         return;
  106.                                                 }
  107.                                         }
  108.                                         IrValue[k]>>=1;         //k表示第几组数据
  109.                                         if(Time>=8)                        //如果高电平出现大于565us,那么是1
  110.                                         {
  111.                                                 IrValue[k]|=0x80;
  112.                                         }
  113.                                         Time=0;                //用完时间要重新赋值                                                       
  114.                                 }
  115.                         }
  116.                 }
  117.                
  118.                         return;
  119.                
  120.         }                       
  121. }


  122.    //数据处理

  123. void sjcl()
  124. {
  125.                 IrValue[8]=IrValue[0]>>4;                          //高位  用户码
  126.                 IrValue[9]=IrValue[0]&0x0f;                //低位       

  127.     IrValue[10]=IrValue[1]>>4;                          //高位   用户反码
  128.                 IrValue[11]=IrValue[1]&0x0f;                //低位       

  129.     IrValue[12]=IrValue[2]>>4;                          //高位   数据码
  130.                 IrValue[13]=IrValue[2]&0x0f;                //低位

  131.     IrValue[14]=IrValue[3]>>4;                          //高位  数据反码
  132.                 IrValue[15]=IrValue[3]&0x0f;                //低位       
  133.        
  134.           IrValue[16]=IrValue[4]>>4;                          //高位  数据反码
  135.                 IrValue[17]=IrValue[4]&0x0f;                //低位       

  136.           IrValue[18]=IrValue[5]>>4;                          //高位  数据反码
  137.                 IrValue[19]=IrValue[5]&0x0f;                //低位       

  138.           IrValue[20]=IrValue[6]>>4;                          //高位  数据反码
  139.                 IrValue[21]=IrValue[6]&0x0f;                //低位       

  140.           IrValue[22]=IrValue[7]>>4;                          //高位  数据反码
  141.                 IrValue[23]=IrValue[7]&0x0f;                //低位       


  142. }

  143.        

  144. /*********************************************************************************************
  145. 函数名:延时函数
  146. 调  用:Delay30us();/Delay20ms();/Delay1s();
  147. 参  数:无
  148. 返回值:无
  149. 结  果:延时相应时间
  150. 备  注:振荡晶体为11.0592MHz(所有延时函数Copy自STC-ISP(v6.85).exe)
  151. **********************************************************************************************/
  152. void Delay30us()                //@11.0592MHz-40
  153. {
  154.         unsigned char i;

  155.         i = 11;
  156.         while (--i);
  157. }


  158. void Delay20ms()                //@11.0592MHz
  159. {
  160.         unsigned char i, j;

  161.         i = 36;
  162.         j = 217;
  163.         do
  164.         {
  165.                 while (--j);
  166.         } while (--i);
  167. }


  168. void Delay1s()                //@11.0592MHz
  169. {
  170.         unsigned char i, j, k;

  171.         _nop_();
  172.         i = 8;
  173.         j = 1;
  174.         k = 243;
  175.         do
  176.         {
  177.                 do
  178.                 {
  179.                         while (--k);
  180.                 } while (--j);
  181.         } while (--i);
  182. }





  183. /********************************************************************
  184. * 名称 : bit Busy(void)
  185. * 功能 : 这个是一个读状态函数,读出函数是否处在忙状态
  186. * 输入 : 输入的命令值
  187. * 输出 : 无
  188. ***********************************************************************/
  189. void Busy(void)
  190. {
  191. bit busy_flag = 1;
  192. IODATA  = 0xff;
  193. RS = 0;          //指令关
  194. Delay30us();
  195. RW = 1;          //读状态
  196. Delay30us();
  197. E = 1;        //使能高电平
  198. while(1)
  199. {
  200. busy_flag = (bit)(IODATA  & 0x80); //强制取最高位
  201. if(busy_flag == 0)
  202. {
  203. break;
  204. }
  205. }
  206. E = 0;           //E 1->0,rs=0,rw=1,
  207.            //将数据寄存器内的数据读到DB0~DB7,分别将状态标志BF和地址计数器(AC)内容读到DB7和DB6~DB0。

  208. }

  209. /********************************************************************
  210. * 名称 : lcd1602_write_cmd(uchar del)
  211. * 功能 : 1602命令函数
  212. * 输入 : 输入的命令值
  213. * 输出 : 无
  214. ***********************************************************************/
  215. void lcd1602_write_cmd(uchar del)
  216. {
  217. RS = 0;
  218. Delay30us();
  219. RW = 0;
  220. Delay30us();
  221. E = 0;
  222. Delay30us();
  223. IODATA  = del;
  224. Delay30us();
  225. E = 1;
  226. Delay30us();
  227. E = 0;                        //E 1->0,rs=0,rw=0, 将指令代码写入指令寄存器中
  228. }

  229. /********************************************************************
  230. * 名称 : lcd1602_write_data(uchar del)
  231. * 功能 : 1602写数据函数
  232. * 输入 : 需要写入1602的数据
  233. * 输出 : 无
  234. ***********************************************************************/

  235. void lcd1602_write_data(uchar del)
  236. {
  237. Busy();      
  238. Delay30us();
  239. RS = 1;
  240. Delay30us();
  241. RW = 0;
  242. Delay30us();
  243. E = 0;
  244. Delay30us();
  245. IODATA  = del;
  246. Delay30us();
  247. E = 1;
  248. Delay30us();
  249. E = 0;                          //E 1->0,rs=1,rw=0, 数据写入数据寄存器中
  250. }

  251. /********************************************************************
  252. * 名称 : lcd1602_init()
  253. * 功能 : 1602初始化,请参考1602的资料
  254. * 输入 : 无
  255. * 输出 : 无
  256. ***********************************************************************/
  257. void lcd1602_init(void)
  258. {
  259. Delay20ms();
  260. lcd1602_write_cmd(0x38);         //8位数据,双列,5*7字形
  261. Delay20ms();
  262. lcd1602_write_cmd(0x38);
  263. Delay20ms();
  264. lcd1602_write_cmd(0x38);
  265. Busy();
  266. lcd1602_write_cmd(0x08);// 只开显示
  267. Busy();   
  268. lcd1602_write_cmd(0x01);        //清屏
  269. Busy();
  270. lcd1602_write_cmd(0x06);//显示地址递增,即写一个数据后,显示位置右移一位
  271. Busy();
  272. lcd1602_write_cmd(0x0c);        //开启显示屏,关光标,光标不闪烁
  273. }

  274. /********************************************************************
  275. * 名称 : lcd1602_char(uchar hang,uchar lie,char sign)
  276. * 功能 : 改变液晶中某位的值,如果要让第一行,第五个字符显示"b" ,调用该函数如下
  277. L1602_char(1,5,'b')
  278. * 输入 : 行,列,需要输入1602的数据
  279. * 输出 : 无
  280. ***********************************************************************/
  281. void lcd1602_char(uchar hang,uchar lie,char sign)
  282. {
  283. uchar a;
  284. if(hang == 1)
  285. {
  286. a = 0x80;
  287. }
  288. if(hang == 2)
  289. {
  290. a = 0xc0;
  291. }
  292. a = a + lie - 1;
  293. Busy();
  294. lcd1602_write_cmd(a);  //置数据存贮器地址
  295. Busy();
  296. lcd1602_write_data(sign);
  297. }




  298. /********************************************************************
  299. * 名称 : lcd1602_string(uchar hang,uchar lie,uchar *p)
  300. * 功能 : 改变液晶中某位的值,如果要让第一行,第五个字符开始显示"ab cd ef" ,调用该函数如下
  301. L1602_string(1,5,"ab cd ef;")
  302. * 输入 : 行,列,需要输入1602的数据
  303. * 输出 : 无
  304. ***********************************************************************/

  305. void lcd1602_string(uchar hang,uchar lie,uchar *p)
  306. {
  307. uchar a;
  308. if(hang == 1)
  309. {
  310. a = 0x80;
  311. }
  312. if(hang == 2)
  313. {
  314. a = 0xc0;
  315. }
  316. a = a + lie - 1;
  317. while(1)
  318. {
  319. Busy();
  320. lcd1602_write_cmd(a);
  321. Busy();
  322. lcd1602_write_data(*p);
  323. a++;
  324. p++;   
  325. if((*p == '\0')||(a==0x90)||(a==0xd0)) //字符结束或每行最后一个字符
  326. {
  327. break;
  328. }
  329. ……………………

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

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

使用道具 举报

沙发
ID:1 发表于 2019-12-17 21:24 | 只看该作者
本帖需要重新编辑补全电路原理图,源码,详细说明与图片即可获得100+黑币(帖子下方有编辑按钮)
回复

使用道具 举报

板凳
ID:499469 发表于 2019-12-19 08:54 | 只看该作者
admin 发表于 2019-12-17 21:24
本帖需要重新编辑补全电路原理图,源码,详细说明与图片即可获得100+黑币(帖子下方有编辑按钮)

不好意思 找不到重新编辑按钮
回复

使用道具 举报

地板
ID:647132 发表于 2020-1-9 22:29 | 只看该作者
正在学习红外遥控,谢谢了。
回复

使用道具 举报

5#
ID:686739 发表于 2020-3-17 07:25 来自手机 | 只看该作者
谢谢分享
回复

使用道具 举报

6#
ID:272612 发表于 2020-5-17 01:23 | 只看该作者
正在找这个,发现STC1T单片机和传统51还是有点不一样的。
回复

使用道具 举报

7#
ID:253767 发表于 2020-5-17 06:57 | 只看该作者
谢谢分享!!!
回复

使用道具 举报

8#
ID:432192 发表于 2020-11-12 21:56 来自手机 | 只看该作者
这个资料真的顶,刚想弄15得就遇到了
回复

使用道具 举报

9#
ID:390416 发表于 2020-12-25 16:51 | 只看该作者
回复

使用道具 举报

10#
ID:390416 发表于 2020-12-25 16:51 | 只看该作者
杰瑶电子 发表于 2020-11-12 21:56
这个资料真的顶,刚想弄15得就遇到了

这个也是15W的 http://www.51hei.com/bbs/dpj-200464-1.html
回复

使用道具 举报

11#
ID:398219 发表于 2024-5-17 16:03 | 只看该作者
学习一下源程序,谢谢楼主分享
回复

使用道具 举报

12#
ID:398219 发表于 2024-5-20 15:14 | 只看该作者
谢谢楼主程序,已经调试成功,可以接收并解码空调的遥控数据了。
回复

使用道具 举报

13#
ID:990909 发表于 2024-5-26 13:28 | 只看该作者
太顶了楼主
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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