#include "c8051f020.h"                
#include <intrins.h>

sbit	HD7279_DAT=P1^7;
sbit	HD7279_CLK=P1^6;

#define NOSELECT7279  	P5 |= 0x80		//SPICS4(P57)=1
#define SELECT7279  	P5 &= ~(0x80)  	//SPICS4(P57)=0;
#define Set7279DAT  	HD7279_DAT=1
#define Clr7279DAT  	HD7279_DAT=0
#define Set7279CLK  	HD7279_CLK=1
#define Clr7279CLK  	HD7279_CLK=0
 
void SYSCLK_Init (void);             //初始化時鐘
void Delay1us(unsigned char T);
void Delay1ms(unsigned char T);
void Delay1s(unsigned char T);
void Timer0_Init (void);             //初始化定時器
void PORT_Init (void);               //初始化IO口
void SPI0_Init (void);               //初始化SPI0
void Send7279Byte(unsigned char ch);
void Test7279(bit LoopFlag);


void main (void) 
{
	WDTCN = 0xde;
	WDTCN = 0xad;           //關看門狗
 	SYSCLK_Init ();         //初始化時鐘
	Timer0_Init();			//初始化定時器
	PORT_Init ();           //初始化IO口
//	SPI0_Init ();           //初始化SPI0
	CPT1CN |= 0x80;			//使能比較器1
    REF0CN = 0x03;  		//使能片內參考電壓
 	EA=1;					//開中斷
	Test7279(1);
}


void SYSCLK_Init (void)  
{
   int i;                              // delay counter
   OSCXCN = 0x67;                      // start external oscillator with
                                       // 18.432MHz crystal
   for (i=0; i < 256; i++) ;           // Wait for osc. to start up
   //while (!(OSCXCN & 0x80)) ;        // Wait for crystal osc. to settle
   OSCICN = 0x88;                      // select external oscillator as SYSCLK
                                       // source and enable missing clock
                                       // detector
//	OSCICN = 0x07;   //interal 16MHZ
}

                           
void PORT_Init (void)                  // 初始化IO口
{   
   XBR0    = 0x07;                     // Enable SMBus, SPI0, and UART0
   XBR1    = 0x00;
   XBR2    = 0x44;                     // Enable crossbar and weak pull-ups
   //EMI0TC  = 0x21;
   //P74OUT  = 0xFF;                                      
   //P0MDOUT = 0x15;
   //P1MDOUT |= 0x3C;  					//P1.2-P1.5推挽輸出
   //P1 &= 0xc3;						//P1.2-P1.5=0
}

void SPI0_Init (void)                  //初始化SPI0
{
   SPI0CFG = 0x07;                     // data sampled on 1st SCK rising edge
                                       // 8-bit data words
   SPI0CFG|=0xC0;	                   //CKPOL =1;

   SPI0CN = 0x03;                      // Master mode; SPI enabled; flags
                                       // cleared
   SPI0CKR = SYSCLK/2/8000000-1;       // SPI clock <= 8MHz (limited by 
                                       // EEPROM spec.)
}

unsigned char Count1ms;
void Timer0_Init (void)                //定時器0初始化,定時1ms
{
   	CKCON|=0x8;
   	TMOD|=0x1;    	                   //定時器0方式1,16Bit
	Count1ms=10;
   	TR0 = 0;                           // STOP Timer0
   	TH0 = (-SYSCLK/1000) >> 8;    	   // set Timer0 to overflow in 1ms
   	TL0 = -SYSCLK/1000;
   	TR0 = 1;   	                       // START Timer0
   	IE|= 0x2; 
}

void Timer0_ISR (void) interrupt 1     // 定時器0中斷服務程序
{
	TH0 = (-SYSCLK/1000) >> 8;  
   	TL0 = -SYSCLK/1000;
	if (Count1ms) Count1ms--;
}



void Send7279Byte(unsigned char ch)
{	
	char i;
	SELECT7279;     	//置CS低電平 
	Delay1us(50);		//延時50μ
	
	for (i=0;i<8;i++)
	{	
		if (ch&0x80)	//輸出7位到HD7279A的DATA端 
		{
			Set7279DAT;
		}
		else
		{
			Clr7279DAT;
		}
		Set7279CLK;		//置CLK高電平 
		ch=ch<<1;		//待發數據左移 
		Delay1us(8);	//延時8μ
		Clr7279CLK;		//置CLK低電平 
		Delay1us(8);	//延時50μ
	}
	Clr7279DAT;			//發送完畢，DATA端置低，返回 
}
unsigned char Receive7279Byte(void)
{
	unsigned char i,ch;
	ch=0;		
	Set7279DAT;			//DATA端置為高電平，輸入狀態
 	Delay1us(50);		//延時50μ
	for (i=0;i<8;i++)
	{
		Set7279CLK;		//置CLK高電平
		Delay1us(8);	//延時8μ
		ch=ch<<1;		//接收數據左移1位
		if (HD7279_DAT)
			ch+=1;		//接收1位數據
		Clr7279CLK;		//置CLK低電平
		Delay1us(8);	//延時8μ
	}                   
	Clr7279DAT;			//接收完畢，DATA端重新置成低電平(輸出狀態)
	return ch;
}
                        
void FlashLED(unsigned char No)
{
	char i;
	Send7279Byte(0x88);	//發閃爍指令 
	i=0x1;
	while (No)
	{
		i=i<<1;
		No--;
	}                                                                                                        
	Send7279Byte(~i);   //1閃爍
	NOSELECT7279;     	//置CS高電平 
}

/*
void BlankLED(unsigned char ch)
{
	Send7279Byte(0x98);	//發消隱指令 
	Send7279Byte(ch);   //1-顯示 0-消隱
	NOSELECT7279;     	//置CS高電平 
}
*/

void MoveLeft(void)
{
	Send7279Byte(0xA1);	//發左移指令 
	NOSELECT7279;     	//置CS高電平 
}

void MoveRight(void)
{
	Send7279Byte(0xA0);	//發右移指令 
	NOSELECT7279;     	//置CS高電平 
}

unsigned char code BdSeg[]={
					0x7e,0x30,0x6d,0x79, // 0 1 2 3 
                   	0x33,0x5b,0x5f,0x70, // 4 5 6 7
                   	0x7f,0x7b,0x77,0x1f, // 8 9 a b
                   	0x4e,0x3d,0x4f,0x47, // c d e f
                   	0x00,0x01}; 

void DispLED(char *DispBuf,char ShowDot)//ShowDot 顯示小數點位 
{
char i,ch;
	ShowDot--;
	for (i=0;i<6;i++)
	{
		ch=DispBuf[i];
		if ((ch>='a') && (ch<='f'))
		{
		   ch-='a';ch+=0xa;
		}
		if ((ch>='A') && (ch<='F'))
		{
		   ch-='A';ch+=0xa;
		}
		Send7279Byte(0x90+5-i);	//不譯碼
		if (ch==' ')
			Send7279Byte(0x00); 
		else
			if (ch=='-')
			 	Send7279Byte(0x01); 
			else 
			{
				if (ShowDot==i)
					Send7279Byte(0x80|BdSeg[ch&0x0f]); 
				else
					Send7279Byte(BdSeg[ch&0x0f]); 
			}
	}
	NOSELECT7279;     	//置CS高電平 
}

char GetKeyValue(void)
{
	char KeyValue;
	if (CPT1CN&0x40) return -1;	//無鍵按下 
	Send7279Byte(0x15);     	//發讀鍵盤指令 
	KeyValue=Receive7279Byte();
	NOSELECT7279;           	//置CS高電平 
	return KeyValue; 
}

void WaitKeyOff(void)
{
	while  (!(CPT1CN&0x40));
}

void Test7279(bit LoopFlag)                                 
{
	char i,KeyValue;         
	Delay1ms(25);		    //等待25ms復位時間 
	Send7279Byte(0xA4);  	//發復位指令 
	NOSELECT7279;       	//置CS高電平 
	if (LoopFlag==0) return;
	DispLED("123456",0); 	//顯示123456
	for (i=0;i<8;i++)
	{       
		Delay1s(1);
		MoveLeft();
	}

	DispLED("123456",0); 	//顯示123456
    Delay1s(1);

	DispLED("7890AB",2); 	//顯示7890ab
    Delay1s(1);

	DispLED("CDEF -",3); 	//顯示cdef -

	for (i=0;i<6;i++)
	{
		Delay1s(1);
		MoveRight();
	}

	DispLED("F    1",1); 	//顯示123456

	FlashLED(0);	//第一位閃爍
	Delay1s(10);
	FlashLED(1);	//第二位閃爍
	Delay1s(10);
	FlashLED(8);	//關閃爍

	//BlankLED(0x23); //注意:執行消隱后,鍵盤輸入中斷口不能恢復.

	for (;;)
	{	
		KeyValue=GetKeyValue(); 
         if(KeyValue!=-1)
          {
		    Send7279Byte(0xC8);	//發送鍵碼值，按方式1譯碼下載顯示 
		    Send7279Byte(KeyValue%16);
		    NOSELECT7279;     	//置CS高電平 
		    WaitKeyOff();
           }
	}
}
 
 

  void Delay1us(unsigned char us)
{
	while (us)
	{
	  _nop_(); 
	  _nop_(); 
	  _nop_(); 
	  _nop_(); 
	  _nop_();
	  --us;
	}
}

void Delay1ms(unsigned char T)
{
	Count1ms=T;
	while (Count1ms);
}

void Delay1s(unsigned char T)
{
	while (T)
	{
		Delay1ms(200);
		Delay1ms(200);
		Delay1ms(200);
		Delay1ms(200);
		Delay1ms(200);
		T--;
	}
}