標題:
51單片機紅外測溫程序
[打印本頁]
作者:
言斯
時間:
2021-4-16 23:43
標題:
51單片機紅外測溫程序
此程序可以適用于51單片機紅外測溫模塊
無線測溫模塊附帶原理圖和數(shù)據(jù)手冊和使用說明
如果大家有不懂的可以聯(lián)系我
原理圖是根據(jù)我自己的IO口改的
如果需求不一樣,可以修改
還有protues仿真文件,都可以查看
都是原創(chuàng),如果有問題,還請多多指正:
#include "common.h"
#include "key.h"
//按鍵
sbit Key_1 = P1^1;
sbit Key_2 = P1^2;
sbit Key_3 = P1^3;
sbit Bp = P1^0; //蜂鳴器
extern uchar status;
extern uint Tem;
extern uint Max_Tem;//最大溫度,100bei
extern uint Min_Tem;//最小溫度
void beep() //蜂鳴器
{
Bp = 0;
delay_ms(50);
Bp = 1;
}
//=====================按鍵檢測并返回按鍵值===============================
void key_det(void)
{
uint T;
if(Key_1 == 0)
{
delay_ms(50);
if(Key_1 == 0)
{
while(Key_1==0);
beep();
status++;
if(status>2)
{
status = 0;
}
}
}
if(Key_2 == 0)
{
delay_ms(50);
if(Key_2 == 0)
{
beep();
while(Key_2==0);
if(status==2)
{
Max_Tem+=100;
}
if(status==1)
{
if(Min_Tem<Max_Tem)
{
Min_Tem+=100;
}
}
}
}
if(Key_3 == 0)
{
delay_ms(50);
if(Key_3 == 0)
{
beep();
while(Key_3==0);
if(status==1)
{
if(Min_Tem>0)
Min_Tem-=100;
}
if(status==2)
{
if(Max_Tem>Min_Tem)
Max_Tem-=100;
}
}
}
T=Tem*2;
T=T-27315;
if(T>Max_Tem)
{
Bp=0;
LCD_write_char(8,1,' ');
delay_ms(150);
LCD_write_char(8,1,'S');
delay_ms(150);
}
else if(T<Min_Tem)
{
Bp=0;
LCD_write_char(1,1,' ');
delay_ms(150);
LCD_write_char(1,1,'X');
delay_ms(150);
}
else
{
Bp=1;
}
}
復(fù)制代碼
作者:
蘇海
時間:
2021-5-4 19:13
怎么沒有資料哦
作者:
yilinghai
時間:
2021-5-13 09:10
樓主,你說的仿真資料呢,沒有上傳?
作者:
123單片機學(xué)習
時間:
2021-8-1 12:14
樓主可以上一下資料嗎
歡迎光臨 (http://www.torrancerestoration.com/bbs/)
Powered by Discuz! X3.1