#include <reg51.h>
#include <intrins.h>
unsigned char code displaybit[]={0xfe,0xfd,0xfb,0xf7, 
                                 0xef,0xdf,0xbf,0x7f}; 
unsigned char code displaycode[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,
0xf8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e,0xff,0x40}; 
unsigned char code dotcode[32]={0,3,6,9,12,16,19,22, 
                                25,28,31,34,38,41,44,48, 
                                50,53,56,59,63,66,69,72, 
                                75,78,81,84,88,91,94,97}; 
unsigned char displaycount; 
unsigned char displaybuf[8]={16,16,16,16,16,16,16,16}; 
unsigned char timecount; 
unsigned char readdata[8]; 
sbit DQ=P0^1; 
bit sflag; 
bit resetpulse(void)  //復位子程序
{ 
  unsigned char i; 
  DQ=0; 
  for(i=255;i>0;i--); 
  DQ=1; 
  for(i=60;i>0;i--); 
  return(DQ); 
  for(i=200;i>0;i--); 
} 
void writecommandtods18b20(unsigned char command) //寫ds18b20的命令控制字
{ 
  unsigned char i; 
  unsigned char j; 
  for(i=0;i<8;i++) 
    { 
      if((command & 0x01)==0) 
        { 
          DQ=0;                   //寫0
          for(j=35;j>0;j--); 
          DQ=1; 
        } 
        else 
          { 
            DQ=0;              
            for(j=2;j>0;j--); //寫1
            DQ=1; 
            for(j=33;j>0;j--); 
          } 
      command=_cror_(command,1);  //command的值循環右移一位    
    } 
}


unsigned char readdatafromds18b20(void) 
{ 
  unsigned char i; 
  unsigned char j; 
  unsigned char temp; 
  temp=0; 
  for(i=0;i<8;i++) 
    { 
      temp=_cror_(temp,1); //將讀入的一位值右移一位；因為ds18b20傳數值時是低位在前
      DQ=0; 
      _nop_(); 
      _nop_(); 
      DQ=1; 
      for(j=10;j>0;j--); 
      if(DQ==1) 
        {
          temp=temp | 0x80; //讀入1
        } 
        else 
          { 
            temp=temp | 0x00; //讀入0
          } 
      for(j=200;j>0;j--); 
    } 
  return(temp); 
} 


void main(void) 
{ 
  TMOD=0x01; 
  TH0=(65536-4000)/256; //定時4ms
  TL0=(65536-4000)%256; 
  ET0=1; 
  EA=1; 
  while(resetpulse()); 
  writecommandtods18b20(0xcc); //跳躍ROM命令，同時訪問總路線上所有的從機設備
  writecommandtods18b20(0x44); //啟動溫度轉換命令
  TR0=1; 
  while(1) 
    { 
      ;
    } 
} 


void t0(void) interrupt 1 using 0 
{ 
  unsigned char x; 
  unsigned int result; 
  TH0=(65536-4000)/256; 
  TL0=(65536-4000)%256; 
  if(displaycount==2) 
    { 
      P2=displaycode[displaybuf[displaycount]] | 0x80; 
    } 
    else 
      { 
        P2=displaycode[displaybuf[displaycount]]; 
      } 
  P0=displaybit[displaycount]; 
  displaycount++; 
  if(displaycount==8) 
    { 
      displaycount=0; 
    } 
  
  timecount++; 
  if(timecount==150) 
    { 
      timecount=0; 
      while(resetpulse()); 
      writecommandtods18b20(0xcc); 
      writecommandtods18b20(0xbe); //寫CCH后寫BEH應用于單節點系統
      readdata[0]=readdatafromds18b20(); 
      readdata[1]=readdatafromds18b20(); 
      for(x=0;x<8;x++)
        { 
          displaybuf[x]=16; 
        } 
      sflag=0; 
      if((readdata[1] & 0xf8)!=0x00) 
        { 
          sflag=1; 
          readdata[1]=~readdata[1]; 
          readdata[0]=~readdata[0]; 
          result=readdata[0]+1; 
          readdata[0]=result; 
          if(result>255) 
            { 
              readdata[1]++; 
            } 
        } 
      readdata[1]=readdata[1]<<4; 
      readdata[1]=readdata[1] & 0x70; 
      x=readdata[0]; 
      x=x>>4; 
      x=x & 0x0f; 
      readdata[1]=readdata[1] | x; 
      x=2; 
      result=readdata[1]; 
      while(result/10) 
        { 
          displaybuf[x]=result; 
          result=result/10; 
          x++; 
        } 
      displaybuf[x]=result; 
      if(sflag==1) 
        { 
          displaybuf[x+1]=17; 
        } 
      x=readdata[0] & 0x0f; 
      x=x<<1; 
      displaybuf[0]=(dotcode[x]); 
      displaybuf[1]=(dotcode[x])/10; 
      while(resetpulse()); 
      writecommandtods18b20(0xcc); 
      writecommandtods18b20(0x44); 
    } 
}