设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 51单片机MLX90614红外温度计源程序
返回列表 发新帖
查看: 3926|回复: 0
打印 上一主题 下一主题
收起左侧

51单片机MLX90614红外温度计源程序

[复制链接]
跳转到指定楼层
楼主
ID:739692 发表于 2020-9-20 22:34 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
  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)     //写一个字节
  81. {
  82.         uchar i;
  83.         uchar temp;                                        //缓存寄存器
  84.         bit ack;                                        //定义位变量，反馈应答信号
  85.         temp = DAT;                                        //待发送字节存入缓冲寄存器
  86.         for(i = 0;i < 8;i++)                //循环发送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;                //待发送数据左移一位
  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;    //将发送的数据右移7位
  113.                 dat = dat << 1;   //将发送的数据左移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. //-----------发送一个位---------
  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. //---------- 接收一个字节--------
  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)   //发送一位
  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()    //读一个字节
  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();   //主设备向从设备发送应答
  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)

评分

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

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏5 分享淘帖 顶顶3 踩踩
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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