18B20通訊程序--源代碼介紹

這是我在16F877,18F1320,18F1220上通過(guò)的18B20程序，18B20主要是延時(shí)問(wèn)題，這個(gè)解決了，什么都可以通過(guò)。

本文引用地址：http://dyxdggzs.com/article/172379.htm

[原作者沒(méi)有提供所使用的編譯器，由于是C程序，所以大同小異，建議使用時(shí)，確認是否與你的編譯器兼容]

#include pic18f1220.h>
#define uch unsigned char
#define unint unsigned int
#define DQ RB3 //定義18B20數據端口
#define DQ_DIR TRISB3 //定義18B20D口方向寄存器
#define W1_INPUT 1
#define W1_OUTPUT 0
#define FALSE 0
#define TRUE !FALSE
#define DQ_HIGH() DQ_DIR = W1_INPUT
#define DQ_LOW() DQ = 0; DQ_DIR = W1_OUTPUT
void delay(unint x)
{
unint d;
d=x;
while(--d)
{;}
}
bit reset(void) //初始化18B20
{
static bit presence; //定義一個(gè)應答信號
DQ_LOW();
delay(70); //置總線(xiàn)為低電平并保持至少480us
DQ_HIGH(); //等電阻拉高總線(xiàn)并保持15－60us
delay(5);
presence=DQ; //接受應答信號
delay(20); //延時(shí)60－240us
return(presence); //返回應答信號
}
//*************** 讀一位函數******************//
bit read_bit(void)
{
static bit i;
DQ_LOW();
DQ_LOW();
DQ_HIGH();
asm(nop);
asm(nop);
asm(nop);
i=DQ;
delay(3);
return(i);
}
//*********************寫(xiě)一位函數****************//
void write_bit(uch bitval)
{
DQ_LOW();
delay(1);
if (bitval==1)
{
DQ_HIGH();
}
delay(3);
DQ_HIGH();
}
//************** 從18B20中讀一個(gè)字節**************//
uch read_byte(void)
{
uch i;
uch j;
uch value=0;
for (i=0;i8;i++)
{
j=read_bit(); //調讀位函數
if (j) //如果是 1 置1
{
value|=(0x01i); //先讀低位，再讀高位
asm(nop);
asm(nop);
asm(nop);
}
} //否則置 0
return(value);
}
//*********************向18B20中 寫(xiě)一個(gè)字節**************//
void write_byte(uch val)
{
uch i;
uch temp;
for (i=0;i8;i++)
{
temp=val>>i;
temp=0x01;
write_bit(temp); //調寫(xiě)位函數
}
asm(nop);
asm(nop);
asm(nop);
}
main()
{
uch teml,temh;
GIE=0;
OSCCON=0X6E; //這是18F1320的頻率選擇寄存器
ADCON1=0X7F;
do{
;
}while (reset()) ; //復位等待從機應答
write_byte(0XCC); //忽略ROM匹配
write_byte(0X44); //發(fā)送溫度轉化命令
delay(25000); //延時(shí)100－300us
do
{
;
}while( reset()); //再次復位，等待從機應答
write_byte(0XCC); //忽略ROM匹配
write_byte(0XBE); //發(fā)送讀溫度命令
teml =read_byte(); //讀出溫度低8
temh=read_byte(); //讀出溫度高8位
DQ_HIGH(); //釋放總線(xiàn)
}