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;$ {9 @! B2 z1 v3 |5 m" m
      }//接收数据清零# p. T$ d2 r; N+ L6 O; Z" S
}  b8 k) G) j; H) W( a  t5 X

3 K  N5 q9 V" j; z6 a9 r+ w' k: m0 z0 V+ D4 V2 X- k( A
/********************************************\
! O# y, }9 c' E5 N|* 功能：读传感器发送的单个字节             *|3 D; p% @. [6 I/ G" p4 f* |
\********************************************/
* ~8 K" ^: _6 i5 Q' iunsigned char Read_SensorData(void)
8 \" t+ |( a" z+ r1 ?" \" M{
3 J& l7 i  g/ @; O9 j$ Y       unsigned char i,cnt;" s5 C" j2 E+ O, w- ?; x, P
      unsigned char buffer,tmp;" P0 g- z+ j2 a* N) }6 N
      buffer = 0;% N1 M' X) ?! v7 s& q3 b/ d- T
      for(i=0;i<8;i++)" ^- O4 S$ Z- ~  o6 N" l; x
      {
' u! c( ^: q0 e# b; O             cnt=0;$ N! [+ ]4 @* X: j# p* I: ]) C
            while(!Sensor_SDA)       //检测上次低电平是否结束: B: o/ u: X3 A
            {* t6 d+ u) l8 D5 C3 F2 Z
               if(++cnt >= 300)$ @$ |' a- w( P
               {! W8 z/ T0 y2 w
                        break;, I7 j& O5 }5 q* n" T' t  {# X
               }0 A) G8 Z+ I4 i9 F" p6 ^- M- ?
            }
) J) Z  O( F; v- A/ Q2 w2 @& y             //延时Min=26us Max50us 跳过数据"0" 的高电平# w  K/ d# a* g+ z" a
            Delay_N10us(2);       //延时30us
- W& M1 B- j& t" B# b- c; _3 z
# ~& {& J6 H- f' N" W             //判断传感器发送数据位1 \% Z2 Y2 R( B8 u3 t
            tmp =0;; ]% j( D- [% v* z( O- q. o) E
            if(Sensor_SDA)
2 B9 L+ a* k; H3 f5 _5 x& {1 o5 ?             {
) [& C0 I- p/ m; K2 }8 o                tmp = 1;) M" r6 F' x; U1 T; H; ~7 w
            }
& d! |; T$ Z' M: x; t( L             cnt =0;
1 f3 f$ P2 c, b. O4 u, i+ H$ {             while(Sensor_SDA)             //等待高电平结束( K8 T0 f6 Y* t! H6 ~! a; D# i; ~; g
            {/ w) m. o( M% g1 X, d: v
                        if(++cnt >= 200)
5 ]1 u( h0 B/ q/ h, `                      {
0 j8 |7 L. F. B$ p1 U, @% M6 c                         break;
7 S( k) o( ?7 ^- u                      }
. ^3 C0 w5 {* m. z             }% }4 b* e& l4 R, E3 ]
            buffer <<=1;
; k7 V+ V/ F& d$ r& t/ b6 |8 u             buffer |= tmp;
) Z* H3 N" H9 s" J" i- n       }* p$ [2 _+ M+ \% }
      return buffer;: W  [7 Q" g- {' F7 ^9 ]
  }
  G" }( f  _/ `) Z7 R5 c' M: d% q, C/ i1 e
/********************************************\
9 M2 }( g7 q; y. N" l5 ]|* 功能：读传感器                            *|
; n7 \0 o. O7 Q; B5 m\********************************************/
$ i3 ]4 Y! j7 r6 u/ p( W- ounsigned char Read_Sensor(void)9 z" B3 w6 r' [0 h5 Y5 z' A/ W
{       + D1 s6 w& V% p; a9 }2 V
      unsigned char i;- O' c% D' R, s
      //主机拉低(Min=800US Max=20Ms)
6 ~( l3 P( G& a9 w& c- V7 c- ? Sensor_SDA = 0;
, {4 |' |) v: Z9 x! Y0 P4 F       Delay_N1ms(2);  //延时2Ms+ T1 D. i! H( t+ s2 Z  }9 }
8 p  J% w9 R* }; G+ Q9 `
      //释放总线延时(Min=30us Max=50us)
: D! ~$ V$ u; b- X4 W       Sensor_SDA = 1;
4 h, i: Q) @# M" G4 l       Delay_N10us(1);//延时30us8 K, D6 K" @% E8 b! Y
      //主机设为输入判断传感器响应信号 9 X% j% T0 ~$ C8 X7 h; b0 ]
      Sensor_SDA = 1;
/ G6 K6 S! @( {6 D0 y1 V: Y
. i, s, C; h; ^* x! [+ e, B8 H3 ]" i       Sensor_AnswerFlag = 0;  // 传感器响应标志          d9 G, S" U8 L3 K1 Y; Y

+ t0 t7 s1 {% e9 a  P       //判断从机是否有低电平响应信号如不响应则跳出，响应则向下运行       7 ?& S4 q% E& l! H# z- B- x
      if(Sensor_SDA == 0)
, R# L% Y  U( Y) r) k+ B       {
; V. d# K+ c4 {. W% ^          Sensor_AnswerFlag = 1;//收到起始信号: a% i0 C, K, J. J" H7 J
* p, d4 `6 [2 X4 v6 @
         Sys_CNT = 0;! g. `' n  h; q  g4 B
         //判断从机是否发出 80us 的低电平响应信号是否结束
+ y! M  h( t$ k9 ?# {' w5 W          while((!Sensor_SDA))  f/ r' S6 K4 `1 c; u
         {( v2 R/ G2 D5 _4 @5 Z
         if(++Sys_CNT>300) //防止进入死循环+ T$ p0 z" ^; s! K3 s" o
               {" T0 a* ~* W5 Z0 q- `" o/ `' u2 J
               Sensor_ErrorFlag = 1;, x/ ^, U, D4 p- x! J; n- v+ |
               return 0;
! w( a# f6 j& H4 m6 x/ ~+ p                } ' m# Y; n9 H$ T0 U5 T5 }3 ^9 _4 o
         }: f* d9 o! Q+ E

! z* I9 A; V$ W2 F          Sys_CNT = 0;
( A) {' x5 z: d4 B$ c          //判断从机是否发出 80us 的高电平，如发出则进入数据接收状态
( I) c; z* U5 P  A7 M          while((Sensor_SDA))
' X: Y! N# C% B) I+ a$ L          {
/ G- z' W9 X9 ^( e6 i. {             if(++Sys_CNT>300) //防止进入死循环7 d8 ^" H" Z- H+ J- F
               {$ J% z' V' E6 R" l/ t
                  Sensor_ErrorFlag = 1;
( j4 L5 H; g. `8 L9 \0 U' R                   return 0;0 X7 ]5 J6 m2 N) J. Z" Q, f
               } 9 J* i/ m/ l' b0 S
         }
5 K+ R1 A0 g0 v4 S! N+ Z          // 数据接收       传感器共发送40位数据
% D- s2 ~7 t. Y$ U$ E          // 即5个字节高位先送  5个字节分别为湿度高位湿度低位温度高位温度低位校验和
. g/ h+ K" s  v% f2 Q) Q9 m          // 校验和为：湿度高位+湿度低位+温度高位+温度低位
9 |5 |  Q: ?0 j, W; p/ S; p; |$ u          for(i=0;i<5;i++)3 A0 m7 r; x2 [' h) x% k; n( l
         {2 `& z2 H. z# D
            Sensor_Data = Read_SensorData();
; |+ d9 u  Z- |( g  s  s4 ~          }
/ j& {+ s* Y3 v" j& ]5 h+ C" r7 `       }, ^3 z+ j& b" s" L( R7 Y2 N4 z
      else) }" n3 L" Y, a6 O) u$ x
      {- A% m8 s8 w) T& @8 E
      Sensor_AnswerFlag = 0;       // 未收到传感器响应       - r, C& ~- u8 r- G% K4 B& y
      }
/ b) u$ u6 P- d* h6 d5 X1 v/ }0 K       return 1;2 z$ D3 ~0 b+ ?& b$ u
}$ L7 h/ n  j. s7 _3 y6 ?! o6 z) _
void display()" G2 V# i$ {2 E& M
{0 |- m4 I% c' V* x% J/ ~# K# x
      Tmp = Sensor_Data[2]*256+Sensor_Data[3];
8 K1 w5 v3 N, n: E0 M       diyihang(6);
& w$ o" i) y6 a6 N2 J: H3 z  j       /*write_date(Tmp/100%10 + '0');  A5 z" C' V' V1 w! X. L! k
      write_date(Tmp/10%10 + '0');
, U6 }; A7 F" V7 F" c: l1 x       write_date('.');
, y' i* l1 u" O. [8 j       write_date(Tmp%10 + '0'); */$ A# h6 d, a; z9 f6 R
. J% G/ j5 |  @2 S' A. X
      Tmp = Sensor_Data[0]*256+Sensor_Data[1];( b& Q8 T. v6 t" R* [; ?& c
      dierhang(6);3 u; N6 f# |4 v5 F. K3 k
      write_date(Tmp/100%10 + '0');
# ^% e* g( \0 l) C6 A       write_date(Tmp/10%10 + '0');
% B9 m/ Y( s& \+ ]       write_date('.');
1 _  Y' o: q9 R) s7 c$ D- x       write_date(Tmp%10 + '0');
' u5 ?3 Y* g# L}8 Z0 h1 p8 |; f& R: |# B
void check_and_display()
6 p1 @# n0 i7 `* v" F{
2 _) h8 [0 a5 ?! G1 K       if(Sensor_AnswerFlag == 1)
4 s$ n; h3 o5 U       {
6 T3 d+ q  _6 @% I4 v( y             Sensor_Check = Sensor_Data[0]+Sensor_Data[1]+Sensor_Data[2]+Sensor_Data[3];7 ^& m0 N1 b4 z0 V. P1 ~$ z/ q2 e
            //校验成功! f# Z+ p9 a% r) o
            if(Sensor_Check ==Sensor_Data[4])
  F0 S+ j* y0 d: E4 p" x             {
7 K3 E- i0 T/ x/ I                      if(flag == 1)
# Z- b8 ]& I1 u, A1 V* J1 Q2 z                      {* {7 V! ?5 u) t  U3 f; ~. k
                              flag = 0;
) P% e! d1 f5 J( ~, g  q4 e2 z                               write_com(0x01);//清屏
5 @: k. n- `& \" |/ h6 c                               diyihang(1);//显示位置. q3 Z/ M, z* O* Q
                              for(num=0;num<11;num++)* P+ j. W6 X7 M3 C" ]
                              {
$ S0 q7 B$ @; x2 x3 v( ]) u                                     write_date(table[num]);, F! u- k8 U; P- p: Z
                                    //delay(10);  t; q! i4 ~, U) |- ]# l% D
                              }- f+ K8 c1 S. a/ i. v1 a
                              dierhang(1);//换行显示7 X( ~7 _% V8 ^5 Q+ L8 ?& A7 f
                              for(num=0;num<10;num++)% c1 W6 Q2 [% N) I1 p- w
                              {4 M# v* {/ t$ h! W4 f& v& k+ k1 V2 ]
                                    write_date(table1[num]);             $ [5 t9 A" |. i/ M# k2 y% b' @
                                    //delay(10);
% [( D& u5 S1 I/ O: Y3 E                               }
% N8 R' Q0 L3 h) N& w: z: @0 `                      }1 a( w! G5 N9 z
                     display();
& p' f5 c( \9 X2 d             }$ {8 h1 y5 m8 a
            else       //校验失败
' _; {7 d( g+ X2 N! k             {
* R+ _) v7 I7 x/ l$ M0 a) D                      write_com(0x01);//清屏
: W# o8 x# Z* \  d  A# s/ T                      diyihang(1);//显示位置' L( r% j! X: V! U$ T! Z3 q
                     for(num=0;num<11;num++)$ x" s+ S( G3 L) V" B
                     {+ |( g3 g: ^0 M; O
                              write_date(table4[num]);* s( O0 w3 R: C
                              //delay(10);
9 L6 $ n. P8 @4 F2 W                      }
* [- K4 f. r& A3 t                      flag=1;
# @1 k; i7 \( {. ^3 i             }. j3 ]/ A( b; s+ q3 k& @  }
      }: k4 u2 M0 S. ~$ @+ q$ U
         else //没有连接上
* s9 H6 Q2 a$ \; }% O0 I! o4 E {
' g. y  L4 M8 m5 O key_set=0;3 f& b  E3 A. T
      write_com(0x01);//清屏
6 ~; a$ A, M6 ]) Y9 S       diyihang(1);//显示位置' $ f$ P( K. z+ d4 M# U' l
      for(num=0;num<10;num++). S* Y+ J3 W1 E) D1 n1 m# j  q+ ?
      {; V1 p, Z; {2 N+ I. \" e
         write_date(table2[num]);) Z7 K& o7 C5 O
         //delay(10);- x! d0 K) |0 d- l! `, _% O+ B8 m
      }
& T) d* v9 G. r6 C       dierhang(1);//换行显示5 R" l* ^) p: l( P5 w9 R
      for(num=0;num<9;num++)  |# O5 ^% s2 \& B% }0 {
      {
8 [# v: T# \- Z2 h: M7 `. l4 F          write_date(table3[num]);       8 M5 S/ @+ N. O8 ?* h0 }
         //delay(10);* u* t8 g. Q6 u8 x+ ~- z
      }- \/ S3 o4 y0 w" d& j$ m
      flag=1;
1 z* i  m$ F' r- z. q8 w2 y }
+ D# X0 y. `) I1 G- S}/ y, @5 `: b$ [2 j- O+ \
( {8 Y+ R$ Y0 f+ x/ ]  _
/*void init_t0()* \5 z$ S1 C# D
{6 U4 \3 ?8 l& \7 K6 Z) {
TMOD=0x01;
8 G, \) x5 K  x; P& f TH0=(65536-50000)/256;9 `. l/ J) R- @% p1 Z/ B* U+ \# k
TL0=(65536-50000)%256;$ u' {" k1 z& t$ E* y) z8 A3 t* T
EA=1;
  x8 v6 q2 E, }& Y. X ET0=1;
. J0 o3 i' l, p3 p( `4 l TR0=1;
# w3 e3 j! M6 A1 B}*/) a" W) M" w; b; y  B8 s$ m6 B# w

7 g  E0 Q) p. Lvoid main()5 L, _; I  ]  d0 v& n2 }2 z
{
2 N. V7 c1 b2 P; D" J init_1602();
6 T# X# U4 x3 |( j/ A( T  ~ while(1)
3 F" J- ~* M) m {
( r" X$ j+ ?6 s' E: z. S" J7 c       Delay_N1ms(2000);    // 延时 2S(两次读取间隔至少2S)
0 t8 ~" h  s3 F" f7 c$ \3 R( w       Clear_Data();       // 清除收到数据# c# s$ ]  z/ I1 j6 E
      Read_Sensor();       // 读取传感器数据9 N& ^5 `$ l. O
      check_and_display();  // 检测并显示数据
4 T1 m  ~0 S$ x; Q9 ?7 H) [ }; R. L7 {# _1 A( }& O6 N
}( B+ ^, e! ~! S1 w% ?; g
…………
: a/ k; V- Q6 c1 b8 s…………限于本文篇幅余下代码请从eda365.com下载附件…………4 j# v4 I/ V6 z" Y3 g2 m; g

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

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

看看楼主的代码

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

AM2302湿度测量单片机源程序

EDA365欢迎您登录！

推荐内容 /1