#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^4;							//cs連接P1.4
sbit clk=P1^5; 							//clk連接P1.5
sbit dat=P1^2; 							//dat連接P1.2
sbit key=P1^3; 							//key連接P1.3

/****** HD7279A指令定義 ******/
#define CMD_RESET 0xa4					//復位指令
#define CMD_TEST 0xbf					//測試指令
#define DECODE0 0x80					//方式0譯碼指令
#define DECODE1 0xc8					//方式1譯碼指令
#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);
/*************************************************
循環左右移測試'三'字向右移動23次，再向左移動23次
*************************************************/
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);				//譯碼方式1指令，顯示在第8位
delay10ms(50);
}
delay10ms(150);

/*********************************************
消隱指令測試程序
*********************************************/
k=0xff;
for (j=0;j<6;j++)
{
k=k/2;
write7279(ACTCTL,k);					//每隔1秒增加一個消隱位
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; 								//設為輸入狀態
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();
}
}
}
}