单片机实现红外通讯的proteus仿真带发送和接受源程序

ID:137190 · 发表于 2016-9-27 12:35

给51黑电子的朋友们分享一个51单片机做的红外通讯的proteus仿真，下面是原理图：

单片机红外通讯的所有资料下载：

红外无线通信.zip (146.29 KB, 下载次数: 251)

2016-9-27 12:33 上传

点击文件名下载附件

红外发送程序：

#include <REG51.h>
#include <intrins.h>
#include "hongwaifashe.h"
void hongwaifashe(void)
{
TMOD = 0x01; //T0 16位工作方式
IR=1; //发射端口常态为高电平
ZZ(setdata[0]);
ZZ(setdata[1]);
}
void ZZ(uchar x)
{
TT0(1,m9); //高电平9mS
TT0(0,m4_5); //低电平4.5mS
/*┈ 发送4帧数据 ┈*/
Z0(SBM);
Z0(~SBM);
Z0(x);
Z0(~x);
/*┈┈ 结束码 ┈┈*/
TT0(1,m_56);
TT0(0,m40);
}/*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
函数功能：单帧发送程序
入口参数：1帧数据
┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
void Z0(uchar temp)
{
uchar v;
for (v=0;v<8;v++) //循环8次移位
{
TT0(1,m_56); //高电平0.65mS
if(temp&0x01) TT0(0,m1_68); //发送最低位
else TT0(0,m_56);
temp >>= 1; //右移一位
}
}
/*┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈
函数功能：38KHz脉冲发射 + 延时程序
入口参数：（是否发射脉冲,延时约 x (uS)）
┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈*/
void TT0(bit BT,uint x)
{
TH0 = x>>8; //输入T0初始值
TL0 = x;
TF0=0; //清0
TR0=1; //启动定时器0
if(BT == 0) while(!TF0); //BT=0时不发射38KHz脉冲只延时；BT=1发射38KHz脉冲且延时；
else while(1) //38KHz脉冲，占空比5:26
{
IR = 0;
if(TF0)break;
if(TF0)break;
IR = 1;
if(TF0)break;
if(TF0)break;
if(TF0)break;
if(TF0)break;
if(TF0)break;
if(TF0)break;
if(TF0)break;
if(TF0)break;
if(TF0)break;
if(TF0)break;
}
TR0=0; //关闭定时器0
TF0=0; //标志位溢出则清0
IR =1; //脉冲停止后，发射端口常态为高电平
}

复制代码

红外接收程序：

#include<reg52.h>
#include"12864.h"
#include<intrins.h> //包含_nop_()函数定义的头文件
sbit IR=P3^2; //将IR位定义为P3.2引脚
unsigned char a[4]; //储存用户码、用户反码与键数据码、键数据反码
unsigned char zai=0,om,pm,qm;
unsigned int LowTime,HighTime; //储存高、低电平的宽度
void fenjie()
{
if(a[2]==0x80)
zai=0;
else if(a[2]==0xc0)
zai=1;
else
{
om=a[2]/100;
pm=a[2]/10%10;
qm=a[2]%100%10;
}
}
bit DeCode(void)
{
unsigned char i,j;
unsigned char temp; //储存解码出的数据
for(i=0;i<4;i++) //连续读取4个用户码和键数据码
{
for(j=0;j<8;j++) //每个码有8位数字
{
temp=temp>>1; //temp中的各数据位右移一位，因为先读出的是高位数据
TH0=0; //定时器清0
TL0=0; //定时器清0
TR0=1; //开启定时器T0
while(IR==0) //如果是低电平就等待
; //低电平计时
TR0=0; //关闭定时器T0
LowTime=TH0*256+TL0; //保存低电平宽度
TH0=0; //定时器清0
TL0=0; //定时器清0
TR0=1; //开启定时器T0
while(IR==1) //如果是高电平就等待
;
TR0=0; //关闭定时器T0
HighTime=TH0*256+TL0; //保存高电平宽度
if((LowTime<360)||(LowTime>680))
return 0; //如果低电平长度不在合理范围，则认为出错，停止解码
if((HighTime>400)&&(HighTime<680)) //如果高电平时间在560微秒左右，即计数560／1.085＝516次
temp=temp&0x7f; //(520-100=420, 520+100=620)，则该位是0
if((HighTime>1400)&&(HighTime<1850)) //如果高电平时间在1680微秒左右，即计数1680／1.085＝1548次
temp=temp|0x80; //(1550-250=1300,1550+250=1800),则该位是1
}
a[i]=temp; //将解码出的字节值储存在a[i]
}
if(a[2]=~a[3]) //验证键数据码和其反码是否相等,一般情况下不必验证用户码
return 1; //解码正确，返回1
}
void init(void)
{
E=1;
CS1=0;CS2=0;
lcd_clear();
lcd_init();
EA=1; //开启总中断
ET0=1; //定时器T0中断允许
IT0=1; //外中断的下降沿触发
TMOD=0x01; //使用定时器T0的模式1
TR0=0; //定时器T0关闭
EX0=1; //开外中断0
}
void display()
{
CS1=0;
CS2=1;
lcd_mwc(0xb8); // 无线环境监测
lcd_mwc(0x50);
dispm_zi_up(&WUYOU[0][0]);
dispm_zi_up(&XIAN);
dispm_zi_up(&HUAN);
lcd_mwc(0xb9);
lcd_mwc(0x50);
dispm_zi_down(&WUYOU[0][0]);
dispm_zi_down(&XIAN);
dispm_zi_down(&HUAN);
lcd_mwc(0xba); // 温度
lcd_mwc(0x40);
dispm_zi_up(&WEN);
dispm_zi_up(&DU);
dispm_zi_up(&MAOHAO);
dispm_zi_up(&SHUZI[om][0]);
lcd_mwc(0xbb);
lcd_mwc(0x40);
dispm_zi_down(&WEN);
dispm_zi_down(&DU);
dispm_zi_down(&MAOHAO);
dispm_zi_down(&SHUZI[om][0]);
lcd_mwc(0xbc); //亮度
lcd_mwc(0x40);
dispm_zi_up(&LIANG);
dispm_zi_up(&DU);
dispm_zi_up(&MAOHAO);
lcd_mwc(0xbd);
lcd_mwc(0x40);
dispm_zi_down(&LIANG);
dispm_zi_down(&DU);
dispm_zi_down(&MAOHAO);
CS1=1;
CS2=0;
lcd_mwc(0xb8); // 无线环境监测
lcd_mwc(0x40);
dispm_zi_up(&JING);
dispm_zi_up(&JIAN);
dispm_zi_up(&CE);
lcd_mwc(0xb9);
lcd_mwc(0x40);
dispm_zi_down(&JING);
dispm_zi_down(&JIAN);
dispm_zi_down(&CE);
lcd_mwc(0xba); // 温度
lcd_mwc(0x40);
dispm_zi_up(&SHUZI[pm][0]);
dispm_zi_up(&SHUZI[qm][0]);
dispm_zi_up(&DUHAO);
lcd_mwc(0xbb);
lcd_mwc(0x40);
dispm_zi_down(&SHUZI[pm][0]);
dispm_zi_down(&SHUZI[qm][0]);
dispm_zi_down(&DUHAO);
lcd_mwc(0xbc); //亮度
lcd_mwc(0x40);
dispm_zi_up(&WUYOU[zai][0]);
lcd_mwc(0xbd);
lcd_mwc(0x40);
dispm_zi_down(&WUYOU[zai][0]);
}
void main(void)
{
init();
while(1)
{
// fenjie();
display();
}
}
/************************************************************
函数功能：红外线触发的外中断处理函数
*************************************************************/
void Int0(void) interrupt 0
{
EX0=0; //关闭外中断0，不再接收二次红外信号的中断，只解码当前红外信号
TH0=0; //定时器T0的高8位清0
TL0=0; //定时器T0的低8位清0
TR0=1; //开启定时器T0
while(IR==0); //如果是低电平就等待，给引导码低电平计时
TR0=0; //关闭定时器T0
LowTime=TH0*256+TL0; //保存低电平时间
if(((LowTime>8500)&&(LowTime<9500))!=1) {EX0=1;return;}
TH0=0; //定时器T0的高8位清0
TL0=0; //定时器T0的低8位清0
fenjie(); TR0=1; //开启定时器T0
while(IR==1); //如果是高电平就等待，给引导码高电平计时
TR0=0; //关闭定时器T0
HighTime=TH0*256+TL0; //保存引导码的高电平长度
if((HighTime>4000)&&(HighTime<5000))
{
DeCode();
fenjie();
}
EX0=1;
}

复制代码

ID:92673 · 发表于 2017-3-9 22:24

谢谢，51黑有你更精彩

ID:233779 · 发表于 2017-9-18 10:20

感谢楼主的分享，对于初学者来说，很有帮助，谢谢。

ID:128463 · 发表于 2017-10-16 16:41

谢谢，51黑有你更精彩

ID:308395 · 发表于 2018-5-2 10:26

楼主，求仿真图

ID:337066 · 发表于 2018-5-24 15:00

狗币王阳发表于 2017-9-18 10:20
**** 作者被禁止或删除内容自动屏蔽 ****

请问这个DNS文件怎么用

ID:352375 · 发表于 2018-6-16 14:15

本帖最后由 so街道口于 2018-6-17 18:14 编辑

那个原理图里是不是没装光敏，我自己试着改了一下
QQ图片20180617180434.jpg

ID:352375 · 发表于 2018-6-17 20:27

1823488572 发表于 2018-5-24 15:00
请问这个DNS文件怎么用

用proteus打开

ID:355119 · 发表于 2018-6-20 13:35

感谢

ID:374124 · 发表于 2018-7-19 10:12

感谢，跑得起来的

ID:246762 · 发表于 2018-7-20 15:38

感谢感谢

ID:467087 · 发表于 2019-1-12 19:08

看一下，学习学习

ID:77064 · 发表于 2019-2-28 20:01

膜拜大佬大佬牛逼这个还要审核的吗这么高级

ID:296513 · 发表于 2019-3-20 17:15

好东西

ID:530128 · 发表于 2019-6-7 02:11

感谢楼主分享

ID:88606 · 发表于 2019-6-9 08:45

看看仿真！

ID:630332 · 发表于 2020-3-19 11:28

感谢楼主分享。

ID:743003 · 发表于 2020-5-2 21:11

谢谢，有助于学习

ID:510013 · 发表于 2020-6-22 20:42

感谢楼主分享

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

单片机实现红外通讯的proteus仿真 带发送和接受源程序

评分

单片机实现红外通讯的proteus仿真带发送和接受源程序