EDABOSS电子论坛

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 612|回复: 3

[转帖] 单片机pt2262无线遥控解码器制作源程序

[复制链接]

2

主题

0

回帖

11

E币

技术员

Rank: 2

积分
4
发表于 2018-8-4 15:55:57 | 显示全部楼层 |阅读模式
  1. #include<reg52.h>
  2. #include <intrins.h>
  3. #define uchar unsigned char

  4. uchar code dis1[] = {" 2262 CODE IS "};
  5. void delay_1s(uchar);
  6. typedef unsigned char BYTE;
  7. typedef unsigned int WORD;
  8. typedef bit BOOL ;
  9. sbit rs = P2^6 ;
  10. sbit rw = P3^6 ;
  11. sbit ep = P2^7 ;

  12. delay(BYTE ms)
  13. {        // 延时子程序
  14. BYTE i;
  15. while(ms--)
  16. {
  17.    for(i = 0; i< 250; i++)
  18.    {
  19.     _nop_();
  20.     _nop_();
  21.     _nop_();
  22.     _nop_();
  23.    }
  24. }
  25. }

  26. BOOL lcd_bz()
  27. {        // 测试LCD忙碌状态
  28. BOOL result;
  29. rs = 0;
  30. rw = 1;
  31. ep = 1;
  32. _nop_();
  33. _nop_();
  34. _nop_();
  35. _nop_();
  36. result = (BOOL)(P0 & 0x80);
  37. ep = 0;
  38. return result;
  39. }

  40. lcd_wcmd(BYTE cmd)
  41. {        // 写入指令数据到LCD
  42. while(lcd_bz());
  43. rs = 0;
  44. rw = 0;
  45. ep = 0;
  46. _nop_();
  47. _nop_();
  48. P0 = cmd;
  49. _nop_();
  50. _nop_();
  51. _nop_();
  52. _nop_();
  53. ep = 1;
  54. _nop_();
  55. _nop_();
  56. _nop_();
  57. _nop_();
  58. ep = 0;  
  59. }

  60. lcd_pos(BYTE pos)
  61. {        //设定显示位置
  62. lcd_wcmd(pos | 0x80);
  63. }

  64. lcd_wdat(BYTE dat)
  65. {        //写入字符显示数据到LCD
  66. while(lcd_bz());
  67. rs = 1;
  68. rw = 0;
  69. ep = 0;
  70. P0 = dat;
  71. _nop_();
  72. _nop_();
  73. _nop_();
  74. _nop_();
  75. ep = 1;
  76. _nop_();
  77. _nop_();
  78. _nop_();
  79. _nop_();
  80. ep = 0;
  81. }

  82. lcd_init()
  83. {        //LCD初始化设定
  84. lcd_wcmd(0x38);    //
  85. delay(1);
  86. lcd_wcmd(0x0c);    //
  87. delay(1);
  88. lcd_wcmd(0x06);    //
  89. delay(1);
  90. lcd_wcmd(0x01);    //清除LCD的显示内容
  91. delay(1);
  92. }
  93. bit T0Action;
  94. bit Action;
  95. bit RECEIVE; //接收标志

  96. sbit P1_7=P1^1;   //接收脚
  97. sbit P3_5=P1^3; //发光二极管

  98. void main()
  99. {
  100. uchar temp,data0,data1,counttime,i=0;
  101. int time,time1,time2;
  102. lcd_init(); // 初始化LCD

  103. T0Action=0;
  104. RECEIVE=0;    //接收标志位
  105. Action=0;
  106. TMOD = 0x01;        // 定时器0 工作方式1
  107. TH0=0x00;
  108. TL0=0x00;
  109. P3_5=1;
  110. lcd_pos(0x00);
  111.    while(dis1[i] != '\0')
  112. {       // 显示字符ttnu.com
  113.    lcd_wdat(dis1[i]);
  114.    i++;
  115. }
  116. while(1)              
  117. {
  118.    do{P3_5=1;}while(P1_7==1);
  119.    if((P1_7==0) && (T0Action==0))      //等待低电平,低电平开始记时
  120.      {
  121.        TR0=0; TH0=0x00;   TL0=0x00;   TF0=0;   TR0=1;   T0Action=1;
  122.       while(1)
  123.        {
  124.           if((P1_7==1) && (T0Action==1))
  125.          {
  126.            TR0=0;
  127.            time=TH0*256+TL0;     //记下低电平宽度时间
  128.            T0Action=0;
  129.             break;
  130.           }
  131.         }
  132.        }
  133. if((time>9500) && (time<11500))            //检测同步码约11ms
  134.      {
  135.       counttime=0;
  136.       data0=0;
  137.       data1=0;
  138.       time=0;
  139.       RECEIVE=1;    //检测到同步码时 置标志位 RECEIVE=1
  140.       P3_5=0;                 //绿发光二极管灯亮(调试用)
  141.       }
  142. if(RECEIVE==1)                    //检测到同步码后开始解码
  143.     {
  144.        RECEIVE=0;
  145.     lcd_pos(0x42);
  146.        while(1)
  147.        {
  148.           do{}while(P1_7==1);
  149.           if((P1_7==0) && (T0Action==0))     //等待第一个低电平,一有低电平马上记时
  150.             {
  151.              TR0=0; T0Action=1; TH0=0x00; TL0=0x00; TF0=0; TR0=1;
  152.              while(1)
  153.               {
  154.                 if((P1_7==1) && (T0Action==1))
  155.                  {
  156.                     TR0=0;
  157.                     time=TH0*256+TL0;    //记下第一个低电平宽度时间
  158.                     T0Action=0;
  159.                     TH0=0x00;TL0=0x00; TF0=0;TR0=1;       //开始记高电平时间
  160.                     break;
  161.                   }
  162.                }
  163.              }
  164.            do{}while(P1_7==1);
  165.            if((P1_7==0) && (T0Action==0))       //等待第二个低电平,一有低电平马上记时
  166.             {
  167.               TR0=0;
  168.               time2=TH0*256+TL0;           //记下一个高电平宽度时间
  169.               T0Action=1;
  170.               TH0=0x00; TL0=0x00; TF0=0; TR0=1;
  171.               while(1)
  172.                 {
  173.                   if((P1_7==1) && (T0Action==1))
  174.                     {
  175.                        TR0=0;
  176.                        time1=TH0*256+TL0;       //记下第二个低电平宽度时间
  177.                        T0Action=0; break;
  178.                      }
  179.                 }
  180.             }
  181.            if((time<1500))    //判断两个低电平宽度时间是否相等,限时1500us
  182.                {
  183.                  if(((time-time1)>=-600&&(time-time1)<=600) && (time>780) && (time<1150))    //低电平宽度时间
  184.                   {
  185.                      if((time2>210) && (time2<450))   //高电平宽度时间
  186.                      lcd_wdat('0');temp=0x00;       //0
  187.           }
  188.                  if(((time-time1)>=-600&&(time-time1)<=600) && (time>210) && (time<450))   //低电平宽度时间
  189.                     {         
  190.                         if((time2>780) && (time2<1150))   //高电平宽度时间
  191.                         lcd_wdat('1');temp=0x01;       //1

  192.                     }
  193.      if((time>780) && (time<1150)&&(time1>210) && (time1<450))
  194.           lcd_wdat('f');      // f
  195.                counttime++;

  196.                  if(counttime<=8)                         //开始接收前8位   地址码
  197.           data0=(data0<<1)|temp;

  198.        else if((counttime>8) && (counttime<=12)) //开始接收后4位 数据码
  199.                     data1=(data1<<1)|temp;
  200.                  if(counttime==12)                     // 第12位
  201.                      {
  202.                       Action=1;
  203.                       break;        //接收完毕,退出解码程序
  204.                      }
  205.         }
  206.     }
复制代码


积分规则
回复

使用道具 举报

0

主题

100

回帖

33

E币

技术员

Rank: 2

积分
100
发表于 2018-9-26 23:53:07 | 显示全部楼层
謝謝你的分享.....................................
Conseil des pharmaciens [url=https://www.viagrasansordonnancefr.com/]viagrasansordonnancefr.com[/url
回复 支持 反对

使用道具 举报

30

主题

33

回帖

39

E币

技术员

Rank: 2

积分
93
发表于 2018-10-18 14:36:21 | 显示全部楼层
谢谢分享
回复

使用道具 举报

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

本版积分规则

Archiver|手机版|小黑屋|EDABOSS电子论坛

GMT+8, 2024-4-24 00:03 , Processed in 0.041446 second(s), 26 queries .

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

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