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;i<8;i++)
        {
                j=read_bit();//调读位函数 
                
                if (j)//如果是 1 置1 
                {
                        value|=(0x01<<i);//先读低位，再读高位 
                        asm("nop");
                        asm("nop");
                        asm("nop");
                }
        }//否则置 0 
        return(value);
}

//*********************向18B20中 写一个字节**************// 

void write_byte(uch val)
{
        uch i;
        uch temp;
        
        for (i=0;i<8;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();//释放总线 
}