PIC單片機(jī):溫感器ds18B20 C語言代碼

 /*溫感器
此為自已寫的，已修正時(shí)序，自測(cè)過延時(shí)時(shí)間
采用天祥溫度轉(zhuǎn)換模塊算法
程序完整版本的下載地址：
 http://www.torrancerestoration.com/f/ds1820pic.rar  
*/
#include<pic.h>
__CONFIG(0X3B31);
#define uint unsigned int
#define uchar unsigned char
#define DQ RC1
#define DQ_DIR TRISC1
#define DQ_HIGH() TRISC1=1
#define DQ_LOW() DQ=0;TRISC1=0

unsigned char shi;           //整數(shù)十位
unsigned char ge;            //整數(shù)個(gè)位
unsigned char shifen;        //十分位
unsigned char baifen;        //百分位
unsigned char qianfen;       //千分位
unsigned char wanfen;        //萬分位

const uchar table[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};//顯示數(shù)組0

void delayus(char x,char y) //慧凈提供的us級(jí)的延時(shí)
{
 char z;     //定義Z
 do {     //先執(zhí)行一次do
  z=y;    //把Y的值給Z
  do{;}while(--z); //do空語句，等待--z，直到z=0結(jié)束，do--while語句，延時(shí)在這產(chǎn)生
  }     
 while (--x);   //同理x在--,再產(chǎn)生延時(shí)
}

void delay(uint x)
{
uint a,b;
for(a=x;a>0;a--)
 for(b=110;b>0;b--);
}
void display(char shi,char ge,char shifen,char baifen,char qianfen)
{
PORTD=table[shi];
PORTA=0x02;
delay(2);

PORTD=table[ge]|0x80; //或上0x80顯示出小數(shù)點(diǎn)
PORTA=0x04;
delay(2);

PORTD=table[shifen];
PORTA=0x06;
delay(2);

PORTD=table[baifen];
PORTA=0x08;
delay(2);

PORTD=table[qianfen];
PORTA=0x0a;
delay(2);
}

void init(void)
{
TRISA=0;PORTA=0x00;
TRISC=0xf0;PORTC=1;
TRISD=0;
}

void reset(void)
{
char pe=1;
while(pe)
 {
 DQ_LOW();
 delayus(2,81);       //延時(shí)502us
 DQ_HIGH();
 delayus(4,4);       //延時(shí)71us
 if(DQ==1)pe=1;  //判斷是否響應(yīng)（響應(yīng)時(shí)拉至低電平），沒響應(yīng)時(shí)置1循環(huán)重發(fā)
 else pe=0;   //否則就是響應(yīng)了，置0以退出循環(huán)
 delayus(2,81);       //延時(shí)502us
 }
}

void write_byte(char val)
{
uchar i,temp;
for(i=8;i>0;i--)     //循環(huán)8次構(gòu)成一個(gè)字節(jié)
 {
 temp=val&0x01;     //取出，最低位，相與取出1
 DQ_LOW();
 delayus(1,1);       //延時(shí)15us
 if(temp==1)DQ_HIGH();   //判斷如果取出的是1時(shí)拉至高電平，發(fā)出去
 delayus(3,3);       //延時(shí)45us，如果取出的是0時(shí)，也發(fā)送去
 DQ_HIGH();      //拉高至高電平
 NOP();NOP();       //延時(shí)2us
 val=val>>1;      //右移一次以便下次取出
 }
}

uchar read_byte(void)
{
uchar i,val=0;
static bit j;   //靜態(tài)位變量，一個(gè)狀態(tài)位，不能是一個(gè)字節(jié)
for(i=8;i>0;i--)
 {
 val=val>>1;   //先移一個(gè)位
 DQ_LOW();   //拉至低電平
 NOP();NOP();NOP();NOP();NOP();NOP(); //延時(shí)6us
 DQ_HIGH();   
 NOP();NOP();NOP();NOP();    //延時(shí)4us
 j=DQ;    //讀取數(shù)據(jù)線的狀態(tài)以得到一個(gè)狀態(tài)位,進(jìn)行數(shù)據(jù)處理 //所以要定義static bit j;
 if(j==1)val=val|0x80;     //數(shù)據(jù)處理：如果讀到是1先放在最高位第1位，再利用逐個(gè)后移就構(gòu)與一個(gè)字節(jié)了
 delayus(1,6);       //延時(shí)30us，以重復(fù)以上步驟
 }
return(val);   //構(gòu)成1個(gè)字節(jié)后返回走
}

void get_temp(void)  //01:40:26 //獲取溫度，器件匹配（多個(gè)溫感）
{
 uchar TLV,THV,num;  //tem1/tem2；還有2個(gè)字節(jié)溫度指令
 float aaa;
 uint temper;
 reset();       //復(fù)位
 write_byte(0xCC);   //跳過ROM
 write_byte(0x44);   //溫度轉(zhuǎn)換，需延時(shí)
 for(num=100;num>0;num--) //原本這里是delay(1000)延時(shí)1秒的。可效果卻是晃一下就沒了，
  display(shi,ge,shifen,baifen,qianfen); //所以用顯示的來代替延時(shí)，顯100次算得差不多就是750ms以上
 reset();     //每次操作RAM之前，需復(fù)位下18B20，再匹配下
 write_byte(0xCC);   //跳過ROM
 write_byte(0xBE);   //告訴它，接下來我就要讀你的溫度了，讀暫存器
 TLV=read_byte();   //RAM有9個(gè)字節(jié)（我們只需要2個(gè)字節(jié)LSB和MSB這兩個(gè)字節(jié)），它讀的時(shí)候都是從最低位開始讀
 THV=read_byte();   //01:45:10處+銳志在58:52分處
 DQ_HIGH();     //釋放總線
 aaa=(THV*256+TLV)*0.0625*1000; //(16位的溫度數(shù)據(jù))*0.0625就是實(shí)際的溫度（十進(jìn)制數(shù)）
 temper=(int)aaa;   //因?yàn)榫幾g時(shí)警告；有小數(shù)點(diǎn)是浮點(diǎn)類到整形轉(zhuǎn)換；我們用強(qiáng)制轉(zhuǎn)換成整形     要把小數(shù)點(diǎn)的值取出來（小數(shù)點(diǎn)不好取，用乘以100來取）
 shi=temper/10000;   //幾十點(diǎn)幾幾分配到五個(gè)數(shù)碼管上，四個(gè)數(shù)碼顯示的感覺怪怪的所以用五個(gè)數(shù)碼管；在1:51:00處講
 ge=temper%10000/1000;  //我是要用五個(gè)數(shù)碼管來顯示所以就是10000五位數(shù)
 shifen=temper%1000/100;  //
 baifen=temper%100/10;  //
 qianfen=temper%10;   // 
}

void main()
{
init ();
while(1)
 {
 get_temp();
 display(shi,ge,shifen,baifen,qianfen);  //沒帶形參編譯器過不了，帶類形的形參也過不了
 }
}