標(biāo)題: 基于STC12C5A60S2的18B20驅(qū)動(dòng) [打印本頁(yè)]

---

作者: 45555mkkl    時(shí)間: 2016-11-7 21:02
標(biāo)題: 基于STC12C5A60S2的18B20驅(qū)動(dòng)
/****************************************************************************/
//程序名稱:     DS18b20頭文件               
          
/****************************************************************************/
#ifndef __DS18B20_H__
#define __DS18B20_H__

//#include <reg52.h>
#include <intrins.h>    //包含_nop_()延時(shí)函數(shù)

#ifndef uchar
#define uchar unsigned char
#endif

#ifndef uint
#define uint  unsigned int
#endif
/******************************************************************************/
//溫度傳感器定義
sbit DQ = P3 ^ 7;//ds18B20
uint tvalue;//溫度值
uchar tflag,flagdat;//溫度正負(fù)標(biāo)志
/******************************ds1820程序***************************************/
void delay_18B20(unsigned int i)//延時(shí)1微秒
{
  // while(i--);
  uint j;
  for(;i>0;i--)
  for(j=12;j>0;j--);


}
/******************************************************************************/
void ds1820rst()//ds1820復(fù)位*
{ unsigned char x=0;
DQ = 1;          //DQ復(fù)位
delay_18B20(4); //延時(shí)
DQ = 0;          //DQ拉低
delay_18B20(100); //精確延時(shí)大于480us
DQ = 1;          //拉高
delay_18B20(40);
   }
   unsigned char ds1820rd()//讀數(shù)據(jù)
{ unsigned char i=0;
unsigned char dat = 0;
for (i=8;i>0;i--)
{   DQ = 0; //給脈沖信號(hào)
    dat>>=1;
    DQ = 1; //給脈沖信號(hào)
    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);//跳過讀序列號(hào)
ds1820wr(0x44);//啟動(dòng)溫度轉(zhuǎn)換
ds1820rst();   
ds1820wr(0xcc);//跳過讀序列號(hào)
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);//溫度值擴(kuò)大10倍，精確到1位小數(shù)
return(tvalue);
}
/******************************************************************************/
#endif

---

作者: 45555mkkl    時(shí)間: 2016-11-7 21:03
經(jīng)測(cè)試用LCD12864顯示正常

---

作者: wuyibin2003    時(shí)間: 2016-11-9 08:29
可以直接讀出18B20的發(fā)射數(shù)據(jù)

---

歡迎光臨 (http://www.torrancerestoration.com/bbs/)

Powered by Discuz! X3.1