#include <reg52.h>
#define uint unsigned int
#define uchar unsigned char 

sbit rs=P2^0;      //數(shù)據(jù)\指令 選擇
sbit rw=P2^1;      //讀/寫 選擇   
sbit e=P2^2;       //讀/寫 使能 
sbit ds=P1^0;      //18B20信號(hào)腳
uint temp;
float ftemp;
uchar code table[]="0123456789.CT:";

void writecom(uchar com); 	//寫命令函數(shù)
void writedat(uchar dat); 	//寫數(shù)據(jù)函數(shù)
void initinal(void);

void delay50us(uint t)  	//12MHZ晶振 延時(shí)50微秒 
{
	uchar j;
		for(;t>0;t--)
   			for(j=19;j>0;j--);
}
void dsreset()    			//ds18b20初始化函數(shù)
{
	uint i;
  	ds=0;         			//拉低總線開始復(fù)位
  	i=103;
  	while(i>0)i--;
  	ds=1;		  		//釋放總線
  	i=4;
  	while(i>0)i--;			//省去了等待芯片返回應(yīng)答的過程
}
bit readbit(void)  			//ds18b20讀取一個(gè)二進(jìn)制位,參照時(shí)序圖
{
	uint i;
  	bit dat;
  	ds=0;i++;
  	ds=1;i++,i++;
  	dat=ds;
  	i=8;while(i>0)i--;
  	return(dat);
}
uchar tempread(void)  		//ds18b20讀取一個(gè)字節(jié)的數(shù)據(jù)
{
	uchar i,j,dat;
  	dat=0;
  	for(i=0;i<8;i++)
  	{
  		j=readbit();
  		dat=(j<<7)|(dat>>1);  
  	}
  	return(dat);
}
void tempwrite(uchar dat) 	//ds18b20寫入字節(jié)數(shù)據(jù)
{
	uint i;uchar j;
	bit testb;
	for(j=1;j<=8;j++)
		{
			testb=dat&0x01;
		  	dat=dat>>1;
		    if(testb==1)    	//寫1
			   {
			    	ds=0;       //拉低總線以開始一個(gè)寫時(shí)序
			  		i++;i++;
			  		ds=1;    	//釋放總線
			  		i=8;
					while(i>0) i--;
			   }
	   		else       			//寫0
			   {
			   		ds=0;
			  		i=8;
					while(i>0)i--;
			 		ds=1;
			  		i++;i++;
			   }
	 	}
}
void tempwendu(void) 		//轉(zhuǎn)換溫度
{
	 dsreset();				//ds18b20初始化函數(shù)
	 delay50us(20); 
	 tempwrite(0xcc);   
	 tempwrite(0x44); 
}
uint gettemp()  			//獲取溫度
{
	uchar a,b;
  	dsreset();				//ds18b20初始化函數(shù)
  	delay50us(2000);    	//延時(shí)100
  	tempwrite(0xcc);   	
  	tempwrite(0xbe);
	delay50us(2); 	 
  	a=tempread();   	
  	b=tempread();    	 
  	temp=b;
  	temp<<=8;       	
  	temp=temp|a;
  	ftemp=temp*0.0625;      
  	temp=ftemp*10+0.5;   
  	ftemp=ftemp+0.05;    
  	return temp;                   
}  
/****************LCD檢查忙位*******************/
void chkbusy()
{
    rs=0;
    rw=1;
    e=1;
    P0=0xff;
    while((P0&0x80)==0x80);
    e=0;
}
/*****************讀LCD數(shù)據(jù)******************/
uchar read()
{
	uchar shuju;
	chkbusy();
	P0=0xff;
	rs=1;                         
	rw=1;   
	e=0; 
	delay50us(1);                    
	e=1;
	shuju=P0;            
	e=0;
	return(shuju);   
}
/***********寫命令**********/
void writecom(uchar com)
{ 
	chkbusy();
  	rw=0;
  	rs=0;
  	delay50us(1);
  	P0=com;
  	e=1;
  	delay50us(10);
  	e=0;
  	delay50us(10);
}
/*************寫數(shù)據(jù)****************/
void writedat(uchar dat)
{  
  	chkbusy();
  	rw=0;
  	rs=1;
  	delay50us(1);
  	P0=dat;
  	e=1;
  	delay50us(10);
  	e=0;
  	delay50us(10);
}
/****************初始化12864*****************/
void initinal(void)
{
  	delay50us(1000);
  	writecom(0x30);
  	delay50us(4);
  	writecom(0x30);
  	delay50us(2);
  	writecom(0x0e);
  	delay50us(4);
  	writecom(0x01);
  	delay50us(400);
  	writecom(0x06);
  	delay50us(10);
}
/*************畫點(diǎn)程序**************/
void DrawPoint(uchar X,uchar Y,uchar Color)
{
    uchar Row,Tier,Tier_bit ;
    uchar ReadOldH,ReadOldL ;
    writecom(0x34);	  //擴(kuò)充指令操作
    writecom(0x36);
    Tier=X>>4;
    Tier_bit=X&0x0f;
    if(Y<32)
	    {
	        Row=Y;
	    }
    else 
	    {
	        Row=Y-32;
	        Tier+=8;
	    }
    writecom(Row+0x80);
    writecom(Tier+0x80);
    read();
    ReadOldH=read();
    ReadOldL=read();
    writecom(Row+0x80);
    writecom(Tier+0x80);
    if(Tier_bit<8)
	    {
	        switch(Color)
	        {
	            case 0 :ReadOldH&=(~(0x01<<(7-Tier_bit))); break;
	            case 1 :ReadOldH|=(0x01<<(7-Tier_bit));    break;
	            case 2 :ReadOldH^=(0x01<<(7-Tier_bit));    break;
	            default : break;
	        }
	        writedat(ReadOldH);
	        writedat(ReadOldL);
	    }
    else 
	    {
	        switch(Color)
	        {
	            case 0 :ReadOldL&=(~(0x01<<(15-Tier_bit))); break;
	            case 1 :ReadOldL|=(0x01<<(15-Tier_bit)); break;
	            case 2 :ReadOldL^=(0x01<<(15-Tier_bit)); break;
	            default : break;
	        }
	        writedat(ReadOldH);
	        writedat(ReadOldL);
	    }
    writecom(0x30);		//基本指令操作
}
/***************清屏函數(shù)*****************/
void clrscreen()
{
	writecom(0x01);
	delay50us(10);
}
/************清整個(gè)GDRAM空間***************/
void clrgdram()
{
    unsigned char x,y ;
    for(y=0;y<64;y++)
    	for(x=0;x<16;x++)
	    	{
		        writecom(0x34);
		        writecom(y+0x80);   //行地址
		        writecom(x+0x80);   //列地址
		        writecom(0x30);		//基本指令操作
		        writedat(0x00);
		        writedat(0x00);
	    	}				
}
/*************主函數(shù)********************/
void main()
{  
    uchar i=0,j,e,colour=1;
 	uint a;
	rw=0;	       	   //寫
    initinal();	       //初始化12864
    clrgdram();	       //清整個(gè)GDRAM空間
    delay50us(2);
 	//writecom(0x34);	   //擴(kuò)充指令操作
	writecom(0x0c);
 	while(1)
		{
	   		uint a,b,c,d;
	    	DrawPoint(17,6,colour);
	    	DrawPoint(17,22,colour);
	    	DrawPoint(17,38,colour);
	    	DrawPoint(17,54,colour);
	  		for(j=16;j<124;j++)
		    	{     
			    	DrawPoint(16,j-16,colour);
			  		DrawPoint(j,63,colour);
			     	writecom(0x80);
			     	writedat(table[6]);
			    	writedat(table[7]);
					writecom(0x90);
			     	writedat(table[5]);
			  		writedat(table[1]);
			  		writecom(0x88);
			     	writedat(table[3]);
			  		writedat(table[5]);
			  		writecom(0x98);
			    	writedat(table[1]);
			  		writedat(table[9]);
		    	}
	  	   for(i=16;i<124;i++)
	       	{     
	    		tempwendu();   //轉(zhuǎn)換溫度
	       		a=gettemp();   //獲取溫度
	    		e=73-a/10; 
	       		DrawPoint(i,e,colour);
	    		delay50us(10000);
	      		b=a/100;
	   			c=a%100/10;
	   			d=a%100%10;
				writecom(0x82); 	//寫地址
	   			writedat(table[12]);
	   			delay50us(1);
				writedat(table[13]);
	   			delay50us(1);
	   			writecom(0x83); 	//寫地址
	   			writedat(table[b]);
	   			delay50us(1);
	   			writedat(table[c]);
	   			delay50us(1);
	   			writedat(table[10]);
	   			delay50us(1);
	   			writedat(table[d]);
	   			delay50us(1);
	   			writedat(table[11]);
	   			delay50us(4); 
	    	} 
	      clrgdram();				//清整個(gè)GDRAM空間
	 	}

}