#include <reg51.h>
#include <intrins.h>            //_nop_();延时函数用
#define  Disdata P2                //段码输出口
#define  discan  P3                //扫描口
#define  uchar unsigned char
#define  uint  unsigned int
sbit     DQ=P1^7;                   //温度输入口
sbit     DIN=P2^7;                  //LED小数点控制
uint     h;
uint     temp;
//
//
//**************温度小数部分用查表法***********//
uchar code ditab[16]=
{0x00,0x01,0x01,0x02,0x03,0x03,0x04,0x04,0x05,0x06,0x06,0x07,0x08,0x08,0x09,0x09};
//
//uchar code dis_7[12]={0xfc,0x60,0xda,0xf2,0x66,0xb6,0xbe,0xe0,0xfe,0xf6,0xff,0x02};
uchar code dis_7[12]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0xff,0xbf};
//共阳LED段码表        "0"  "1"  "2"  "3"  "4"  "5"  "6"  "7"  "8"  "9" "不亮" "-"             
uchar code scan_con[4]={0x08,0x04,0x02,0x01};  //列扫描控制字
uchar data temp_data[2]={0x00,0x00};           //读出温度暂放
uchar data display[5]={0x00,0x00,0x00,0x00,0x00};  //显示单元数据，共4个数据和一个运算暂用

//
/*****************11us延时函数*************************/
//
void delay(uint t)
{
  for (;t>0;t--);
}
//

/****************显示扫描函数***************************/
scan()
{
    char k;
    for(k=0;k<4;k++)    //4位LED扫描控制
    {
           
        discan=scan_con[k];         //送位选
        Disdata=dis_7[display[k]];  //送段码数据
                  
        if (k==1)   //小数点显示
        {
           DIN=0;
        }
        delay(300);
   }
}
//
//
/****************DS18B20复位函数************************/
ow_reset(void)
{
    char presence=1;
    while(presence)
    {
        while(presence)
        {
             DQ=1;     
    _nop_();_nop_();
             DQ=0;             //从高拉倒低                         
             delay(50);        //550 us
             DQ=1;                                       
             delay(6);        //66 us
             presence=DQ;     //presence=0 复位成功,继续下一步
        }
        delay(45);            //延时500 us
        presence=~DQ;        
    }
    DQ=1;                   //拉高电平
}
//
//
/****************DS18B20写命令函数************************/
//向1-WIRE 总线上写1个字节
void write_byte(uchar val)
{
  uchar i;
  for(i=8;i>0;i--)
  {
   DQ=1;
   _nop_();_nop_();                 
   DQ=0;           //从高拉倒低
   _nop_();_nop_();_nop_();_nop_();  //5 us
   DQ=val&0x01;                      //最低位移出
   delay(6);                          //66 us
   val=val>>1;                         //右移1位
   }
   DQ=1;
   delay(1);
}
//
/****************DS18B20读1字节函数************************/
//从总线上取1个字节
uchar read_byte(void)
{
    uchar i;
    uchar value=0;
    for(i=8;i>0;i--)
    {
        DQ=1;
        _nop_();_nop_();
        value>>=1;
        DQ=0;
        _nop_();_nop_();_nop_();_nop_();    //4 us
        DQ=1;
        _nop_();_nop_();_nop_();_nop_();    //4 us
        if(DQ)value|=0x80;
        delay(6);                           //66 us
    }
    DQ=1;
    return(value);
}
//
/****************读出温度函数************************/
//
read_temp()
{
    ow_reset();              //总线复位
    delay(200);
    write_byte(0xcc);        //发命令
    write_byte(0x44);        //发转换命令
    ow_reset();
    delay(1);
    write_byte(0xcc);          //发命令
    write_byte(0xbe);
    temp_data[0]=read_byte();  //读温度值的低字节
    temp_data[1]=read_byte();  //读温度值的高字节
    temp=temp_data[1];
    temp<<=8;                                              
    temp=temp|temp_data[0];     // 两字节合成一个整型变量。
    return temp;                //返回温度值
}
//
/****************温度数据处理函数************************/

//二进制高字节的低半字节和低字节的高半字节组成一字节,这个
//字节的二进制转换为十进制后,就是温度值的百、十、个位值,而剩
//下的低字节的低半字节转化成十进制后,就是温度值的小数部分

/********************************************************/
work_temp(uint tem)
{
    uchar n=0;
    if(tem>6348)                // 温度值正负判断
 {tem=65536-tem;n=1;}      // 负温度求补码,标志位置1
    display[4]=tem&0x0f;      // 取小数部分的值
    display[0]=ditab[display[4]];  // 存入小数部分显示值
    display[4]=tem>>4 & 0xff; // 取中间八位,即整数部分的值
    display[3]=display[4]/100;     // 取百位数据暂存
    display[1]=display[4]%100;     // 取后两位数据暂存
    display[2]=display[1]/10;      // 取十位数据暂存
    display[1]=display[1]%10; 
/******************符号位显示判断**************************/
    if(!display[3])
    {
        display[3]=10;      //最高位为0时不显示
        if(!display[2])
        {
            display[2]=10;  //次高位为0时不显示
        }
    }
    if(n)
 {
     display[3]=11;   //负温度时最高位显示"-"
 }     
}

/****************主函数************************/
main()
{
    Disdata=0x00;           //初始化端口
    discan=0x00;
    for(h=0;h<4;h++)        //开机显示"8888"
    {
     display[h]=8;
 }
    ow_reset();             //开机先转换一次
    write_byte(0xcc);       //Skip ROM
    write_byte(0x44);       //发转换命令
    for(h=0;h<100;h++)      //开机显示"8888"
    {
     scan();
 }
    while(1)
    {
        work_temp(read_temp());  //处理温度数据
        scan();                  //显示温度值
    }
}