STM32和MLx90614非接触红外温度传感器

说明:

MLx90614非接触红外温度传感器,是一款性能精度都较高的温度测量产品,在医疗,工业等领域应用较多,具有四个引脚,使用SMBus协议,通过控制SCL引脚进行数据读取,现在给出一个自己写得关于STM32实现温度采集,通过串口输出到上位机。

实物图:


电路连接说明:

SDL引脚连接STM32芯片PB.12,SCL引脚连接STM32芯片PB.13引脚。

使用USART1作为串口输出

程序代码:

/*******************************************************************************
* 文件名   : mlx90614.c
* 作  者        : 
* 版  本        : 
* 日  期        : 2015-08-07
* 描  述        : mlx90614函数
*******************************************************************************/
#include "stm32f10x_lib.h"


#define ACK         0
#define NACK    1
#define SA            0x00 //Slave address 单个MLX90614时地址为0x00,多个时地址默认为0x5a
#define RAM_ACCESS               0x00 //RAM access command
#define EEPROM_ACCESS         0x20 //EEPROM access command
#define RAM_TOBJ1                0x07 //To1 address in the eeprom


#define SDA_L     GPIO_ResetBits(GPIOB, GPIO_Pin_12)
#define SDA_H     GPIO_SetBits(GPIOB, GPIO_Pin_12)   
#define SCL_H     GPIO_SetBits(GPIOB, GPIO_Pin_13)
#define SCL_L     GPIO_ResetBits(GPIOB, GPIO_Pin_13)


#define SMBUS_SDA_PIN          GPIO_ReadInputDataBit(GPIOB, GPIO_Pin_12) //读取引脚电平



void SMBus_StartBit(void);
void SMBus_StopBit(void);
void SMBus_SendBit(u8);
u8 SMBus_SendByte(u8);
u8 SMBus_ReceiveBit(void);
u8 SMBus_ReceiveByte(u8);
void SMBus_Delay(u16);
void SMBus_Init(void);
u16 SMBus_ReadMemory(u8, u8);
u8 PEC_Calculation(u8*);
float SMBus_ReadTemp(void); //获取温度值

/*******************************************************************************

* Function Name  : Mlx90614_Configuration
* Description    : Mlx90614_Configuration
* Input          : None
* Output         : None
* Return         : None
*******************************************************************************/
void Mlx96014_Configuration()
{
GPIO_InitTypeDef GPIO; //声明一个结构体变量
RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOB,ENABLE);//非接触温度传感器SDAL 连接PB.15,SCL连接PB.14---打开GPIOD时钟
// 温度传感器引脚配置
GPIO.GPIO_Pin = (GPIO_Pin_12|GPIO_Pin_13|GPIO_Pin_0|GPIO_Pin_1); //非接触温度传感器SDAL 连接PD.15,SCL连接PD.14
GPIO.GPIO_Speed = GPIO_Speed_50MHz; //管脚频率为50MHZ
GPIO.GPIO_Mode = GPIO_Mode_Out_OD; //输出模式为
GPIO_Init(GPIOB,&GPIO); //初始化GPIOB寄存器

SDA_H;
SCL_H; //因为SMBus是下降沿触发

}

/*******************************************************************************
* Function Name  : SMBus_StartBit
* Description    : Generate START condition on SMBus
* Input          : None
* Output         : None
* Return         : None
*******************************************************************************/
void SMBus_StartBit(void)
{
    SDA_H;               // Set SDA line
    SMBus_Delay(1);             // Wait a few microseconds  
    SCL_H;                // Set SCK line  
    SMBus_Delay(5);             // Generate bus free time between Stop
    SDA_L;                // Clear SDA line
    SMBus_Delay(10);           // Hold time after (Repeated) Start
    // Condition. After this period, the first clock is generated.
    //(Thd:sta=4.0us min)
    SCL_L;            // Clear SCK line
    SMBus_Delay(2);             // Wait a few microseconds
}

/*******************************************************************************
* Function Name  : SMBus_StopBit
* Description    : Generate STOP condition on SMBus
* Input          : None
* Output         : None
* Return         : None
*******************************************************************************/

void SMBus_StopBit(void)
{
    SCL_L;                // Clear SCK line
    SMBus_Delay(5);             // Wait a few microseconds
    SDA_L;                // Clear SDA line
    SMBus_Delay(5);             // Wait a few microseconds
    SCL_H;                // Set SCK line
    SMBus_Delay(10);             // Stop condition setup time(Tsu:sto=4.0us min)
    SDA_H;                // Set SDA line
}

/*******************************************************************************
* Function Name  : SMBus_SendByte
* Description    : Send a byte on SMBus
* Input          : Tx_buffer
* Output         : None
* Return         : None
*******************************************************************************/
u8 SMBus_SendByte(u8 Tx_buffer)
{
    u8        Bit_counter;
    u8        Ack_bit;
    u8        bit_out;


    for(Bit_counter=8; Bit_counter; Bit_counter--)
    {
        if (Tx_buffer&0x80)
        {
            bit_out=1;   // If the current bit of Tx_buffer is 1 set bit_out
        }
        else
        {
            bit_out=0;  // else clear bit_out
        }


        SMBus_SendBit(bit_out);                // Send the current bit on SDA
        Tx_buffer<<=1;                                // Get next bit for checking
    }


    Ack_bit=SMBus_ReceiveBit();                // Get acknowledgment bit
    return        Ack_bit;
}

/*******************************************************************************
* Function Name  : SMBus_SendBit
* Description    : Send a bit on SMBus
* Input          : bit_out
* Output         : None
* Return         : None
*******************************************************************************/
void SMBus_SendBit(u8 bit_out)
{
    if(bit_out==0)
    {
      SDA_L;  
    }
    else
    {
    SDA_H;
    }
    SMBus_Delay(2);                                        // Tsu:dat = 250ns minimum
    SCL_H;                                        // Set SCK line
    SMBus_Delay(10);                            // High Level of Clock Pulse
    SCL_L;                                        // Clear SCK line
    SMBus_Delay(10);                            // Low Level of Clock Pulse
//        SMBUS_SDA_H();                                    // Master release SDA line ,
    return;
}
/*******************************************************************************
* Function Name  : SMBus_ReceiveBit
* Description    : Receive a bit on SMBus
* Input          : None
* Output         : None
* Return         : Ack_bit
*******************************************************************************/
u8 SMBus_ReceiveBit(void)
{
    u8 Ack_bit;


    SDA_H;          //引脚靠外部电阻上拉,当作输入
    SCL_H;                        // Set SCL line
    SMBus_Delay(2);                        // High Level of Clock Pulse
    if (SMBUS_SDA_PIN)
    {
        Ack_bit=1;
    }
    else
    {
        Ack_bit=0;
    }
    SCL_L;                        // Clear SCL line
    SMBus_Delay(4);                        // Low Level of Clock Pulse
    return        Ack_bit;
}
/*******************************************************************************
* Function Name  : SMBus_ReceiveByte
* Description    : Receive a byte on SMBus
* Input          : ack_nack
* Output         : None
* Return         : RX_buffer
*******************************************************************************/
u8 SMBus_ReceiveByte(u8 ack_nack)
{
    u8        RX_buffer;
    u8        Bit_Counter;
    for(Bit_Counter=8; Bit_Counter; Bit_Counter--)
    {
        if(SMBus_ReceiveBit())                        // Get a bit from the SDA line
        {
            RX_buffer <<= 1;                        // If the bit is HIGH save 1  in RX_buffer
            RX_buffer |=0x01;
        }
        else
        {
            RX_buffer <<= 1;                        // If the bit is LOW save 0 in RX_buffer
            RX_buffer &=0xfe;
        }
    }
    SMBus_SendBit(ack_nack);                        // Sends acknowledgment bit
    return RX_buffer;
}


/*******************************************************************************
* Function Name  : SMBus_Delay
* Description    : 延时  一次循环约1us
* Input          : time
* Output         : None
* Return         : None
*******************************************************************************/
void SMBus_Delay(u16 time)
{
    u16 i, j;
    for (i=0; i<4; i++)
    {
        for (j=0; j<time; j++);
    }
}

/*******************************************************************************
 * Function Name  : SMBus_ReadMemory
 * Description    : READ DATA FROM RAM/EEPROM
 * Input          : slaveAddress, command
 * Output         : None
 * Return         : Data
*******************************************************************************/
u16 SMBus_ReadMemory(u8 slaveAddress, u8 command)
{
    u16 data;                        // Data storage (DataH:DataL)
    u8 Pec;                                // PEC byte storage
    u8 DataL=0;                        // Low data byte storage
    u8 DataH=0;                        // High data byte storage
    u8 arr[6];                        // Buffer for the sent bytes
    u8 PecReg;                        // Calculated PEC byte storage
    u8 ErrorCounter;        // Defines the number of the attempts for communication with MLX90614


    ErrorCounter=0x00;                                // Initialising of ErrorCounter
        slaveAddress <<= 1;        //2-7位表示从机地址
        
    do
    {
repeat:
        SMBus_StopBit();                            //If slave send NACK stop comunication
        --ErrorCounter;                                    //Pre-decrement ErrorCounter
        if(!ErrorCounter)                             //ErrorCounter=0?
        {
            break;                                            //Yes,go out from do-while{}
        }

        SMBus_StartBit();                                //Start condition
        if(SMBus_SendByte(slaveAddress))//Send SlaveAddress 最低位Wr=0表示接下来写命令
        {
            goto        repeat;                            //Repeat comunication again
        }
        if(SMBus_SendByte(command))            //Send command
        {
            goto        repeat;                            //Repeat comunication again
        }

        SMBus_StartBit();                                        //Repeated Start condition
        if(SMBus_SendByte(slaveAddress+1))        //Send SlaveAddress 最低位Rd=1表示接下来读数据
        {
            goto        repeat;                     //Repeat comunication again
        }

        DataL = SMBus_ReceiveByte(ACK);        //Read low data,master must send ACK
        DataH = SMBus_ReceiveByte(ACK); //Read high data,master must send ACK
        Pec = SMBus_ReceiveByte(NACK);        //Read PEC byte, master must send NACK
        SMBus_StopBit();                                //Stop condition


        arr[5] = slaveAddress;                //
        arr[4] = command;                        //
        arr[3] = slaveAddress+1;        //Load array arr
        arr[2] = DataL;                                //
        arr[1] = DataH;                                //
        arr[0] = 0;                                        //
        PecReg=PEC_Calculation(arr);//Calculate CRC
    }
    while(PecReg != Pec);                //If received and calculated CRC are equal go out from do-while{}


        data = (DataH<<8) | DataL;        //data=DataH:DataL
    return data;
}

/*******************************************************************************
* Function Name  : PEC_calculation
* Description    : Calculates the PEC of received bytes
* Input          : pec[]
* Output         : None
* Return         : pec[0]-this byte contains calculated crc value
*******************************************************************************/
u8 PEC_Calculation(u8 pec[])
{
    u8         crc[6];
    u8        BitPosition=47;
    u8        shift;
    u8        i;
    u8        j;
    u8        temp;


    do
    {
        /*Load pattern value 0x000000000107*/
        crc[5]=0;
        crc[4]=0;
        crc[3]=0;
        crc[2]=0;
        crc[1]=0x01;
        crc[0]=0x07;

        /*Set maximum bit position at 47 ( six bytes byte5...byte0,MSbit=47)*/
        BitPosition=47;


        /*Set shift position at 0*/
        shift=0;


        /*Find first "1" in the transmited message beginning from the MSByte byte5*/
        i=5;
        j=0;
        while((pec[i]&(0x80>>j))==0 && i>0)
        {
            BitPosition--;
            if(j<7)
            {
                j++;
            }
            else
            {
                j=0x00;
                i--;
            }
        }/*End of while */


        /*Get shift value for pattern value*/
        shift=BitPosition-8;


        /*Shift pattern value */
        while(shift)
        {
            for(i=5; i<0xFF; i--)
            {
                if((crc[i-1]&0x80) && (i>0))
                {
                    temp=1;
                }
                else
                {
                    temp=0;
                }
                crc[i]<<=1;
                crc[i]+=temp;
            }/*End of for*/
            shift--;
        }/*End of while*/


        /*Exclusive OR between pec and crc*/
        for(i=0; i<=5; i++)
        {
            pec[i] ^=crc[i];
        }/*End of for*/
    }
    while(BitPosition>8); /*End of do-while*/


    return pec[0];
}

 /*******************************************************************************
 * Function Name  : SMBus_ReadTemp
 * Description    : Calculate and return the temperature
 * Input          : None
 * Output         : None
 * Return         : SMBus_ReadMemory(0x00, 0x07)*0.02-273.15
*******************************************************************************/
float SMBus_ReadTemp(void)
{   
    return SMBus_ReadMemory(SA, RAM_ACCESS|RAM_TOBJ1)*0.02-273.15;
}


/*********************************END OF FILE*********************************/



主程序:

int main(void)
{
float Temperature=10;

/* *************************程序初始化配置*****************/
RCC_Configuration(); //开启系统和各外设时钟
GPIO_Configuration(); //GPIO端口配置

USART_Configuration(); //USART配置
SYSTICK_Configuration(); //SYSTICK配置

Mlx96014_Configuration();

    printf(" now its beginning!\t");
while(1)
   {


    Temperature=SMBus_ReadTemp();
while(!(SysTick_GetFlagStatus(SysTick_FLAG_COUNT)));
printf("The Temperature is:%f\r\t The Pwv1 is:%f\r\n",Temperature,Pwv1);

}

}

USART1程序

#include "stm32f10x_lib.h"
#include <stdio.h>

#if 1  /*加入以下代码,支持printf函数,而不需要选择use MicroLIB*/
#pragma import(__use_no_semihosting)
struct __FILE 
{
int handle;// Add  whatever you need here 
};
FILE __stdout;
// 定义_sys_exit()避免使用半主机模式
_sys_exit(int x)
{
x=x;
}

int fputc(int ch,FILE *f) // printf函数是通过调用fputc函数输出线上,以下代码作用是将fputc函数重新定向到USART1上去
{
USART_SendData(USART1, ch); // 将ch送到USART1
while((USART_GetFlagStatus(USART1, USART_FLAG_TC))==0); //等待发送完毕,SR的第六位是发送完成标志位,当为1时,发送完成,进行下一轮发送
return(ch);
}
#endif

/*******************************************************************************
* Function Name  : USART_Configuration
* Description    : Configures the USART 
* Input          : None
* Output         : None
* Return         : None
*******************************************************************************/
void USART_Configuration(void)
{
USART_InitTypeDef USART_InitStructure; //USART_InitTypeDef是一个在其他库文件里面定义了的结构体,在这里是新定义一个结构体变量USART_InitStructure
GPIO_InitTypeDef GPIO; //声明一个结构体变量

RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOA,ENABLE); //使能APB2外设的GPIOA的时钟
RCC_APB2PeriphClockCmd(RCC_APB2Periph_USART1,ENABLE); //使能APB1外设的USART1的时钟
// USART1串口配置
GPIO.GPIO_Pin = GPIO_Pin_9; //选择PX.9与Tx相连,设为输出模式
GPIO.GPIO_Speed = GPIO_Speed_50MHz; //管脚频率为50MHZ
GPIO.GPIO_Mode =GPIO_Mode_AF_PP ; //输出模式为复用推挽输出
GPIO_Init(GPIOA,&GPIO); //初始化GPIOA寄存器

GPIO.GPIO_Pin = GPIO_Pin_10;   //选择PX.11与Rx相连,设为输出入式
GPIO.GPIO_Speed = GPIO_Speed_50MHz; //管脚频率为50MHZ
GPIO.GPIO_Mode = GPIO_Mode_IPU; //输出模式为上拉输入
GPIO_Init(GPIOA,&GPIO); //初始化GPIOA寄存器

// 定义的结构体包含以下参数
USART_InitStructure.USART_BaudRate = 9600;    //设置波特率
USART_InitStructure.USART_WordLength = USART_WordLength_8b; //设置字长位8位
USART_InitStructure.USART_StopBits = USART_StopBits_1; //停止位1位
USART_InitStructure.USART_Parity = USART_Parity_No; //偶校验
USART_InitStructure.USART_HardwareFlowControl = USART_HardwareFlowControl_None; //无需硬件流控制
USART_InitStructure.USART_Mode = USART_Mode_Tx | USART_Mode_Rx;//
// USART_InitStructure.USART_Clock = USART_Clock_Disable;
// USART_InitStructure.USART_CPOL = USART_CPOL_High;
// USART_InitStructure.USART_CPHA = USART_CPHA_1Edge;
// USART_InitStructure.USART_LastBit = USART_LastBit_Enable;
USART_Init(USART1, &USART_InitStructure); //调用USART_Init库函数将上述参数进行赋值

USART_Cmd(USART1,ENABLE); //调用Cmd函数进行USART2的使能操作
}

你可能感兴趣的:(传感器,医疗,stm32,温度传感器,MLx90614)