/********************************************************************************
*  標(biāo)題:  xl系列單片機(jī)實驗儀演示程序 數(shù)碼管電子鐘                              *
*  文件:   XLclk.c                                                             *
*  日期:  2006-1-5                                                             *
*  版本:  3.0 （試驗通過版）可用xl600-xl1000單片機(jī)綜合試驗儀試驗               *
*  郵箱:  sxj1974@163.com                                                      *
*  網(wǎng)站： http://www.51c51.com    www.8951.com                                 *
********************************************************************************
*  描述:                                                                       *
*                 簡易電子時鐘，LED數(shù)碼管顯示                                  *
*                 K1---時調(diào)整  (p36)                                           *
*                 K2---分調(diào)整   (p37)                                          *
*                 數(shù)碼管數(shù)據(jù)p0，數(shù)碼管控制p2                                   *
*                 上電時初始化顯示:  12-00-00                                  *
*                                                                              *
*           *    ****          ****    ****          ****    ****              *
*           *        *        *    *  *    *        *    *  *    *             *
*           *        *        *    *  *    *        *    *  *    *             *
*           *    ****  ****** *    *  *    * ****** *    *  *    *             *
*           *   *             *    *  *    *        *    *  *    *             *
*           *   *             *    *  *    *        *    *  *    *             *
*           *    ****          ****    ****          ****    ****              *
*                                                                              *
*                                                                              *
*                                                                              *
********************************************************************************
* 【版權(quán)】 Copyright(C)深圳市學(xué)林電子有限公司 www.51c51.com                    *
* 【聲明】 此程序僅用于學(xué)習(xí)與參考，引用請注明版權(quán)和作者信息！                  *
*  【技術(shù)支持】請訪問http://www.51c51.com/bbs/index.asp  官方論壇              *
********************************************************************************/

#include <reg51.h>
#include <intrins.h>

unsigned char data dis_digit;
unsigned char key_s, key_v;

unsigned char code dis_code[11]={ 0x28, 0x7E, 0xA2, 0x62, 0x74, 0x61, 0x21, 0x7A, 0x20, 0x60,0xff};//0,1,2,3,4,5,6,7,8,9,關(guān)顯示，數(shù)碼管碼表
unsigned char data dis_buf[8];
unsigned char data dis_index;
unsigned char hour,min,sec;
unsigned char sec100; 

sbit	K1 = P3^6;
sbit	K2 = P3^7;

bit scan_key();
void proc_key();
void inc_sec();
void inc_min();
void inc_hour();
void display();
void delayms(unsigned char ms);

void main(void)
{
	P0 = 0xff;
	P2 = 0xff;
	TMOD = 0x11;		// 定時器0, 1工作模式1, 16位定時方式
	TH1 = 0xdc;
	TL1 = 0;

	TH0 = 0xFC;
	TL0 = 0x17;
	
	hour = 12;
	min = 00;
	sec = 00;

	sec100 = 0;
	
	dis_buf[0] = dis_code[hour / 10];		// 時十位
	dis_buf[1] = dis_code[hour % 10];		// 時個位
	dis_buf[3] = dis_code[min / 10];		// 分十位
	dis_buf[4] = dis_code[min % 10];		// 分個位
	dis_buf[6] = dis_code[sec / 10];		// 秒十位
	dis_buf[7] = dis_code[sec % 10];		// 秒個位
	dis_buf[2] = 0xf7;						// 顯示"-"
	dis_buf[5] = 0xf7;						// 顯示"-"
			
	dis_digit = 0xfe;
	dis_index = 0;
	
	TCON = 0x01;
	IE = 0x8a;				// 使能timer0,1 中斷
	
	TR0 = 1;
	TR1 = 1;

	key_v = 0x03;

	while(1)
	{
		if(scan_key())
		{
			delayms(10);
			if(scan_key())
			{
				key_v = key_s;
				proc_key();
			}
		}
		
	}
}

bit scan_key()
{
	key_s = 0x00;
	key_s |= K2;
	key_s <<= 1;
	key_s |= K1;
	return(key_s ^ key_v);	
}

void proc_key()
{
	EA = 0;
	if((key_v & 0x01) == 0)		// K1
	{
		inc_hour();
	}
	else if((key_v & 0x02) == 0)	// K2
	{
		min++;
		if(min > 59)
		{
			min = 0;
		}
		dis_buf[3] = dis_code[min / 10];		// 分十位
		dis_buf[4] = dis_code[min % 10];		// 分個位
	}

	EA = 1;
}

void timer0() interrupt 1
// 定時器0中斷服務(wù)程序, 用于數(shù)碼管的動態(tài)掃描
// dis_index --- 顯示索引, 用于標(biāo)識當(dāng)前顯示的數(shù)碼管和緩沖區(qū)的偏移量
// dis_digit --- 位選通值, 傳送到P2口用于選通當(dāng)前數(shù)碼管的數(shù)值, 如等于0xfe時,
//				選通P2.0口數(shù)碼管
// dis_buf   --- 顯于緩沖區(qū)基地址	
{
	TH0 = 0xFC;
	TL0 = 0x17;
	
	P2 = 0xff;							// 先關(guān)閉所有數(shù)碼管
	P0 = dis_buf[dis_index];			// 顯示代碼傳送到P0口
	P2 = dis_digit;						// 

	dis_digit = _crol_(dis_digit,1);	// 位選通值左移, 下次中斷時選通下一位數(shù)碼管
	dis_index++;						// 
					
	dis_index &= 0x07;			// 8個數(shù)碼管全部掃描完一遍之后，再回到第一個開始下一次掃描
} 

void timer1() interrupt 3
{
	TH1 = 0xdc;
	
	sec100++;
	
	if(sec100 >= 100)
	{
		sec100 = 0;
		inc_sec();
	}
}

void inc_sec()
{
	sec++;
	if(sec > 59)
	{
		sec = 0;
		inc_min();
	}
	dis_buf[6] = dis_code[sec / 10];		// 秒十位
	dis_buf[7] = dis_code[sec % 10];		// 秒個位	
}

void inc_min()
{
	min++;
	if(min > 59)
	{
		min = 0;
		inc_hour();
	}
	dis_buf[3] = dis_code[min / 10];		// 分十位
	dis_buf[4] = dis_code[min % 10];		// 分個位
}

void inc_hour()
{
	hour++;
	if(hour > 23)
	{
		hour = 0;
	}
	if(hour > 9)
		dis_buf[0] = dis_code[hour / 10];		// 時十位
	else
		dis_buf[0] = 0xff;					// 當(dāng)小時的十位為0時不顯示
	dis_buf[1] = dis_code[hour % 10];		// 時個位

}


void delayms(unsigned char ms)	
// 延時子程序
{						
	unsigned char i;
	while(ms--)
	{
		for(i = 0; i < 120; i++);
	}
}