欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

 找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 1158|回復: 0
打印 上一主題 下一主題
收起左側

基于stm32單片機的紅外測溫MLX90614代碼分享

[復制鏈接]
跳轉到指定樓層
樓主


  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. }

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

  47. 3.接收一個字節：
  48. u8 SMBus_ReceiveByte(u8 ack_nack)
  49. {
  50.     u8         RX_buffer;
  51.     u8        Bit_Counter;
  52.     for(Bit_Counter=8; Bit_Counter; Bit_Counter--)
  53.     {
  54.         if(SMBus_ReceiveBit())// Get a bit from the SDA line
  55.         {
  56.             RX_buffer <<= 1;// If the bit is HIGH save 1  in RX_buffer
  57.             RX_buffer |=0x01;//如果Ack_bit=1，把收到應答信號1與0000 0001 進行或運算，確保為1
  58.         }
  59.         else
  60.         {
  61.             RX_buffer <<= 1;// If the bit is LOW save 0 in RX_buffer
  62.             RX_buffer &=0xfe;//如果Ack_bit=1，把收到應答信號0與1111 1110 進行與運算，確保為0
  63.         }
  64.     }
  65.     SMBus_SendBit(ack_nack);//把應答信號發出去，如果0，就進行下一次通信，如果為1，就拜拜了。
  66.     return RX_buffer;
  67. }


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

  131. 5.讀取溫度函數：
  132. u16 SMBus_ReadMemory(u8 slaveAddress, u8 command)
  133. {
  134.     u16 data;
  135.     u8 Pec;        
  136.     u8 DataL=0;
  137.     u8 DataH=0;        
  138.     u8 arr[6];
  139.     u8 PecReg;
  140.     u8 ErrorCounter;
  141.     ErrorCounter=0x00;// Initialising of ErrorCounter
  142.         slaveAddress <<= 1;        //2-7位表示從機地址 從機地址左移一位，把讀寫位空出來        
  143.     do
  144.     {
  145. repeat:
  146.         SMBus_StopBit();
  147.         --ErrorCounter;        
  148.         if(!ErrorCounter) //ErrorCounter=0?
  149.         {
  150.             break;        //如果為0就跳出do-while{}循環
  151.         }
  152.         SMBus_StartBit();
  153.         if(SMBus_SendByte(slaveAddress))//發送從機地址最低位Wr=0表示接下來寫命令
  154.         {
  155.             goto        repeat;
  156.         }
  157.         if(SMBus_SendByte(command))//發送命令
  158.         {
  159.             goto        repeat;
  160.         }
  161.         SMBus_StartBit();
  162.         if(SMBus_SendByte(slaveAddress+1))        //發送從機地址+1最低位Rd=1表示接下來讀數據
  163.         {
  164.             goto        repeat;
  165.         }
  166.         DataL = SMBus_ReceiveByte(ACK);        //讀低位數據保存到DataL
  167.         DataH = SMBus_ReceiveByte(ACK); //讀高位數據保存到DataH
  168.         Pec = SMBus_ReceiveByte(NACK);        //讀校驗數據保存到Pec  
  169.         SMBus_StopBit();
  170.         arr[5] = slaveAddress;        
  171.         arr[4] = command;
  172.         arr[3] = slaveAddress+1;
  173.         arr[2] = DataL;        
  174.         arr[1] = DataH;        
  175.         arr[0] = 0;        
  176.         PecReg=PEC_Calculation(arr);//Calculate CRC 數據校驗
  177.     }
  178.     while(PecReg != Pec);
  179.         data = (DataH<<8) | DataL;
  180.     return data;
  181. }


  184. 6.得到最終溫度值：
  185. float SMBus_ReadTemp(void)
  186. {   
  187.         float temp;
  188.         temp = SMBus_ReadMemory(0x00, 0x07)*0.02-273.15;
  189.         return temp;
  190. }
復制代碼


評分

參與人數 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵！

查看全部評分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏1 分享淘帖 頂頂 踩踩
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網

快速回復 返回頂部 返回列表