clock.c

用单片机实现时钟功能、带闹铃设置和时间修改

/*程序实现功能：1、时钟功能，时钟的走动。2、时钟时间调整功能，可设置时钟的时、分、秒。
  3、闹铃设置功能，闹铃时间设置及闹铃的开关。4、红外开关闹，实现红外遥控对闹铃的开关. */
#include<reg52.h>
#define uchar unsigned char 
#define uint unsigned int
sbit s1=P2^3;//时间调整功能键
sbit s2=P2^2;//时间加、闹铃时间加、闹铃开关
sbit s3=P2^1;//时间减、闹铃时间减
sbit s4=P2^0;//闹铃功能键
sbit rs=P2^4;//液晶功能
sbit ledw=P2^5;//液晶显示
sbit lcden=P2^6;//液晶功能
sbit rd=P3^7;//地线
sbit am=P1^0;
sbit pm=P1^1;//指示灯显示
sbit speak=P1^7;/*音频输出*/
uchar count,s1num,s2num,s4num,amp;
char miao,shi,fen,shil,fenl;
uchar code table[]="Alarm 00:00 ";
uchar code table1[]="AM  00:00:00";
void delay(uint z)
{
	uint x,y;
	for(x=z;x>0;x--)
		for(y=110;y>0;y--);
}

void write_com(uchar com)
{
	rs=0;
	lcden=0;
	P0=com;
	delay(5);
	lcden=1;
	delay(5);
	lcden=0;	
}

void write_date(uchar date)
{
	rs=1;
	lcden=0;
	P0=date;
	delay(5);
	lcden=1;
	delay(5);
	lcden=0;	
}

void init()
{
	uchar num;
	write_com(0x38);
	write_com(0x0c);
	write_com(0x06);
	write_com(0x01);
	write_com(0x80+0x40);
	for(num=0;num<12;num++)
		{
			write_date(table1[num]);
			delay(5);
		}
	am=0;
	pm=1;
	TMOD=0x01;
	TH0=(65536-50000)/256;
	TL0=(65536-50000)%256;
	EA=1;
	ET0=1;
	TR0=1;
}//液晶初始化程序

void write_sfm(uchar add,uchar date)
{
	uchar shi,ge;
	shi=date/10;
	ge=date%10;
	write_com(0x80+0x40+add);
	write_date(0x30+shi);
	write_date(0x30+ge);
}//时、分、秒写入程序
void write_lsf(uchar add,uchar date)
{
	uchar shi,ge;
	shi=date/10;
	ge=date%10;
	write_com(0x80+add);
	write_date(0x30+shi);
	write_date(0x30+ge);
}//闹铃分、时写入程序

void keyscan()
{
	rd=0;
	if((s1==0)&&(s4num==0)&&(s2num==0))//键盘互锁
	{
		delay(5);
		if(s1==0)
		{	s1num++;
			while(!s1);			
			if(s1num==1)
			{
				TR0=0;
				write_com(0x80+0x40+10);
				write_com(0x0f);
			}
			if(s1num==2)
			{
				write_com(0x80+0x40+7);
			}
			if(s1num==3)
			{
				write_com(0x80+0x40+4);
			}
			if(s1num==4)
			{
				write_com(0x80+0x40);
			}
			if(s1num==5)
			{
				s1num=0;
				write_com(0x0c);
				TR0=1;
			}
		}
	}
		if(s1num!=0)
		{
			if(s2==0)
			{
				delay(5);
				if(s2==0)
				{
					while(!s2);
					if(s1num==1)
					{
						miao++;
						if(miao==60)
							miao=0;
						write_sfm(10,miao);
						write_com(0x80+0x40+10);
					}
					if(s1num==2)
					{
						fen++;
						if(fen==60)
							fen=0;
						write_sfm(7,fen);
						write_com(0x80+0x40+7);
					}
					if(s1num==3)
					{
						shi++;
						if(shi==24)
							shi=0;
						write_sfm(4,shi);
						write_com(0x80+0x40+4);
					}
					if(s1num==4)
					{
					    amp++;  
						write_com(0x80+0x40);
						am=0;
						pm=1;
						if(amp==1)
						{
							write_date(0x50);
							am=1;
							pm=0;
						}
						else
						{
						    amp=0;
							write_com(0x80+0x40);
						 	write_date(0x41);
							am=0;
							pm=1;
						}					  
					}
				}
			}
		if(s3==0)
			{
				delay(5);
				if(s3==0)
				{
					while(!s3);
					if(s1num==1)
					{
						miao--;
						if(miao==-1)
							miao=59;
						write_sfm(10,miao);
						write_com(0x80+0x40+10);
					}
					if(s1num==2)
					{
						fen--;
						if(fen==-1)
							fen=59;
						write_sfm(7,fen);
						write_com(0x80+0x40+7);
					}
					if(s1num==3)
					{
						shi--;
						if(shi==-1)
							shi=23;
						write_sfm(4,shi);
						write_com(0x80+0x40+4);
					}
				}
			}
		}		
}//键盘扫描
void diapear()
{
	uchar aa;
	write_com(0x80);
	for(aa=0;aa<16;aa++)
	write_date(' ');
	delay(2);
}//清屏
void keyscan1() 	
{	uchar num;
	rd=0;
	if((s1num==0)&&(s4==0))//键盘互锁
	{
		delay(5);
		if(s4==0)
		{	
			while(!s4);
			if(s4==1)
			{	s4num++;
			   if(s4num==1)
			   {
					write_com(0x80);
					for(num=0;num<11;num++)
						write_date(table[num]);
					delay(2);	  		
			   		write_com(0x80+9);
			  }
			   if(s4num==2)
			   {
			  		write_com(0x80+6);
			   }
			   if(s4num==4)
			   {
			  		s4num=0;
					diapear();					
			   }
			}
		}
	}	
	if(s4num!=0)
	{
		if(s2==0)
		{
			delay(5);
			if(s2==0)				
				while(!s2);
			if(s2==1)
			{
				if(s4num==1)
				{
					fenl++;
					if(fenl==60)
						fenl=0;
					write_lsf(9,fenl);
				}
				if(s4num==2)
				{
					shil++;
					if(shil==24)
						shil=0;
					write_lsf(6,shi);
				}
			}
		}
		if(s3==0)
		{
			delay(5);
			if(s3==0)
				while(!s3);
			if(s3==1)
			{
				if(s4num==1)
				{
					fenl--;
					if(fenl==-1)
						fenl=59;
					write_lsf(9,fenl);
				}
				if(s4num==2)
				{
					shil--;
					if(shil==-1)
						shil=23;
					write_lsf(6,shil);
				}	
			}
    	}
 	}		
}//键盘扫描
void keyscan2()
{
	rd=0;
	if((s1num==0)&&(s4num==0)&&(s2==0))//键盘互锁
	{
		delay(5);
		if(s2==0)
		{	
			while(!s2);
			if(s2==1)
			{	s2num++;
			   if(s2num==2)
			   {
					s2num=0;
			   }
			}
		}
	}
}//键盘扫描
void alarm()
{
		if(s2num==0)
		speak=1;
		if(s2num==1)
		{
			if((shil==shi)&&(fenl==fen))
			{	
				speak=1;
			 	delay(2);
			 	speak=0;
				delay(2);
			 }
		}
}//闹钟程序
void wbzd_int()
{
	EA=1;
	EX0=1;
	ET0=1;
}//外部中断开
void wbzd1() interrupt 0
{
	s2num++;
	delay(5);
	if(s2num==2)
	s2num=0;
}//外部中断0服务程序
void main()
{
	ledw=0;
	init();
	wbzd_int();
	while(1)
	{
		keyscan1();
		keyscan();
		keyscan2();
		alarm();
	}
}
void timer0() interrupt 1
{
	TH0=(65536-50000)/256;
	TL0=(65536-50000)%256;
	count++;
if(count==20)
		{
			count=0;
			miao++;
			if(miao==60)
			{
				miao=0;
				fen++;
				if(fen==60)
				{
					fen=0;
					shi++;
				    if((shi>=0)&&shi<12)
				 	{
						write_com(0x80+0x40);
						write_date(0x41);//写A
						am=0;
						pm=1;
					}
					else
				    {	
						write_com(0x80+0x40);
						write_date(0x50);//写P
						am=1;
						pm=0;
           			}	
					if(shi==24)
					{
						shi=0;
						write_com(0x80+0x40);
						write_date(0x41);//写A
						am=0;
						pm=1;
					}
					write_sfm(4,shi);
				}
				write_sfm(7,fen);
			}
			write_sfm(10,miao);
			write_date(' ');
            write_date(' ');
            write_date(' ');
			write_date(' ');//防止出现乱码
		}	
}