#include <STC15F2K60S2.H>
#include <DS1302.H>
#include <onewire.h>

sbit s7=P3^0;
sbit s6=P3^1;
sbit s5=P3^2;
sbit s4=P3^3;
sbit L1=P0^0;
unsigned char table[18] = {0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,
							0x88,0x80,0xc6,0xc0,0x86,0x8e,0xbf,0x7f};
unsigned char write_time[3] = {0x80,0x82,0x84};
unsigned char read_time[3] = {0x81,0x83,0x85};
unsigned char time[3] = {0x50,0x59,0x23}; //23 时 59 分 50 秒

unsigned char interval = 1;//温度采样间隔时间   分别为 1 秒、5 秒、30 秒和 60 秒；
unsigned char temps[10]= {0};  //存放10组温度值
unsigned char index=0; //存放温度的数组的下标值
unsigned char temp;    //存放每一次的温度值
unsigned char temp_num=0; //存放温度的数量标志位
unsigned char temp_f=1;   //温度读取开关标志位
unsigned int  temp_c=0;   //温度读取时间间隔的标志位 
unsigned char k6 = 0;   //控制读取后将每一个温度依次显示

unsigned char smg_sta=0; //数码管显示模式标志位置 0显示参数设置界面（上电默认）1时钟显示界面 
unsigned char smg_f=1; //数码管提示符闪烁标志位
unsigned char count=0;  //定时器计数

unsigned char led = 0;//LED灯标志位

/*======================================================================================
数码管延时函数，寄存器选择函数，数码管显示函数
======================================================================================*/
void delay_ms(int n)
{
	int i,j;
	for(i=n;i>0;i--)
		for(j=110;j>0;j--);
}
void selectHC(unsigned char n)
{
	switch(n)
	{
		case 4: P2 = (P2&0x1f) | 0x80; break;
		case 5: P2 = (P2&0x1f) | 0xa0; break;
		case 6: P2 = (P2&0x1f) | 0xc0; break;
		case 7: P2 = (P2&0x1f) | 0xe0; break;
		case 0: P2 = (P2&0X1f) | 0x00; break;
	}
}
void show(unsigned char w,unsigned char n)
{
	selectHC(7);
	P0 = 0xff;
	selectHC(6);
	P0 = 0x01 << w ;
	selectHC(7);
	P0 = n;
	selectHC(0);	
}
void showall(unsigned char dat)
{
	selectHC(6);
	P0=0xff;
	selectHC(7);
	P0=dat;	
	selectHC(0);
}

/*======================================================================================
ds18b20 温度读取函数
======================================================================================*/
unsigned char read_temp()
{
	unsigned char LSB;
	unsigned char MSB;	
	unsigned char temp1;
	unsigned int recv;

	init_ds18b20();
	Write_DS18B20(0xcc);
	Write_DS18B20(0x44);
	
	delay_ms(1);	

    init_ds18b20();
	Write_DS18B20(0xcc);
	Write_DS18B20(0xbe);

	LSB=Read_DS18B20();
	MSB=Read_DS18B20();

	temp1=(MSB<<8)|LSB;
	if ((temp1 & 0xf8000) == 0x0000)
	{
		recv=temp1>>4;
	}


	return recv; 
}
void tempTen()
{
	if(smg_sta==1) //数码管显示模式为第二种的时候，才开始温度读取
	{
		if(temp_num<=9)
		{
			if(temp_f==1) //温度读取开关为1的时候，才开始读取温度
			{
				temps[index]=read_temp();
				index++;
				temp_f=0;
				temp_num++;		
			}	
		}
		else if(temp_num>=10)
		{
			led=1;
		}
	}	
}
/*======================================================================================
ds1302时钟	 读和写函数
======================================================================================*/
void write_ds1302()
{
	unsigned char i;
	Write_Ds1302(0x8e,0x00);
	for(i=0;i<=2;i++)
	{
		Write_Ds1302(write_time[i],time[i]);
	}
	Write_Ds1302(0x8e,0x80);
}
void read_ds1302()
{
	unsigned char i;
	for(i=0;i<=2;i++)
	{
		time[i]=Read_Ds1302 (read_time[i]);
	}
}

/*=====================================================================================
定时器函数 初始化函数 服务函数	 定时10ms
======================================================================================*/
void init()
{
	TMOD=0x01; 	
	TH0=(65536-10000)/256;
   	TL0=(65536-10000)%256;
	TR0=1;
	ET0=1;
	EA=1;
}

void timer() interrupt 1
{
	TH0=(65536-10000)/256;
   	TL0=(65536-10000)%256;		
	count++;
	if(count>=100)
	{
		count=0;
		smg_f=~smg_f;
	}
	if(temp_f==0)
	{
		temp_c++;
	}
	if(temp_c>=interval*100) //100个10ms就是1s，
	{
		temp_c = 0; //读取标志位清0
		temp_f = 1;	//温度读取开关打开 置1
	}
}
/*======================================================================================
数码管显示函数
======================================================================================*/
void showsmg()
{
	if(smg_sta==0)
	{
		show(5,table[16]);
		delay_ms(1);
		show(6,table[interval/10]);
		delay_ms(1);
		show(7,table[interval%101]);
		delay_ms(1);
	}
	else if(smg_sta==1)
	{
		show(0,table[time[2]/16]);
		delay_ms(1);
		show(1,table[time[2]%16]);
		delay_ms(1);
		if(smg_f==1)
		{
			show(2,table[16]);
			delay_ms(1);
		}					  
	    show(3,table[time[1]/16]);
		delay_ms(1);
		show(4,table[time[1]%16]);
		delay_ms(1);
		if(smg_f==1)
		{
			show(5,table[16]);
			delay_ms(1);
		}
		show(6,table[time[0]/16]);
		delay_ms(1);
		show(7,table[time[0]%16]);
		delay_ms(1);
	}
	else if(smg_sta==2)
	{
		show(0,table[16]);
		delay_ms(1);
		show(1,table[index/10]);
		delay_ms(1);
		show(2,table[index%10]);
		delay_ms(1);
		show(5,table[16]);
		delay_ms(1);
		show(6,table[temps[index]/10]);
		delay_ms(1);
		show(7,table[temps[index]%10]);
		delay_ms(1);
	}
	showall(0xff);
}
/*=====================================================================================
LED指示灯函数
======================================================================================*/
void LEDruning()
{
	selectHC(4);
	if(led==1)
	{
		if(smg_f==1)
		{
			L1=0;
		}
		else if(smg_f==0)
		{
			L1=1;
		}
	}
	selectHC(0);	
}

/*=====================================================================================
按键开关扫描函数
======================================================================================*/
void keys()
{
	unsigned char i; 
	if(s7==0)
	{
		delay_ms(1);
		if(s7==0)
		{
		  	while(s7==0)
			{
				showsmg();
			}
			if(smg_sta==2)
			{
			    smg_sta=0;
			}
			temp_num=0;
			index=0;
			temp_f=1;
			k6=0;
			for(i=0;i<10;i++)
			{
				temps[i]=0;
			}
		}
	}
	if(s6==0)
	{
		delay_ms(1);
		if(s6==0)
		{
			while(s6==0)
			{
				showsmg();	
			}
			if(smg_sta==1)
			{
				smg_sta=2;
			}
			if(led==1)
			{
				led=0;
			}
			if(smg_sta==2)
			{
				k6++;
				if(k6>1)
				{
					index++;
				}
				if(index>=10)
				{
					index=0;
					k6=1;
				}
			}	
		}		
	}

	if(s5==0)
	{
		delay_ms(1); 
		if(s5==0)
		{
			while(s5==0)
			{
				showsmg();
			}
			if(smg_sta==0)
			{
				smg_sta=1;
			}
		}
	}

	if(s4==0)
	{
		delay_ms(1); 
		if(s4==0)
		{
			while(s4==0)
			{
				showsmg();
			}
			if(smg_sta==0)
			{
				if(interval==1)
				{
					interval=5;
				}
				else if(interval==5)
				{
					interval=30;  
				}
				else if(interval==30)
				{
					interval=60;
				}
				else if(interval==60)
				{
					interval=1;
				}
			}
		}
	}
}


/*======================================================================================
主函数
======================================================================================*/
void main()
{
    selectHC(4);
	P0=0xff;
	selectHC(5);
	P0=0x00;
	selectHC(0);
 	write_ds1302();
	read_temp();
	init();
	while(1)
	{
	 	read_ds1302();
		tempTen();
		keys();
		showsmg();
		LEDruning();
	}
}