/****************************************************************************/
//功能： LCD1602液晶顯示程序
//輸入： 無
//輸出： 無
//備注： LCD1602采用四線連接方式4~7
/****************************************************************************/
#include "delay.h"

#define uchar unsigned char 
#define uint unsigned int
/****************************端口宏定義**************************************/
//LCD1602端口連接按照下面方式連接,RW接地.																		 
#define LCD_EN_PORT   PORTA 
#define LCD_EN_DDR    DDRA 
#define LCD_EN        (1<<PA3)

#define LCD_RS_PORT   PORTA 
#define LCD_RS_DDR    DDRA 
#define LCD_RS        (1<<PA1)

#define LCD_DATA_PORT PORTA 
#define LCD_DATA_DDR  DDRA 
#define LCD_DATA_PIN  PINA 
#define LCD_DATA ((1<<4)|(1<<5)|(1<<6)|(1<<7))
/****************************函數申明****************************************/
void LCD_init(void);
void LCD_en_write(void);
void LCD_Write_char(uchar command,uchar data);
void LCD_Clear(void);
void LCD_set_xy (uchar x, uchar y);
void LCD_DisplayCharacter (uchar Char);
void LCD_DisplayString (uchar x, uchar y ,uchar *string);
void LCD_DisplayInt (uchar x, uchar y ,uint t);
void LCD_Displayasc (uchar x, uchar y,  uchar asc);
void LCD_DisplayLong(uchar x, uchar y ,unsigned long t);

/*******************************液晶初始化***********************************/
void LCD_init(void) //液晶初始化 
{ 
  LCD_DATA_DDR|=LCD_DATA; //數據口方向為輸出 
  LCD_EN_DDR|=LCD_EN; //設置EN方向為輸出 
  LCD_RS_DDR|=LCD_RS; //設置RS方向為輸出 
  LCD_Write_char(1,0x28); 
  LCD_en_write(); 
  delay_nus(40); 
  LCD_Write_char(1,0x28); //4位顯示 
  LCD_Write_char(1,0x0c); //顯示開 
  LCD_Write_char(1,0x01); //清屏 
  delay_nms(2); 
} 
/*******************************液晶使能*************************************/
void LCD_en_write(void) //液晶使能 
{ 
  LCD_EN_PORT|=LCD_EN; 
  delay_nus(1); 
  LCD_EN_PORT&=~LCD_EN; 
} 
/*******************************寫操作***************************************/
void LCD_Write_char(unsigned char command,unsigned char data) 
{ 
  delay_nus(16); 
  if(command==1)        //command為1則寫指令
  LCD_RS_PORT&=~LCD_RS; //RS=0 
  else                 //command為零則寫數據
  LCD_RS_PORT&=LCD_RS; 
  
  LCD_DATA_PORT&=0x0f; //清高四位 
  LCD_DATA_PORT|=data&0xf0; //寫高四位 
  LCD_en_write(); 
  data=data<<4; //低四位移到高四位 
  LCD_DATA_PORT&=0x0f; //清高四位 
  LCD_DATA_PORT|=data&0xf0; //寫低四位 
  LCD_en_write(); 
} 



/*******************************清屏*****************************************/
void LCD_Clear(void)
{
LCD_Write_char(1,0x01);
}
/****************************************************************************/
//函數名：    LCD_Cursor (char row, char column)
//功能：      設置液晶顯示橫，縱坐標
//輸入：      row,column
//輸出：      無
//備注：      
/****************************************************************************/
void LCD_set_xy (uchar x, uchar y)
{
  uchar address;
   {
     if(y==0)
	 address=0x80+x;
	 else
	 address=0x90+x;
	 LCD_Write_char(1,address);
   }
}
/****************************************************************************/
//函數名：    LCD_DisplayCharacter (char Char)
//功能：      顯示一個字符
//輸入：      Char
//輸出：      無
//備注：      
/****************************************************************************/
void LCD_DisplayCharacter (uchar Char)
{
  LCD_Write_char (0,Char);
}
/****************************************************************************/
//函數名：    LCD_DisplayString() 
//功能：      顯示一個字符串
//輸入：      row,column,*string
//輸出：      無
//備注：      
/****************************************************************************/
void LCD_DisplayString (uchar x, uchar y ,uchar *string)
{
 LCD_set_xy (x, y);
 while (*string)
  LCD_DisplayCharacter (*string++);
}
/****************************************************************************/
//函數名：    LCD_DisplayString ()
//功能：      顯示一個字符串
//輸入：      row,column,t
//輸出：      無
//備注：      
/****************************************************************************/
uchar ch1[6];                      //用于存放INT轉換成字符串后的數據
void  LCD_DisplayInt (uchar x, uchar y ,uint t)
{ 
  unsigned char n;
  unsigned char a[5]; char i, j;   
  unsigned char *str=ch1;                             
  a[0]=(t/10000)%10;         //取得整數值到數組          
  a[1]=(t/1000)%10;                                      
  a[2]=(t/100)%10;                                       
  a[3]=(t/10)%10;                                        
  a[4]=(t/1)%10;                                         
                                                      
  for(i=0; i<5; i++)         //轉成ASCII碼               
    a[i]=a[i]+'0';                                     
  for(i=0; a[i]=='0' && i<=3; i++);   
    n=5-i;                   
  for(j=5-n; j<i; j++)       //填充空格                  
    { *str=' ';  str++; }                              
  for(; i<5; i++)                                        
    { *str=(char)a[i]; str++; }  //加入有效的數字            
  *str='\0'; 
  LCD_DisplayString(x,y,ch1);
}
/****************************************************************************/
//函數名：    LCD_Displayasc (char row, char column unsigned char *asc)
//功能：      顯示一個ascii值
//輸入：      row,column,*asc
//輸出：      無
//備注：      
/****************************************************************************/
void LCD_Displayasc (uchar x, uchar y,  char asc)
{ uchar ascii[2],temp;
  temp=asc;
  ascii[0]=temp+'0';
  ascii[1]='\0';
  LCD_DisplayString(x,y,ascii);
}
/****************************************************************************/
//函數名：    LCD_DisplayLong(char row, char column ,unsigned long t)
//功能：      顯示一個字符串
//輸入：      row,column,t
//輸出：      無
//備注：      
/****************************************************************************/
uchar ch2[8];                      //用于存放LONG轉換成字符串的數據
void  LCD_DisplayLong(uchar x, uchar y ,unsigned long t)
{ 
  uchar n;
  uchar a[8]; 
  uchar i, j;   
  uchar *str=ch2; 
  a[0]=(t/10000000)%10;
  a[1]=(t/1000000)%10;
  a[2]=(t/100000)%10;                            
  a[3]=(t/10000)%10;         //取得整數值到數組          
  a[4]=(t/1000)%10;                                      
  a[5]=(t/100)%10;                                       
  a[6]=(t/10)%10;                                        
  a[7]=(t/1)%10;                                         
                                                      
  for(i=0; i<8; i++)         //轉成ASCII碼               
    a[i]=a[i]+'0';                                     
  for(i=0; a[i]=='0' && i<=7; i++);   
    n=8-i;                   
  for(j=8-n; j<i; j++)       //填充空格                  
    { *str=' ';  str++; }                              
  for(; i<8; i++)                                        
    { *str=(char)a[i]; str++; }  //加入有效的數字            
  *str='\0'; 
  LCD_DisplayString(x,y,ch2);
}