當(dāng)前位置:首頁 > 單片機(jī) > 單片機(jī)
[導(dǎo)讀]程序如下://PIC C DS18B20測溫,LCD顯示.c 時間:2008-8-20 //適合3ePIC實(shí)驗(yàn)板 //C語言寫的溫度計,DS18B20測溫,LCD顯示,顯示到0.1度 //USING 16F877 READ MAXIM DS18b20 AND DISPLAY ON LCD1602 */ #include //連

程序如下:

//PIC C DS18B20測溫,LCD顯示.c 時間:2008-8-20
//適合3ePIC實(shí)驗(yàn)板
//C語言寫的溫度計,DS18B20測溫,LCD顯示,顯示到0.1度
//USING 16F877 READ MAXIM DS18b20 AND DISPLAY ON LCD1602 */


#include

//連線說明
#define LCDRS RB1
#define LCDRW RB2
#define LCDE RB3
#define LCDDATA PORTD

#define DSDQ RB0 /* 連接ds18b20 */
#define TRISDQ TRISB0


//函數(shù)定義
void lcdinit(); //雙線模式
void wcmd (char cmd);
void wdata (char data);
void poscursor(char line, char col);
void print(char *s);

void lcdbusy();
void delay ( int t);

void itoa10(unsigned char *buf, int i);
int strlen (const char *s);
void dsinit();
void wdscmd(char cmd);
float dsread ();

//實(shí)數(shù)定義
char bank1 title[]= "Temperature is";

char dsfound[]="DS1820 FOUND";
char dsnotfound[]="DS1820 NOT FOUND";
char bank1 blank[]= " ";


// LCD 命令定義
#define CLRLCD 0X01
#define LCDMOD 0X38 /* 8 BIT, TWO LINE, 5X7 DOT MATRIX */
#define TURNON 0X0F /* turn on LCD, CURSOR, BLINKING */
#define CURMODE 0X06 /* character don't move, cursor move right automaticall */

// DS1820 命令定義
#define SKIPROM 0XCC
#define READSCRACHPAD 0XBE
#define TCONVERT 0X44

/* ORIGINAL CURSOR POSITION */
#define ORG1 0X80
#define ORG2 0XC0


//TMR0 中斷
static int count;
#define PRETMR0 210 // 50us時間間隔
float temperature;

#define DSRESET 10
#define DSRECOVER 1

char bank1 atemperature[10]; // 數(shù)子溫度
//主函數(shù)
void main()
{
int len;
ADCON1=0X07; //設(shè)置端口A為I/O

lcdinit();

print(title);
LCDE=0; /* 當(dāng) LCDE=0,LCD不起作用,操縱DS1820 */

/* 中斷TIMER0 */
OPTION=0B11001111; // bit5=0,利用內(nèi)部循環(huán)時鐘
TMR0IE=1; //timer0 使能端
PEIE=0; //關(guān)閉所有外設(shè)中斷
GIE=1;//開總中斷
poscursor(1,0);
while (1) {
dsinit();
wdscmd(SKIPROM);
wdscmd(TCONVERT);

TRISDQ=0;
DSDQ=0;
TRISDQ=1;
while(1)
{ //轉(zhuǎn)換是否完成
if (DSDQ)
break;
else
continue;
}
dsinit();
wdscmd(SKIPROM);
wdscmd(READSCRACHPAD);
temperature=dsread(); // 讀溫度

itoa10(atemperature, (int) (temperature * 10)); //itoa10只有是正數(shù)時起作用
// 所以乘以10,擴(kuò)大10倍,然后增加小數(shù)點(diǎn)
// 再最后一個數(shù)前增加小數(shù)點(diǎn)
len=strlen(atemperature);
atemperature[len]=atemperature[len-1];
atemperature[len-1]='.';
atemperature[len+1]=0;

poscursor(0,0);
print (title);
poscursor(1,0);
print (blank);
poscursor(1,2);
print (atemperature);
print (blank);
delay(10000); //再得到新的溫度前延時10000*50 us=0.5 s
}

}
//延時函數(shù)
void delay (int t){
count=0; // 重設(shè)置中斷 timer 0 */
TMR0=PRETMR0;
while (count}

static void interrupt isr(void) // 中斷函數(shù)
{
if(TMR0IF) // 中斷是否溢出
count++; // Add 1 to count - insert idle comment
TMR0IF = 0; // 清除中斷標(biāo)志位
TMR0=PRETMR0;
}

int strlen(const char * s)
{
const char *cp;

cp = s;
while(*cp++)
continue;
return cp-s-1;
}

void print(char *s){
int len;
int atmp;
len=strlen(s);
for (atmp=0; atmpwdata(s[atmp]);
}


// 檢查總線是否忙
void lcdbusy(){
// char tmpbusy;
TRISB &= 0xF1;
TRISD=0XFF;
LCDRS=0;
LCDRW=1;
LCDE=1; /* SET the LCD read/writing operation IN TO IDLE */
while(LCDDATA & 0X80);
}

/* 光標(biāo), line= 0 for first line, or 1 for second line,col=0 - 15 ;*/
void poscursor(char line, char col){
char pos;
lcdbusy();
pos = line * 0X40 + 0X80 + col;
wcmd(pos);
}
//寫數(shù)據(jù)
void wdata(char data) {

lcdbusy();
TRISB & =0XF1;
TRISD=0;
LCDDATA=data;
LCDRS=1;
LCDRW=0;
LCDE=0;
asm("NOP");
asm("NOP");
LCDE=1;
}
//寫命令
void wcmd(char cmd){

lcdbusy();
TRISB & =0XF1;
TRISD=0;
LCDDATA=cmd;
LCDRS=0;
LCDRW=0;
LCDE=0;
asm("NOP");
asm("NOP");
LCDE=1;
}
//LCD初始化
void lcdinit() {
lcdbusy();
TRISB &= 0XF1;
TRISD=0;

wcmd(CLRLCD);
wcmd(LCDMOD);
wcmd(TURNON);
wcmd(CURMODE);
poscursor(0,0); // 設(shè)置光標(biāo)的起點(diǎn)
}

//DS18B20初始化設(shè)置,RB0連接DQ
void dsinit(){
TRISDQ=0;
DSDQ=0;
delay(20); //保持DSDQ低為10*50 us,重啟DS1820 */
TRISDQ=1;
delay(1); //延時,跳出采樣窗口


if (!DSDQ) /* sample window between min end:15+60, max begin,60 */
/* garrente sample window is between 60 to 75 us */
print(dsfound);
else
print(dsnotfound);
delay(10); //延時480us
}

/* write command to DS1820*/

void wdscmd(char cmd)
{
char tmp;
char i;
TRISDQ=0;
for(tmp=8;tmp>0;tmp--)
{
TRISDQ=0;
DSDQ= 0;
asm ("NOP");
asm ("NOP");
asm ("NOP");
asm ("NOP");
asm ("NOP");
if (cmd & 0x01)
{
TRISDQ=1; //釋放總線
delay(1); //延時60 us
for (i=5;i>0;i--);
}
else {
DSDQ=0 ;
delay(1);
for (i=5;i>0;i--);
TRISDQ=1;
}
cmd=cmd/2;
}
}

//讀溫度
float dsread () {
char tmp=0x01;
float t;
union{
char c[2];
int x;
}temp;
temp.x=0;

while (tmp){ //讀8字節(jié)
TRISDQ=0;
DSDQ=0;
asm("NOP");
TRISDQ=1; // 釋放總線

if (DSDQ) // "1" presented
temp.c[0] |= tmp;
tmp=tmp<<1;
delay(2);
}
tmp=1;
while (tmp){ // 讀八字節(jié)
TRISDQ=0;
DSDQ=0;
asm("NOP");

TRISDQ=1; // 釋放總線
asm("NOP");


if (DSDQ) // "1" presented
temp.c[1] |= tmp;
tmp=tmp<<1;
delay(2);
}
t=((float) temp.x)/16.0 ;
return t;
}

/* Convert integer 'i', radix 10 to a string */
void itoa10(unsigned char *buf, int i) {
unsigned int rem;
unsigned char *s,length=0;

s = buf;
if (i == 0)
*s++ = '0';
else {
if (i < 0) {
*buf++ = '-';
s = buf;
i = -i;
}
while (i)
{
++length;
rem = i % 10;
*s++ = rem + '0';
i /= 10;
}
for(rem=0; ((unsigned char)rem){
*(buf+length) = *(buf+((unsigned char)rem));
*(buf+((unsigned char)rem)) = *(buf+(length-((unsigned char)rem)-1));
*(buf+(length-((unsigned char)rem)-1)) = *(buf+length);
}
}
*s=0;
}

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

9月2日消息,不造車的華為或?qū)⒋呱龈蟮莫?dú)角獸公司,隨著阿維塔和賽力斯的入局,華為引望愈發(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)意到認(rèn)證的所有需求的工具,可用于創(chuàng)建軟件定義汽車。 SODA V工具的開發(fā)耗時1.5...

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

北京2024年8月28日 /美通社/ -- 越來越多用戶希望企業(yè)業(yè)務(wù)能7×24不間斷運(yùn)行,同時企業(yè)卻面臨越來越多業(yè)務(wù)中斷的風(fēng)險,如企業(yè)系統(tǒng)復(fù)雜性的增加,頻繁的功能更新和發(fā)布等。如何確保業(yè)務(wù)連續(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 半導(dǎo)體

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

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

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

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

北京2024年8月27日 /美通社/ -- 8月21日,由中央廣播電視總臺與中國電影電視技術(shù)學(xué)會聯(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ù)(集團(tuán))股份有限公司(以下簡稱"軟通動力")與長三角投資(上海)有限...

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