|
|
這是我做的甲醛檢測的源碼
單片機源程序如下:
- #ifndef _GLOBAL_H
- #define _GLOBAL_H
- #include <reg52.h>
- #include <intrins.h>
- #define uchar unsigned char
- #define uint unsigned int
- #endif
- #include <stdio.h>
- #include <math.h>
- #include <d:\\danpianji\\include\\lcd1602.h>
- sbit add_a=P3^4;
- sbit add_b=P3^5;
- sbit add_c=P3^6;
- sbit ST=P3^0; //A/D啟動轉(zhuǎn)換信號
- sbit EOC=P3^1; //A/D轉(zhuǎn)換結(jié)束信號
- sbit OE=P3^2; //數(shù)據(jù)輸出允許信號
- sbit CLK=P3^3; //時鐘脈沖
- uchar fvalue[8],tvalue[8];//保存數(shù)值
- uint temp,ieoc;
- float lg,volt,ppm,mass;
- /******************************************************************
- 延時函數(shù)
- ******************************************************************/
- void delay(uchar t)
- {
- uchar i,j;
- for(i=0;i<t;i++)
- for(j=t;j>0;j--);
- }
- /******************************************************************
- 初始化甲醛傳感器函數(shù)
- ******************************************************************/
- void inithcho(){
- add_a=0;
- add_b=0;
- add_c=0;
- P1=0xff;
- EOC=1;
- }
- /******************************************************************
- 獲取甲醛傳感器數(shù)據(jù)函數(shù)
- 功能：獲取甲醛、甲苯數(shù)據(jù)并使用lcd函數(shù)輸出
- ******************************************************************/
- void gethcho(){
- ST=0;
- ST=1;
- ST=0;
- while(1){
- CLK=!CLK;
- if(EOC==1)
- {
- break;
- }
- }
- OE=1;
- temp=P1;
- delay(100);
- if(temp==P1){
- OE=0;
- delay(100);
- //write_command(0x01);
- volt=temp*0.0196;
- //Formaldehyde 甲醛 HCHO
- lg=(-2.631)+1.528*volt+(-0.125)*volt*volt; //以10為低的對數(shù)
- ppm=pow(10,lg); //PPM值 體積濃度表示
- mass=ppm*(30.03/22.4); //轉(zhuǎn)換成氣體質(zhì)量深度表示(mass=分子量*ppm/22.4)
- sprintf(fvalue,"HCHO %.2fmg/m3 ",ppm,mass);
- string(0x80,fvalue);
-
- //toluene 甲苯 C7H8
- lg=(-7.071)+2.852*volt+(-0.210)*volt*volt; //以10為低的對數(shù)
- ppm=pow(10,lg); //PPM值 體積濃度表示
- mass=(92.14*ppm)/22.4; //轉(zhuǎn)換成氣體質(zhì)量深度表示(mass=分子量*ppm/22.4)
- sprintf(tvalue,"C7H8 %.2fmg/m3 ",mass);
- string(0xC0,tvalue);
-
- }
- }
- void main(){
- initlcd();
- inithcho();
- while(1){
- gethcho();
- }
- }
所有資料51hei提供下載:
CH2O.rar
(1018 Bytes, 下載次數(shù): 71)
2018-7-15 06:39 上傳
點擊文件名下載附件
源碼 下載積分: 黑幣 -5
|
|
[復(fù)制鏈接]
QQ好友和群
QQ空間
騰訊微博
騰訊朋友
收藏
淘帖
頂
踩
