找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 2854|回复: 1
打印 上一主题 下一主题
收起左侧

双红外反射式红外巡线传感器程序及资料

[复制链接]
跳转到指定楼层
楼主
原理图:
  1. 13:25 2016/9/2513:25 2016/9/25/********************************************************************
  2.                             汇诚科技
  3. 实现功能:此版配套测试程序
  4. 使用芯片:AT89S52
  5. 晶振:11.0592MHZ
  6. 波特率:9600
  7. 编译环境:Keil
  8. 作者:zhangxinchunleo
  9. 网站:www.ourhc.cn
  10. 淘宝店:汇诚科技 http://shop36330473.taobao.com
  11. 【声明】此程序仅用于学习与参考,引用请注明版权和作者信息!     
  12. *********************************************************************/
  13. /********************************************************************
  14. 说明:1、        当测量浓度大于设定浓度时,单片机IO口输出低电平
  15. *********************************************************************/
  16. #include<reg52.h>                 //库文件
  17. #define uchar unsigned char//宏定义无符号字符型
  18. #define uint unsigned int  //宏定义无符号整型

  19. /********************************************************************
  20.                             I/O定义
  21. *********************************************************************/
  22. sbit LED=P1^0;         //定义单片机P1口的第1位 (即P1.0)为指示端
  23. sbit DOUT=P2^0;         //定义单片机P2口的第1位 (即P2.0)为传感器的输入端
  24. /********************************************************************
  25.                             延时函数
  26. *********************************************************************/
  27. void delay()//延时程序
  28. {
  29. uchar m,n,s;
  30. for(m=20;m>0;m--)
  31. for(n=20;n>0;n--)
  32. for(s=248;s>0;s--);
  33. }
  34. /********************************************************************
  35.                             主函数
  36. *********************************************************************/
  37. void main()
  38. {
  39.         while(1)   //无限循环
  40.         {
  41.          LED=1;           //熄灭P1.0口灯
  42.          if(DOUT==0)//当浓度高于设定值时 ,执行条件函数
  43.          {
  44.             delay();//延时抗干扰
  45.                 if(DOUT==0)//确定 浓度高于设定值时 ,执行条件函数
  46.             {
  47.                  LED=0;           //点亮P1.0口灯
  48.                 }
  49.          }
  50.         }
  51. }        
  52. /********************************************************************
  53.                               结束
  54. *********************************************************************/
复制代码


双红外反射式红外巡线传感器.zip

1.53 MB, 下载次数: 18, 下载积分: 黑币 -5

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶 踩
回复

使用道具 举报

沙发
ID:130231 发表于 2017-3-20 19:36 | 只看该作者
资料不错,感谢你的分享。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表