18B20通讯程序

这是我在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();//释放总线
}

本文关键字：程序  PIC单片机，单片机-工控设备 - PIC单片机