單片機+BMP180+LCD1602溫度氣壓高度計源程序

ID:33449 · 發(fā)表于 2018-11-3 10:36

89c90單片機做的1602液晶顯示BMP180氣壓

單片機源程序如下:

#include <REG52.H>
#include <math.h> //Keil library
#include <stdlib.h> //Keil library
#include <stdio.h> //Keil library
#include <INTRINS.H> //Keil library
#define uchar unsigned char
#define uint unsigned int
#define BMP085_SlaveAddress 0xee //定義器件在IIC總線中的從地址
#define OSS 0// Oversampling Setting (note: code is not set up to use other OSS values)
#define DataPort P0 //LCD1602數(shù)據(jù)端口
sbit LCM_RS=P2^4; //LCD1602命令端口
sbit LCM_RW=P2^5; //LCD1602命令端口
sbit LCM_EN=P2^6; //LCD1602命令端口
sbit SCL=P1^0; //IIC時鐘引腳定義
sbit SDA=P1^1; //IIC數(shù)據(jù)引腳定義
int dis_data; //變量
typedef unsigned char BYTE;
typedef unsigned short WORD;
long temperature;//溫度值
long pressure;//壓力值
long height;//相對海拔高度值
short ac1;
short ac2;
short ac3;
unsigned short ac4;
unsigned short ac5;
unsigned short ac6;
short b1;
short b2;
short mb;
short mc;
short md;
void delay(unsigned int k)
{
unsigned int i,j;
for(i=0;i<k;i++)
{
for(j=0;j<121;j++)
{;}}
}
/*******************************/
void WaitForEnable(void)
{
DataPort=0xff;
LCM_RS=0;LCM_RW=1;_nop_();
LCM_EN=1;_nop_();_nop_();
while(DataPort&0x80);
LCM_EN=0;
}
/*******************************/
void WriteCommandLCM(uchar CMD,uchar Attribc)
{
if(Attribc)WaitForEnable();
LCM_RS=0;LCM_RW=0;_nop_();
DataPort=CMD;_nop_();
LCM_EN=1;_nop_();_nop_();LCM_EN=0;
}
/*******************************/
void WriteDataLCM(uchar dataW)
{
WaitForEnable();
LCM_RS=1;LCM_RW=0;_nop_();
DataPort=dataW;_nop_();
LCM_EN=1;_nop_();_nop_();LCM_EN=0;
}
/***********************************/
void InitLcd()
{
WriteCommandLCM(0x38,1);
WriteCommandLCM(0x08,1);
WriteCommandLCM(0x01,1);
WriteCommandLCM(0x06,1);
WriteCommandLCM(0x0c,1);
}
/***********************************/
void DisplayOneChar(uchar X,uchar Y,uchar DData)
{
Y&=1;
X&=15;
if(Y)X|=0x40;
X|=0x80;
WriteCommandLCM(X,0);
WriteDataLCM(DData);
}
///**************************************
//延時5微秒(STC90C52RC@12M)
//不同的工作環(huán)境,需要調整此函數(shù)，注意時鐘過快時需要修改
//當改用1T的MCU時,請調整此延時函數(shù)
//**************************************/
//void Delay5us();
void Delay5us()
{
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
}
/**************************************
延時5毫秒(STC90C52RC@12M)
不同的工作環(huán)境,需要調整此函數(shù)
當改用1T的MCU時,請調整此延時函數(shù)
**************************************/
void Delay5ms()
{
WORD n = 560;
while (n--);
}
/**************************************
起始信號
**************************************/
void BMP085_Start()
{
SDA = 1; //拉高數(shù)據(jù)線
SCL = 1; //拉高時鐘線
Delay5us(); //延時
SDA = 0; //產(chǎn)生下降沿
Delay5us(); //延時
SCL = 0; //拉低時鐘線
}
/**************************************
停止信號
**************************************/
void BMP085_Stop()
{
SDA = 0; //拉低數(shù)據(jù)線
SCL = 1; //拉高時鐘線
Delay5us(); //延時
SDA = 1; //產(chǎn)生上升沿
Delay5us(); //延時
}
/**************************************
發(fā)送應答信號
入口參數(shù):ack (0:ACK 1:NAK)
**************************************/
void BMP085_SendACK(bit ack)
{
SDA = ack; //寫應答信號
SCL = 1; //拉高時鐘線
Delay5us(); //延時
SCL = 0; //拉低時鐘線
Delay5us(); //延時
}
/**************************************
接收應答信號
**************************************/
bit BMP085_RecvACK()
{
SCL = 1; //拉高時鐘線
Delay5us(); //延時
CY = SDA; //讀應答信號
SCL = 0; //拉低時鐘線
Delay5us(); //延時
return CY;
}
/**************************************
向IIC總線發(fā)送一個字節(jié)數(shù)據(jù)
**************************************/
void BMP085_SendByte(BYTE dat)
{
BYTE i;
for (i=0; i<8; i++) //8位計數(shù)器
{
dat <<= 1; //移出數(shù)據(jù)的最高位
SDA = CY; //送數(shù)據(jù)口
SCL = 1; //拉高時鐘線
Delay5us(); //延時
SCL = 0; //拉低時鐘線
Delay5us(); //延時
}
BMP085_RecvACK();
}
/**************************************
從IIC總線接收一個字節(jié)數(shù)據(jù)
**************************************/
BYTE BMP085_RecvByte()
{
BYTE i;
BYTE dat = 0;
SDA = 1; //使能內部上拉,準備讀取數(shù)據(jù),
for (i=0; i<8; i++) //8位計數(shù)器
{
dat <<= 1;
SCL = 1; //拉高時鐘線
Delay5us(); //延時
dat |= SDA; //讀數(shù)據(jù)
SCL = 0; //拉低時鐘線
Delay5us(); //延時
}
return dat;
}
//*********************************************************
//讀出BMP085內部數(shù)據(jù),連續(xù)兩個
//*********************************************************
short Multiple_read(uchar ST_Address)
{
uchar msb, lsb;
short _data;
BMP085_Start(); //起始信號
BMP085_SendByte(BMP085_SlaveAddress); //發(fā)送設備地址+寫信號
BMP085_SendByte(ST_Address); //發(fā)送存儲單元地址
BMP085_Start(); //起始信號
BMP085_SendByte(BMP085_SlaveAddress+1); //發(fā)送設備地址+讀信號
msb = BMP085_RecvByte(); //BUF[0]存儲
BMP085_SendACK(0); //回應ACK
lsb = BMP085_RecvByte();
BMP085_SendACK(1); //最后一個數(shù)據(jù)需要回NOACK
BMP085_Stop(); //停止信號
Delay5ms();
_data = msb << 8;
_data |= lsb;
return _data;
}
//********************************************************************
long bmp085ReadTemp(void)
{
BMP085_Start(); //起始信號
BMP085_SendByte(BMP085_SlaveAddress); //發(fā)送設備地址+寫信號
BMP085_SendByte(0xF4); // write register address
BMP085_SendByte(0x2E); // write register data for temp
BMP085_Stop(); //發(fā)送停止信號
delay(10);// max time is 4.5ms
return (long) Multiple_read(0xF6);
}
//*************************************************************
long bmp085ReadPressure(void)
{
long pressure = 0;
BMP085_Start(); //起始信號
BMP085_SendByte(BMP085_SlaveAddress); //發(fā)送設備地址+寫信號
BMP085_SendByte(0xF4); // write register address
BMP085_SendByte(0x34); // write register data for pressure
BMP085_Stop(); //發(fā)送停止信號
delay(10); // max time is 4.5ms
pressure = Multiple_read(0xF6);
pressure &= 0x0000FFFF;
return pressure;
}
//**************************************************************
//初始化BMP085，根據(jù)需要請參考pdf進行修改**************
void Init_BMP085()
{
ac1 = Multiple_read(0xAA);
ac2 = Multiple_read(0xAC);
ac3 = Multiple_read(0xAE);
ac4 = Multiple_read(0xB0);
ac5 = Multiple_read(0xB2);
ac6 = Multiple_read(0xB4);
b1 = Multiple_read(0xB6);
b2 = Multiple_read(0xB8);
mb = Multiple_read(0xBA);
mc = Multiple_read(0xBC);
md = Multiple_read(0xBE);
}
//***********************************************************************
void bmp085Convert()//換算
{
unsigned int ut;
unsigned long up;
long x1, x2, b5, b6, x3, b3, p;
unsigned long b4, b7;
ut = bmp085ReadTemp(); // 讀取溫度
up = bmp085ReadPressure(); // 讀取壓強
x1 = (((long)ut - (long)ac6)*(long)ac5) >> 15;
x2 = ((long) mc << 11) / (x1 + md);
b5 = x1 + x2;
temperature = ((b5 + 8) >> 4);
b6 = b5 - 4000;
// Calculate B3
x1 = (b2 * (b6 * b6)>>12)>>11;
x2 = (ac2 * b6)>>11;
x3 = x1 + x2;
b3 = (((((long)ac1)*4 + x3)<<OSS) + 2)>>2;
// Calculate B4
x1 = (ac3 * b6)>>13;
x2 = (b1 * ((b6 * b6)>>12))>>16;
x3 = ((x1 + x2) + 2)>>2;
b4 = (ac4 * (unsigned long)(x3 + 32768))>>15;
b7 = ((unsigned long)(up - b3) * (50000>>OSS));
if (b7 < 0x80000000)
p = (b7<<1)/b4;
else
p = (b7/b4)<<1;
x1 = (p>>8) * (p>>8);
x1 = (x1 * 3038)>>16;
x2 = (-7357 * p)>>16;
pressure = p+((x1 + x2 + 3791)>>4);
height=(101325-pressure)*843/100;
DisplayOneChar(0,0,'T');//溫度部分
DisplayOneChar(1,0,':');
DisplayOneChar(4,0,'.');
DisplayOneChar(6,0,0XDF);
DisplayOneChar(7,0,'C');
DisplayOneChar(9,0,'H');//海拔部分
DisplayOneChar(13,0,'.');
DisplayOneChar(15,0,'m');
DisplayOneChar(0,1,'P');//氣壓部分
DisplayOneChar(1,1,':');
DisplayOneChar(5,1,'.');
DisplayOneChar(7,1,'K');
DisplayOneChar(8,1,'p');
DisplayOneChar(2,0,temperature/100+48);
DisplayOneChar(3,0,temperature%100/10+48);
DisplayOneChar(5,0,temperature%10+48);
DisplayOneChar(10,0,height/10000+48);
DisplayOneChar(11,0,height%10000/1000+48);
DisplayOneChar(12,0,height%1000/100+48);
DisplayOneChar(14,0,height%100/10+48);
DisplayOneChar(2,1,pressure/100000+48);
DisplayOneChar(3,1,pressure%100000/10000+48);
DisplayOneChar(4,1,pressure%10000/1000+48);
DisplayOneChar(6,1,pressure%1000/100+48);
}
//*********************************************************
//******主程序********
//*********************************************************
void main()
{
delay(50); //上電延時
InitLcd(); //液晶初始化
Init_BMP085(); //初始化BMP085
while(1) //循環(huán)
{
bmp085Convert();
delay(100);
}
}

復制代碼

所有資料51hei提供下載:

LCD1602做的溫度氣壓高度計單片機程序.rar (42.17 KB, 下載次數(shù): 93)

ID:79544 · 發(fā)表于 2019-3-28 09:37

很詳細的注釋程序，感謝分享

ID:502076 · 發(fā)表于 2019-3-31 23:13

我也希望使用這個程序。

ID:507691 · 發(fā)表于 2019-4-26 16:19

騰飛的龍發(fā)表于 2019-3-28 09:37
很詳細的注釋程序，感謝分享

你的顯示是好的嘛
壓強有波動嗎
高度不會一直變化嗎

ID:507691 · 發(fā)表于 2019-4-26 16:22

我顯示出來壓強會有波動，高度差更多，有什么辦法解決嗎
有人知道卡爾曼濾波怎么用到這嗎

ID:645297 · 發(fā)表于 2019-11-28 19:48

里面有仿真嘛

ID:787757 · 發(fā)表于 2020-6-23 15:42

具體的連線怎么連？

帳號		自動登錄	找回密碼
密碼			立即注冊

久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

單片機+BMP180+LCD1602溫度氣壓高度計源程序

評分