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

wu68aq · 发表于 2019-1-16 10:49

EDA365欢迎您登录！

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

x

51单片机半导体甲醛传感器模块显示程序
3 ?1 L% ?; z" o4 g

无意中某宝发现一款甲醛传感器，资料显示为每秒发送一组串口数据，其中包含甲醛值，使用的stc89c52rc,分享一下
- y( \7 ~& n4 w  m: F0 g
) i9 J3 W4 ~6 V. U0 u9 [2 x
半导体甲醛模块单片机源程序：

#include<reg52.h>
#include "lcd.h"
#define uchar unsigned char
#define uint unsigned int
                                                   //可一次接收数据量
void rs232_init();
uchar flag,i,k,l;
uint num;                                                    //删除无用变量

uchar table1[9];
uchar table2[6]={0x20,0x20,0x39,0x2e,0x39,0x39};                                           //接收缓存数组
uchar j=0;                                                          //接收计数器

void shujuchuli ()
{
  if(flag==1)
               {
                     ES=0;

                     for(j=0;j<9;j++)
                        {
                              SBUF=table1[j];
                              while(!TI);
                              TI=0;
                                             }
                                                         num=table1[4]*256+table1[5];

                                                            table2[0]=num/10000;
                                                            table2[1]=num%10000/1000;


                                                            table2[2]=num%10000%1000/100+0x30;
                                                            table2[3]=0x2e;
                                                            table2[4]=num%10000%1000%100/10+0x30;
                                                            table2[5]=num%10000%1000%100%10+0x30;


                     j=0;                                        //清零接收计数器
                     ES=1;
                     flag=0;
               }

}

main()
{
      rs232_init();


      while(1)
      {

               LcdInit();

               shujuchuli ();



         LcdWriteData(0x43);
            LcdWriteData(0x48);
            LcdWriteData(0x32);
            LcdWriteData(0x4f);
            LcdWriteData(0x3a);
      for(l=0;l<6;l++)
      {
            LcdWriteData(table2[l]);
      }
            LcdWriteData(0x6d);
            LcdWriteData(0x67);
            LcdWriteData(0x2f);
            LcdWriteData(0x6d);
            LcdWriteData(0x33);

         Lcd1602_Delay1ms(300);
      }
}
void rs232_init()
{
      TMOD=0x20;
      TH1=0xfa;
      TL1=0xfa;
               PCON=0x80;
      TR1=1;
               SCON=0x50;
                                                            //先设定号工作方式，在打开允许接收
      EA=1;
      ES=1;
}
void ser()interrupt 4
{
   RI=0;
      table1[j] = SBUF;
if(table1[j]==0xff&&j==0)
{
j=1;
}
else if(j==1&&table1[j]==0xff)
{
j=2;
}

else if (j==2&&table1[j] == 0x01)
{

j=3;

}
else if (j==3&&table1[j] == 0x27)
{

j=4;

}

else if(j>=4&&j<8)
{

j ++;
}

else if(j == 8)
{

flag=1;
j=0;
}
else
{
j=0;
}

}

下载：

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

sunygd · 发表于 2019-1-16 21:53

全很，学习，谢谢

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

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

EDA365欢迎您登录！

浏览过的版块

推荐内容 /1