找回密码
 立即注册

QQ登录

只需一步,快速开始

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

单片机双单片机实现红外遥控器模拟Proteus仿真代码 VS Code工程

[复制链接]
跳转到指定楼层
楼主
研究学习
仿真原理图如下(proteus仿真工程文件可到本帖附件中下载)


代码是用的VS Code编辑器

单片机源程序如下:
  1. //elecfun 2018-04-01 01:22:17
  2. #include <STC12C2052AD.h>
  3. #include <intrins.h>
  4. #include "IRNEC.h"

  5. unsigned char IR_KEY[6][3] = {0xFF};

  6. sbit KEY_SET = P3^7;

  7. #define _DEBUG

  8. #ifdef _DEBUG
  9.     unsigned char code ITC[]={'0','1','2','3','4','5','6','7','8','9','A','B','C','D','E','F'};
  10.     //12mhz 4800bps
  11.     void UART_init(void)
  12.     {
  13.         PCON |= 0x80;                //波特率不倍速
  14.             SCON = 0x50;                //8位数据,可变波特率
  15.         TMOD &= 0x0F;
  16.         TMOD |= 0x20;
  17.         TL1 = TH1 = 0xF3;   
  18.         ET1 = 0;
  19.         TR1 = 1;
  20.     }
  21.     void SendChar(unsigned char dat)
  22.     {
  23.         SBUF = dat;
  24.         while (!TI);

  25.         TI = 0;
  26.     }
  27.     void SendString(unsigned char *s)
  28.     {
  29.         while (*s)              //Check the end of the string
  30.         {
  31.             SendChar(*s++);     //Send current char and increment string ptr
  32.         }
  33.     }
  34. #endif

  35. /********************读字节函数*********************/
  36. unsigned char Byte_Read(unsigned int add)
  37. {
  38.     ISP_DATA = 0x00;//清空数据
  39.     ISP_CONTR = 0x83;//打开ISP,设置操作等待时间 12MHz以下0x83 30MHz以下0x80 6MHz以下0x84
  40.     ISP_CMD = 0x01;//字节读命令
  41.     ISP_ADDRH = add>>8;//设置高8位地址
  42.     ISP_ADDRL = add&0x00ff;//设置低8位地址
  43.     ISP_TRIG = 0x46;//发送46h到触发寄存器
  44.     ISP_TRIG = 0xb9;//发送b9h到触发寄存器
  45.     _nop_();//延时
  46.     ISP_CONTR = 0;//关闭IAP 功能
  47.     ISP_CMD = 0;//清空命令寄存器
  48.     ISP_TRIG = 0;//清空命令触发寄存器
  49.     ISP_ADDRH = 0;//清空地址高位
  50.     ISP_ADDRL = 0;//清空地址低位
  51.     return (ISP_DATA);//返回读到的数据
  52. }
  53. /*******************字节编程函数********************/
  54. void Byte_Program(unsigned int add, unsigned char dat)
  55. {
  56.     ISP_CONTR = 0x83;//打开ISP,设置操作等待时间
  57.     ISP_CMD = 0x02;//字节编程命令
  58.     ISP_ADDRH = add>>8;//设置高8位地址
  59.     ISP_ADDRL = add&0x00ff;//设置低8位地址
  60.     ISP_DATA = dat;//要编程的数据先送进ISP_DATA 寄存器
  61.     ISP_TRIG = 0x46;//发送46h到触发寄存器
  62.     ISP_TRIG = 0xb9;//发送b9h到触发寄存器
  63.     _nop_();//延时
  64.     ISP_CONTR = 0;//关闭IAP 功能
  65.     ISP_CMD = 0;//清空命令寄存器
  66.     ISP_TRIG = 0;//清空命令触发寄存器
  67.     ISP_ADDRH = 0;//清空地址高位
  68.     ISP_ADDRL = 0;//清空地址低位
  69. }
  70. /********************扇区擦除函数**********************/
  71. void Sector_Erase(unsigned int add)
  72. {
  73.     ISP_CONTR = 0x83;//打开ISP,设置操作等待时间
  74.     ISP_CMD = 0x03;//扇区擦除命令
  75.     ISP_ADDRH = add>>8;//设置高8位地址
  76.     ISP_ADDRL = add&0x00ff;//设置低8位地址
  77.     ISP_TRIG = 0x46;//发送46h到触发寄存器
  78.     ISP_TRIG = 0xb9;//发送b9h到触发寄存器
  79.     _nop_();//延时
  80.     ISP_CONTR = 0;//关闭IAP 功能
  81.     ISP_CMD = 0;//清空命令寄存器
  82.     ISP_TRIG = 0;//清空命令触发寄存器
  83.     ISP_ADDRH = 0;//清空地址高位
  84.     ISP_ADDRL = 0;//清空地址低位
  85. }

  86. /*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
  87. 函数:红外线解码初始化
  88. ┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
  89. void IR_Init()
  90. {
  91.    TMOD &= 0xF0;           //清定时器0
  92.    TMOD |= 0x01;           //定时器0:16位定时器
  93.    TL0 = TH_L;           //每步时间
  94.    TH0 = TH_H;
  95.    ET0 = 1;
  96.    EA  = 1;
  97.    TR0 = 1;
  98. }

  99. void Delayms(unsigned int dT)
  100. {
  101.     unsigned int dA,dB;
  102.     for(dA=0; dA<dT; dA++)
  103.         for(dB=0; dB<113; dB++)
  104.             ;
  105. }

  106. //从内部EEPROM中读取键值数据
  107. void ReadIRData(void)
  108. {
  109.     unsigned char j;

  110.     for (j=0; j<6; j++)
  111.     {
  112.         IR_KEY[j][0] = Byte_Read(3 * j);
  113.         IR_KEY[j][1] = Byte_Read(3 * j + 1);
  114.         IR_KEY[j][2] = Byte_Read(3 * j + 2);
  115.     }
  116. }

  117. //键值保存到内部EEPROM中
  118. void WriteIRData(void)
  119. {
  120.     unsigned char j;

  121.     Sector_Erase(0);
  122.     for (j=0; j<6; j++)
  123.     {
  124.         Byte_Program(3 * j, IR_KEY[j][0]);
  125.         Byte_Program(3 * j + 1, IR_KEY[j][1]);
  126.         Byte_Program(3 * j + 2, IR_KEY[j][2]);
  127.     }
  128. }

  129. void main(void)
  130. {
  131.         unsigned char j;
  132.     unsigned char curCh = 0;

  133. #ifdef _DEBUG
  134.     UART_init();
  135.     Delayms(500);
  136.     SendString("start");
  137. #endif
  138.     ReadIRData();                                                    //读EEPROM数据
  139.     IR_Init();                                  //红外接收初始化

  140.         while (1)
  141.         {
  142. #ifdef _DEBUG
  143.         P30 = 1;
  144.         if (!P30)
  145.         {
  146.             ISP_CONTR = 0x60;
  147.         }
  148. #endif
  149.                 if (IR_BT > 0)                                                         //正确解码
  150.                 {
  151.             SendString("R:");
  152.             SendChar(ITC[NEC[2]>>4]);
  153.             SendChar(ITC[NEC[2]&0x0F]);
  154.             if (!KEY_SET)                   //设置按键按下
  155.             {
  156.                 if (curCh < 6)                  //6个通道,超过后丢弃
  157.                 {
  158.                     IR_KEY[curCh][0] = NEC[0];  //用户码高8位
  159.                     IR_KEY[curCh][1] = NEC[1];  //用户码低8位
  160.                     IR_KEY[curCh][2] = NEC[2];  //键值
  161.                     curCh++;                    //下一通道
  162.                 }
  163.             } else {                            //设置按键未按下或刚松开
  164.                 if (curCh > 0)                  //通道值大于0说明刚才进行了设置,需要保存键值
  165.                 {
  166.                     curCh = 0;                  //清空通道值
  167.                     WriteIRData();              //保存键值
  168. ……………………

  169. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码
代码要用vs code打开
所有资料51hei附件下载:
仿真程序.7z (66.89 KB, 下载次数: 55)

评分

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

查看全部评分

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

使用道具 举报

沙发
ID:262 发表于 2022-3-18 03:39 | 只看该作者
好资料,51黑有你更精彩!!!
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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