#include <iom16v.h>
#include <macros.h>

#define nop()  NOP()


#define Set_CS() DDRA |= (1<<0);PORTA |= (1<<0)
#define Set_SID() DDRA |= (1<<1);PORTA |= (1<<1)
#define Set_SCLK() DDRA |= (1<<2);PORTA |= (1<<2)

#define Clr_CS() DDRA |= (1<<0);PORTA &=~(1<<0)
#define Clr_SID() DDRA |= (1<<1);PORTA &=~(1<<1)
#define Clr_SCLK() DDRA |= (1<<2);PORTA &=~(1<<2)
#define cls  W_1byte(0,0,0x01)//清屏

 
//====================================================================
//函數聲明
void Delay(uint ms);      //延時子程序
void W_1byte(uchar RW, uchar RS, uchar W_data);
void Write_8bits(uint W_bits);
void LCD_Init(void);
/********************************************************************
********************************************************************/ 
//===================================================================

/********************************************************************
09.5.10
影龍   未完成
在（x,y）點寫句子，能實現換行功能
********************************************************************/
/*
void Set_XY_str(uchar x, uchar y, uchar *p) 
{
uchar counter; 
counter=x*2-1;//把X值賦給COUNTER
x--;
switch (y)
{
case 1:W_1byte(0,0,(0x80+x));
case 2:W_1byte(0,0,(0x90+x));
case 3:W_1byte(0,0,(0x88+x));
case 4:W_1byte(0,0,(0x98+x));
}

	while(*p != 0)
	{counter++;
	    if(counter==16)//假如定時器等于8且為單數行
		 {y++;
		  counter=1;
		 switch (y)
		  {
		  case 1:W_1byte(0,0,0x80);counter=0;break;
		  case 2:W_1byte(0,0,0x90);counter=0;break;
		  case 3:W_1byte(0,0,0x88);counter=0;break;
		  case 4:W_1byte(0,0,0x98);counter=0;break;
		  default:break;
		  }
		 }		  
		W_1byte(0,1,*p++);//寫字節數據
	}
}
*/

void Char_Set_XY(uchar x, uchar y, uchar *p) 
{
uchar i;
 
switch (y)
{
case 0:W_1byte(0,0,(0x80+x));break;
case 1:W_1byte(0,0,(0x90+x));break;
case 2:W_1byte(0,0,(0x88+x));break;
case 3:W_1byte(0,0,(0x98+x));break;
default:break;
}
  nop();
  for(i=0;p[i]!='\0';i++)
  {
   W_1byte(0,1,p[i]);
     nop();
  }
  nop();
}

void Set_XY(uchar x,uchar y)
{
nop();
switch (y)
{
case 0:W_1byte(0,0,(0x80+x));break;
case 1:W_1byte(0,0,(0x90+x));break;
case 2:W_1byte(0,0,(0x88+x));break;
case 3:W_1byte(0,0,(0x98+x));break;
default:break;
}
nop();
}

void Display_init(void)
{
 Clr_CS();
 Clr_SID();
 Clr_SCLK();
 LCD_Init();
/* //while(1){ 
  nop();
  nop();
  W_1byte(0,0,0x80);   //顯示的地址0x80
  nop();
  for(i=0;mynew1[i]!='\0';i++)
  {
   W_1byte(0,1,mynew1[i]);
  }
  W_1byte(0,0,0x90);     //顯示的地址0x90
  for(i=0;mynew2[i]!='\0';i++)
  {
   W_1byte(0,1,mynew2[i]); 
  }
  W_1byte(0,0,0x88);   //顯示的地址0x88
  for(i=0;mynew3[i]!='\0';i++)
  {
   W_1byte(0,1,mynew3[i]);
  }
  W_1byte(0,0,0x98);     //顯示的地址0x98
  for(i=0;mynew4[i]!='\0';i++)
  {
   W_1byte(0,1,mynew4[i]);
  }
  nop();
//  for(;;)
//  {
//    continue;
//  } 
// }
*/
}
/******************************************************************/
void LCD_Init(void)
{
  uchar cmd;
  cmd=0x30;   //功能設置 8位數據，基本指令
 W_1byte(0,0,cmd);
 Delay(2);
 cmd=0x0C;   //顯示狀態 ON，游標OFF，反白OFF
 W_1byte(0,0,cmd); //寫指令
 Delay(2);
 cmd=0x01;   //清除顯示
 W_1byte(0,0,cmd); //寫指令
 Delay(2);
 cmd=0x02;   //地址歸位
 W_1byte(0,0,cmd); //寫指令
 Delay(2);
 cmd=0x80;   //設置DDRAM地址
 W_1byte(0,0,cmd); //寫指令
 Delay(2);   //延時
}
/*******************************************************************
函 數 名：W_1byte
入口參數：RW、RS、W_data
出口參數：無
建立日期：2007年3月3日
修改日期：
函數作用：寫一個字節的數據到12864液晶，包括指令和數據
說    明：RW=1，從液晶讀數據到MCU；RW=0，寫一個數據到液晶；
   （一般RW都設為0，即只向液晶寫數據，不讀數據）
          RS=1，寫入的是數據；RS=0，寫入的是指令；
    一般模式：RW=0，RS=1;寫數據
       RW=0，RS=0;寫指令
********************************************************************/
void W_1byte(uchar RW, uchar RS, uchar W_data)
{
	uint H_data,L_data,S_ID = 0xf8;	 //11111RWRS0
	nop();
	if(RW == 0)
	{
	 	S_ID &=~ 0x04;
	}
	else					//if(RW==1)
	{
	 	S_ID |= 0X04;
	}
	if(RS == 0)
	{
	 	S_ID &=~ 0x02;
	}
	else					//if(RS==1)
	{
	 	S_ID |= 0X02;
	}
	H_data = W_data;
	H_data &= 0xf0;			//屏蔽低4位的數據
	L_data = W_data;	   	//xxxx0000格式
	L_data &= 0x0f;			//屏蔽高4位的數據
	L_data <<= 4;			//xxxx0000格式
	Set_CS();
	Write_8bits(S_ID); 		//發送S_ID
	Write_8bits(H_data);	//發送H_data
	Write_8bits(L_data);	//發送L_data
	Clr_CS();	
}
/********************************************************************
函 數 名：Write_8bits
入口參數：W_bits
出口參數：無
建立日期：2007年3月3日
修改日期：
函數作用：負責串行輸出8個bit位
說    明：
********************************************************************/
void Write_8bits(uint W_bits)
{
	uint i,Temp_data;
	for(i=0; i<8; i++)
	{
		Temp_data = W_bits;
		Temp_data <<= i;
		if((Temp_data&0x80)==0)
		{
		 	Clr_SID();
		}
		else
		{
		 	Set_SID();
		} 
		nop();
		Set_SCLK();
		nop();
		nop();
		Clr_SCLK();
		nop();
		Clr_SID();
	}
}
/*
//字符反白函數
//clear==1時清除反白
//clear==0時設置反白
void Set_White(uchar x,uchar y,uchar end_x,uchar clear)
{
 	uchar i, j, white_x, white_y,white_end_x,clr_x,clr_y;		//
	white_end_x = (end_x-x+1);
	white_end_x <<= 1;
	if(y==1)
	{
	 	white_x = (0x80+x-1);
		white_y = 0x80;
		clr_x = 0x80;
		clr_y = 0x80;
	}
	else if(y==2)
	{
	 	white_x = (0x80+x-1);
		white_y = 0x90;
		clr_x = 0x80;
		clr_y = 0x90;
	}
	else if(y==3)
	{
	 	white_x = (0x88+x-1);
		white_y = 0x80;
		clr_x = 0x88;
		clr_y = 0x80;
	}
	else if(y==4)
	{
	 	white_x = (0x88+x-1);
		white_y = 0x90;
		clr_x = 0x88;
		clr_y = 0x90;
	}
	if(clear==0)//要反白時，先將整行的液晶全部清成不反白（此處行指y）
	{
	 	for(i=0;i<16;i++ )			//16行
		{
		 	W_1byte(0,0,clr_y++);	//設置繪圖區的Y地址坐標0
			W_1byte(0,0,clr_x);		//設置繪圖區的X地址坐標0
			for(j=0;j<16;j++)		//
			{
			 	W_1byte(0,1,0x00);	//清成不反白
			 	nop();
			}
		}
	}
	nop();
	for(i=0;i<16;i++ )				//16行，因為是16*16漢字
	{
		W_1byte(0,0,white_y++);		//設置繪圖區的Y地址坐標0
		W_1byte(0,0,white_x);		//設置繪圖區的X地址坐標0
		for(j=0;j<white_end_x;j++)	//
		{
			 if(clear==1)
			 {
			  	W_1byte(0,1,0x00); //取消這一行的8個點的反白，液晶地址自動加1
								   //（此處行指一個一個液晶點所組成的行）
			 }
			 else
			 {
				W_1byte(0,1,0xff); //反白這一行的8個點，液晶地址自動加1
								   //（此處行指一個一個液晶點所組成的行）
			 }
			 nop();
		}
	}
}*/