找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 2922|回复: 0
收起左侧

一个单片机雨水土壤传感器的程序

[复制链接]
ID:127235 发表于 2016-6-19 10:10 | 显示全部楼层 |阅读模式
一个单片机雨水土壤传感器的程序

ALIM0020.jpg ALIM0013.jpg
  1. /********************************************************************
  2.                         
  3. 实现功能:此版配套测试程序
  4. 使用芯片:AT89S52
  5. 晶振:11.0592MHZ
  6. 波特率:9600
  7. 编译环境:Keil
  8. 【声明】此程序仅用于学习与参考   
  9. *********************************************************************/
  10. /********************************************************************
  11. 说明:1、        当测量浓度大于设定浓度时,单片机IO口输出低电平
  12. *********************************************************************/
  13. #include<reg52.h>                 //库文件
  14. #define uchar unsigned char//宏定义无符号字符型
  15. #define uint unsigned int  //宏定义无符号整型

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

复制代码


雨水传感器.docx

152.9 KB, 下载次数: 14, 下载积分: 黑币 -5

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励!

查看全部评分

回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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