51单片机半导体甲醛传感器模块显示程序

wu68aq

51单片机半导体甲醛传感器模块显示程序

( o' O3 F- p. Y
无意中某宝发现一款甲醛传感器，资料显示为每秒发送一组串口数据，其中包含甲醛值，使用的stc89c52rc,分享一下
' f: M$ I* E) _' R4 g

6 m9 G6 Z2 L" A9 V. W半导体甲醛模块单片机源程序：
4 J  r5 x+ r% o, @


3 k) {, D7 z- \7 L- M) ]" K' x/ T
; |9 c: m) k! s$ G; `& Z#include<reg52.h>
#include "lcd.h"
#define uchar unsigned char
#define uint unsigned int
                                                       //可一次接收数据量
void rs232_init();
0 U( X. L4 R  K0 O5 ~! f7 K) n uchar flag,i,k,l;
uint num;                                                       //删除无用变量                           


uchar table1[9];
uchar table2[6]={0x20,0x20,0x39,0x2e,0x39,0x39};                                             //接收缓存数组
uchar j=0;                                                             //接收计数器
$ d( c/ X3 Q0 v/ S8 e/ I& c' q

void shujuchuli ()
! {! A5 N! R# R+ N( } {
  if(flag==1)
3 Z( M* K$ \* j9 a                 {
                         ES=0;
                     
" ~0 M* \9 ], T                        for(j=0;j<9;j++)                        
; Q6 k4 _; J" u6 A                           {
                                SBUF=table1[j];
                                 while(!TI);
                                 TI=0;
; B1 a) O: ~7 t8 n9 A% W& ]                                                }
                                                            num=table1[4]*256+table1[5];


+ ]) \/ a" s0 a  }2 v# V% \                                                                table2[0]=num/10000;
" l! Q2 V9 E) g$ @2 j; H: A                                                                table2[1]=num%10000/1000;
                                                        
6 s; M9 z+ q% _( Y8 ]2 g                                                                 
9 J: G/ G/ t& i; G1 N9 Q& ~                                                                table2[2]=num%10000%1000/100+0x30;
                                                                table2[3]=0x2e;
  h$ ?7 @8 ?  S3 t                                                                table2[4]=num%10000%1000%100/10+0x30;
                                                                table2[5]=num%10000%1000%100%10+0x30;
" H# z8 H9 Z: @0 ~. S) m) f0 t                                                               
+ @: H0 N. G2 r/ G: ?% \6 B                                
  n1 G3 C; T5 {. `. U9 s5 A% T$ H& Y                         j=0;                                           //清零接收计数器
                         ES=1;
7 _3 M9 Q) l% b# Y# b4 T' B                         flag=0;
+ V) B9 F' D6 q' d: S! E; V) a1 j' D                 }

2 I1 K6 O6 W5 K# l4 W; h. e& Y+ O
, h1 H8 W! X- L/ P7 M; G }

6 E+ |  w! g5 R. X% j6 y" z




- N. e* s, S3 r( V, F! v$ H# {
5 R6 d) a0 N$ U) ]
$ a4 _2 r( G9 d/ x, s5 p  ?6 F: v main()
6 z* Y" G' P6 j" x8 ^5 D {
         rs232_init();
               
                  
         while(1)
         {
- ^; `; {7 f  i4 D; F! J        
                 LcdInit();

+ d1 ~- g( y$ b1 v7 j
9 \3 |5 ]5 Z/ p- n  t/ {; i0 W, k                 shujuchuli ();
                 
4 X* q' d% @7 O2 O5 o, |; E8 g        

1 z, a* l9 M/ K; L) C4 S
* k) B( [2 B- |' z& @8 \7 F+ w            LcdWriteData(0x43);
6 |0 P$ `( I7 G# @$ H& u: V                LcdWriteData(0x48);
                LcdWriteData(0x32);
                LcdWriteData(0x4f);
  g& ]! p2 v9 a" I3 b3 ^                LcdWriteData(0x3a);
        for(l=0;l<6;l++)
$ I* a) Y/ j. C        {
                LcdWriteData(table2[l]);        
        }
                LcdWriteData(0x6d);
0 P2 c5 R8 B4 \                LcdWriteData(0x67);
- w- U3 g: ]5 f& t0 u                LcdWriteData(0x2f);
                LcdWriteData(0x6d);
2 Y3 j* i- V4 t5 e- u                LcdWriteData(0x33);
        
           Lcd1602_Delay1ms(300);
- L. s& y$ v  @9 y        }
}
( \! x* y. Q- _' T3 h void rs232_init()
( Y8 Q1 N, w/ X/ ? {
9 ~1 O  P% l; p+ i9 P2 W. Z& K3 g         TMOD=0x20;
         TH1=0xfa;
7 U/ Y! q6 G: g6 U$ ]! b         TL1=0xfa;
                 PCON=0x80;
9 Z6 U4 C. X" `9 s         TR1=1;
' U# d4 e. f* |  I4 Q- m                 SCON=0x50;
                                                               //先设定号工作方式，在打开允许接收
         EA=1;
         ES=1;        
}
void ser()interrupt 4
{                 
     RI=0;  
         table1[j] = SBUF;
    if(table1[j]==0xff&&j==0)
. f. ~4 I" {2 h; g$ g! P5 j {
7 o9 x& O, }6 l2 A j=1;
, i& A: l' |' B/ ]: U% N- { }
% E  o9 J) L* w7 @else if(j==1&&table1[j]==0xff)
{
6 {  W7 B( @- Y# | j=2;
5 Q$ a( }( ^) D0 w) U}

" G7 p1 Y  z  V9 v7 A; }5 O
2 i  G, I) k. p else if (j==2&&table1[j] == 0x01)
$ W" q) C8 L4 k, p{

+ C. e0 {  W8 M6 C
) Y  H0 @2 I- D! ?3 k/ l2 P j=3;
& Y3 I8 q+ M! y1 V! H6 {* O
. X1 T* ~1 l# Q# y3 M4 ^. s  n2 X( {
4 J. p2 f! F1 O}
  [) \1 |- i/ X/ Y9 @& s* L% v2 ]else if (j==3&&table1[j] == 0x27)
{

  C/ U: n# U: r& F% |
/ t8 [( q6 M0 i; k j=4;

4 y8 M7 ~  \7 ~  U8 V2 E
( G' z1 _% [3 I1 ]1 |# L5 F8 R6 \}

& ^2 y1 A" n, ?, S* y0 R5 T0 ]7 h
5 x( O# ^% g8 Q8 _else if(j>=4&&j<8)
{



' d1 x& o  g0 `j ++;
, b2 [# D" [  t' K3 |}
( w0 C6 p  D: U' c
# C0 _6 S7 c. }
! G! z3 O& ^' [2 y1 C3 Q# k1 e9 celse if(j == 8)
{

flag=1;
+ c5 T! M" _2 V5 T6 \5 Ej=0;
}
  q+ {# _# ?: |2 y4 P% y5 C# o. @6 I else
: f8 C% X( G/ b6 ]1 o# @7 _$ J{
j=0;
}         
+ f1 Y! ?! w' [; N9 \9 D
/ R  b3 i9 u7 \; W
# K9 O" A- q! m

}         

' T, o; N( A! ?6 x
下载：

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

sunygd

全很，学习，谢谢