//**********************陸軍上將******************************//
#include<reg51.h>
#include<absacc.h>
#include <intrins.h>
#define uchar unsigned char
#define uint unsigned int

sbit out=P1^0;
sbit DQ=P2^3;
uchar temp_value;      //溫度值
uchar TempBuffer[5];
int dist[4];
int ddist;
uchar cdist[6];
////////////////////////////////////////////////
/////////////////////////////////////
/////////////////////////發射函數
void send(void){
int i;
TMOD=0X51;
TR0=1;
for(i=20;i>0;i--)
{
TH0=(65536-12)/256;
TL0=(65536-12)%256;
do{}while(!TF0);
out=!out;
TF0=0;
}
TR0=0;
TR1=1;
}

//////////////////////////////////////////////////////////
/////////////////////////////////////////////////
/**********溫度計**********************/
void delay_18B20(unsigned int i)
{
	while(i--);
}
void Init_DS18B20(void) 
{
	 unsigned char x=0;
	 DQ = 1;          //DQ復位
	 delay_18B20(8);  //稍做延時
	 DQ = 0;          //單片機將DQ拉低
	 delay_18B20(80); //精確延時 大于 480us
	 DQ = 1;          //拉高總線
	 delay_18B20(14);
	 x=DQ;            //稍做延時后 如果x=0則初始化成功 x=1則初始化失敗
	 delay_18B20(20);
}
unsigned char ReadOneChar(void)
{
	uchar i=0;
	uchar dat = 0;
	for (i=8;i>0;i--)
	 {
		  DQ = 0; // 給脈沖信號
		  dat>>=1;
		  DQ = 1; // 給脈沖信號
		  if(DQ)
		  dat|=0x80;
		  delay_18B20(4);
	 }
 	return(dat);
}


void WriteOneChar(uchar dat)
{
 	unsigned char i=0;
 	for (i=8; i>0; i--)
 	{
  		DQ = 0;
 		DQ = dat&0x01;
    	delay_18B20(5);
 		DQ = 1;
    	dat>>=1;
 }
}
void ReadTemp(void)
{
	unsigned char a=0;
	unsigned char b=0;
	unsigned char t=0;

	Init_DS18B20();
	WriteOneChar(0xCC);    	// 跳過讀序號列號的操作
	WriteOneChar(0x44); 	// 啟動溫度轉換

	delay_18B20(100);       // this message is wery important

	Init_DS18B20();
	WriteOneChar(0xCC); 	//跳過讀序號列號的操作
	WriteOneChar(0xBE); 	//讀取溫度寄存器等（共可讀9個寄存器） 前兩個就是溫度

	delay_18B20(100);

	a=ReadOneChar();    	//讀取溫度值低位
	b=ReadOneChar();   		//讀取溫度值高位
	temp_value=b<<4;
	temp_value+=(a&0xf0)>>4;               
}
void temp_to_str()   //溫度數據轉換成液晶字符顯示
{  if(temp_value<100&temp_value>0){
  TempBuffer[0]=temp_value/10+'0';  //十位
  TempBuffer[1]=temp_value%10+'0';  //個位
  TempBuffer[2]=0xdf;   //溫度符號
  TempBuffer[3]='C';
  TempBuffer[4]='\0';
} }


/////////////////////////////////////////////////////////
//////////////////////////////////////////
////////////////////////////////// 	lcd顯示器

sbit rs= P2^0;
sbit rw = P2^1;
sbit ep = P2^2;

void delaym(uint i){
while(--i);}

void delay(unsigned char ms)
{
unsigned char i;
while(ms--)
{
for(i = 0; i< 250; i++)
{
_nop_();
_nop_();
_nop_();
_nop_();
}
}
}

bit lcd_bz()
{
bit result;
rs = 0;
rw = 1;
ep = 1;
_nop_();
_nop_();
_nop_();
_nop_();
result = (bit)(P0 & 0x80);
ep = 0;
return result;
}
void lcd_wcmd(unsigned char cmd)
{
while(lcd_bz());
rs = 0;
rw = 0;
ep = 0;
_nop_();
_nop_();
P0 = cmd;
_nop_();
_nop_();
_nop_();
_nop_();
ep = 1;
_nop_();
_nop_();
_nop_();
_nop_();
ep = 0;
}
void lcd_pos(unsigned char pos)
{
lcd_wcmd(pos | 0x80);
}

void lcd_wdat(unsigned char dat)
{
while(lcd_bz());//判斷LCD是否忙碌
rs = 1;
rw = 0;
ep = 0;
P0 = dat;
_nop_();
_nop_();
_nop_();
_nop_();
ep = 1;
_nop_();
_nop_();
_nop_();
_nop_();
ep = 0;
}
void lcd_init()
{
lcd_wcmd(0x00);
delay(1);
lcd_wcmd(0x38);
delay(1);
lcd_wcmd(0x0c);
delay(1);
lcd_wcmd(0x06);
delay(1);
lcd_wcmd(0x01);
delay(1);

////////////////////////////////////////////////////////////////////////////////////
}////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////顯示溫度
void showtemp(void){
unsigned char i=0;
ReadTemp();
temp_to_str();
for(i=0;i<5;i++){
lcd_pos(0x4c+i);// 設置顯示位置
lcd_wdat(TempBuffer[i]);// 顯示字符
}
}

///////////////////////////////////////////////////////////
/////////////////////////////////////////////
/////////////////////////////////中斷接收函數
void dtime(void){

dist[2]=dist[0]*256+dist[1];
dist[3]=dist[2]*34/100;
cdist[0]=dist[3]/1000+'0';
cdist[1]=(dist[3]/100)%10+'0';
cdist[2]=(dist[3]%100)/10+'0';
cdist[3]=dist[3]%10+'0';
}

void service_int0() interrupt 0 using 1{
uint j;
IP=0x00;
IE=0x00;
TR1=0;
delaym(10);
dist[0]=1;
dist[1]=4;
dtime();
for(j=0;j<4;j++){
lcd_pos(j);
delaym(10);
lcd_wdat(cdist[j]);
}
IP=0x01;
IE=0x85;

}
////////////////////////////////////////////////////////////////////////////////
 ///////////////////////////////////////////////////////////////
 /////////////////////////////////////////主函數

void main(void)
{

IP=0x01;
IE=0x85;
lcd_init();
while(1){
send();
showtemp();
}
}