標題: 51單片機MLX90614紅外溫度計源程序 [打印本頁]
作者: 老古董2號    時間: 2020-9-20 22:34
標題: 51單片機MLX90614紅外溫度計源程序
  1. /***********************************************************
  2. *
  3. *   功能：利用MLX90614實現紅外測溫
  4. *
  5. *   平臺：keil5 + STC89C52
  6. *
  7. *   作者：辟邪居士
  8. *
  9. *
  10. *   日期：2020年9月19
  11. *
  12. ************************************************************/

  14. #include"reg52.h"
  15. #include"intrins.h"
  16. //************************************
  17. #define  uint  unsigned int
  18. #define  uchar unsigned char
  19. #define delay_5t {_nop_();_nop_();_nop_();\
  20.                                         _nop_();_nop_();}                //延時5個機器周期
  21. # define LcdDB P0
  22. //************** 端口定義**************
  23. //LCD 控制線接口
  24. uchar flag1;
  25. sbit  LcdRS=P2^6;
  26. sbit  LcdRW=P2^5;
  27. sbit  LcdEN=P2^7;
  28. //************ 函數聲明*****************************************
  29. void   delay(uint N);              //延時程序
  30. void LCD_show(uchar x,uchar y);
  31. void LcdBusy();
  32. void LcdwrDat(uchar dat);
  33. void LcdwrCmd(uchar cmd);
  34. void LCD_init ();
  35. void   display(uint Tem);           // 顯示子程序
  36. bit    SMB_ack();                        //應答信號                                
  37. //*************主函數*******************************************
  38. //mlx90614 端口定義
  39. sbit  SCL=P1^1;// 時鐘線
  40. sbit  SDA=P1^2;// 數據線
  41. //************ 數據定義****************
  42. bdata uchar flag;          //可位尋址數據
  43. sbit bit_out=flag^7;
  44. sbit bit_in=flag^0;

  46. uchar TeL;   //溫度低八位
  47. uchar TeH;   //溫度高八位
  48. uchar PEC;
  49. uint TEP;  //存儲溫度

  51. void Delay10us()                //@11.0592MHz
  52. {
  53.         unsigned char i;
  54.         i = 2;
  55.         while (--i);
  56. }
  57. void SMBus_Start()   //開始信號
  58. {
  59.         SDA = 1;
  60.         delay_5t;
  61.         SCL = 1;
  62.         delay_5t;
  63.     SDA = 0;
  64.         delay_5t;
  65.         SCL = 0;
  66.         delay_5t;
  67. }

  69. void SMBus_Stop()   //停止信號
  70. {
  71.         SCL = 0;
  72.         delay_5t;
  73.         SDA = 0;
  74.         delay_5t;
  75.         SCL = 1;
  76.         delay_5t;
  77.         SDA = 1;
  78.         
  79. }
  80. bit SMBus_writer(uchar DAT)     //寫一個字節(jié)
  81. {
  82.         uchar i;
  83.         uchar temp;                                        //緩存寄存器
  84.         bit ack;                                        //定義位變量，反饋應答信號
  85.         temp = DAT;                                        //待發(fā)送字節(jié)存入緩沖寄存器
  86.         for(i = 0;i < 8;i++)                //循環(huán)發(fā)送8位數據
  87.         {
  88.                 SCL = 0;                                //拉低時鐘線
  89.                 if((temp&0x80)==0x80)        //判斷temp的高位是0還是1
  90.                         SDA=1;                                                        
  91.                 else
  92.                         SDA=0;                                //送出相應數據
  93.                 delay_5t ;                                //延時5個機器周期
  94.                 SCL = 1;                                //拉低時鐘線
  95.                 temp = temp << 1;                //待發(fā)送數據左移一位
  96.                 delay_5t ;                                //延時5個機器周期
  97.         }
  98.         SCL = 0;                                        //拉低時鐘線
  99.         ack = SMB_ack();                        //調用應答信號檢測子函數
  100.         return ack;                                        //返回檢測到的應答信號
  101. }
  102. /*
  103. bit SMBus_writer(uchar dat)
  104. {
  105.         bit ack1;
  106.         uchar i;
  107.         SCL = 0;
  108.         
  109.         for(i=0;i<8;i++)
  110.         {
  111.                 Delay10us();
  112.                 SDA = dat >> 7;    //將發(fā)送的數據右移7位
  113.                 dat = dat << 1;   //將發(fā)送的數據左移1位
  114.                 SCL = 1;
  115.                 Delay10us();
  116.                 SCL = 0;
  117.                
  118.         }
  119.         SDA = 1;
  120.         Delay10us();
  121.         SCL = 1;
  122.         while(SDA)   //等待從機應答信號，超過2000us，返回
  123.         {
  124.                 uint j;
  125.                 j++;
  126.                 if(j>2000)
  127.                 {
  128.                         SCL = 0;
  129.                         Delay10us();
  130.                         return 0;
  131.                 }
  132.         }
  133.         ack1 = SMB_ack();
  134.         return ack1;
  135. }
  136. */
  137. /*
  138. //---------- 接收一個位----------
  139. void receive_bit(void)
  140. {
  141.   SDA=1;bit_in=1;
  142.   SCL=1;
  143.   _nop_();_nop_();_nop_();_nop_();
  144.   _nop_();_nop_();_nop_();_nop_();
  145.   bit_in=SDA;
  146.   _nop_();
  147.   SCL=0;
  148.   _nop_();_nop_();_nop_();_nop_();
  149.   _nop_();_nop_();_nop_();_nop_();
  150. }
  151. //-----------發(fā)送一個位---------
  152. void  send_bit(void)
  153. {
  154.   if(bit_out==0)
  155.   
  156.        SDA=0;
  157.   else
  158.      SDA=1;
  159.   _nop_();
  160.   SCL=1;
  161.   _nop_();_nop_();_nop_();_nop_();
  162.   _nop_();_nop_();_nop_();_nop_();
  163.   SCL=0;
  164.   _nop_();_nop_();_nop_();_nop_();
  165.   _nop_();_nop_();_nop_();_nop_();
  166. }
  167. //---------- 接收一個字節(jié)--------
  168. uchar rx_byte(void)
  169. {
  170.   uchar i,dat;
  171.   dat=0;
  172.   for(i=0;i<8;i++)
  173.   {
  174.     dat=dat<<1;
  175.     receive_bit();
  176.     if(bit_in==1)
  177.      dat=dat+1;
  178.   }
  179.   send_bit();
  180.   return dat;
  181. }
  182. */
  183. void  send_bit(void)   //發(fā)送一位
  184. {
  185.   if(bit_out==0)
  186.   
  187.        SDA=0;
  188.   else
  189.      SDA=1;
  190.    
  191.   SCL=1;
  192.   delay_5t;
  193.   SCL=0;
  194.   delay_5t;
  195. }
  196. uchar rx_byte()    //讀一個字節(jié)
  197. {
  198.         uchar i;
  199.         uchar dat;
  200.         SDA = 1;
  201.         _nop_();_nop_();
  202.         for(i=0;i<8;i++)
  203.         {
  204.                 SCL = 1;
  205.                 _nop_();
  206.                 dat = dat << 1;
  207.             dat|=SDA;
  208.                 _nop_();
  209.                 SCL = 0;
  210.                 _nop_();
  211.                
  212.         }
  213.         send_bit();   //主設備向從設備發(fā)送應答
  214.         return dat;
  215. }

  217. bit SMB_ack()    //IIC應答
  218. {
  219.         bit ack;
  220.         SDA = 1;
  221.         Delay10us();
  222.         SCL = 1;
  223.         
  224.         Delay10us();
  225.         SCL =0;
  226.     ack = SDA;
  227.         return ack;
  228. }
  229. uint MLX90614()            
  230. {
  231.         SMBus_Start();          //開始信號
  232.         SMBus_writer(0x00);     //寫從設備地址

  234.         SMBus_writer(0x07);    //寫命令

  236.         SMBus_Start();        //重新開始
  237.         SMBus_writer(0x01);   //寫地址
  238.         
  239.         TeL = rx_byte();     //讀取溫度

  241.         TeH = rx_byte();        

  243.         PEC = rx_byte();
  244.         SMBus_Stop();
  245.         TEP = (TeH*256)+TeL;
  246.         //TEP = TEP * 0.02 -273.15;
  247.         return TEP;
  248. }


  251. void main()
  252. {
  253. uint Tem;
  254. SCL=1;
  255. SDA=1;
  256. delay_5t;
  257. SCL=0;
  258. delay(1000);
  259. SCL=1;
  260. LCD_init ();   //LCD初始化
  261. LCD_show(1,1); //LCD顯示的位置
  262. while(1)
  263. {
  264.    Tem = MLX90614();
  265.    display(Tem);
  266.    delay(20);
  267. }
  268. }
  269. //*********輸入轉換并顯示*********
  270. void display(uint Tem)
  271. {
  272.     uint YEP;
  273.     uint a,b;
  274.         YEP = Tem * 0.02 - 273.15;
  275.         LcdwrCmd(0x01);       //清屏
  276.         a = YEP /10;        //十位
  277.         
  278.         LcdwrDat(0x30+a);   //顯示字符串
  279.         b = YEP %10;           //個位
  280.         LcdwrDat(0x30+b);   //顯示字符串
  281.         
  282. }

  284. //************************************

  286. //------------ 延時--------------
  287. void   delay(uint N)
  288. {
  289.   uint i;
  290.   for(i=0;i<N;i++)
  291.   
  292.      _nop_();
  293. }
  294. //------------------------------

  296. //******************LCD 顯示子函數***********************

  298. void LCD_init ()
  299. {
  300.         LcdwrCmd(0x38);
  301.         LcdwrCmd(0x0C);
  302.         LcdwrCmd(0x06);
  303.         LcdwrCmd(0x01);
  304. }


  307. void LcdwrCmd(uchar cmd)
  308. {
  309.         LcdBusy();
  310.         LcdRS = 0;
  311. ……………………

  313. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼

全部源程序: 51單片機MLX90614紅外溫度計.zip (40.27 KB, 下載次數: 165)




歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1