找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 458|回复: 0
收起左侧

基于stm32单片机的红外测温MLX90614代码分享

[复制链接]
ID:1116913 发表于 2024-7-11 10:53 | 显示全部楼层 |阅读模式
51hei图片_20240713092342.jpg

  1. 1.起始信号与停止信号:void SMBus_StartBit(void)
  2. {
  3.     SMBUS_SDA_H();        // 首先拉高数据线
  4.     SMBus_Delay(5);        // 延时几微妙
  5.     SMBUS_SCK_H();// 拉高时钟线
  6.     SMBus_Delay(5);        // 延时几微妙
  7.     SMBUS_SDA_L();  // 拉低数据线
  8.     SMBus_Delay(5);        // 延时几微妙
  9.     //在SCK=1时,检测到SDA由1到0表示通信开始(下降沿)
  10.     SMBUS_SCK_L();        // 拉低时钟线
  11.     SMBus_Delay(5);        // 延时几微妙
  12. }
  13. void SMBus_StopBit(void)
  14. {
  15.    SMBUS_SCK_L();   // 拉低时钟线
  16.     SMBus_Delay(5);         // 延时几微妙
  17.     SMBUS_SDA_L();   // 拉低数据线
  18.     SMBus_Delay(5);         // 延时几微妙
  19.     SMBUS_SCK_H();   // 拉高时钟线
  20.     SMBus_Delay(5);         // 延时几微妙
  21.     SMBUS_SDA_H();    // 拉高数据线
  22. }

  23. 2.发送一个字节:
  24. u8 SMBus_SendByte(u8 Tx_buffer)
  25. {
  26.     u8        Bit_counter;
  27.     u8        Ack_bit;
  28.     u8        bit_out;
  29.     for(Bit_counter=8; Bit_counter; Bit_counter--)
  30.     {
  31.         if (Tx_buffer&0x80)//如果最高位为1
  32.         {
  33.             bit_out=1;   // 把最高位置1
  34.         }
  35.         else  //如果最高位为0
  36.         {
  37.             bit_out=0;  // 把最高位置0
  38.         }
  39.         SMBus_SendBit(bit_out);        // 把最高位发送出去
  40.         Tx_buffer<<=1;// 左移一位把最高位移出去等待下一个最高位,循环8次,每次都发最高位,就可把一个字节发出去了
  41.     }
  42.     Ack_bit=SMBus_ReceiveBit();        // Get acknowledgment bit
  43.     return        Ack_bit;
  44. }

  45. 3.接收一个字节:
  46. u8 SMBus_ReceiveByte(u8 ack_nack)
  47. {
  48.     u8         RX_buffer;
  49.     u8        Bit_Counter;
  50.     for(Bit_Counter=8; Bit_Counter; Bit_Counter--)
  51.     {
  52.         if(SMBus_ReceiveBit())// Get a bit from the SDA line
  53.         {
  54.             RX_buffer <<= 1;// If the bit is HIGH save 1  in RX_buffer
  55.             RX_buffer |=0x01;//如果Ack_bit=1,把收到应答信号1与0000 0001 进行或运算,确保为1
  56.         }
  57.         else
  58.         {
  59.             RX_buffer <<= 1;// If the bit is LOW save 0 in RX_buffer
  60.             RX_buffer &=0xfe;//如果Ack_bit=1,把收到应答信号0与1111 1110 进行与运算,确保为0
  61.         }
  62.     }
  63.     SMBus_SendBit(ack_nack);//把应答信号发出去,如果0,就进行下一次通信,如果为1,就拜拜了。
  64.     return RX_buffer;
  65. }


  66. 4.数据校验:
  67. u8 PEC_Calculation(u8 pec[])
  68. {
  69.     u8         crc[6];//存放多项式
  70.     u8        BitPosition=47;//存放所有数据最高位,6*8=48 最高位就是47位
  71.     u8        shift;
  72.     u8        i;
  73.     u8        j;
  74.     u8        temp;
  75.     do
  76.     {    //Load pattern value 0x00 00 00 00 01 07
  77.         crc[5]=0;
  78.         crc[4]=0;
  79.         crc[3]=0;
  80.         crc[2]=0;
  81.         crc[1]=0x01;
  82.         crc[0]=0x07;
  83.         BitPosition=47;
  84.         shift=0;
  85.         i=5;
  86.         j=0;
  87.         while((pec[ i]&(0x80>>j))==0 && i>0)[ i]
  88.         {
  89.             BitPosition--;
  90.             if(j<7)
  91.             {
  92.                 j++;
  93.             }
  94.             else
  95.             {
  96.                 j=0x00;
  97.                 i--;
  98.             }
  99.         }
  100.         shift=BitPosition-8;
  101.         while(shift)
  102.         {
  103.             for(i=5; i<0xFF; i--)
  104.             {
  105.                 if((crc[i-1]&0x80) && (i>0))
  106.                 {
  107.                     temp=1;
  108.                 }
  109.                 else
  110.                 {
  111.                     temp=0;
  112.                 }
  113.                 crc[ i]<<=1;[ i]
  114.                 crc[ i]+=temp;[ i]
  115.             }
  116.             shift--;
  117.         }
  118.         for(i=0; i<=5; i++)
  119.         {
  120.             pec[ i] ^=crc[ i];[ i][ i]
  121.         }
  122.     }
  123.     while(BitPosition>8);
  124.     return pec[0];
  125. }

  126. 5.读取温度函数:
  127. u16 SMBus_ReadMemory(u8 slaveAddress, u8 command)
  128. {
  129.     u16 data;
  130.     u8 Pec;        
  131.     u8 DataL=0;
  132.     u8 DataH=0;        
  133.     u8 arr[6];
  134.     u8 PecReg;
  135.     u8 ErrorCounter;
  136.     ErrorCounter=0x00;// Initialising of ErrorCounter
  137.         slaveAddress <<= 1;        //2-7位表示从机地址 从机地址左移一位,把读写位空出来        
  138.     do
  139.     {
  140. repeat:
  141.         SMBus_StopBit();
  142.         --ErrorCounter;        
  143.         if(!ErrorCounter) //ErrorCounter=0?
  144.         {
  145.             break;        //如果为0就跳出do-while{}循环
  146.         }
  147.         SMBus_StartBit();
  148.         if(SMBus_SendByte(slaveAddress))//发送从机地址最低位Wr=0表示接下来写命令
  149.         {
  150.             goto        repeat;
  151.         }
  152.         if(SMBus_SendByte(command))//发送命令
  153.         {
  154.             goto        repeat;
  155.         }
  156.         SMBus_StartBit();
  157.         if(SMBus_SendByte(slaveAddress+1))        //发送从机地址+1最低位Rd=1表示接下来读数据
  158.         {
  159.             goto        repeat;
  160.         }
  161.         DataL = SMBus_ReceiveByte(ACK);        //读低位数据保存到DataL
  162.         DataH = SMBus_ReceiveByte(ACK); //读高位数据保存到DataH
  163.         Pec = SMBus_ReceiveByte(NACK);        //读校验数据保存到Pec  
  164.         SMBus_StopBit();
  165.         arr[5] = slaveAddress;        
  166.         arr[4] = command;
  167.         arr[3] = slaveAddress+1;
  168.         arr[2] = DataL;        
  169.         arr[1] = DataH;        
  170.         arr[0] = 0;        
  171.         PecReg=PEC_Calculation(arr);//Calculate CRC 数据校验
  172.     }
  173.     while(PecReg != Pec);
  174.         data = (DataH<<8) | DataL;
  175.     return data;
  176. }


  177. 6.得到最终温度值:
  178. float SMBus_ReadTemp(void)
  179. {   
  180.         float temp;
  181.         temp = SMBus_ReadMemory(0x00, 0x07)*0.02-273.15;
  182.         return temp;
  183. }
复制代码


评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励!

查看全部评分

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表