AM2302湿度测量单片机源程序

Zedd · 发表于 2018-11-6 07:30

EDA365欢迎您登录！

您需要登录才可以下载或查看，没有帐号？注册

x

本帖最后由 Zedd 于 2018-11-7 10:09 编辑

AM2302湿度测量单片机源程序

使用AM2302温湿度传感器模块，达到测量湿度和温度目的，并在1602上显示出来。

单片机源程序如下:

#include<reg52.h>
#include <intrins.h>
#define uint unsigned int
#define uchar unsigned char

uchar code table[]="    WELCOME ";
uchar code table1[]="RH:    %";
uchar code table2[]="Sensor Not";
uchar code table3[]="Connected";
uchar code table4[]="Check wrong";

sbit Sensor_SDA = P2^0;

sbit key_set=P2^1;
sbit key_up=P2^2;
sbit key_down=P2^3;
sbit key_ok=P2^4;

sbit lcdrs=P2^6;
sbit lcdwr=P2^5;
sbit lcden=P2^7;

uchar Sensor_Data[5]={0x00,0x00,0x00,0x00,0x00};
uchar Sensor_AnsweRFlag;  //收到起始标志位
uchar Sensor_ErrorFlag; //读取传感器错误标志
uchar Sensor_Check;                //校验和
uint Sys_CNT;
uint Tmp;
uint t0;
uchar num;
uchar flag;

void delay(uint z)
{
      uint x,y;
      for(x=z;x>0;x--)
            for(y=123;y>0;y--);
}

/********************************************\
|* 功能：延时       晶振为12M时                                  *|
|*  t = 1 为 20us  然后成倍增加10us左右             *|
\********************************************/
void Delay_N10us(unsigned char t)
{
while(t--)
{
         _nop_();
}
}
/********************************************\
|* 功能：延时       晶振为12M时                                     *|
|* 延时大约 1ms                                                          *|
\********************************************/
void Delay_N1ms(unsigned int t)
{
  unsigned int i;
  unsigned int j;
  for(j=t;j>0;j--)
   for(i=124;i>0;i--);  //延时大约 1ms
}
void write_com(uchar com)
{
      lcdrs=0;
      P0=com;
      lcden=1;
      delay(5);
      lcden=0;
}
void write_date(uchar date)
{
      lcdrs=1;
      P0=date;
      lcden=1;
      delay(5);
      lcden=0;
}
void diyihang(uint z)
{
      z--;
      write_com(0x80+z);
}
void dierhang(uint z)
{
      z--;
      write_com(0x80+0x40+z);
}
void init_1602()
{
      lcdwr=0;
      lcden=0;
      write_com(0x38);//模式
      write_com(0x0c);//无光标不闪
      write_com(0x01);//清屏
      diyihang(1);//显示位置
      for(num=0;num<11;num++)
      {
            write_date(table[num]);
            //delay(10);
      }
      dierhang(1);//换行显示
      for(num=0;num<10;num++)
      {
            write_date(table1[num]);
            //delay(10);
      }
}
void Clear_Data (void)
{
      int i;
      for(i=0;i<5;i++)
      {
         Sensor_Data = 0x00;
0 P7 ?5 F( o- A9 T$ f8 V9 I       }//接收数据清零
( E: f" X3 D# Q. J* }}
- B9 p8 o1 b7 b2 D1 G3 v* f. G& c) g1 w. f

9 }# y1 Z. E# z# A5 c/********************************************\
2 n. |# T  g' z/ T% |- F7 g# Z|* 功能：读传感器发送的单个字节             *|
4 J/ u& }/ O: K1 H$ j6 D" a+ {\********************************************/
5 D7 ~& z3 `( B5 S8 F3 kunsigned char Read_SensorData(void): o: o$ _' L% C1 ~2 ~
{
$ e% ~8 @! @& Q5 A+ c4 |       unsigned char i,cnt;) Q* Y6 `# G3 e* l) ^+ D/ Y. R
      unsigned char buffer,tmp;8 }; X' K! q. L
      buffer = 0;) l# y* Z" T" R6 e$ _5 ~
      for(i=0;i<8;i++)
2 C! l3 B# I) n5 {7 Z4 W! U       {
  n0 ]; T* T" _* N- k( [( B7 N  K             cnt=0;
+ d- p/ o8 h6 i# q, @# M             while(!Sensor_SDA)       //检测上次低电平是否结束- Z! i! S% W8 P2 G
            {
* D# Z0 m4 I. U                if(++cnt >= 300)6 I: _) M& l4 {# @' m5 f( q# Y
               {6 d* i- T& v: b; u
                        break;
! O1 n$ x4 Z: ^; v- D7 `                }
1 _$ J' Y7 H1 W* R             }0 `9 V* b. ]' s5 P" \0 K6 }( e7 _; F
            //延时Min=26us Max50us 跳过数据"0" 的高电平
  I8 i4 M( M) }4 _1 e; ?             Delay_N10us(2);       //延时30us
/ Q1 E5 w" m! _( G. [; d" T: I. t: S
            //判断传感器发送数据位
3 X" l! J* h# f# z! w; O5 j4 Z             tmp =0;
7 T8 W0 ~; i) \' a             if(Sensor_SDA)
0 }7 |/ C( U/ V$ Y( H             {
) x) R* v3 Z; c: A8 |! w                tmp = 1;
, A+ r4 N- ^0 c) ?* P             }
$ F& E6 [6 A! m5 R             cnt =0;
9 }, j% X, ^8 B/ i3 |             while(Sensor_SDA)             //等待高电平结束
, |, q  |$ z3 P2 e  {4 ]1 l             {# J4 |- d3 |* S; m  Z% a* e% @
                        if(++cnt >= 200)4 \/ |- [% m. F# L8 c% ^' ^
                     {9 b1 f8 r* W2 ^8 r+ J
                        break;5 S2 ~% f; d- n  T
                     }3 U& D0 g' E0 P2 b" j! {1 [1 i
            }3 k+ p! M, B$ l6 e7 q: S' b
            buffer <<=1;
- R6 w7 R6 i9 T- E             buffer |= tmp;       * |( X1 e" X2 I/ h: c
      }( \6 t9 S. Q* F& y: Q
      return buffer;
& J) w/ r) x4 ~" _8 J5 C  }( Z' J, h) D' v* Z: I3 i
. J; k! G5 l* j7 k4 I; g" `8 V8 Y
/********************************************\3 L+ H! I" ^7 z) H3 z; H
|* 功能：读传感器                            *|
: D9 b7 \& w7 ^/ T7 F\********************************************/$ g( P, j9 ?$ ?. C- x6 y! ?
unsigned char Read_Sensor(void); @, ^  z- K- B' d) D  }
{       % t* h; o- L" S( u( d4 |$ l4 ]
      unsigned char i;/ E7 L+ ]2 [- Y0 n* B
      //主机拉低(Min=800US Max=20Ms)
# I( h2 B* a; |% C# ~ Sensor_SDA = 0;! J# h# ?. N( h! f; f- z( E
      Delay_N1ms(2);  //延时2Ms
" b0 c. a2 m& u% f1 ^; _, ^3 n" w7 E6 H. K
      //释放总线延时(Min=30us Max=50us)
( r) b# z/ G6 {7 H# N6 @. h       Sensor_SDA = 1;       4 t& N. j. U4 H3 D5 [* C
      Delay_N10us(1);//延时30us+ @! _0 `$ u4 e2 w
      //主机设为输入判断传感器响应信号 % e. L; H; q- \* m$ x
      Sensor_SDA = 1;
. k; t4 l' [- B! ]5 F2 `+ w) b" C* b5 s: O5 M6 H3 m6 J
      Sensor_AnswerFlag = 0;  // 传感器响应标志
7 M! B% U% d1 a. D
  D$ A- V8 j# m# c- P0 ~! u- ^& C       //判断从机是否有低电平响应信号如不响应则跳出，响应则向下运行
; I! S  J  K0 p( l& V       if(Sensor_SDA == 0)& n! {0 R+ c  `/ O9 b4 V+ a
      {7 w; b! X! y0 d$ a/ U8 V( |
         Sensor_AnswerFlag = 1;//收到起始信号
! X5 g% @  z/ N% _$ {- t, {
/ m7 M- N8 R+ g( |2 [          Sys_CNT = 0;: L% l8 r9 Y7 ]0 G( H1 J- E4 V
         //判断从机是否发出 80us 的低电平响应信号是否结束
6 _' |" j& p& a' a& ^! D, G, x          while((!Sensor_SDA))
! ]+ l" \" ?" f' o, ?* q# E          {' |5 [; j6 b5 j
         if(++Sys_CNT>300) //防止进入死循环
+ r. A5 P8 z. f/ W* T8 W0 ^                {7 k& Z+ i7 S1 B8 |
               Sensor_ErrorFlag = 1;
6 f- Y( C; z4 N/ v9 J                return 0;
% q" B, F( ~9 j2 k3 @                } ; D+ _7 z) s" D3 ~+ H
         }
+ \/ ]$ Z' f# Z* g5 C/ u# c5 b: n+ P$ k# N# [' m
         Sys_CNT = 0;+ D! ^) a; J3 L& i/ n2 ]( o
         //判断从机是否发出 80us 的高电平，如发出则进入数据接收状态5 U; x: p0 |! c, M/ Z; Y
         while((Sensor_SDA))
# |' R; m9 L/ Z" t3 n          {1 [- |- p0 M- n! r
            if(++Sys_CNT>300) //防止进入死循环% I" t; s: e  \* U  d3 M, S; c
               {
/ C) h5 P1 U7 C4 }  D                   Sensor_ErrorFlag = 1;
& C- h) g4 {2 v( P1 a# u                   return 0;
2 F* P0 P1 J! [( x/ |5 c                }
) w( W  ~9 O0 t# F          }                : E$ b2 V. R% q* D8 _
         // 数据接收       传感器共发送40位数据
' U! N7 e$ L3 T" C( ]' [          // 即5个字节高位先送  5个字节分别为湿度高位湿度低位温度高位温度低位校验和
  O3 m! l# y4 i8 l! _          // 校验和为：湿度高位+湿度低位+温度高位+温度低位
! Y+ R0 J$ h3 a& u& E5 D          for(i=0;i<5;i++)( ], x/ x- H1 U* ?9 R5 \1 U
         {3 L; \. e2 K' P
            Sensor_Data = Read_SensorData();
: D5 ^/ `* C' G          }, A1 m! O' Y6 O
      }
# K7 q3 D$ C9 i2 X& ^, ^       else! s/ O+ T$ Q7 K2 e# ~
      {
& j" k! {0 u$ A! [+ _+ S       Sensor_AnswerFlag = 0;       // 未收到传感器响应
" b5 B6 g5 [) v" K. Q; g       }% f+ R/ g! U$ |9 }1 f& C6 {- R( X% [
      return 1;' d+ f% J7 i, t% K3 G! |6 C
}% n, A1 k# q; ]" ?2 o
void display()- l8 ^- r: X; p8 ?4 Y' ]0 E
{
/ M1 B5 q: y* X# r$ s$ q% F       Tmp = Sensor_Data[2]*256+Sensor_Data[3];: X  |& U4 E, o
      diyihang(6);
! M7 }% A' x: ?$ y' U( _* l       /*write_date(Tmp/100%10 + '0');0 o$ ?7 k$ ^9 |3 J4 s
      write_date(Tmp/10%10 + '0');( z7 k9 j0 C" \! s/ I* t
      write_date('.');
& M5 B& i) y4 c) J' g: t       write_date(Tmp%10 + '0'); */# R8 N0 Z3 A: Y1 [/ a! b# x- Y
( L; M- y$ G/ x7 V
      Tmp = Sensor_Data[0]*256+Sensor_Data[1];$ A+ ?3 ], O' T$ B2 \* b9 D+ F% u; e) g
      dierhang(6);
" Y* R% S/ X8 O- L0 g2 O( C       write_date(Tmp/100%10 + '0');
: a! i. J& ?- w4 ?, O$ z$ \       write_date(Tmp/10%10 + '0');+ L8 _8 U4 z  {6 L5 c2 Z1 I1 B6 E
      write_date('.');4 s9 n; A4 Q& z+ V) ^$ i7 o1 l. l
      write_date(Tmp%10 + '0');! y/ d9 b/ @" p# m9 Q
}0 y( Z2 T, L; y# I! B( Q! L
void check_and_display()
- w' @( W& b) e4 Q9 Z{
+ W' q9 U; F( U9 j. B9 t* ]       if(Sensor_AnswerFlag == 1)
, n$ h" y3 o' x# C" O) J, V/ x- T$ j# C       {
2 L# ]2 J! e+ a: o, _             Sensor_Check = Sensor_Data[0]+Sensor_Data[1]+Sensor_Data[2]+Sensor_Data[3];
: W+ n" Z# T. C3 Y, J2 {             //校验成功5 Q7 q( T2 Q$ A- a6 q* Z
            if(Sensor_Check ==Sensor_Data[4])
7 G; o  e1 A% b: F6 |' w  b             {" C+ W% U5 P& J. o! w  }
                     if(flag == 1)
. }" o$ `+ l4 ^4 g/ ^                      {
9 A. x$ _2 q* y3 q/ p% }                               flag = 0;' \7 I8 i2 ]! I( ^6 i. F, ]/ R
                              write_com(0x01);//清屏1 ?* C$ G) L6 @' x
                              diyihang(1);//显示位置5 |' \+ r: q! |6 t
                              for(num=0;num<11;num++)
% x, E. w+ h% w9 g                               {
* N: N# l, o3 B9 H                                     write_date(table[num]);4 I. l7 b* ^  Z4 K# O
                                    //delay(10);
! Y' f7 s) l: K' g! F                               }
* H( \% W6 j* r* w: U/ Y                               dierhang(1);//换行显示! c' J+ Y0 \6 D5 k$ p: ~( P
                              for(num=0;num<10;num++)8 ]8 J% m9 d! ?, B9 _0 d
                              {+ B9 y% `: \" q8 k/ B7 N  O
                                    write_date(table1[num]);
# m' Y$ L3 @: b, a; f                                     //delay(10);
; f% Y: u# ^" e6 c( M. A' U                               }# o: R: A: c; C4 `1 D
                     }2 t4 l0 d8 [/ H5 x
                     display();
- s2 \0 j9 @( F1 _             }
& X" K& n4 n8 n3 n5 J             else       //校验失败6 d! i% t& r  p9 [; I2 Z
            {2 M" Z9 X7 [: k0 S$ D
                     write_com(0x01);//清屏
# G) z  _0 E& y7 q                      diyihang(1);//显示位置
. f5 f2 c. e' F; P3 I; y                      for(num=0;num<11;num++)! w% h! s6 A/ F2 p
                     {
7 @& Z- U$ V0 L4 V8 M                               write_date(table4[num]);
  C# i* U- n% H8 O                               //delay(10);8 `+ a9 I5 {4 F
                     }' p! U$ h. \6 O; t2 L! ?, a9 P& l
                     flag=1;9 O6 t* y3 C! |0 B
            }1 u2 h! _' h, d3 J9 X
      }
/ d% P. L. Q9 F* r          else //没有连接上% f/ S1 K) V* B% ?2 S: u( O
{
& Y5 L# c# S# j& _ key_set=0;/ f; N$ ^/ P: r% y* s
      write_com(0x01);//清屏# J" D  ~. ?  S/ U1 L
      diyihang(1);//显示位置
. J7 |2 l/ ^. L- B       for(num=0;num<10;num++)- W& M, I" U* ^+ Q# w
      {
. @. P& U2 v: R- R          write_date(table2[num]);" f, ]3 ?( f% f, v. e
         //delay(10);
- W- C) {( q7 w9 D2 v) s& N$ `       }- _" ^& l+ J$ U9 u" P* Q
      dierhang(1);//换行显示' l* v$ Q% B3 T8 [( i
      for(num=0;num<9;num++)1 v8 ^% m. z9 _
      {, v  K& S1 [+ \/ ^
         write_date(table3[num]);       : ?1 `5 ?2 `1 l; O9 \/ K
         //delay(10);0 [( ^4 S- h; B) @5 q/ \
      }" W* F! e$ Y6 n0 }7 j3 v4 I8 E
      flag=1;
3 q. x1 {) x) ?7 \- U/ l+ U } * k: W# X+ b8 c) S0 b; _1 x+ _
}, k$ w9 R$ M  H7 O/ z0 G

1 ?5 A( d9 M# ~- Z: j4 C/*void init_t0()9 D* }4 G3 k1 J' B  V2 M2 W) Z
{
8 p4 s( g$ d1 {# b8 k' \ TMOD=0x01;
/ q7 y( m2 v9 C9 D TH0=(65536-50000)/256;$ _  d! ]; r9 Y1 ~9 p* L
TL0=(65536-50000)%256;, e" r& i' W. S! G9 P
EA=1;
: {: c3 O; E: L+ z; w7 ^( n3 t ET0=1;
2 R2 |7 y1 h& \0 ] TR0=1;
9 S0 X* I  M# B}*/! W! L1 K  u. d

2 o4 d2 @/ _1 s8 G: w% B- V% U% mvoid main()
! B& c0 c) o+ Y' z/ G{5 L7 X! p. {5 N7 @( }& g4 U8 e! k7 a
init_1602();
, g- f8 N' ], S3 ^: N while(1)
- A3 D/ C( H& {. d, p {9 t$ ], {* ^/ R% l, f$ \) A/ h
      Delay_N1ms(2000);    // 延时 2S(两次读取间隔至少2S); w8 Q) F# [/ q
      Clear_Data();       // 清除收到数据: ?0 [( L. r- H$ ?, B7 V4 {
      Read_Sensor();       // 读取传感器数据
. }7 u* U; N! R; b       check_and_display();  // 检测并显示数据
' |9 Y8 W& i3 c! ]0 V  I0 } }- D! f! |8 K8 G" h
}
9 ^. j4 G! Y8 M1 f…………3 U& j3 G" U; A! U( M
…………限于本文篇幅余下代码请从eda365.com下载附件…………
/ O% U8 E# Y. R" F: U" w1 T

游客，如果您要查看本帖隐藏内容请回复

sunygd · 发表于 2019-1-10 17:06

看看楼主的代码

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

AM2302湿度测量单片机源程序

EDA365欢迎您登录！

浏览过的版块

推荐内容 /1