MLX90614红外测温代码

1 .通过本实验掌握MLX90614的原理。2 .通过实验掌握数字码管的基本原理3 .通过实验掌握矩阵键盘的使用4 .实验掌握1602的使用2 .实验内容用MLX90614非接触式测量的物体温度3 .实验器材1 .主面板5V电源2.DCP-PRJ09红外线温度计4 .实验原理图5 .实验顺序1 .接通电源2 .运行2.keillvision软件，新设项目，新设项目文件。 请将文件添加到项目中进行编译，如果有错误，请更改文件，直到编译成功，如果有错误，请更改文件，直到编译成功。4 .将制作的HEX文件用编程盒写入单片机，或用STC单片机专用的串行写入器用MAX232串行写入单片机(STC单片机) 或者有关如何在仿真器中运行程序并将程序下载到仿真器中的信息，请参见仿真器使用一节。 用编程箱将制作好的HEX文件写入单片机。5 .程序结束后，在液晶面板上看到温度显示，用手掌复盖红外线传感器上的2cm，可知此时的液晶面板的温度是手掌的表面温度。按6.1按钮，就能看到数码管的显示，用手掌复盖红外线传感器上的2cm，可知此时的数码管的温度是手掌的表面温度。 此时，液晶面板的温度不变化。按7.1键以外的键，液晶面板上再次显示温度。实验代码如下所示。/-/说明：显示分为两部分：数字管显示、液晶面板显示按下/1键数字管就显示出来，此时液晶面板保持静止状态/复位时，或按1键以外的键，显示液晶面板，数码电线管熄灭/- -#include#include#define uint unsigned int#define uchar unsigned char#define Nack_number 10端口定义。端口定义。端口定义。端口定义。端口定义。端口定义。uchar标志； /LCD控制线连接器sbit RS=P06； /RS端sbit RW=P07； /读写方sbit LCDE=P35； /能端/mlx90614端口定义sbit SCK=P37； /时钟线sbit SDA=P36； /数据线sbit DPY1=P32； /温度表示第1个数字代码段选择sbit DPY2=P33； /温度表示第二个数字代码段选择sbit DPY3=P34； /温度表示第三个数字代码段选择sbit row1=P03； /矩阵键盘第一列sbit row2=P04； /矩阵键盘第2列sbit row3=P05； /矩阵键盘第三列sbit cow1=P00； /矩阵键盘第一行sbit cow2=P01； /矩阵键盘第二行sbit cow3=P02； /矩阵键盘第三行数据定义，数据定义，数据定义，数据定义。bdata uchar标志1； /位地址数据sbit _ out=flag1 7； s比特_ in=标志1 0；超临时、临时、错误；语音呼叫临时(单元临时)void读密钥(void )void init Int ()；void delay1(uint z )void show ()；uchar key_num；uchar mah5；定义数字代码值。定义数字代码值。定义数字代码值。uchar code LED01= /LED显示代码，0-9共阳没有小数点0 xc 0，0 x f 9，0 x a 4，0 XB 0，0 x 99，0 x 92，0 x 82，0 x f 8，0 x 80，0 x 90；uchar code LED02= /LED显示码，0-9共阳带小数点的0 x 40，0 x 79，0 x24，0 x 30，0 x 19，0 x 12，0 x02，0 x 78，0 x 00，0 x 10；全局变量定义，全局变量定义，全局变量定义，全局变量定义。bit b20ms、b100ms； /定时标志位uchar c20ms、c100ms； /定时毫秒数我是LCD 1602 * * * * * * * * * * * * * *。向LCD写入指令或数据的指令或数据的指令或数据#define LCD_COMMAND 0/命令#define LCD_DATA 1/数据#define LCD_CLEAR_SCREEN0x01/清除屏幕#define LCD_HOMING0x02/光标返回原点设定显示模式，显示模式，显示模式，显示模式#define LCD_SHOW0x04/公开1 .显示实验目的#define LCD_HIDE0x00/显示关闭显示#define LCD_CURSOR0x02/光标#define LCD_NO_CURSOR0x00/无光标#define LCD_FLASH0x01/光标闪烁#define LCD_NO_FLASH0x00/光标不闪烁设定输入模式，输入模式，输入模式，输入模式。#define LCD_AC_UP0x02/光标将AC向右移动#define LCD_ac_DOWN0x00/默认光标将AC向左移动-#define LCD_MOVE0x01/可进行画面移动#define LCD_NO_MOVE0x00/默认画面不移动AAAAAK AK AAK AAK AUUUR UUUUUUR UUUUUUUUUU/command mode命令模式#defineramaccess0x00/ram操作#defineeepomaccess0x20/eespram操作进入#define Mode0x60/命令模式#define Exit Mode0x61/结束命令模式#define Read Flag0xf0/读取标志进入#define Enter Sleep0xff/休眠模式/ram地址只读ram地址(只读)#define Abmient Temp Addr0x03/环境温度#define IR1Addr0x04#define IR2Addr0x05# definelineabmclienttempaddr0x 06/环境温度/*0x00000x4074 16500 0.01/单元-40 125*/#define Line Obj1Temp Addr0x07 /目标温度、红外线温度/*0x 27a d-0x7fff0x 3559 22610 0.02 /单元-70.01-382.19 0.01 452.2*/#define Line Obj2Temp Addr0x08/ee POM地址EEPROM地址#define TObj Max Addr0x00/测量范围上限设定#define TObj Min Addr0x01/测量范围下限设定#definepwrmtraddr0x02/pwm设置#define Ta Range Addr0x03/环境温度设定#define Ke Addr0x04/频率校正系数#define Config Addr0x05/寄存器的设定#define SMbus Addr0x0e/设备地址设置#define Reserverd1Addr0x0f/预约#define Reserverd2Addr0x19/预约#define ID1Addr0x1c/ID地址1#define ID2Addr0x1d/ID地址2#define ID3Addr0x1e/ID地址3#define ID4Addr0x1f/ID地址4函数宣言，函数宣言，函数宣言，函数宣言，函数宣言，函数宣言void start ()； /MLX90614起跑席程序void stop ()； /MLX90614结束席程序uchar Read Byte(void) /MLX90614接收字节子程序void send_bit(void) /MLX90614发送席程序void send byte (uchar number )/mlx 90614接收字节子例程void读_位(void )/mlx 90614接收席程序void delay(uint N) /延迟程序读取读取时间(void )/温度数据void init1602(void) /LCD初始化子例程void busy(void) /LCD判定繁忙子程序void cmd_wrt(uchar cmd) /LCD写入指令子程序void dat_wrt(uchar dat) /LCD写入数据子程序显示void显示(uint tem )/子程序void打印(uchar * str )/字符串显示程序主函数，主函数，主函数，主函数void main ()举止uint Tem； /温度变量init Int ()；SCK=1；SDA=1；延迟(4)SCK=0；delay(1000 )SCK=1；init1602 ()； /初始化LCDwhile(1)举止每隔while(b100ms)/100ms扫描一次键盘举止b100ms=0；Read Key ()；以下按if(key_num=1)/键，显示千分表举止tem=读时间()；CALTEMP(Tem )show ()；以下PD _ num！=1)/液晶面板显示举止tem=读取时间()； /读取温度cmd_wrt(0x01) /清屏打印( temperature : )； /显示字符串Temperature:并换行显示显示(tem )/温度打印( c )； /表示摄氏延迟重新载入delay(100000) /温度显示以下以下以下void打印(uchar * str )/字符串显示程序举止while(*str！=0) /直到字符串结束举止转换为dat_wrt(*str) ASCII代码str； /指下一个字符以下以下/-输入转换和显示(lcd1602的情况)/-void显示(uint tem )举止单位t、a、b；T=Tem*2；if(T=27315) /温度为正举止T=T-27315； /a=T/100； /温度整数b=T-a*100； /温度小数if(a=100) /温度超过100度举止显示dat_wrt(0x30 a/100) /温度百位显示dat_wrt(0x30 a0/10) /温度10位显示dat_wrt(0x30 a) /温度位 else