18B20通讯程序-PIC

这是我在16F877,18F1320,18F1220上通过的18B20程序，18B20主要是延时问题，这个解决了，什么都可以通过。

[原作者没有提供所使用的编译器，由于是C程序，所以大同小异，建议使用时，确认是否与你的编译器兼容]

#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; //定义一个应答信号
    DQ_LOW(); 
    delay(70); //置总线为低电平并保持至少480us
    DQ_HIGH(); //等电阻拉高总线并保持15－60us
    delay(5); 
    presence=DQ; //接受应答信号
    delay(20); //延时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); 
} 
//*********************写一位函数****************//
void write_bit(uch bitval) 
{ 
    DQ_LOW(); 
    delay(1); 
    if (bitval==1) 
    { 
        DQ_HIGH(); 
    } 
    delay(3); 
    DQ_HIGH(); 
} 
//************** 从18B20中读一个字节**************//
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中 写一个字节**************//
void write_byte(uch val) 
{ 
    uch i; 
    uch temp; 
    for (i=0;i8;i++) 
    { 
        temp=val>>i; 
        temp=0x01; 
        write_bit(temp); //调写位函数
    } 
    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); //发送温度转化命令
    delay(25000); //延时100－300us
    do 
    { 
        ; 
    }while( reset()); //再次复位，等待从机应答
    write_byte(0XCC); //忽略ROM匹配
    write_byte(0XBE); //发送读温度命令
    teml =read_byte(); //读出温度低8
    temh=read_byte(); //读出温度高8位
    DQ_HIGH(); //释放总线
}