#include "scancode.h"

// interrupt  --------------------------------------------------
#define IMH (*(unsigned int *)0x19c0000)
#define IML (*(unsigned int *)0x19c0004)
// timer  -------------------------------------------------------
#define TIM_PRD	    	*(int *)0x808038
#define TIM_CNT     	*(int *)0x808034
#define TIM_CTL     	*(int *)0x808030
// McBSP0  ------------------------------------------------------
#define SPCR0 (*(unsigned int *)0x018c0008)
#define PCR0 (*(unsigned int *)0x018c0024)
#define SPCR1 (*(unsigned int *)0x01900008)
#define PCR1 (*(unsigned int *)0x01900024)
// ICETEK-VC33-A -----------------------------------------------
#define LBDS (*(unsigned int *)0x1001)
#define SWS (*(unsigned int *)0x1002)
// ICETEK-CTR  --------------------------------------------------
#define CTRGR (*(unsigned int *)0x0c08000)
#define CTRKEY (*(unsigned int *)0x0c08001)
#define CTRCLKEY (*(unsigned int *)0x0c08002)
#define CTRLA (*(unsigned int *)0x0c08005)
#define CTRLR (*(unsigned int *)0x0c08007)
#define CTRLCDCMDR (*(unsigned int *)0x0c08001)
#define CTRLCDCR (*(unsigned int *)0x0c08002)
#define CTRLCDLCR (*(unsigned int *)0x0c08003)
#define CTRLCDRCR (*(unsigned int *)0x0c08004)
// Special values -----------------------------------------------
#define LCDCMDTURNON 0x3f
#define LCDCMDTURNOFF 0x3e
#define LCDCMDSTARTLINE 0xc0
#define LCDCMDPAGE 0xb8
#define LCDCMDVERADDRESS 0x40
#define LCDDELAY 1
// VC33DSP Registers  ------------------------------------------
cregister unsigned int IE,IF,ST,IOF;
#define SP0FSXDXCLKXCR (*((unsigned int *)0x808042))
#define SP0FSRDRCLKRCR (*((unsigned int *)0x808043))

// Variables
unsigned char ledbuf[8],ledx[8];
unsigned char ledkey[10][8]=
{
	{0x00,0x00,0x7C,0x82,0x82,0x82,0x7C,0x00},	//0
	{0x00,0x00,0x00,0x84,0xFE,0x80,0x00,0x00},	//1
	{0x00,0x00,0x84,0xC2,0xA2,0x92,0x8C,0x00},	//2
	{0x00,0x00,0x44,0x92,0x92,0x92,0x6C,0x00},
	{0x00,0x00,0x30,0x28,0x24,0xFE,0x20,0x00},
	{0x00,0x00,0x4E,0x92,0x92,0x92,0x62,0x00},
	{0x00,0x00,0x7C,0x92,0x92,0x92,0x64,0x00},
	{0x00,0x00,0x02,0xC2,0x32,0x0A,0x06,0x00},
	{0x00,0x00,0x6C,0x92,0x92,0x92,0x6C,0x00},
	{0x00,0x00,0x4C,0x92,0x92,0x92,0x7C,0x00}
};
#define nMusicNumber 52
unsigned int music[nMusicNumber][2]=
{
	{101,1920},{121,1440},{114,480},{101,1920},{151,1920},
	{151,480},{135,480},{121,480},{101,480},{114,960},{121,960},{135,3840},
	{121,480},{114,480},{101,480},{91,480},{101,960},{101,960},
	{76,1920},{101,1920},{114,960},{121,960},{135,1440},{151,480},{151,1920},{0,1920},
	{101,1920},{121,1440},{114,480},{101,1920},{151,1920},
	{151,480},{135,480},{121,480},{101,480},{114,960},{121,960},{135,3840},
	{121,480},{114,480},{101,480},{91,480},{101,960},{101,960},
	{76,1920},{101,1920},{114,960},{121,960},{135,1440},{151,480},{151,1920},{0,1920}
};
unsigned int pwm[8]={ 0x86,0x87,0x83,0x8b,0x89,0x8d,0x8c,0x8e };
unsigned char dbClearKey;

// Functions
void InitInterrupt(void);			// 初始化中斷
void init_emif( void );				// 初始化emif接口寄存器
void InitCTR();						// 初始化ICETEK-CTR
void CloseCTR();					// 關閉ICETEK-CTR上各設備
void Delay(unsigned int nTime);		// 延時子程序
void Delay1(unsigned int nTime);	// 延時子程序(帶LED顯示刷新)
unsigned char GetKey();				// 讀取鍵盤輸入
void RefreshLEDArray();				// 刷新發光二極管陣列顯示
void SetLEDArray(int nNumber);		// 修改發光二極管陣列顯示內容
char ConvertScanToChar(unsigned char cScanCode);	// 將鍵盤掃描碼轉換成字符
void LCDCMD(unsigned char dbCommand);	// 向液晶顯示器發送命令
void LCDWriteLeft(unsigned char dbData);	// 寫液晶顯示器左半屏
void LCDCLS();							// 清除液晶顯示器顯示
void TurnOnLCD();						// 打開液晶顯示器

void CloseCTR()
{
    CTRGR=0; 				 
    CTRLR=0; CTRLR=0x40;
    CTRLR=0x0c0;
	LCDCMD(LCDCMDTURNOFF);	
	dbClearKey=CTRCLKEY;
	LBDS=0;
}

void LCDCMD(unsigned char dbCommand)
{
	CTRLCDCMDR=dbCommand;		
	Delay(LCDDELAY);
	CTRLCDCR=0;
	Delay(LCDDELAY);
}

unsigned char GetKey()
{
	unsigned char dbReturn;
	
	dbReturn=CTRKEY;
	dbClearKey=CTRCLKEY;
	return dbReturn&0x0ff;
}

char ConvertScanToChar(unsigned char cScanCode)
{
	char cReturn;
	
	cReturn=0;
	switch ( cScanCode )
	{
		case SCANCODE_0: cReturn='0'; break;
		case SCANCODE_1: cReturn='1'; break;
		case SCANCODE_2: cReturn='2'; break;
		case SCANCODE_3: cReturn='3'; break;
		case SCANCODE_4: cReturn='4'; break;
		case SCANCODE_5: cReturn='5'; break;
		case SCANCODE_6: cReturn='6'; break;
		case SCANCODE_7: cReturn='7'; break;
		case SCANCODE_8: cReturn='8'; break;
		case SCANCODE_9: cReturn='9'; break;
		case SCANCODE_Plus: cReturn='+'; break;
		case SCANCODE_Minus: cReturn='-'; break;
	}
	return cReturn;
}

void InitCTR()
{
    CTRGR=0; CTRGR=0x80; CTRGR=0;
    CTRLR=0; CTRLR=0x40;
    CTRLR=0x0c0;
	LCDCMD(LCDCMDTURNOFF);	
	dbClearKey=CTRCLKEY;
	LBDS=0;
}

void Delay(unsigned int nDelay)
{
	int ii,jj,kk=0;
	for ( ii=0;ii<nDelay;ii++ )
	{
		for ( jj=0;jj<1024;jj++ )
		{
			kk++;
		}
	}
}

void Delay1(unsigned int nDelay)
{
	int ii,jj,kk=0;
	for ( ii=0;ii<nDelay;ii++ )
	{
		for ( jj=0;jj<64;jj++ )
		{
			RefreshLEDArray();
			kk++;
		}
	}
}

void RefreshLEDArray()
{
	int i;
	for ( i=0;i<8;i++ )
	{
		CTRGR=ledx[i];
		CTRLA=ledbuf[i];
	}
}

void SetLEDArray(int nNumber)
{
	int i;
	for ( i=0;i<8;i++ )
		ledbuf[i]=~ledkey[nNumber][7-i];
}

void LCDWriteLeft(unsigned char dbData)
{
	CTRLCDLCR=dbData;
	Delay(LCDDELAY);
	CTRLCDCR=0;
	Delay(LCDDELAY);
}

void LCDWriteRight(unsigned char dbData)
{
	CTRLCDRCR=dbData;
	Delay(LCDDELAY);
	CTRLCDCR=0;
	Delay(LCDDELAY);
}

void TurnOnLCD()
{
	LCDCMD(LCDCMDTURNON);
}

void LCDCLS()
{
	int i,j;
	LCDCMD(LCDCMDSTARTLINE);
	for ( i=0;i<8;i++ )
	{
		LCDCMD(LCDCMDPAGE+i);
		LCDCMD(LCDCMDVERADDRESS);
		for ( j=0;j<64;j++ )
			LCDWriteLeft(0);
		LCDCMD(LCDCMDPAGE+i);
		LCDCMD(LCDCMDVERADDRESS);
		for ( j=0;j<64;j++ )
			LCDWriteRight(0);
	}
}