資源簡介
用1602顯示溫度值,設18b20上線值,超過上限值蜂鳴器報警

代碼片段和文件信息
/*******************************************************
時間:2010年4月5日
學校:賀州學院
*******************************************************/
#include
#include<1602.h>
#include<18b20.h>
float?backbit;?//定義浮點型數據
uchar?temp; ?//定義字符行數據 ?
uint?kk?warn=23;//溫度上限值??23度
sbit?beep=P1^0; ?//定義蜂鳴器端口
void?delay11(uint?z)
{?uint?ij;
??for(i=100;i>0;i--)
??for(j=z;j>0;j--);
}
/***********************************
蜂鳴器函數,給它一個脈沖才響
*********************************/
void?beepf()
{
?
??beep=0;
??delay11(100);
??beep=1;
}
/************************************
溫度顯示
**********************************/
void?distemp()
{
? readtemp(); ?
??? backbit?=?temper[0];????????????//換成浮點數
????backbit?=?backbit?*?6.25;
????temp?=?backbit;
????temp?=?temp/10;
????b[12]?=?temp%10?+?‘0‘;?????????//先換成字符型存儲在存儲單元中
????temp?=?temper[1];???????????????//取整數的個位
????b[10]?=?temp%10?+?‘0‘;??????????//先換成字符型存儲在存儲單元中
????temp?=?temp/10; ????????????????//取整數的十位
????b[9]=?temp%10?+?‘0‘;????????????//先換成字符型存儲在存儲單元中
kk=temper[0]*0.0625+temper[1];??//獲取溫度值大小,為了和上溫度限值作比較
display();??//顯示在液晶1602上?????
}
/********************************************************
?溫度處理
*********************************************************/
?void??temp_deal(uint?t)
?{
???
???if(t>warn)
???{
??? beepf();
????}
??else
???beep=1;
?
?}
/**********************************************************
*?主函數
**********************************************************/
void?main()
{
????init();
?beep=1;
while(1)
????{
distemp();
delay(10);
temp_deal(kk);
?}
}
?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件???????3929??2010-04-04?09:42??18b20baojing\1602.h
?????文件???????1490??2010-04-04?09:18??18b20baojing\18b20.h
?????文件??????13992??2010-04-04?14:08??18b20baojing\5555555
?????文件???????4808??2010-04-04?14:08??18b20baojing\5555555.hex
?????文件?????????43??2010-04-04?14:08??18b20baojing\5555555.lnp
?????文件??????19224??2010-04-04?14:08??18b20baojing\5555555.M51
?????文件???????1376??2010-04-23?17:58??18b20baojing\5555555.Opt
?????文件????????176??2010-04-23?17:57??18b20baojing\5555555.plg
?????文件???????2158??2010-04-03?18:54??18b20baojing\5555555.Uv2
?????文件???????1382??2010-04-07?12:53??18b20baojing\5555555_Opt.Bak
?????文件???????2262??2009-08-12?12:24??18b20baojing\5555555_Uv2.Bak
?????文件?????????96??2009-08-12?09:09??18b20baojing\head.h
?????文件???????1796??2010-04-04?09:46??18b20baojing\main.c
?????文件???????4171??2010-04-04?14:08??18b20baojing\main.LST
?????文件??????15109??2010-04-04?14:08??18b20baojing\main.OBJ
?????目錄??????????0??2010-04-23?17:59??18b20baojing
-----------?---------??----------?-----??----
????????????????72012????????????????????16
評論
共有 條評論