自动控制LED灯组,红外中断(不做参考)

#include "reg52.h"             //此文件中定义了单片机的一些特殊功能寄存器
#include"XPT2046.h"    

typedef unsigned int u16;      //对数据类型进行声明定义
typedef unsigned char u8;

sbit LSA=P2^2;
sbit LSB=P2^3;
sbit LSC=P2^4;

sbit LED1=P2^0;

sbit LED3=P2^5;
sbit LED4=P2^6;
sbit LED5=P2^7;

sbit IRIN=P3^2;
u16 leed;
u8 disp[4];
u8 IrValue[6];
u8 Time;
u8 DisplayData[8];
u8 code smgduan[10]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};

/*******************************************************************************
* 函 数 名         : delay
* 函数功能           : 延时函数,i=1时,大约延时10us
*******************************************************************************/
void delay(u16 i)
{
    while(i--);    
}

/*******************************************************************************
* 函数名         : IrInit()
* 函数功能           : 初始化红外线接收
* 输入           : 无
* 输出              : 无
*******************************************************************************/

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

    IRIN=1;//初始化端口
}

/*******************************************************************************
* 函数名         :datapros()
* 函数功能         :数据处理函数
* 输入           : 无
* 输出              : 无
*******************************************************************************/
u16 datapros()
{
    u16 temp;
    static u8 i;
    if(i==50)
    {
        i=0;
        temp = Read_AD_Data(0xA4);        //   AIN2 光敏电阻
        
    }
    i++;
    leed = temp;
    disp[0]=smgduan[temp/1000];//千位
    disp[1]=smgduan[temp%1000/100];//百位
    disp[2]=smgduan[temp%1000%100/10];//个位
    disp[3]=smgduan[temp%1000%100%10];
    return leed;        
}


/*******************************************************************************
* 函数名         :DigDisplay()
* 函数功能         :数码管显示函数
* 输入           : 无
* 输出              : 无
*******************************************************************************/
void DigDisplay()
{
    u8 i;
    for(i=0;i<4;i++)
    {
        switch(i)     //位选,选择点亮的数码管,
        {
            case(0):
                LSA=0;LSB=0;LSC=0; break;//显示第0位
            case(1):
                LSA=1;LSB=0;LSC=0; break;//显示第1位
            case(2):
                LSA=0;LSB=1;LSC=0; break;//显示第2位
            case(3):
                LSA=1;LSB=1;LSC=0; break;//显示第3位    
        }
        P0=disp[3-i];//发送数据
        delay(100); //间隔一段时间扫描    
        P0=0x00;//消隐
    }        
}

/*******************************************************************************
* 函 数 名       : LedPlay
* 函数功能         : LED显示档位
* 输    入       : 无
* 输    出         : 无
*******************************************************************************/
void LedPlay()
{
   u16 sult = leed/100;
   switch(sult)
   {
   case 1 :LED4 = 0; LED5 = 0; LED3 = 0;
       break;
   case 2 :LED4 = 0; LED5 = 0; LED3 = 1;
       break;
   case 3 :LED4 = 0; LED5 = 0; LED3 = 1;
       break;
   case 5 :LED4 = 1; LED5 = 0; LED3 = 1;
       break;
    default:
        LED4 = 1; LED5 = 1; LED3 = 1;
   }
}


/*******************************************************************************
* 函数名         : SponseIr()
* 函数功能         :根据操作做出动作
* 输入           : IrValue
* 输出              : 无
*******************************************************************************/
void SponseIr(u16 dat)
{

        switch(dat)
            {
                case 0x0c:
                    LED3 = 1;break;
                case 0x18:
                    LED3 = 1;LED4 = 1;break;
                case 0x5e:
                    LED3 = 1;LED4 = 1;LED5 = 1;break;
            }
}


/*******************************************************************************
* 函 数 名       : main
* 函数功能         : 主函数
* 输    入       : 无
* 输    出         : 无
*******************************************************************************/
void main()
{    
    IrInit(); //红外线初始化
    while(1)
    {

        datapros();     //数据处理函数
        DigDisplay();//数码管显示函数
        LedPlay();
        SponseIr(IrValue[2]);        
    }        
}

/*******************************************************************************
* 函数名         : ReadIr()
* 函数功能           : 读取红外数值的中断函数
* 输入           : 无
* 输出              : 无
*******************************************************************************/

void ReadIr() interrupt 0
{
    u8 j,k;
    u16 err;
    Time=0;                     
    delay(700);    //7ms
    if(IRIN==0)        //确认是否真的接收到正确的信号
    {     
        
        err=1000;                //1000*10us=10ms,超过说明接收到错误的信号
        /*当两个条件都为真是循环,如果有一个条件为假的时候跳出循环,免得程序出错的时
        侯,程序死在这里*/    
        while((IRIN==0)&&(err>0))    //等待前面9ms的低电平过去          
        {            
            delay(1);
            err--;
        } 
        if(IRIN==1)            //如果正确等到9ms低电平
        {
            err=500;
            while((IRIN==1)&&(err>0))         //等待4.5ms的起始高电平过去
            {
                delay(1);
                err--;
            }
            for(k=0;k<4;k++)        //共有4组数据
            {                
                for(j=0;j<8;j++)    //接收一组数据
                {

                    err=60;        
                    while((IRIN==0)&&(err>0))//等待信号前面的560us低电平过去
                    {
                        delay(1);
                        err--;
                    }
                    err=500;
                    while((IRIN==1)&&(err>0))     //计算高电平的时间长度。
                    {
                        delay(10);     //0.1ms
                        Time++;
                        err--;
                        if(Time>30)
                        {
                            return;
                        }
                    }
                    IrValue[k]>>=1;     //k表示第几组数据
                    if(Time>=8)            //如果高电平出现大于565us,那么是1
                    {
                        IrValue[k]|=0x80;
                    }
                    Time=0;        //用完时间要重新赋值                            
                }
            }
        }
        if(IrValue[2]!=~IrValue[3])     //校验数据
        {
            return;
        }
    }            
}
发布了1 篇原创文章 · 获赞 1 · 访问量 118

猜你喜欢

转载自blog.csdn.net/z1076904047/article/details/104301809