/*-----------------------------------------------
名称:红外发射接收测试
论坛:www.doflye.net
编写:shifang
日期:2009.5
修改:无
内容:通过2路红外发射,顺序接收,检测收发功能是否正常
用手遮挡对应的发射管,对应的LED点亮,反之熄灭
每60ms分别检测2路发射,通过每组发射10个脉冲,如果接收到的脉冲个数大于6,表明有遮挡存在
------------------------------------------------*/
#include<reg52.h> //包含头文件,一般情况不需要改动,头文件包含特殊功能寄存器的定义
sbit IRSend_A=P1^2; //定义红外发射 A
sbit IRSend_B=P1^3; //定义红外发射 B
sbit IRRev =P3^2; //接收接口
sbit LED_A = P1^6; //演示LED A
sbit LED_B = P1^7; //演示LED B
bit Flag;
void Init_Timer0(void);//定时器初始化
void DelayUs2x(unsigned char t);
/*------------------------------------------------
主函数
------------------------------------------------*/
void main (void)
{
unsigned char i,pulse_num;
Init_Timer0();
IRSend_A=0; //关闭2个发射管
IRSend_B=0;
while (1) //主循环
{
if(Flag)
{
pulse_num=0; //脉冲计数
for(i=0;i<10;i++)
{
IRSend_A=1;//打开A发射
DelayUs2x(150);
if(! IRRev)
pulse_num++;
IRSend_A=0;//关闭A发射
DelayUs2x(150);
}
if(pulse_num>6)
LED_A=0;//如果判断有障碍,点亮LED_A指示,否则熄灭
else
LED_A=1;
pulse_num=0;//清零脉冲计数
for(i=0;i<10;i++)
{
IRSend_B=1;//打开B发射
DelayUs2x(150);
if(! IRRev)
pulse_num++;
IRSend_B=0;//关闭B发射
DelayUs2x(150);
}
if(pulse_num>6)
LED_B=0;//如果判断有障碍,点亮LED_B指示,否则熄灭
else
LED_B=1;
}
}
}
/*------------------------------------------------
定时器初始化子程序
------------------------------------------------*/
void Init_Timer0(void)
{
TMOD |= 0x01; //使用模式1,16位定时器,使用"|"符号可以在使用多个定时器时不受影响
//TH0=0x00; //给定初值
//TL0=0x00;
EA=1; //总中断打开
ET0=1; //定时器中断打开
TR0=1; //定时器开关打开
}
/*------------------------------------------------
定时器中断子程序
------------------------------------------------*/
void Timer0_isr(void) interrupt 1
{
TH0=(65536-60000)/256; //重新赋值 60ms
TL0=(65536-60000)%256;
Flag=!Flag;
}
/*------------------------------------------------
uS延时函数,含有输入参数 unsigned char t,无返回值
unsigned char 是定义无符号字符变量,其值的范围是
0~255 这里使用晶振12M,精确延时请使用汇编,大致延时
长度如下 T=tx2+5 uS
------------------------------------------------*/
void DelayUs2x(unsigned char t)
{
while(--t);
}
没有合适的资源?快使用搜索试试~ 我知道了~
120-红外收发测试(51单片机C语言实例Proteus仿真和代码).rar
共11个文件
plg:2个
opt:1个
obj:1个
1.该资源内容由用户上传,如若侵权请联系客服进行举报
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
版权申诉
0 下载量 179 浏览量
2023-02-08
13:04:37
上传
评论
收藏 11KB RAR 举报
温馨提示
免责声明:资料部分来源于合法的互联网渠道收集和整理,部分自己学习积累成果,供大家学习参考与交流。收取的费用仅用于收集和整理资料耗费时间的酬劳。 本人尊重原创作者或出版方,资料版权归原作者或出版方所有,本人不对所涉及的版权问题或内容负法律责任。如有侵权,请举报或通知本人删除。
资源推荐
资源详情
资源评论
收起资源包目录
120-红外收发测试(51单片机C语言实例Proteus仿真和代码).rar (11个子文件)
120-红外收发测试
红外收发测试.c 3KB
obj
红外收发测试.obj 4KB
红外收发测试.hex 470B
红外收发测试.plg 179B
红外收发测试.m51 6KB
红外收发测试 3KB
红外收发测试.lst 5KB
红外收发测试.plg 179B
红外收发测试.Opt 1KB
红外收发测试.Uv2 2KB
红外收发测试_Opt.Bak 1KB
共 11 条
- 1
资源评论
大富大贵7
- 粉丝: 317
- 资源: 8869
下载权益
C知道特权
VIP文章
课程特权
开通VIP
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
最新资源
- 简单的Python示例,演示了如何使用TCP/IP协议进行基本的客户端和服务器通信
- 考试.sql
- keil2 + proteus + 8051.exe
- 1961ee27df03bd4595d28e24b00dde4e_744c805f7e4fb4d40fa3f695bfbab035_8(1).c
- mediapipe-0.9.0.1-cp37-cp37m-win-amd64.whl.zip
- windows注册表编辑工具
- mediapipe-0.9.0.1-cp37-cp37m-win-amd64.whl.zip
- 校园通行码预约管理系统20240522075502
- 车类型数据集6250张VOC+YOLO格式.zip
- The PyTorch implementation of STGCN.STGCN-main.zip
资源上传下载、课程学习等过程中有任何疑问或建议,欢迎提出宝贵意见哦~我们会及时处理!
点击此处反馈
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功