當前位置:首頁 > 單片機 > 單片機
[導讀]DS18B20溫度單片機控制顯示C程序

溫度值精確到0.1度,lcd1602顯示

仿真電路圖如下

 

c程序如下:

#include

#define uchar unsigned char

#define uint unsigned int

sbit DQ=P3^7;//ds18b20與單片機連接口

sbit RS=P3^0;

sbit RW=P3^1;

sbit EN=P3^2;

unsigned char code str1[]={"temperature: "};

unsigned char code str2[]={" "};

uchar data disdata[5];

uint tvalue;//溫度值

uchar tflag;//溫度正負標志

/*************************lcd1602程序**************************/

void delay1ms(unsigned int ms)//延時1毫秒(不夠精確的)

{unsigned int i,j;

for(i=0;i for(j=0;j<100;j++);

}

void wr_com(unsigned char com)//寫指令//

{ delay1ms(1);

RS=0;

RW=0;

EN=0;

P2=com;

delay1ms(1);

EN=1;

delay1ms(1);

EN=0;

}

void wr_dat(unsigned char dat)//寫數(shù)據(jù)//

{ delay1ms(1);;

RS=1;

RW=0;

EN=0;

P2=dat;

delay1ms(1);

EN=1;

delay1ms(1);

EN=0;

}

void lcd_init()//初始化設置//

{delay1ms(15);

wr_com(0x38);delay1ms(5);

wr_com(0x08);delay1ms(5);

wr_com(0x01);delay1ms(5);

wr_com(0x06);delay1ms(5);

wr_com(0x0c);delay1ms(5);

}

void display(unsigned char *p)//顯示//

{

while(*p!='\0')

{

wr_dat(*p);

p++;

delay1ms(1);

}

}

init_play()//初始化顯示

{ lcd_init();

wr_com(0x80);

display(str1);

wr_com(0xc0);

display(str2);

}

/******************************ds1820程序***************************************/

void delay_18B20(unsigned int i)//延時1微秒

{

while(i--);

}

void ds1820rst()/*ds1820復位*/

{ unsigned char x=0;

DQ = 1; //DQ復位

delay_18B20(4); //延時

DQ = 0; //DQ拉低

delay_18B20(100); //精確延時大于480us

DQ = 1; //拉高

delay_18B20(40);

}

uchar ds1820rd()/*讀數(shù)據(jù)*/

{ unsigned char i=0;

unsigned char dat = 0;

for (i=8;i>0;i--)

{ DQ = 0; //給脈沖信號

dat>>=1;

DQ = 1; //給脈沖信號

if(DQ)

dat|=0x80;

delay_18B20(10);

}

return(dat);

}

void ds1820wr(uchar wdata)/*寫數(shù)據(jù)*/

{unsigned char i=0;

for (i=8; i>0; i--)

{ DQ = 0;

DQ = wdata&0x01;

delay_18B20(10);

DQ = 1;

wdata>>=1;

}

}

read_temp()/*讀取溫度值并轉(zhuǎn)換*/

{uchar a,b;

ds1820rst();

ds1820wr(0xcc);//*跳過讀序列號*/

ds1820wr(0x44);//*啟動溫度轉(zhuǎn)換*/

ds1820rst();

ds1820wr(0xcc);//*跳過讀序列號*/

ds1820wr(0xbe);//*讀取溫度*/

a=ds1820rd();

b=ds1820rd();

tvalue=b;

tvalue<<=8;

tvalue=tvalue|a;

if(tvalue<0x0fff)

tflag=0;

else

{tvalue=~tvalue+1;

tflag=1;

}

tvalue=tvalue*(0.625);//溫度值擴大10倍,精確到1位小數(shù)

return(tvalue);

}

/*******************************************************************/

void ds1820disp()//溫度值顯示

{ uchar flagdat;

disdata[0]=tvalue/1000+0x30;//百位數(shù)

disdata[1]=tvalue%1000/100+0x30;//十位數(shù)

disdata[2]=tvalue%100/10+0x30;//個位數(shù)

disdata[3]=tvalue%10+0x30;//小數(shù)位

if(tflag==0)

flagdat=0x20;//正溫度不顯示符號

else

flagdat=0x2d;//負溫度顯示負號:-

if(disdata[0]==0x30)

{disdata[0]=0x20;//如果百位為0,不顯示

if(disdata[1]==0x30)

{disdata[1]=0x20;//如果百位為0,十位為0也不顯示

}

}

wr_com(0xc0);

wr_dat(flagdat);//顯示符號位

wr_com(0xc1);

wr_dat(disdata[0]);//顯示百位

wr_com(0xc2);

wr_dat(disdata[1]);//顯示十位

wr_com(0xc3);

wr_dat(disdata[2]);//顯示個位

wr_com(0xc4);

wr_dat(0x2e);//顯示小數(shù)點

wr_com(0xc5);

wr_dat(disdata[3]);//顯示小數(shù)位

}

/********************主程序***********************************/

void main()

{ init_play();//初始化顯示

while(1)

{read_temp();//讀取溫度

ds1820disp();//顯示

}

}

本站聲明: 本文章由作者或相關(guān)機構(gòu)授權(quán)發(fā)布,目的在于傳遞更多信息,并不代表本站贊同其觀點,本站亦不保證或承諾內(nèi)容真實性等。需要轉(zhuǎn)載請聯(lián)系該專欄作者,如若文章內(nèi)容侵犯您的權(quán)益,請及時聯(lián)系本站刪除。
換一批
延伸閱讀

9月2日消息,不造車的華為或?qū)⒋呱龈蟮莫毥谦F公司,隨著阿維塔和賽力斯的入局,華為引望愈發(fā)顯得引人矚目。

關(guān)鍵字: 阿維塔 塞力斯 華為

加利福尼亞州圣克拉拉縣2024年8月30日 /美通社/ -- 數(shù)字化轉(zhuǎn)型技術(shù)解決方案公司Trianz今天宣布,該公司與Amazon Web Services (AWS)簽訂了...

關(guān)鍵字: AWS AN BSP 數(shù)字化

倫敦2024年8月29日 /美通社/ -- 英國汽車技術(shù)公司SODA.Auto推出其旗艦產(chǎn)品SODA V,這是全球首款涵蓋汽車工程師從創(chuàng)意到認證的所有需求的工具,可用于創(chuàng)建軟件定義汽車。 SODA V工具的開發(fā)耗時1.5...

關(guān)鍵字: 汽車 人工智能 智能驅(qū)動 BSP

北京2024年8月28日 /美通社/ -- 越來越多用戶希望企業(yè)業(yè)務能7×24不間斷運行,同時企業(yè)卻面臨越來越多業(yè)務中斷的風險,如企業(yè)系統(tǒng)復雜性的增加,頻繁的功能更新和發(fā)布等。如何確保業(yè)務連續(xù)性,提升韌性,成...

關(guān)鍵字: 亞馬遜 解密 控制平面 BSP

8月30日消息,據(jù)媒體報道,騰訊和網(wǎng)易近期正在縮減他們對日本游戲市場的投資。

關(guān)鍵字: 騰訊 編碼器 CPU

8月28日消息,今天上午,2024中國國際大數(shù)據(jù)產(chǎn)業(yè)博覽會開幕式在貴陽舉行,華為董事、質(zhì)量流程IT總裁陶景文發(fā)表了演講。

關(guān)鍵字: 華為 12nm EDA 半導體

8月28日消息,在2024中國國際大數(shù)據(jù)產(chǎn)業(yè)博覽會上,華為常務董事、華為云CEO張平安發(fā)表演講稱,數(shù)字世界的話語權(quán)最終是由生態(tài)的繁榮決定的。

關(guān)鍵字: 華為 12nm 手機 衛(wèi)星通信

要點: 有效應對環(huán)境變化,經(jīng)營業(yè)績穩(wěn)中有升 落實提質(zhì)增效舉措,毛利潤率延續(xù)升勢 戰(zhàn)略布局成效顯著,戰(zhàn)新業(yè)務引領增長 以科技創(chuàng)新為引領,提升企業(yè)核心競爭力 堅持高質(zhì)量發(fā)展策略,塑強核心競爭優(yōu)勢...

關(guān)鍵字: 通信 BSP 電信運營商 數(shù)字經(jīng)濟

北京2024年8月27日 /美通社/ -- 8月21日,由中央廣播電視總臺與中國電影電視技術(shù)學會聯(lián)合牽頭組建的NVI技術(shù)創(chuàng)新聯(lián)盟在BIRTV2024超高清全產(chǎn)業(yè)鏈發(fā)展研討會上宣布正式成立。 活動現(xiàn)場 NVI技術(shù)創(chuàng)新聯(lián)...

關(guān)鍵字: VI 傳輸協(xié)議 音頻 BSP

北京2024年8月27日 /美通社/ -- 在8月23日舉辦的2024年長三角生態(tài)綠色一體化發(fā)展示范區(qū)聯(lián)合招商會上,軟通動力信息技術(shù)(集團)股份有限公司(以下簡稱"軟通動力")與長三角投資(上海)有限...

關(guān)鍵字: BSP 信息技術(shù)
關(guān)閉
關(guān)閉