C语言怎么写红外程序?实现遥控控制八个led。求程序和详细解释。

C语言怎么写红外程序?实现遥控控制八个led。求程序和详细解释。,第1张

下面是一个用C写的遥控器漏巧漏程序.能在数码管上显示键码.

#include <reg52.h>

#define c(x) (x*110592/120000)

sbit Ir_Pin=P3^3

unsigned char code Led_Tab[]={0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,

0xf8,0x80,0x90,0x88,0x83,0xC6,0xA1,0x86,0x8E} //共阳极数码显示码0-F.

unsigned char code Led_Sel[]={0xe,0xd,0xb,0x7}

unsigned char Led_Buf[4]//宽桐显示缓冲区

char Led_Index //位选

unsigned char Ir_Buf[4]//用于保存解码结果

//==============================================================

//数码管扫描

timer0() interrupt 1 using 1

{

TL0=65536-1000

TH0=(65536-1000)/256//定时器0设定约1000us中断一次,用于数码管扫描

P0=0xff

P2=Led_Sel[Led_Index] //位选

P0=Led_Tab[Led_Buf[Led_Index]] //段选

if(++Led_Index>3) Led_Index=0 //四个扫描完了,到第一个数码管

}

//==============================================================

unsigned int Ir_Get_Low()

{

TL1=0

TH1=0

TR1=1

while(!Ir_Pin &&(TH1&0x80)==0)

TR1=0

return TH1*256+TL1

}

//=============================================================

unsigned int Ir_Get_High()

{

TL1=0

TH1=0

TR1=1

while(Ir_Pin &&(TH1&0x80)==0)

TR1=0

return TH1*256+TL1

}

//==============================================================

main()

{

unsigned int temp

char i,j

Led_Index=1

TMOD=0x11

TL0=65536-1000

TH0=(65536-1000)/256//定时器0设定约1000us中断一次,用于数码管扫描

EA=1

ET0=1

TR0=1

Led_Buf[0]=0

Led_Buf[1]=0

Led_Buf[2]=0

Led_Buf[3]=0//显示区返烂设成0

do{

restart:

while(Ir_Pin)

temp=Ir_Get_Low()

if(temp<c(8500) || temp>c(9500)) continue//引导脉冲低电平9000

temp=Ir_Get_High()

if(temp<c(4000) || temp>c(5000)) continue//引导脉冲高电平4500

for(i=0i<4i++) //4个字节

for(j=0j<8j++) //每个字节8位

{

temp=Ir_Get_Low()

if(temp<c(200) || temp>c(800)) goto restart

temp=Ir_Get_High()

if(temp<c(200) || temp>c(2000)) goto restart

Ir_Buf[i]>>=1

if(temp>c(1120)) Ir_Buf[i]|=0x80

}

Led_Buf[0]=Ir_Buf[2]&0xf

Led_Buf[1]=(Ir_Buf[2]/16)&0xf

Led_Buf[2]=Ir_Buf[3]&0xf

Led_Buf[3]=(Ir_Buf[3]/16)&0xf//显示结果

}while(1)

}

以下文件是51单片机实现遥控解码,通过数码管显示键码的程序,P0口驱动衫春数巧斗码管段选,p2.6和p2.7为数码管位选,接收头连到P3.2口。此程序以通过验证,可以直接编译使用,另外还有一个继电器和蜂鸣器的控制,不用可以屏蔽掉。

********************************************************************************

* 描述: *

* 遥控键值读取器*

* 数码管显示, P0口为数码管的数据口 *

* *

********************************************************************************

遥控键值解码-数码管显示*

********************************************************************************/

#include <reg51.h>

#include <intrins.h>

void IR_SHOW()

void delay(unsigned char x)//x*0.14MS

void delay1(unsigned char ms)

void beep()

sbit IRIN = P3^2

sbit BEEP = P3^7

sbit RELAY= P1^3

sbit GEWEI= P2^7

sbit SHIWEI= P2^6

unsigned char IRCOM[8]

unsigned char code table[16] =

{0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e}

main()

{

IE = 0x81 //允许总中断中断,使能 INT0 外部中断

TCON = 0x1 //触发方式为脉冲负边沿触发

delay(1)

IRIN=1

BEEP=1

RELAY=1

for()

{

IR_SHOW()

}

} //end main

void IR_IN() interrupt 0 using 0

{

unsigned char i,j,k,N=0

EA = 0

I1:

for (i=0i<4i++)

{

if (IRIN==0) break

if (i==3) {EA =1return}

}

delay(20)

if (IRIN==1) goto I1 //确认IR信号出现

while (!IRIN)//等 IR 变为高电平

{delay(1)}

for (j=0j<4j++)

{

for (k=0k<8k++)

{

while (IRIN)//等 IR 变为低电平

{delay(1)}

while (!IRIN) //等 IR 变或宽耐为高电平

{delay(1)}

while (IRIN) //计算IR高电平时长

{

delay(1)

N++

if (N>=30) {EA=1return}

}

IRCOM[j]=IRCOM[j] >>1

if (N>=8) {IRCOM[j] = IRCOM[j] | 0x80}

N=0

}//end for k

}//end for j

if (IRCOM[2]!=~IRCOM[3]) {EA=1return}

IRCOM[5]=IRCOM[2] &0x0F

IRCOM[6]=IRCOM[2] &0xF0

IRCOM[6]=IRCOM[6] >>4

beep()

EA = 1

}

void IR_SHOW()

{

P0 = table[IRCOM[5]]

GEWEI = 0

SHIWEI = 1

delay1(4)

P0 = table[IRCOM[6]]

SHIWEI = 0

GEWEI = 1

delay1(4)

}

void beep()

{

unsigned char i

for (i=0i<100i++)

{

delay(5)

BEEP=!BEEP

}

BEEP=1

}

void delay(unsigned char x)//x*0.14MS

{

unsigned char i

while(x--)

{

for (i = 0i<13i++) {}

}

}

void delay1(unsigned char ms)

{

unsigned char i

while(ms--)

{

for(i = 0i<120i++)

{

_nop_()

_nop_()

_nop_()

_nop_()

}

}

}

(1)发送程序

#include <reg52.h>

static bit OP //红外发射管的亮灭

static unsigned int count //延时计数器

static unsigned int endcount//终止延时计数

static unsigned int temp//按键

static unsigned char flag //红外发送标志

static unsigned char num

sbit ir_in=P3^4

char iraddr1 //十六位地址的第一个字节

char iraddr2 /脊贺/十六位地址的第二个字节

unsigned char code table[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8, 2009-8-11 <br>4 <br>红外数据传输 <br>0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e} //共阳数码管 0~~f

void SendIRdata(char p_irdata)

void delay(unsigned int)

void keyscan()

/******************主函数**************************/

void main(void)

{

num=0

P2=0x3f

count = 0

flag = 0

OP = 0

ir_in= 0

EA = 1//允许CPU中断

TMOD = 0x11//设定时器0和1为16位模式1

ET0 = 1//定时器0中断允许

TH0 = 0xFF

TL0 = 0xE6//设定时值0为38K 也就是每隔26us中断一次

TR0 = 1//开始芦腊计数

iraddr1=3//00000011

iraddr2=252//11111100

do{keyscan()<br>}while(1)

}

/***********************定时器0中断处理 **********************/

void timeint(void) interrupt 1

{

TH0=0xFF

TL0=0xE6//设定时值为38K 也就是每隔26us中断一次

count++

if (flag==1)

{

OP=~OP

}

else

{

OP = 0

}

ir_in= OP

}

void SendIRdata(char p_irdata)

{ 2009-8-11

5

红外数据传输

int i

char irdata=p_irdata

//发送9ms的起始码

endcount=223

flag=1

count=0

do{}while(count<endcount)

/**********************发送4.5ms的结果码***********************/

endcount=117

flag=0

count=0

do{}while(count<endcount)

/********************发送十六位地址的前樱哗派八位*******************/

irdata=iraddr1

for(i=0i<8i++)

{

/*****先发送0.56ms的38KHZ红外波(即编码中0.56ms的低电平)*****/

endcount=10

flag=1

count=0

do{}while(count<endcount)

/***********停止发送红外信号(即编码中的高电平)*************/

if(irdata-(irdata/2)*2) //判断二进制数个位为1还是0

{

endcount=41//1为宽的高电平

}

else

{

endcount=15 //0为窄的高电平

}

flag=0

count=0

do{}while(count<endcount)

irdata=irdata>>1

}

/**********************发送十六位地址的后八位******************/

irdata=iraddr2

for(i=0i<8i++)

{

endcount=10

flag=1

count=0

do{}while(count<endcount)

if(irdata-(irdata/2)*2)

{

endcount=41

}

else

{ 2009-8-11

6

红外数据传输

endcount=15

}

flag=0

count=0

do{}while(count<endcount)

irdata=irdata>>1

}

/******************发送八位数据********************************/

irdata=p_irdata

for(i=0i<8i++)

{

endcount=10

flag=1

count=0

do{}while(count<endcount)

if(irdata-(irdata/2)*2)

{

endcount=41

}

else

{

endcount=15

}

flag=0

count=0

do{}while(count<endcount)

irdata=irdata>>1

}

/***********************发送八位数据的反码**********************/

irdata=~p_irdata

for(i=0i<8i++)

{

endcount=10

flag=1

count=0

do{}while(count<endcount)

if(irdata-(irdata/2)*2)

{

endcount=41

}

else

{

endcount=15

}

flag=0

count=0

do{}while(count<endcount)

irdata=irdata>>1

}

2009-8-11

7

红外数据传输

endcount=10

flag=1

count=0

do{}while(count<endcount)

flag=0

}

void delay(unsigned int z)

{

unsigned char x,y

for(x=zx>0x--)

for(y=110y>0y--)

}

/*********************4×4键盘扫描按下按键发射数据************************/

void keyscan()

{

P1=0xfe

temp=P1

temp=temp&0xf0

while(temp!=0xf0)

{

temp=P1

switch(temp)

{

case 0xee:num=1

break

case 0xde:num=2

break

case 0xbe:num=3

break

case 0x7e:num=4

break

}

while(temp!=0xf0)

{

temp=P1

temp=temp&0xf0

}

P2=table[num-1]

SendIRdata(table[num-1])

}

P1=0xfd

temp=P1

temp=temp&0xf0

while(temp!=0xf0)

{

temp=P1

switch(temp)

{

case 0xed:num=5

break

case 0xdd:num=6

break

case 0xbd:num=7

break

case 0x7d:num=82009-8-11

8

红外数据传输

break

}

while(temp!=0xf0)

{

temp=P1

temp=temp&0xf0

}

P2=table[num-1]

SendIRdata(table[num-1])

}

P1=0xfb

temp=P1

temp=temp&0xf0

while(temp!=0xf0)

{

temp=P1

switch(temp)

{

case 0xeb:num=9

break

case 0xdb:num=10

break

case 0xbb:num=11

break

case 0x7b:num=12

break

}

while(temp!=0xf0)

{

temp=P1

temp=temp&0xf0

}

P2=table[num-1]

SendIRdata(table[num-1])

}

P1=0xf7

temp=P1

temp=temp&0xf0

while(temp!=0xf0)

{

temp=P1

switch(temp)

{

case 0xe7:num=13

break

case 0xd7:num=14

break

case 0xb7:num=15

break

case 0x77:num=16

break

}

while(temp!=0xf0)

{

temp=P1

temp=temp&0xf0

} 2009-8-11

9

红外数据传输

P2=table[num-1]

SendIRdata(table[num-1])

}

}

(2)接收程序

#include"reg52.h"

#define uchar unsigned char

#define uint unsigned int

uchar dis_num,num,num1,num2,num3

sbit led=P1^0

unsigned char code table[]={

0xc0,0xf9,0xa4,0xb0,

0x99,0x92,0x82,0xf8,

0x80,0x90,0x88,0x83,

0xc6,0xa1,0x86,0x8e} //共阳数码管 0~~f

sbit prem =P3^2 //定义遥控头的接收脚

uchar ram[4]={0,0,0,0}//存放接受到的4个数据 地址码16位+按键码8位+按键码取反的8位

void delaytime(uint time) //延迟90uS

{

uchar a,b

for(a=timea>0a--)

{

for(b=40b>0b--)

}

}

void rem()interrupt 0 //中断函数

{

uchar ramc=0 //定义接收了4个字节的变量

uchar count=0 //定义现在接收第几位变量

uint i=0 //此处变量用来在下面配合连续监测9MS 内是否有高电平

prem=1

for(i=0i<1100i++) //以下FOR语句执行时间为8MS左右

{

if(prem) //进入遥控接收程序首先进入引导码的前半部判断,即:是否有9MS左右的低电平

return //引导码错误则退出

}

while(prem!=1) //等待引导码的后半部 4.5 MS 高电平开始的到来。

delaytime(50) //延时大于4.5MS时间,跨过引导码的后半部分,来到真正遥控数据32位中

//第一位数据的0.56MS开始脉冲

for(ramc=0ramc<4ramc++)//循环4次接收4个字节

{for(count=0count<8count++) //循环8次接收8位(一个字节)

{

while(prem!=1) //开始判断现在接收到的数据是0或者1 ,首先在这行本句话时,

//保已经进入数据的0.56MS 低电平阶段

//等待本次接受数据的高电平的到来。

delaytime(9)//高电平到来后,数据0 高电平最多延续0.56MS,而数据1,高电平可 2009-8-11

10

红外数据传输

//延续1.66MS大于0.8MS 后我们可以再判断遥控接收脚的电平,

if(prem) //如果这时高电平仍然在继续那么接收到的数据是1的编码

{

ram[ramc]=(ram[ramc]<<1)+1//将目前接收到的数据位1放到对应的字节中

delaytime(11)//如果本次接受到的数据是1,那么要继续延迟1MS,这样才能跨入

//下个位编码的低电平中(即是开始的0.56MS中)

}

else //否则目前接收到的是数据0的编码

ram[ramc]=ram[ramc]<<1 //将目前接收到的数据位0放到对应的字节中

} //本次接收结束,进行下次位接收,此接收动作进行32次,正好完成4个字节的接收

}

if(ram[2]!=(~(ram[3]&0x7f)))//本次接收码的判断

{

for(i=0i<4i++) //没有此对应关系则表明接收失败,清除接受到的数据

ram[i]=0

return

}

dis_num=ram[2] //将接收到的按键数据赋给显示变量

}

main()

{

IT0=1 //设定INT0为边沿触发

EX0=1 //打开外部中断0

EA=1 //全局中断开关打开

while(1)

{

switch(dis_num)

{

case 0x81: num=0break

case 0xcf: num=1break

case 0x92: num=2break

case 0x86: num=3break

case 0xcc: num=4break

case 0xa4: num=5break

case 0xa0: num=6break

case 0x8f: num=7break

case 0x80: num=8break

case 0x84: num=9break

case 0x88: num=10break

case 0xe0: num=11break

case 0xb1: num=12break

case 0xc2: num=13break

case 0xb0: num=14break

case 0xb8: num=15break

}

P2=table[num]

P1=0x01

delaytime(5)

}

}


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/yw/12404189.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-25
下一篇 2023-05-25

发表评论

登录后才能评论

评论列表(0条)

保存