#include <reg51.h>

//*** 函數定義 ***
void long_delay(void);							// 長延時
void short_delay(void);							// 短暫延時
void delay10ms(unsigned char);					// 延時10MS
void write7279(unsigned char, unsigned char);	// 寫入到HD7279
unsigned char read7279(unsigned char);			// 從HD7279讀出
void send_byte(unsigned char);					// 發送一個字節
unsigned char receive_byte(void);				// 接收一個字節

//*** 變量及I/O口定義 ***
unsigned char digit[5];
unsigned char key_number, j, k;
unsigned int tmr;
unsigned long wait_cnter;
sbit cs=P1^3;					// cs at P1.3
sbit clk=P1^2;					// clk 連接于 P1.2
sbit dat=P1^1;					// dat 連接于 P1.1
sbit key=P1^0;					// key 連接于 P1.0

//****** HD7279A 指令 ******
#define CMD_RESET 0xa4
#define CMD_TEST 0xbf
#define DECODE0 0x80
#define DECODE1 0xc8
#define CMD_READ 0x15
#define UNDECODE 0x90
#define RTL_CYCLE 0xa3
#define RTR_CYCLE 0xa2
#define RTL_UNCYL 0xa1
#define RTR_UNCYL 0xa0
#define ACTCTL 0x98
#define SEGON 0xe0
#define SEGOFF 0xc0
#define BLINKCTL 0x88
/*
//*** 主程序 ***
main()
{
	while (1)
	{
		for (tmr=0;tmr<0x2000;tmr++);	// 上電延時
		send_byte(CMD_RESET);			// 復位HD7279A
		
//******************************************
//              測試指令演示
//******************************************
		send_byte(CMD_TEST);				// 測試指令
		for (j=0;j<3;j++)					// 延時約3秒
		{
			delay10ms(100);
		}
		send_byte(CMD_RESET);				// 清除顯示

//**********************************************
//        閃爍指令及鍵盤接口測試
// 將用戶按鍵的鍵碼顯示出來, 如果10秒內無按鍵
// 或按S0鍵即進入下一步演示
//**********************************************
		wait_cnter=0;
		key_number=0xff;
		write7279(BLINKCTL,0xfc);			// 第1、2兩位設為閃爍顯示
		write7279(UNDECODE,0X08);			// 在第1位顯示下劃線'_'
		write7279(UNDECODE+1,0x08);			// 在第2位顯示下劃線'_'
		do
		{
			if (!key)						// 如果有鍵按下
			{
				key_number=read7279(CMD_READ);			// 讀出鍵碼
				write7279(DECODE1+1,key_number/16);		// 在第2位顯示鍵碼高8位
				write7279(DECODE1,key_number&0x0f);		// 在第1位顯示鍵碼低8位
				while (!key);							// 等待按鍵放開
				wait_cnter=0;
			}
			wait_cnter++;
		} while (key_number!=0 && wait_cnter<0x30000);	// 如果按鍵為‘0’和超時則進入下一步演示
		write7279(BLINKCTL,0xff);						// 清除閃爍設置

//******************************************
//            快速計數演示
//******************************************
		for (j=0;j<5;j++)					// 計數初始值為00000
		{
			digit[j]=0;
			write7279(DECODE0+j,digit[j]);
		}
		while (digit[4]<2)					// 如果計數達到20000就停止
		{
			digit[0]++;
			if (digit[0]>9)
			{
				digit[0]=0;
				digit[1]++;
				if (digit[1]>9)
				{
					digit[1]=0;
					digit[2]++;
					if (digit[2]>9)
					{
						digit[2]=0;
						digit[3]++;
						if (digit[3]>9)
						{
							digit[3]=0;
							digit[4]++;
							if (digit[4]>9)
							{
								digit[4]=0;
							}
						}
					}
				}
			}
			write7279(DECODE0,digit[0]);
			if (digit[0]==0)
			{
				write7279(DECODE0+1,digit[1]);
				if (digit[1]==0)
				{
					write7279(DECODE0+2,digit[2]);
					if (digit[2]==0)
					{
						write7279(DECODE0+3,digit[3]);
						if (digit[3]==0)
						{
							write7279(DECODE0+4,digit[4]);
						}
					}
				}
			}
		}
		delay10ms(150);
		send_byte(CMD_RESET);				// 清除顯示

//*************************************************
//         下載數據但不譯碼指令測試
//*************************************************
		write7279(UNDECODE+7,0x49);			// 在第8位按不譯碼方式顯示一字符'三'
		delay10ms(80);

//*************************************************
//               循環左/右移測試
//      "三"字向右運動3次,再向左運動3次
//*************************************************
		for (j=0;j<23;j++)
		{
			send_byte(RTR_CYCLE);		// 循環右移23次
			delay10ms(12);
		}
		for (j=0;j<23;j++)
		{
			send_byte(RTL_CYCLE);		// 循環左移23次
			delay10ms(12);
		}

//*********************************************
//      譯碼方式0及左移指令測試
//*********************************************
		for (j=0;j<16;j++)
		{
			send_byte(RTL_UNCYL);		// 不循環左移指令
			write7279(DECODE0,j);		// 譯碼方式0指令，顯示在第1位
			delay10ms(50);
		}
		delay10ms(150);
		send_byte(CMD_RESET);

//*********************************************
//      譯碼方式1及右移指令測試
//*********************************************
		for (j=0;j<16;j++)
		{
			send_byte(RTR_UNCYL);		// 不循環左移指令
			write7279(DECODE1+7,j);		// 譯碼方式0指令，顯示在第8位
			delay10ms(50);
		}
		delay10ms(150);

//*********************************************
//              消隱指令測試
//*********************************************
		k=0xff;
		for (j=0;j<6;j++)
		{
			k=k/2;
			write7279(ACTCTL,k);		// 每隔一秒鐘增加一個消隱位
			delay10ms(100);
		}
		write7279(ACTCTL,0xff);			// 恢復8位顯示
		delay10ms(100);
		send_byte(CMD_RESET);			// 清除顯示
	
//**********************************************
//         段點亮指令和段關閉指令
//**********************************************
		for (j=0;j<64;j++)
		{
			write7279(SEGON,j);			// 將64個顯示段逐個點亮
			write7279(SEGOFF,j-1);		// 同時將前一個顯示段關閉
			delay10ms(20);
		}
	}
}
*/	
void write7279(unsigned char cmd, unsigned char dta)
{
	send_byte (cmd);
	send_byte (dta);
}	

unsigned char read7279(unsigned char command)
{
	send_byte(command);
	return(receive_byte());
}

void send_byte(	unsigned char out_byte)
{
	unsigned char i;
	cs=0;
	long_delay();
	for (i=0;i<8;i++)
	{
		if (out_byte&0x80)
		{	
			dat=1;
		}
		else
		{
			dat=0;
		}
		clk=1;
		short_delay();
		clk=0;
		short_delay();
		out_byte=out_byte*2;
	}
	dat=0;
}

unsigned char receive_byte(void)
{
	unsigned char i, in_byte;
	dat=1;				// set to input mode
	long_delay();
	for (i=0;i<8;i++)
	{
		clk=1;
		short_delay();
		in_byte=in_byte*2;
		if (dat)
		{
			in_byte=in_byte|0x01;
		}
		clk=0;
		short_delay();
	}
	dat=0;
	return (in_byte);
}

void long_delay(void)
{
	unsigned char i;
	for (i=0;i<0x30;i++);
}

void short_delay(void)
{
	unsigned char i;
	for (i=0;i<8;i++);
}
 /*
// ************************* 延時 n*10ms *************************
void delay10ms(unsigned char time)
{
	unsigned char i;
	unsigned int j;
	for (i=0;i<time;i++)
	{
		for(j=0;j<0x390;j++)
		{
			if (!key)
			{
				key_int();
			}
		}
	}
}  */