#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();//释放总线
}