标题: 双红外反射式红外巡线传感器程序及资料 [打印本页]
作者: 51黑ff    时间: 2016-9-25 13:28
标题: 双红外反射式红外巡线传感器程序及资料
原理图：
  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  //宏定义无符号整型

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


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

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

作者: zqy181818    时间: 2017-3-20 19:36
资料不错，感谢你的分享。



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1