#define uchar unsigned char 
#define uint unsigned int 

#define RS 5
#define RW 6
#define EN 7

void s_ms(uint ms)
{
	for(;ms>1;ms--);
}	

//查忙
void busy(void)
{
    uchar temp;
	PORTB&=~(1<<RS);    //RS=0
	s_ms(20);
	PORTB|=(1<<RW);     //RW=1
	s_ms(20);
	while(temp)
	{
		PORTB|=(1<<EN); //EN=1
		s_ms(20);
		DDRA=0x00;      //A口變輸入
		PORTA=0xff;     //上拉使能
		s_ms(20);
		temp = PINA&0x80;    //讀取A口
		s_ms(20);      
		DDRA=0xff;      
		PORTA=0xff;        //A口變輸出
		s_ms(20);
		PORTB&=~(1<<EN);   //EN=0
		s_ms(20);
	}
}

//寫指令
void writecom(uchar	com)
{
	busy();
	s_ms(20);
	PORTB&=~(1<<RS);   //RS=0
	s_ms(20);
	PORTB&=~(1<<RW);   //RW=0
	s_ms(20);
	PORTB|=(1<<EN);    //EN=1
	s_ms(20);
	PORTA = com;       //輸出指令
	s_ms(20);
	PORTB&=~(1<<EN);   //EN=0
	s_ms(20);
}

//1602初始化
void	LcdInit(void)
{
    DDRA = 0xff; 
    PORTA = 0x00; 
	writecom(0x38);
	s_ms(20);
	writecom(0x01);
	s_ms(1000);
	s_ms(1000);
	s_ms(1000);
	writecom(0x02);
	s_ms(20);
	writecom(0x06);
	s_ms(20);
	writecom(0x0c);
	s_ms(20);
	writecom(0x38);	
	s_ms(20);
}	

//寫數據
void	writedata(uchar data)
{
	busy();
	s_ms(20);
	PORTB|=(1<<RS);   //RS=1
	s_ms(20);
	PORTB&=~(1<<RW);   //RW=0
	s_ms(20);
	PORTB|=(1<<EN);    //EN=1
	s_ms(20);
	PORTA = data;      //輸出數據
	s_ms(20);
	PORTB&=~(1<<EN);   //EN=0
	s_ms(20);
}


//讀數據
uchar	readdata(void)
{
	uchar temp;
	busy();
	s_ms(20);
	PORTB|=(1<<RS);  //RS=1
	s_ms(20);
	PORTB|=(1<<RW);  //RW=1
	s_ms(20);
	PORTB|=(1<<EN);  //EN=1
	s_ms(20);
	DDRA=0x00;       //A端口變輸入
	s_ms(20);
	temp = PINA;     //讀A端口
	s_ms(20);
	DDRA=0xff;       //A端口變輸出
	s_ms(20);
	PORTB&=~(1<<EN); //EN=0
	s_ms(20);
	return temp;	
}

//=================================================
// 描述： 寫LCD內部CGRAM函數
// 入口： ‘num’要寫的數據個數
//        ‘pbuffer’要寫的數據的首地址
// 出口： 無
//================================================
void	WriteCGRAM(uint	num, const uint	*pBuffer)
{
	uint	i,t;
	writecom(0x40);
	PORTB|=(1<<RS);
	PORTB&=~(1<<RW);
	for(i=num;i!=0;i--)
	{
		t = *pBuffer;
		PORTB|=(1<<EN);
		PORTA = t;
		PORTB&=~(1<<EN);				
		pBuffer++;
	}
	
}

//=================================================
//描述：寫菜單函數，本程序使用的LCD規格為 16 * 2
//入口：菜單數組首地址
//出口：無
//=================================================
void	WriteMenu(const uchar *pBuffer)
{
	uchar	i,t;
	writecom(0x80);   //數據地址
	
	PORTB|=(1<<RS);
	PORTB&=~(1<<RW);
	s_ms(20);
	for(i=0;i<16;i++)
	{
		t = *pBuffer;
		PORTA = t;
		PORTB|=(1<<EN);
		s_ms(20);
		PORTB&=~(1<<EN);				
		pBuffer++;
	}
	writecom(0xC0);

	PORTB|=(1<<RS);
	PORTB&=~(1<<RW);
	s_ms(20);	
	for(i=0;i<16;i++)
	{
		t = *pBuffer;
		PORTA = t;
		PORTB|=(1<<EN);
		s_ms(20);
		PORTB&=~(1<<EN);				
		pBuffer++;
	}
}
//====================================================
// 描述：在任意位置寫數字函數
// 入口：’row‘表示要寫數字所在的行地址，只能為1或2
//       ’col‘表示要寫數字所在的列地址，只能為0--15
//		 ‘num’表示要寫的數字，只能為0--9
// 出口：無
//===================================================
void	WriteNum(uint	row,uint	col,uint	 num)
{
	if (row == 1)	row = 0x80 + col;
	else	row = 0xC0 + col;
	writecom(row);
	if (num<=0 | num>9)	num =0x30;
	else	num = 0x30 + num;

	PORTB|=(1<<RS);
	s_ms(20);
	PORTB&=~(1<<RW);
	s_ms(20);
	PORTA = num;
	s_ms(20);
	PORTB|=(1<<EN);
	s_ms(20);
	PORTB&=~(1<<EN);	
	s_ms(20);			
}
//================================================================
// 描述：在任意位置寫任意多個字符
// 入口：’row‘要寫的字符所在的行，只能為1或2；
//       ‘col’要寫的字符所在的列，只能為0---15
//       ‘num’要寫字符的個數
//       ‘pbuffer’要寫字符的首地址
//================================================================== 
void	WriteChar(uchar row,uchar col,uchar num,uchar *pBuffer)
{
	uchar i,t;
	if (row == 1)	row = 0x80 + col;
	else	row = 0xC0 + col;
	writecom(row);
	//if (num<=0 | num>9)	num =0x30;
	//else	num = 0x30 + num;

	PORTB|=(1<<RS);
	s_ms(20);
	PORTB&=~(1<<RW);
	s_ms(20);
	for(i=num;i!=0;i--)
	{
		t = *pBuffer;
		s_ms(20);
		PORTA = t;
		s_ms(20);
		PORTB|=(1<<EN);
		s_ms(20);
		PORTB&=~(1<<EN);		
		s_ms(20);		
		pBuffer++;
	}
	
}