单片机红外通信控制继电器源程序

yxlk · 发表于 2018-11-28 09:43

EDA365欢迎您登录！

您需要登录才可以下载或查看，没有帐号？注册

x

单片机红外通信控制继电器源程序

0 n  W) }  e* ^; Y% \4 d! k
/***************************************************************************
本实验例程是用NEC红外线接收解码程序(红外线接收部分为板子配的林洋电子程序)
程序功能：
      1、运行程序，按遥控器按键，在数码管上显示相应的控制码（以16进制显示）；
      2、对特别的几个键，有相应的现象出现：
      (1)电源键，使继电器工作或断开；
      (2)静音键，使蜂鸣器响或不响；
      (3)快进键让LED灯向右出现一次走马灯现象；
      (4)快退键让LED灯向左出现一次走马灯现象；
      (5)按0~9，数码管显示所按的键号；
      (6)按其它键，不会改变已经按的数字键的显示，表示看电视台开关电源或静音、快进快退，都不会
改变台号。
(7)其它键没想好怎么以现有板产生相应功能，所以按下后，没有特别现象，只有显示其控制码。
******************************************************************************/
#include "reg51.h"//头文件:

#define LED8 P2//红外遥控功能之一是让LED灯亮，所以要将P2口改名

sbit hwx=P3^3;             //红外接收数据引脚，也是外部中断1的I/O口
sbit SMG_q = P1^0;       //定义数码管阳级控制脚（千位）
sbit SMG_b = P1^1;       //定义数码管阳级控制脚（百位）
sbit SMG_s = P1^2;       //定义数码管阳级控制脚（十位）
sbit SMG_g = P1^3;       //定义数码管阳级控制脚（个位）
sbit JDQ=P1^4;             //继电器
sbit Beep =  P1^5 ;       //蜂鸣器

code unsigned char table[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,
                                                      0x88,0x8c,0xc6,0xa1,0x86,0x8e};       //共阳数码管段值表 0-9 a-f

unsigned char ly_disdate[4]={0,0,0,0};
unsigned char ly_lhj[4],i;
bit ly_flag=1;
void display();

void delay(void);

void Delay10ms(unsigned int c)
{
unsigned char a,b;
for(c;c>0;c--)
      for(b=38;b>0;b--)
         for(a=130;a>0;a--);
}

void main(void)//主函数
{
      EA=1;
      EX1=1;
      IT1=1;
      TMOD=0X10;
      JDQ=1;
      ly_flag=0;
      while(1){
            if(ly_flag){
                     ly_flag=0;
                     if ((ly_lhj[2]==0x45))
                     {
                              JDQ=~JDQ;
                     }
                     if ((ly_lhj[2]==0x47))
                     {
                              Beep=~Beep;
                     }
                     if ((ly_lhj[2]==0x40))
                     {
                              LED8=0xfe;
                              for(i=0;i<8;i++)
                              {
                                    Delay10ms(10);
                                    LED8=LED8<<1;
                              }
                              LED8=0xff;
                     }
                     if ((ly_lhj[2]==0x43))
                     {
                              LED8=0x7f;
                              for(i=0;i<8;i++)
                              {
                                    Delay10ms(10);
                                    LED8=LED8>>1;
                              }
                              LED8=0xff;
                     }
                     if ((ly_lhj[2]==0x16))
                     {
                              ly_disdate[0]=0;
                     }
                     if ((ly_lhj[2]==0x0c))
                     {
                              ly_disdate[0]=1;
                     }
                     if ((ly_lhj[2]==0x18))
                     {
                              ly_disdate[0]=2;
                     }
                     if ((ly_lhj[2]==0x5e))
                     {
                              ly_disdate[0]=3;
                     }
                     if ((ly_lhj[2]==0x08))
                     {
                              ly_disdate[0]=4;
                     }
                     if ((ly_lhj[2]==0x1c))
                     {
                              ly_disdate[0]=5;
                     }
                     if ((ly_lhj[2]==0x5a))
                     {
                              ly_disdate[0]=6;
                     }
                     if ((ly_lhj[2]==0x42))
                     {
                              ly_disdate[0]=7;
                     }
                     if ((ly_lhj[2]==0x52))
                     {
                              ly_disdate[0]=8;
                     }
                     if ((ly_lhj[2]==0x4a))
                     {
                              ly_disdate[0]=9;
                     }
                     ly_disdate[2]=ly_lhj[2]/16;
                     ly_disdate[3]=ly_lhj[2]%16;
            }
            display();
      }
}

void hongwai(void) interrupt 2
{
      unsigned char i,ia;
      TL1=0;
      TH1=0;
      TR1=1;
      while(!hwx);
      TR1=0;
      if(TH1<30||TH1>40)
{
            return;
}
      TH1=0;
      TR1=1;
      while(hwx)                      //
      {
            delay();
            if(TH1>22)
                     return;
      }
      TR1=0;
      if(TH1<12)
            return;

      for(i=0;i<4;i++)
      {
            for(ia=0;ia<8;ia++)
            {
                     while(!hwx);

                     TH1=0;
                     TR1=1;
                     while(hwx)
                     {
                              delay();
                              if(TH1>15)
                                    return;
                     }
                     TR1=0;
                     ly_lhj>>=1;
  m9 U" ?( M; b0 S7 S' L, d' A: ^                      if(TH1>4)0 t. v4 i/ C% a- i) M! r/ A& p, ?
                              ly_lhj|=0x80;; G* l+ d$ o! o+ A& [+ \# ?
            }5 [0 r, v1 W; w# p, }
      }
: H  o/ i" r0 w: T4 V+ t       ly_flag=1;6 s5 p) }7 v) d% U' S6 y
      TF1=0;
$ F; I9 _- }8 E+ L}
# V/ R0 g+ ^3 r6 U9 M
. M( M9 H9 R; k" b# p3 Uvoid display(): l9 |2 B- s! e5 N) S/ C
- d' ~/ p8 _7 n# L7 G  O4 X
{
" s/ a3 [' @% }1 ]       SMG_q=0;                      //选择千位数码管(亮)
' M8 d4 |' P0 z  U0 R& k) Y6 k       P0=table[ly_disdate[0]];       //
1 d1 R( S! Q- O6 r" Z: t! G       delay();                      //
; P6 y- ]! o) ^+ `9 G7 [       P0=0XFF;                      //
' n, F; ~9 K. Y' p, \" D       SMG_q=1;                      //(灭)
4 D$ U. [3 a  U+ z  s: S, F- R$ C& T0 E3 U
      SMG_s=0;                      //选择十位数码管+ y) e! d+ G. D* {, N
      P0=table[ly_disdate[2]];       //2 k0 e$ P' f7 f$ _& [
      delay();                      /// q) t7 k  F$ e- v2 K0 d
      P0=0XFF;                      //
1 h9 w! O* e% f( ]6 T! y       SMG_s=1;                      //
# g! ^5 q; @% d4 X" [2 z# X/ a
/ h2 k" |; ^+ A+ t  D6 S7 h+ j1 x1 [* b) }- i3 T
…………限于本文篇幅余下代码请从论坛下载附件…………
- ]# m/ P1 K& B7 C9 \" Y' U6 A
游客，如果您要查看本帖隐藏内容请回复

' e- U0 r% j4 r! @
2 M( K: V0 K3 J. t

relchhiclty · 发表于 2018-11-28 11:05

谢谢楼主，一步步来，学习中……

Hx0171 · 发表于 2020-10-23 15:15

谢谢楼主

帐号		自动登录	找回密码
密码			注册

单片机红外通信控制继电器源程序

EDA365欢迎您登录！

推荐内容 /1