# include "reg51.h" 
# include "intrins.h" 

# define   disdata  P0
# define   discan   P2

# define uchar unsigned char 
# define uint unsigned int 

sbit DQ = P3^7; //溫度輸入口
sbit DIN = P0^7;//led小數(shù)點(diǎn)控制
/*sbit P3_4 = P3^4; //溫度輸入口
sbit P3_5 = P3^5; //溫度輸入口
sbit P3_6 = P3^6; //溫度輸入口
sbit P3_7 = P3^7; //溫度輸入口
 
 
uchar  DQ;	*/
uint h;
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]= {0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0xff,0xbf};
 
uchar code scan_con[4]={0xf7,0xfB,0xFD,0xFE};//列掃描控制字 
uchar data temp_data[2]={0x00, 0x00,}; 		//讀出溫度暫存
uchar data display[5]={0x00,0x00,0x00,0x00,0x00}; //顯示單元數(shù)據(jù)，共4個(gè)數(shù)據(jù)，1個(gè)運(yùn)算暫存用
  
void delay(uint t) 
{ 
for(;t>0;t--); 
}

/******************************顯示掃描函數(shù)******************************/ 
scan() 
{ 
  char k; 
  for(k=0;k<4;k++) 		//4位LED掃描控制
  { 
   disdata=dis_7[display[k]]; 
   if(k==1){DIN=0;} 		 //當(dāng)K=1時(shí)，P0^7為低電平顯示小數(shù)點(diǎn)
   discan=scan_con[k];	 //列掃描
   delay(30);
   discan=0xFF; 
  } 
}

/*******************************DS復(fù)位函數(shù)******************************/ 
ow_reset(void) 
{ 
  char presence=1; 

  while(presence) 
  { 
   while(presence) 
   { 
    DQ=1;_nop_();_nop_(); 
    DQ=0; 
    delay(50);  //延時(shí)550毫秒
    DQ=1; 
    delay(6); 
    presence=DQ; 
   } 
    delay(45); 
    presence=~DQ; 
  } 
    DQ=1; 
 }  
    
 /*****************************DS寫命令函數(shù)*********************************/ 
 void write_byte(uchar val)  //向1-WIRE總線上寫一字節(jié)
 { 
  uchar i;
  
  for(i=8;i>0;i--) 
  { 
   DQ=1;_nop_();_nop_(); 
   DQ=0;_nop_();_nop_();_nop_();_nop_();_nop_(); 

   DQ=val&0x01; 	//最低位移出
   delay(6); 

   val=val/2; 	//右移1位
  } 
   DQ=1; 
   delay(1); 
 }
  
/*******************************DS讀一字節(jié)函數(shù)****************************************************/  
 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_();
   
   DQ=1;_nop_();_nop_();_nop_();_nop_(); 

   if(DQ) value|=0x80; 
   delay(6); 
  } 
  DQ=1; 
  return(value); 
 }
  
 /******************************讀出溫度函數(shù)*************************************************/ 
 read_temp() 
 { 
  ow_reset(); 
  write_byte(0xcc); 
  write_byte(0xbe);
  
  temp_data[0]=read_byte(); 
  temp_data[1]=read_byte(); 

  ow_reset(); 
  write_byte(0xcc); 
  write_byte(0x44); 
 }
  
 /********************************計(jì)算溫度子函數(shù)**********************************************/ 
 work_temp() 
 { 
  uchar n=0; 
  if(temp_data[1]>127) 
   {temp_data[1]=(255-temp_data[1]);temp_data[0]=(255-temp_data[0]);n=1;} //負(fù)溫度求補(bǔ)碼

  display[4]=temp_data[0]&0x0f;display[0]=ditab[display[4]]; 
  display[4]=((temp_data[0]&0xf0)>>4)|((temp_data[1]&0x0f)<<4) ; 
   
  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]=0x0a; 
  if(!display[2]){display[2]=0x0a;}} //最高位為0時(shí)不顯示
  if(n){display[3]=0x0b;} 			 //負(fù)溫度是最高為顯示“-”
 }
  
 /*******************************主函數(shù)**********************************************************/ 
 main () 
 { 
  disdata=0xff;// 初始化端口
  discan=0xff;
						 
  for(h=0;h<4;h++)		  //開機(jī)顯示“8888”scan();
  {display[h]=8;}
  
  ow_reset(); 		//開機(jī)先轉(zhuǎn)換一次
  write_byte(0xcc);//skip ROM 
  write_byte(0x44);//發(fā)轉(zhuǎn)換命令
   
  for(h=0;h<500;h++)//開機(jī)顯示“8888”兩秒 
   {scan();} 

  while(1) 
   { 
    read_temp();  //讀出溫度數(shù)據(jù)
    work_temp();  //處理溫度數(shù)據(jù)
    for(h=0;h<500;h++) //顯示溫度兩秒
     {scan();} 
    } 
}