利用STM32制作红外测温仪之软件设计(MLX90614)

目录

        • (一)工程目录如图:
        • (二)main函数实现:
        • (三)MLX90614测温代码实现

前面介绍了使用 STM32制作红外测温仪硬件设计,今天来说一下软件的实现,具体的程序,完整的keil代码我已经打包放在了这里 MLX90614红外测温仪软件设计.rar
由于程序流程比较清晰,这里我就不把程序流程图贴出来了,直接上代码。

(一)工程目录如图:

利用STM32制作红外测温仪之软件设计(MLX90614)_第1张图片

(二)main函数实现:

/*******************************************************
*文件名:    main.c
*作  者:    水枂:https://me.csdn.net/download/weixin_43839785
*生成日期:   2019/1/2
*最后修改:
*功能描述: 红外温度测量
********************************************************/
#include "varytypes.h"

extern unsigned char image[];
extern char envirTemp[][32];
extern char objectTemp[][32];
extern char historyTemp_max[][32];
extern char historyTemp_min[][32];
extern unsigned char flag;
u16  volatile  arr[2]={0,100};
int main(void)
{
		delay_init();//延时函数初始化
		NVIC_Configuration();//设置NVIC中断分组0~4共5组 :2位抢占优先级,2位响应优先级 		
    BlueTooth_Init();//蓝牙初始化
	  USART2_Init();//串口蓝牙初始化
		LED_Init();//初始化LED端口PC13
		KEY_Init();//初始化按键端口PA0
		OLED_Init();//初始化oled
		OLED_Clear();//清屏
	  RTCInit();//RTC时钟初始化
	  AT24CXX_Init();//AT24C04存储初始化
	  MLX_I2C_Init();//Mlx90614读取初始化
	
/****************************************
*温度记录值读取
******************************************/	
//	arr[0]=AT24CXX_ReadOneByte(0);//max
//	arr[1]=AT24CXX_ReadOneByte(1);//min
	
	
/****************************************
*开机界面显示
******************************************/
		OLED_ShowString(3,1,"welcome");
	  OLED_DrawBMP(77, 1,128, 6,image);
		OLED_ShowString(3,4,"waiting.");
		delay_s(1);
		OLED_ShowString(3,4,"waiting..");
		delay_s(1);
		OLED_ShowString(3,4,"waiting...");
		delay_s(1);
		OLED_Clear();

	while(1){
		
				KEY_Scan();
				if(flag==0)
				{
					 OLED_ShowCHinese_Mul(3,1,5,objectTemp);
					 display_temp(75,1,OBJ1TEMPADDR);
					 OLED_ShowCHinese_Mul(3,5,5,envirTemp);
					 display_temp(75,5,ENVITEMPADDR);
				 }
				else if(flag==1)
				{
					OLED_ShowCHinese_Mul(1,1,7,historyTemp_max);
					OLED_ShowNum(105,1,AT24CXX_ReadOneByte(0),3,16);
					
					OLED_ShowCHinese_Mul(1,5,7,historyTemp_min);
					OLED_ShowNum(105,5,AT24CXX_ReadOneByte(1),3,16);
				}
			}	
}


/****************************************************
*函数名   :display_temp
*功 能    :显示采集回来转换后的温度
*参 数    : @ x,y :起点坐标	 
         // @object: 是环境温度还是物体温度
             ENVITEMPADDR、OBJ1TEMPADDR、OBJ2TEMPADDR
*说 明    :Temperature data is T=(Data)*0.02-273.15运用了这个
           的转换公式计算温度
*****************************************************/
void display_temp(u8 x,u8 y,u8 object)
{
	 u16  temp,T;
   u8 point_before,point_after;
	 u8 point_after_one ,point_after_two;
	 temp=I2C_ReadRAM(0x00,object);//0x00是器件的地址,由于只有一个用了0x00
	 T=temp*2;
	 if(T>=27315) //温度:零上
   {
     T=T-27315;
     point_before=T/100;
     point_after=T-point_before*100;
		 point_after_one=point_after/10;//为了小数点后显示正常
		 point_after_two=point_after%10;
		 
		 OLED_ShowNum(x,y,point_before,3,16);
		 OLED_ShowString(x+24,y,".");
		 OLED_ShowNum(x+32,y,point_after_one,1,16);
		 OLED_ShowNum(x+40,y,point_after_two,1,16);
		 
		if(object==OBJ1TEMPADDR)
			{
			 if(point_before>arr[0]){arr[0]=point_before;}//arr[0]存放温度最高值
		   if(point_before

(三)MLX90614测温代码实现

关于MLX90614的文档,可以直接百度,或者去淘宝卖家那要一份,MLX90614测温代码实现:

/**
******************************************************************************
*
* 基于STM32F103的MLX90614红外温度传感器驱动程序
*
*******************************************************************************/
#include "mlx90614.h"

/**
* @功能 I2C通信状态改变后的延时
* @说明 无
* @参数 无
* @返回值 无
*/
void I2C_Delay(void)
{
delay_us(5);
}
/****************************************************************
*初始化MLX_IIC用的端口
****************************************************************/
void MLX_I2C_Init(void)
{
  GPIO_InitTypeDef  GPIO_InitStructure;
	RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOB, ENABLE);;//使能 GPIOB 时钟
	
	//GPIOB6,B7初始化设置
	GPIO_InitStructure.GPIO_Pin = GPIO_Pin_6 | GPIO_Pin_7;
	GPIO_InitStructure.GPIO_Mode =  GPIO_Mode_Out_PP;//推挽模式
	GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz;//50MHz
	GPIO_Init(GPIOB, &GPIO_InitStructure);//初始化
	MLX_IIC_SCL=1;
	MLX_IIC_SDA=1;	
	
}
/*******************************************************************************
* 函 数 名         : SDA_OUT
* 函数功能		   : SDA输出配置	   
* 输    入         : 无
* 输    出         : 无
*******************************************************************************/
void MLX_SDA_OUT(void)
{
	GPIO_InitTypeDef  GPIO_InitStructure;
	
	//GPIOB9初始化设置
	GPIO_InitStructure.GPIO_Pin =GPIO_Pin_7;
	GPIO_InitStructure.GPIO_Mode =  GPIO_Mode_Out_PP;//推挽模式
	GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz;//50MHz
	GPIO_SetBits(GPIOB,GPIO_Pin_7);	//上拉
	GPIO_Init(GPIOB, &GPIO_InitStructure);//初始化
}

/*******************************************************************************
* 函 数 名         : SDA_IN
* 函数功能		   : SDA输入配置	   
* 输    入         : 无
* 输    出         : 无
*******************************************************************************/
void MLX_SDA_IN(void)
{
	GPIO_InitTypeDef  GPIO_InitStructure;
	
	//GPIOB9初始化设置
	GPIO_InitStructure.GPIO_Pin =GPIO_Pin_7;
	GPIO_InitStructure.GPIO_Mode = GPIO_Mode_IPU;//输入模式
	GPIO_Init(GPIOB, &GPIO_InitStructure);//初始化
}


/**
* @功能 产生通讯开始信号
* @说明 MLX90614在SCK=1时,检测到SDA由1到0表示通信开始
* @参数 无
* @返回值 无
*/
void I2C_Start(void)
{
MLX_SDA_OUT();
MLX_IIC_SDA=1;
MLX_IIC_SCL=1;
I2C_Delay();
MLX_IIC_SDA=0;
I2C_Delay();
MLX_IIC_SCL=0;
I2C_Delay();
}
/**
* @功能 产生通讯停止信号
* @说明 MLX90614在SCK=1时,检测到SDA由0到1表示通信结束
* @参数 无
* @返回值 无
*/
void I2C_Stop(void)
{
MLX_SDA_OUT();
MLX_IIC_SDA=0;
MLX_IIC_SCL=0;
I2C_Delay();
MLX_IIC_SCL=1;
I2C_Delay();
MLX_IIC_SDA=1;
I2C_Delay();
}

/*******************************************************************************
* 函 数 名         : IIC_Ack
* 函数功能		   : 产生ACK应答  
* 输    入         : 无
* 输    出         : 无
*******************************************************************************/
void I2C_Ack(void)
{
	MLX_IIC_SCL=0;
	MLX_SDA_OUT();
	MLX_IIC_SDA=0;
	delay_us(2);
	MLX_IIC_SCL=1;
	delay_us(5);
	MLX_IIC_SCL=0;
}

/*******************************************************************************
* 函 数 名         : IIC_NAck
* 函数功能		   : 产生NACK非应答  
* 输    入         : 无
* 输    出         : 无
*******************************************************************************/		    
void I2C_NAck(void)
{
	MLX_IIC_SCL=0;
	MLX_SDA_OUT();
	MLX_IIC_SDA=1;
	delay_us(2);
	MLX_IIC_SCL=1;
	delay_us(5);
	MLX_IIC_SCL=0;
}	

/*******************************************************************************
* 函 数 名         : IIC_Wait_Ack
* 函数功能		   : 等待应答信号到来   
* 输    入         : 无
* 输    出         : 1,接收应答失败
        			 0,接收应答成功
*******************************************************************************/
u8 I2C_Wait_Ack(void)
{
	u8 tempTime=0;
	
	MLX_SDA_IN();      //SDA设置为输入  
	MLX_IIC_SDA=1;
	delay_us(1);	   
	MLX_IIC_SCL=1;
	delay_us(1);	 
	while(MLX_READ_SDA)
	{
		tempTime++;
		if(tempTime>250)
		{
			I2C_Stop();
			return 1;
		}
	}
	MLX_IIC_SCL=0;//时钟输出0 	   
	return 0;  
} 


/**
* @功能 将MLX90614的工作模式从PWM模式切换到SMBus模式
* @说明 从PWM模式切换到SMBus的方法是将SCL保持至少1.44ms以上的低电平
* 如果PWM没有使能就不需要发送请求命令
* @参数 无
* @返回值 无
*/
void PwmToSMBus(void)
{
MLX_IIC_SCL=0;
delay_us(1500); //大于1.44ms
MLX_IIC_SCL=1;
}
/**
* @功能 退出睡眠模式
* @说明 保持SCK高电平后,SDA持续至少33ms低电平,
* 在退出睡眠模式后需要间隔250ms(典型值)才输出数据。
* @参数 无
* @返回值 无
*/
void Eixt_Sleep(void)
{
MLX_IIC_SCL=1;
MLX_IIC_SDA=1;
I2C_Delay();
MLX_IIC_SDA=0;
delay_ms(35); //大于33ms退出睡眠模式
MLX_IIC_SDA=1;
delay_ms(260); //大于250ms开始输出数据
}
/**
* @功能 从RAM/EEPROM中读取一个字节数据
* @说明 从MLX90614中的指定地址读取一个字节数据,高位在前,低位在后
* @参数 ack_nack:主机应答信号
* @返回值 dat: 读取的数据
*/
uint8_t I2C_ReadByte(uint8_t ack)
{
   u8 i,receive=0;
	 MLX_SDA_IN();//SDA设置为输入
    for(i=0;i<8;i++ )
	{
      MLX_IIC_SCL=0; 
      delay_us(2);
		  MLX_IIC_SCL=1;
      receive<<=1;
      if(MLX_READ_SDA)receive++;   
		  delay_us(1); 
    }					 
    if (!ack)
        I2C_NAck();//发送nACK
    else
        I2C_Ack(); //发送ACK   
    return receive;
}
/**
* @功能 向EEPROM写一个字节数据
* @说明 在写完一个字节后检测MLX6014是否发送了应答信号
* @参数 dat:需要发送的字节
* @返回值 s_ack:应答信号状态
*/
uint8_t I2C_WriteByte(uint8_t dat)
{
    u8 t;   
	  uint8_t s_ack=0;
	  MLX_SDA_OUT(); 	    
    MLX_IIC_SCL=0;//拉低时钟开始数据传输
    for(t=0;t<8;t++)
    {              
    if((dat&0x80)>0) //0x80  1000 0000
		MLX_IIC_SDA=1;
		else
		MLX_IIC_SDA=0;
        dat<<=1; 	  
		delay_us(2);   //对TEA5767这三个延时都是必须的
		MLX_IIC_SCL=1;
		delay_us(2); 
		MLX_IIC_SCL=0;	
		delay_us(2);
    }	 
if(I2C_Wait_Ack()) //高电平表示正确接收数据  (高?低??这个应该是低电平)
{
s_ack = ACK_FAIL;
}
else
{
s_ack = ACK_SUCCESS;
}
//delay_us(2*N);//修改的
//MLX_IIC_SCL=0;	
//delay_us(4*N);
return s_ack;
}
/**
* @功能 读MLX90614的RAM中内容
* @说明 主要读取三个,环境温度,物体温度1,物体温度2
* 器件从地址可以通过向EEPROM的SMBus地址0x0E中写入来进行设定。
* @参数 saddr:从机地址,7位地址,任何MLX90614都会对0x00地址作出反应
* cmd:存放温度的寄存器地址
* @返回值 Data:读取出来的数值
*using Read Word: SA(write) - Command - SA(read) - LSByte - MSByte - PEC
*/
uint16_t I2C_ReadRAM(uint8_t saddr,uint8_t cmd)
{
uint16_t Data;
uint8_t DataL; //接收数据低字节
uint8_t DataH; //接收数据高字节
uint8_t PEC;
uint8_t retry = 10; //失败重复次数
uint8_t s_ack = 0;
uint8_t Pecreg; //计算的PEC值
uint8_t buf[6]; //存储已接收数据的缓存
MLX_IIC_SCL=0;	
while(retry--)
{
I2C_Start(); //发送起始位
s_ack = I2C_WriteByte((saddr<<1)|WR); //发送从机地址和Wr位
if(s_ack == ACK_SUCCESS)
{
s_ack = 0;
s_ack = I2C_WriteByte(RAM|cmd);
//发送命令,8位,RAM表示对RAM操作,cmd表示操作RAM的地址
if(s_ack == ACK_SUCCESS)
{
s_ack = 0;
I2C_Start(); //重新发送起始位
s_ack = I2C_WriteByte((saddr<<1)+1); //发送从机地址和Rd位
if(s_ack == ACK_SUCCESS)
{
s_ack = 0;
DataL = I2C_ReadByte(1); //读数据低字节
DataH = I2C_ReadByte(1); //读数据高字节
PEC = I2C_ReadByte(1); //读数据PEC字节
// DataL=RX_byte(0); //
// DataH=RX_byte(0); //
// PEC=RX_byte(1);
I2C_Stop(); //发送停止位
buf[5]=(saddr<<1);
buf[4]=EEPROM|cmd;
buf[3]=(saddr<<1)|RD;
buf[2]=DataL;
buf[1]=DataH;
buf[0]=0;
Pecreg=PEC_Cal(buf,6); //调用计算 PEC 的函数
if(Pecreg == PEC)
{
break; //退出循环
}
}
else goto stop_rr;
}
else goto stop_rr;
}
else goto stop_rr;
stop_rr:
I2C_Stop(); //发送停止位,芯片接收失败
}
PEC = PEC+1;
Data = (DataH<<8) + DataL;
return Data;
}
/**
* @功能 清除EEPROM指定单元的数据
* @说明 在向EEPROM中写入数据之前必须先清除内存单元中的数据,也就是全部写入0
* @参数 saddr:从机地址
cmd:发送命令
* @返回值 无
*/
void I2C_ClearEEPROM(uint8_t saddr,uint8_t cmd)
{
uint8_t retry = 10; //失败重复次数
uint8_t s_ack = 0;
MLX_IIC_SCL=0;	
while(retry--)
{
I2C_Start(); //发送起始位
s_ack = I2C_WriteByte((saddr<<1)|WR); //发送从机地址和Wr位
if(s_ack == ACK_SUCCESS)
{
s_ack = 0;
s_ack = I2C_WriteByte(EEPROM|cmd);
//发送命令,8位 EPROM表示对RAM操作,cmd表示操作EEPROM的地址$MLX90614.C
if(s_ack == ACK_SUCCESS)
{
s_ack = 0;
s_ack = I2C_WriteByte(0x00); //发送低字节
if(s_ack == ACK_SUCCESS)
{
s_ack = 0;
s_ack = I2C_WriteByte(0x00); //发送高字节
if(s_ack == ACK_SUCCESS)
{
s_ack = 0;
s_ack = I2C_WriteByte(0x6f); //发送PEC字节
if(s_ack == ACK_SUCCESS)
{
I2C_Stop(); //发送停止位
break; //退出循环
}
else goto stop_ce;
}
else goto stop_ce;
}
else goto stop_ce;
}
else goto stop_ce;
}
else goto stop_ce;
stop_ce:
I2C_Stop(); //发送停止位,芯片接收失败
}
delay_ms(5); //擦除完成至少等待5ms
}
/**
* @功能 读EEPROM指定单元的数据
* @说明 从指定从机读取指定EEPROM地址的数据
* @参数 saddr:从机地址
cmd:读取EEPROM地址
* @返回值 Data:读取数据
*/
uint16_t I2C_ReadEEPROM(uint8_t saddr,uint8_t cmd)
{
uint8_t retry = 10;
uint8_t s_ack;
uint16_t Data;
uint8_t DataL; //接收数据低字节
uint8_t DataH; //接收数据高字节
uint8_t PEC; //接收的PEC值
uint8_t Pecreg; //计算的PEC值
uint8_t buf[6]; //存储已接收数据的缓存
while(retry--)
{
I2C_Start(); //发送起始位
s_ack = I2C_WriteByte((saddr<<1)|WR); //发送从机地址和Wr位
if(s_ack == ACK_SUCCESS)
{
s_ack = 0;
s_ack = I2C_WriteByte(EEPROM|cmd); //发送命令
if(s_ack == ACK_SUCCESS)
{
s_ack = 0;
I2C_Start(); //重新发送起始位
s_ack = I2C_WriteByte((saddr<<1)|RD); //发送从机地址和Rd位
if(s_ack == ACK_SUCCESS)
{
s_ack = 0;
DataL = I2C_ReadByte(1); //读数据低字节
DataH = I2C_ReadByte(1); //读数据高字节
PEC = I2C_ReadByte(1); //读数据PEC字节
I2C_Stop(); //发送停止位
buf[5]=(saddr<<1);
buf[4]=EEPROM|cmd;
buf[3]=(saddr<<1)|RD;
buf[2]=DataL;
buf[1]=DataH;
buf[0]=0;
Pecreg=PEC_Cal(buf,6); //调用计算 PEC 的函数
if(Pecreg == PEC)
{
break;
}
}
else goto stop_re;
}
else goto stop_re;
}
else goto stop_re;
stop_re:
I2C_Stop();
}
Data = (DataH<<8) + DataL;
return Data;
}
/**
* @功能 写EEPROM指定单元的数据
* @说明 在向EEPROM中写入数据之前必须先清除内存单元中的数据,也就是全部写入0
* @参数 saddr:要清除数据的内存单元
* @返回值 无
*/
void I2C_WriteEEPROM(uint8_t saddr,uint8_t cmd,uint8_t DataL,uint8_t DataH)
{
uint8_t retry = 10; //失败重复次数
uint8_t s_ack = 0;
uint8_t Pecreg; //存储计算所得PEC结果$MLX90614.C
uint8_t buf[6]; //存储将要发送字节的缓冲器
buf[5]=0;
buf[4]=saddr<<1;
buf[3]=cmd;
buf[2]=DataL;
buf[1]=DataH;
buf[0]=0;
Pecreg=PEC_Cal(buf,6);
MLX_IIC_SCL=0;	
while(retry--)
{
I2C_Start(); //发送起始位
s_ack = I2C_WriteByte((saddr<<1)|WR); //发送从机地址和Wr位
if(s_ack == ACK_SUCCESS)
{
s_ack = 0;
s_ack = I2C_WriteByte(EEPROM|cmd); //发送命令
if(s_ack == ACK_SUCCESS)
{
s_ack = 0;
s_ack = I2C_WriteByte(DataL); //发送低字节
if(s_ack == ACK_SUCCESS)
{
s_ack = 0;
s_ack = I2C_WriteByte(DataH); //发送高字节
if(s_ack == ACK_SUCCESS)
{
s_ack = 0;
s_ack = I2C_WriteByte(Pecreg); //发送PEC码
if(s_ack == ACK_SUCCESS)
{
I2C_Stop(); //发送停止位
break; //退出循环
}
else goto stop_we;
}
else goto stop_we;
}
else goto stop_we;
}
else goto stop_we;
}
else goto stop_we;
stop_we:
I2C_Stop();
}
delay_ms(5); //写入之后等待5ms
}
/**
* @功能 计算PEC包裹校验码,根据接收的字节计算PEC码
* @说明 计算传入数据的PEC码
* @参数 pec[]:传入的数据
n:传入数据个数
* @返回值 pec[0]:计算得到的PEC值
*/
uint8_t PEC_Cal(uint8_t pec[],uint16_t n)
{
unsigned char crc[6];
unsigned char Bitposition=47;
unsigned char shift;
unsigned char i;
unsigned char j;
unsigned char temp;
do{
crc[5]=0; //载入 CRC数值 0x000000000107
crc[4]=0;
crc[3]=0;
crc[2]=0;
crc[1]=0x01;
crc[0]=0x07;
Bitposition=47; //设置Bitposition的最大值为47
shift=0;
//在传送的字节中找出第一个“1”
i=5; //设置最高标志位 (包裹字节标志)
j=0; //字节位标志,从最低位开始
while((pec[i]&(0x80>>j))==0 && (i>0))
{
Bitposition--;
if(j<7)
{
j++;
}
else
{
j=0x00;
i--;
}
}//while语句结束,并找出Bitposition中为“1”的最高位位置
shift=Bitposition-8;
//得到CRC数值将要左移/右移的数值“shift”
//对CRC数据左移“shift”位
while(shift)
{
for(i=5;i<0xFF;i--)
{
if((crc[i-1]&0x80) && (i>0))
//核对字节的最高位的下一位是否为"1"
{ //是 - 当前字节 + 1
temp=1; //否 - 当前字节 + 0
} //实现字节之间移动“1”
else
{
temp=0;
}
crc[i]<<=1;
crc[i]+=temp;
}
shift--;
}
//pec和crc之间进行异或计算
for(i=0;i<=5;i++)
{
pec[i]^=crc[i];
}
}while(Bitposition>8);
return pec[0]; //返回计算所得的crc数值
}
/**
* @功能 设定MLX90614器件地址
* @说明 器件从地址可以通过向EEPROM的SMBus地址0x0E中写入来进行设定。
为了给从器件设定地址,必须先以0x00+Wr当作从地址开始,当主机
发送此命令,MLX90614总是会反馈并忽略掉内部芯片编码信息。
向EEPROM写入数据前需要清除原来的数据,就是向修改单元写入0x0000
擦除之后需要等待5ms才可以重新写入数据
修改地址时写入的地址高字节MLX90614会忽略
修改之后需要重新将MLX90614的电源断开重启。
* @参数 soaddr:从机旧地址
snaddr:从机新地址
* @返回值 无
*/
void I2C_SetSlaveAddr(uint8_t soaddr,uint8_t snaddr)
{
// uint8_t cmd = EEPROM|SMBUSADDR;
// uint8_t DataL = snaddr;
// uint8_t DataH = 0x00;
// EEPROM_WRITE(snaddr,cmd,0x00,0x00);
// EEPROM_WRITE(snaddr,cmd,DataL,DataH);
}

/*************************************************
*函数名   :  CALTEMP()
*功 能    : 把读回来的数据转换为摄氏度
*说 明    : 从RAM里面读出来的是一个比较大的数(可以用显示屏打印出来看看)
             需要使用下面的公式把温度转换出来://Temperature data is T=(Data)*0.02-273.15
*参 数    : TEMP为要转换的数据         
*修改时间 : 2019/3/15

***************************************************/
void CALTEMP(unsigned long int TEMP)
{
   unsigned long int T;
   unsigned int A, B;
   //unsigned int tempb;
   
   T=TEMP*2;
	 if(T>=27315) //温度:零上
   {
     T=T-27315;
     A=T/100;
     B=T-A*100;
    }
		else//温度:零下
    {
     T=27315-T;
     A=T/100;
     B=T-A*100;
     }  
}

程序这一部分不做过多的讲解,关于测温的功能都是按照官方提供的文档进行编写的,需要自己好好参悟,最后说一下,这个MLX90614测温很容易受外界环境的干扰,需要自己写算法,在硬件上进行改进才能得到更高的准确度。


本文章仅供学习交流用禁止用作商业用途,文中所有内容均为原创未经授权不得转载

微信公众号:zhjj0729

微博:文艺to青年

简书:水枂

你可能感兴趣的:(STM32,小练习,嵌入式,stm32)