/********************************************************************************
*  標題:  xl系列單片機實驗儀演示程序 數碼管秒表計時                            *
*  文件:   XLmb.c                                                              *
*  日期:  2006-1-5                                                             *
*  版本:  3.0 （試驗通過版）可用xl600-xl1000單片機綜合試驗儀試驗               *
*  郵箱:  sxj1974@163.com                                                      *
*  網站： http://www.51c51.com    www.8951.com                                 *
********************************************************************************
*  描述:                                                                       *
*                 數碼管顯示秒表, 分辨率0.01s                                  *
*                 K1---控制按鈕                                                *
*                       第一次按下時, 啟動開始計時                             *
*                       第二次按下時, 停止                                     *
*                       第三次按下時, 歸零                                     *
*  引用資源：數碼管數據 p0口，數碼管控制p2口  控制按鈕 p3.2口                  *
*    秒單位,寄存器與數碼管對應關系:                                            *
*                                                                              *
* --- 秒單位 ---------- 數碼管端口 ---- 緩沖區 --------- 計時BCD碼值寄存器     *
*     十萬位               P20        dis_buf[7]          sec_bcd[7]           *
*     萬位                 P21        dis_buf[6]          sec_bcd[6]           *
*     千位                 P22        dis_buf[5]          sec_bcd[5]           *
*     百位                 P23        dis_buf[4]          sec_bcd[4]           *
*     十位                 P24        dis_buf[3]          sec_bcd[3]           *
*     個位(1.s)            P25        dis_buf[2]          sec_bcd[2]           *
*     十分位(0.1s)         P26        dis_buf[1]          sec_bcd[1]           *
*     百分位(0.01s)        P27        dis_buf[0]          sec_bcd[0]           *
*                                                                              *
********************************************************************************
* 【版權】 Copyright(C)深圳市學林電子有限公司 www.51c51.com                    *
* 【聲明】 此程序僅用于學習與參考，引用請注明版權和作者信息！                  *
*  【技術支持】請訪問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,關顯示，數碼管碼表
unsigned char dis_buf[8];		// 顯示緩沖區
unsigned char sec_bcd[8]; 		// 秒計數值, BCD碼
unsigned char dis_index;		// 
unsigned char key_times;		// K1 按下次數				//

void clr_time();	
void update_disbuf();
bit	scan_key();
void proc_key();
void delayms(unsigned char ms);

sbit	K1 = P3^2;


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

	TH0 = 0xFC;
	TL0 = 0x17;
	
	clr_time();			// 
			                   
	dis_digit = 0x7f;		// 初始顯示P20口數碼管
	dis_index = 0;			// 
	
	key_times = 0;
	key_v = 0x01;
	
	IE = 0x8a;				// 使能timer0, timer1中斷
	
	TR0 = 1;
	TR1 = 0;
	while(1)
	{
		if(scan_key())
		{
			delayms(10);
			if(scan_key())
			{
				key_v = key_s;
				proc_key();
			}
		}
		
	}
}

void clr_time()
{
	sec_bcd[0] = 0x0;
	sec_bcd[1] = 0x0;
	sec_bcd[2] = 0x0;
	sec_bcd[3] = 0x0;
	sec_bcd[4] = 0x0;
	sec_bcd[5] = 0x0;
	sec_bcd[6] = 0x0;
	sec_bcd[7] = 0x0;   
	
	update_disbuf();
	
}

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

void proc_key()
{
	if((key_v & 0x01) == 0)
	{
		key_times++;
		if(key_times == 1)
		{
			TR1 = 1;
		}
		else if(key_times == 2)
		{	
			TR1 = 0;
		}
		else
		{
			clr_time();
			key_times = 0;
		}
		
	}
}

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

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

void timer1() interrupt 3
//
{	
	unsigned char i;
	TH1 |= 0xdc;
	for(i = 0; i < 8; i++)
	{
		sec_bcd[i]++;			// 低位加1
		if(sec_bcd[i] < 10)		// 如果低位滿10則向高位進1
			break;			// 低位未滿10
		sec_bcd[i] = 0;			// 低位滿10清0
	}
	update_disbuf();			// 更新顯示緩沖區
}

void update_disbuf()
// 更新顯示緩沖區
{
	dis_buf[0] = dis_code[sec_bcd[0]];
	dis_buf[1] = dis_code[sec_bcd[1]];
	dis_buf[2] = dis_code[sec_bcd[2]] & 0x7f;	// 加上小數點
	dis_buf[3] = dis_code[sec_bcd[3]];
	dis_buf[4] = dis_code[sec_bcd[4]];
	dis_buf[5] = dis_code[sec_bcd[5]];
	dis_buf[6] = dis_code[sec_bcd[6]];
	dis_buf[7] = dis_code[sec_bcd[7]];
}

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